|
Do you have source some source that you want to share? Is there some source that you want to see posted here? If so, Contact Us and we'll be more than happy to help. |
* PRINTER FILE INFORMATION DATA STRUCTURE
*
* SYSTEM : TS400
* USER NAME : JOHN ROSS
* DATE : 02/21/1999
*=====================================================================
A R @INFDS$ TEXT('INFDS PRTF')
A @$XX00 82 TEXT('FILLER')
A @$FVN 10 TEXT('SPOOLED FILE NAME')
A @$LVN 10 TEXT('LIBRARY NAME')
A @$XX01 20 TEXT('FILLER')
A @$FNB 4B 0 TEXT('SPOOLED FILE NUMBER')
A @$XX02 27 TEXT('FILLER')
A @$PGL 4B 0 TEXT('PAGE LENGTH')
A @$XX03 34 TEXT('FILLER')
A @$OFL 4B 0 TEXT('OVERFLOW LINE')
A @$XX04 177 TEXT('FILLER')
A @$CLN 4B 0 TEXT('CURRENT LINE')
A @$PGN 8B 0 TEXT('CURRENT PAGE')
|