Page History

...

The BASIC+ logic that generates a resolved list looks something like this:

SELECT "FILENAME" BY "FIELD1" SETTING 0 ELSE
  CALL MSG(@window, "Select failed with status ":STATUS())
  RETURN 0
END
* resolved list now available
* (no BFS access required)
DONE = 0
LOOP
READNEXT @ID ELSE DONE = 1
UNTIL DONE DO
(etc.)
REPEAT

...

In order to resolve the select list, the special SELECT processor must examine each record in the file (or index). As a result, SELECT ... BY generates a series of filing system calls. In effect, the single BASIC+ SELECT statement compresses an entire SELECT ... READNEXT ... READ loop into a single statement, examining each record in the file.

When the READNEXT loop is completed and all records have been assembled, the SELECT processor sorts the records. The result is a resolved select list, with the keys in order according to sort criteria specified in the SELECT ... BY statement. The entire select list is then available in the system list variable and @LIST.ACTIVE is set to 3. Because the SELECT ... BY statement has completely resolved the select list, no further filing system calls are required. The READNEXT processor simply fetches the sorted keys from the system list variable, without requiring filing system READNEXT calls.