FN_GLPTCAP()
 Gets Default LPT Capture Status
------------------------------------------------------------------------------
 Syntax
 
      lLPTCapStat := fn_gLPTCap(@nServerNumber)
 
 Arguments

     <nServerNumber> is the Connection ID of the server queueing the job.
                     NOTE! THIS MUST BE PASSED BY REFERENCE

 Returns

    <lLPTCapStat>    is the default LPT Capture Status.
    <nServerNumber>  is set to the Connection ID of the server
                     queueing the job if the default LPT capture is on.

 Description

  This function returns the capture status of the default LPT. If the
  default LPT is being captured the the function returns .T. and sets the
  nServerNumber parameter to the connection Id of the server that is
  queueing the LPT. When the default LPT is not being captured, the
  nServerNumber parameter is set to 0.

  The workstation maintains a Connection Id table of servers and the
  nServerNumber is an index into that table.

 Examples

  function main()

     local   lLPTCapStat:=.F.,nServerNumber:=0
     lLPTCapStat := fn_gLPTCap(@nServerNumber)
           QOut("Default LPT is " + IF(!lLPTCapStat,"not","") + " being captured.")

  return NIL


 Source: N:\SRC\PRINT\GCAPSTAT.PRG

 Author: Christopher Shortt