home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
HomeWare 14
/
HOMEWARE14.bin
/
prog
/
ks94an.arj
/
TERMNATE.HDR
< prev
next >
Wrap
Text File
|
1994-04-24
|
934b
|
38 lines
/******************************************************************************
The Klipper Library, for CA-Clipper 5.x
Copyright (c), 1994, Wallace Information Systems Engineering
FUNCTION:
_Terminate( cTermMsg, nErrorLevel ) --> NIL
PARAMETERS:
cTermMsg : message to display at termination
nErrorLevel : Errorlevel to set before returning to OS
SHORT:
General purpose application death-invoker with ERRORLEVEL set.
DESCRIPTION:
_Terminate() ends program operation. It clears the screen, displays the
cTermMsg message, closes all files and QUITs with ERRORLEVEL set to
specified value.
NOTE:
EXAMPLE:
if UNRECOVERABLE_ERROR
_Terminate('An unrecoverable error has occured',1)
endif
Result: The message is dislayed and the program is terminated with
an ERRORLEVEL = 1.
******************************************************************************/