Command Reference 5-59
Example
This example defines a macro (PTRIDLE) to check the status of the printer.
DEFINE TEMPORARY, tEnqStatus, 3
DEFINE TEMPORARY, tPrinterOK, 1, N
MACRO PTRIDLE
BEGIN
MOVE #0, %1
CHECK ENQSTATUS, tEnqStatus
COMPARE tEnqStatus, EQ, "A@", *PI_END_$
MOVE #1, %1
*PI_END_$
END