Difference between revisions of "SELECT()"

From Lianjapedia
Jump to: navigation, search
Line 1: Line 1:
 
==Purpose==
 
==Purpose==
Function to return the current workarea number
+
Function to return the current or specified cursor/workarea number
  
 
==Syntax==
 
==Syntax==
SELECT([<alias>])
+
SELECT([<alias> | <expN>])
  
 
==See Also==
 
==See Also==
Line 10: Line 10:
 
==Description==
 
==Description==
 
The SELECT() function returns the number of the currently selected workarea.  If the optional <alias> is specified, the SELECT() function returns the workarea number for that alias.  If the <alias> specified does not exist, the SELECT() function will return a 0.
 
The SELECT() function returns the number of the currently selected workarea.  If the optional <alias> is specified, the SELECT() function returns the workarea number for that alias.  If the <alias> specified does not exist, the SELECT() function will return a 0.
 +
Specifying 0 as <expN> returns the current cursor/workarea number, specifying 1 as <expN> returns the highest available empty cursor/workarea number.
  
 
==Example==
 
==Example==
Line 19: Line 20:
 
? select ("prefixes")
 
? select ("prefixes")
 
         3
 
         3
 +
? select(0)
 +
        3
 +
? select(1)
 +
      100
  
 
// Another Example
 
// Another Example

Revision as of 08:40, 30 May 2013

Purpose

Function to return the current or specified cursor/workarea number

Syntax

SELECT([<alias> | <expN>])

See Also

ALIAS(), DBF(), SELECT, USE, WORKAREA()

Description

The SELECT() function returns the number of the currently selected workarea. If the optional <alias> is specified, the SELECT() function returns the workarea number for that alias. If the <alias> specified does not exist, the SELECT() function will return a 0. Specifying 0 as <expN> returns the current cursor/workarea number, specifying 1 as <expN> returns the highest available empty cursor/workarea number.

Example

close all
? select()
         1
use prefixes in 3
? select ("prefixes")
         3
? select(0)
         3
? select(1)
       100
 
// Another Example
// to access each open workarea
m_count=0
select 1
do while not empty(alias())
  m_count = m->m_count + reccount()
  select select() + 1
enddo
dialog box "Total records in all tables is &m_count"