Raises a system alert.
ALERT eventID info
eventID The identifier of the required alert event, created using the realevent host command.
info A text message that will
appear in the Info field of the alert.
SYSMAN and SYSPROG accounts only. If you need ALERT in other accounts, you must copy it to them.
Before using the ALERT command, system alerts must be configured using the realevent host command.
ALERT 4001 "This is a test alert!"
Raises alert 4001 (previously created using realevent) and sends the additional message "This is a test alert!".
PARAM = '/PRODUCTION/INVENTORY' OPEN PARAM TO PI95 SETTING ECODE ELSE EMSG = ECODE:": Cannot open file ":PARAM PRINT EMSG PERFORM "ALERT 4010 ":EMSG END
This DataBasic program opens the file INVENTORY, which is defined on account PRODUCTION. If the file cannot be opened, an error message is printed on the terminal and system alert 4010 (previously set up using realevent) is generated, with additional text formed by concatenating the error code, an error message and the file name.