R/Basic Subroutine for checking printer status (AREV Specific)
At 10 FEB 1998 01:29:28AM Big Kahuna wrote:
Hi,
I was wondering how to check the status of a printer being on, off or
disconnected before using the perform statement to print a contract
within my program.
If perhaps the printer is off-line, I would like to call a msg saying
"Printer off-line" or something like that, and if so return to the process
that called it, other than the traditional arev (Q)uit or (R)etry, which
blanks everything on my screen.
Some sample code would be of great help!
TIA,
Big Kahuna
At 10 FEB 1998 02:44AM Don Bakke wrote:
You want to use PRNSTAT. Depending on which version of AREV you are using it is either a subroutine or a function. I forget the exact version the switch was made but I believe that 1.x and 2.x use it as a subroutine and 3.x uses it as a function. The syntax would be as follows:
<code> Call PrnStat(x)
/*
As a subroutine, PrnStat always assumed LPT1
Status Meaning
0 Printer ok
1 Printer not selected (or not connected)
2 Printer out of paper (or not connected)
3 I/O or timeout error
*/ <code>
or…
<code> Declare function PrnStat
x=PrnStat(Port)
/*
Port is 1 (for LPT1), 2 (for LPT2), or 3 (for LPT3)
Status Meaning
0 Printer ok
1 Printer not selected (or not connected)
2 Printer out of paper (or not connected)
3 I/O or timeout error
*/ <code>
