Using EXIT_SYSTEM (Functions/Subroutines/Programs)

EXIT_SYSTEM

EXIT_SYSTEM( displayMessage )

Using EXIT_SYSTEM

Does a clean logoff from Advanced Revelation from within an R/BASIC program. In addition to logging off, EXIT_SYSTEM accomplishes these tasks:

Writes out any cached index updates that might be pending because **BATCH.INDEXING **has been invoked. For details about **BATCH.INDEXING**, see the Revelation Technologies Knowledge Base.

Detaches all volumes belonging to Environmental Bonds (or other non-native filing systems) so that those filing systems can run their own cleanup operations.

displayMessage

If this parameter is passed true, the normal Advanced Revelation logoff message (W170) is displayed.

Correct use of EXIT_SYSTEM

text = "Are you sure you want to quit? [Y/N]"

map = ""

map<1> = "RC"

map<133> = "1" /* literal message */

map<15> = "(B)" /* validate a Y/N (boolean) response */

response = 0 /* default = No */

call msg( text, map, response, "" )

if response = 1 then

displayMessage = "" /* don't display a message */

call exit_system( displayMessage )

end