The following example opens the customer
table in the testdata
database. FOR ... ENDFOR is used to create a loop in which EMPTY( ) s used to determine if TAG( ) returns the empty string. The name of each structural index tag is displayed with its candidate status.
CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'data\testdata')
USE customer && Open customer table
FOR nCount = 1 TO 254
IF !EMPTY(TAG(nCount)) && Checks for empty string
? TAG(nCount) && Display tag name
? CANDIDATE(nCount) && Display candidate status
ELSE
EXIT && Exit the loop when no more tags are found
ENDIF
ENDFOR