The following example opens the customer
table in the testdata
database. FOR ... ENDFOR is used to create a loop in which the candidate status of each index tag in the customer
structural index is checked. 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 tags in the index
? TAG(nCount) && Display tag name
? CANDIDATE(nCount) && Display candidate status
ELSE
EXIT && Exit the loop when no more tags are found
ENDIF
ENDFOR