Using EXIT_SYSTEM (Functions/Subroutines/Programs) [Revelation On-Line Wiki]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

====== Using EXIT_SYSTEM (Functions/Subroutines/Programs) ======

======   ======

==== Created at 14 NOV 1996 02:46PM ====




**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