SELECT()

From Lianjapedia
Jump to: navigation, search

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"