home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 2
/
ctrom_ii_b.zip
/
ctrom_ii_b
/
PROGRAM
/
FOXPRO
/
FCT1_12
/
FC_SPOOL.HDR
< prev
next >
Wrap
Text File
|
1990-09-28
|
2KB
|
99 lines
#output Force Tools 1.1 - DOS spooler (print.com) functions
**********************************
* IsSpool()
*
* Return .T. if Spooler installed
*
FUNCTION LOGICAL IsSpool PROTOTYPE
**********************************
* IsSpoolPrn()
*
* Return .T. if the spooled printer
* is ready
*
*
FUNCTION LOGICAL IsSpoolPrn PROTOTYPE
**********************************
* AddSpool(<CHAR>)
*
* Adds a file to the Dos Spooler
*
* Para : Filename to Add
* Ret : ErrorCode : 00 Succes
* 01 function invalid
* 02 file not found
* 03 path not found
* 04 too many open files
* 05 access denied
* 08 queue full
* 09 spooler busy
* 12 name too long
* 15 drive invalid
*
FUNCTION UINT AddSpool PROTOTYPE
PARAMS CONST CHAR
**********************************
* RemSpool(<CHAR>)
*
* Remove file from spooler
*
* Para : Filename to Add (Wildcards ok)
* Ret : Errorcode
*
FUNCTION UINT RemSpool PROTOTYPE
PARAMS CONST CHAR
**********************************
* ClrSpool()
*
* Remove all files from spooler
*
* Ret : Errorcode
*
FUNCTION UINT ClrSpool PROTOTYPE
**********************************
* ErrSpool()
*
* Hold spooler print, Get Status
*
* Ret : Errorcode
*
FUNCTION UINT ErrSpool PROTOTYPE
**********************************
* ResSpool()
*
* Restart spooler after ErrSpool
*
*
PROCEDURE ResSpool PROTOTYPE
**********************************
* NumSpool()
*
* return number of free queue entries
*
*
FUNCTION INT NumSpool PROTOTYPE
**********************************
* QueSpool()
*
* return the number of entries in
* the queue
*
*
FUNCTION INT QueSpool PROTOTYPE
*
* copy the print queue to a pick list
*
procedure queue_to_pick_list prototype
params value long pick_handle
* eof - fc_spool.hdr