Click above to get retro games delivered to your door ever month!

 PJbFmNumGet()
------------------------------------------------------------------------------
 Purpose:
 Get the required form for the current print job.

 Syntax:
 iFmNum = PJbFmNumGet( wPtrNum )

 Parameters:
 wPtrNum The printer number.

 Returns:
 A numeric value (signed short int).

 Description:
 PJbFmNumGet() returns the form number of the form required by the print
 job currently being serviced by printer wPtrNum.

 Returns NOVERRINT if an error occurs.

 Example:
 // To log in to print server PRINTERS and test printer 0 to display the
 // job number being printed, the queue and print server from which
 // it originated, its description and form number:
 if( PSWSLogin ( "PRINTERS" ) > 0 )
    iJobNum    = PJbNumGet(0)
    lpszServer = PJbFSGet(0)
    lpszQueue  = PJbQueGet(0)
    lpszDesc   = PJbDescGet(0)
    iFormNo    = PJbFmNumGet(0)
    if iJobNum > 0
       ? "Printer 0 of print server PRINTERS, is printing "
       ?? "Job number ",iJobNum," from print queue ",lpszQueue
       ? "from file server ",lpszServer
       ? "The description for this job is ",lpszDesc
       ??" using form number ",iFormNo
    endif
 endif

 Notes:
 It is only possible to be logged in to one print server at a time.

 PJbFmNumGet() returns the form that is required by the print job,
 which is not necessarily the one that is loaded on the printer.