home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 15 / CD_ASCQ_15_070894.iso / vrac / printsnw.zip / PRINT.BI < prev    next >
Text File  |  1993-12-23  |  6KB  |  204 lines
  1. TYPE NetAddr                                    'GetInternetAddress
  2.       ConnectNum AS INTEGER
  3.       AxAsm AS INTEGER
  4.       returnstr AS STRING * 12
  5. END TYPE
  6.  
  7. TYPE Hex2asc                                    'Hex2asc
  8.       Beginstr AS STRING * 12
  9.       NetAddr AS STRING * 24
  10. END TYPE
  11.  
  12. TYPE ConInfo                                    'GetConnectionInfo
  13.       ConnectNum AS INTEGER
  14.       ReturnCode AS INTEGER
  15.       ObjectType AS INTEGER
  16.       ObjectName AS STRING * 48
  17. END TYPE
  18.  
  19. TYPE ConNum                                     'GetConnectionNumber
  20.       ConnectionNumber AS INTEGER
  21. END TYPE
  22.  
  23. TYPE ShellI                                     'GetShellInfo
  24.     majorVersion AS INTEGER
  25.     MinorVersion AS INTEGER
  26.     revnum AS INTEGER
  27.     OsType AS STRING * 10
  28.     OsVersion AS STRING * 10
  29.     hardwareType AS STRING * 10
  30. END TYPE
  31.  
  32. TYPE LDrives                                    'GetNumberOfLocalDrives
  33.       Drives AS INTEGER
  34. END TYPE
  35.  
  36. TYPE SConinfo                                   'ServerConnectionInfo
  37.       conID1 AS INTEGER
  38.       conID2 AS INTEGER
  39.       conID3 AS INTEGER
  40.       conID4 AS INTEGER
  41.       conID5 AS INTEGER
  42.       conID6 AS INTEGER
  43.       conID7 AS INTEGER
  44.       conID8 AS INTEGER
  45.       server1 AS STRING * 50
  46.       server2 AS STRING * 50
  47.       server3 AS STRING * 50
  48.       server4 AS STRING * 50
  49.       server5 AS STRING * 50
  50.       server6 AS STRING * 50
  51.       server7 AS STRING * 50
  52.       server8 AS STRING * 50
  53. END TYPE
  54.  
  55. TYPE LogTime                                    'GetLoginTime
  56.       ConnectNum AS INTEGER
  57.       ReturnCode AS INTEGER
  58.       year AS INTEGER
  59.       month AS INTEGER
  60.       daydate AS INTEGER
  61.       hour AS INTEGER
  62.       minute AS INTEGER
  63.       second AS INTEGER
  64.       day AS INTEGER
  65. END TYPE
  66.  
  67. TYPE ObInfo                                     'GetObjectInfo
  68.       ReturnCode AS INTEGER
  69.       ObjectType AS INTEGER
  70.       ObjectName AS STRING * 47
  71.       ObjectID   AS STRING * 4
  72. END TYPE
  73.                         'ConvertObjectID
  74. TYPE Obid
  75.     strin AS STRING * 4
  76.     strout AS STRING * 8
  77. END TYPE
  78.  
  79. TYPE SBind                                      'ScanBindery
  80.       ReturnCode AS INTEGER
  81.       ObjectType AS INTEGER
  82.       ObjectName AS STRING * 47
  83.       OldObjectID AS STRING * 8
  84.       ObjectID   AS STRING * 8
  85. END TYPE
  86.  
  87. TYPE ClCon                                      'ClearConnection
  88.       ConnectNum AS INTEGER
  89.       ReturnCode AS INTEGER
  90. END TYPE
  91.  
  92. TYPE CapStat                                    'GetLPTCaptureStatus
  93.       ReturnCode AS INTEGER
  94.       ConnID AS INTEGER
  95. END TYPE
  96.  
  97. TYPE CurQueue                                   'GetCurrentQueue
  98.     ReturnCode AS INTEGER
  99.     LPTNum AS INTEGER
  100.     queueID AS STRING * 8
  101.     QueueName AS STRING * 47
  102. END TYPE
  103.  
  104. TYPE PFlags                                     'GetPrintFlag
  105.     Flags AS INTEGER                        'SetPrintFlag
  106.     TabSize AS INTEGER
  107.     Copies AS INTEGER
  108.     BannerText AS STRING * 13
  109.     LPTNum AS INTEGER
  110.     Timeout AS INTEGER
  111.     ReturnCode AS INTEGER
  112. END TYPE
  113.  
  114. TYPE GDLP                                       'GetDefaultLocalPrinter
  115.       LPTNum AS INTEGER
  116. END TYPE
  117.  
  118. TYPE QUEUE                                      'SetCapturePrintQueue
  119.       LPTNum AS INTEGER
  120.       queueID AS STRING * 8
  121.       ReturnCode AS INTEGER
  122. END TYPE
  123.  
  124. TYPE CAPTURE                                    'StartLPTCapture
  125.       LPTNum AS INTEGER                     'CancelSpecificLPTCapture
  126.       ReturnCode AS INTEGER                 'SetDefaultLocalPrinter
  127. END TYPE
  128.  
  129. TYPE OCBindery                                  'OpenBindery
  130.     ReturnCode AS INTEGER                   'CloseBindery
  131. END TYPE
  132.  
  133. TYPE GST                                        'GetServerTime 
  134.       year AS INTEGER
  135.       month AS INTEGER
  136.       daydate AS INTEGER
  137.       hour AS INTEGER
  138.       minute AS INTEGER
  139.       second AS INTEGER
  140.       day AS INTEGER
  141. END TYPE
  142.  
  143. TYPE SST                                        'SetServerTime
  144.       year AS INTEGER
  145.       month AS INTEGER
  146.       day AS INTEGER
  147.       hour AS INTEGER
  148.       minute AS INTEGER
  149.       second AS INTEGER
  150.       ReturnCode AS INTEGER
  151. END TYPE
  152.  
  153. TYPE SCMESS                                     'SendMsgToConsole
  154.       ReturnCode AS INTEGER
  155.       Message AS STRING * 60
  156. END TYPE
  157.  
  158. TYPE SBMESS                                     'SendBroadcastMsg
  159.       ConID AS INTEGER
  160.       ReturnCode AS INTEGER
  161.       Message AS STRING * 55
  162. END TYPE
  163.  
  164. TYPE SBMODE                                     'SetBroadcastMode
  165.       Mode AS INTEGER
  166. END TYPE
  167.  
  168. TYPE DefServ                                    'GetDefaultConnectionID
  169.      DefConnectionID AS INTEGER
  170. END TYPE
  171.  
  172. ' DECLARE STATMENTS
  173.  
  174. DECLARE SUB GetIntenetAddress (Addr AS NetAddr)
  175. DECLARE SUB Hex2asc (hex2Ascii AS Hex2asc)
  176. DECLARE SUB GetConnectionInfo (Info AS ConInfo)
  177. DECLARE SUB GetConnectionNumber (Con AS ConNum)
  178. DECLARE SUB Getshellinfo (Wshell AS ShellI)
  179. DECLARE SUB GetNumberOfLocalDrives (Drives AS LDrives)
  180. DECLARE SUB GetServerConnectionInfo (Serv AS SConinfo)
  181. DECLARE SUB GetLoginTime (Logintime AS LogTime)
  182. DECLARE SUB GetObjectInfo (ObjectInfo AS ObInfo)
  183. DECLARE SUB ConvertObjectID (ID AS Obid)
  184. DECLARE SUB ScanBindery (ScanB AS SBind)
  185. DECLARE SUB ClearConnection (ClearCon1 AS ClCon)
  186. DECLARE SUB GetLPTCaptureStatus (CaptureStats AS CapStat)
  187. DECLARE SUB GetCurrentQueue (CQueue AS CurQueue)
  188. DECLARE SUB GetPrintFlag (GPFlags AS PFlags)
  189. DECLARE SUB SetPrintFlag (SPFlags AS PFlags)
  190. DECLARE SUB SetDefaultLocalPrinter (SDefPrinter AS CAPTURE)
  191. DECLARE SUB GetDefaultLocalPrinter (GDefPrinter AS GDLP)
  192. DECLARE SUB SetCapturePrintQueue (SetQueue AS QUEUE)
  193. DECLARE SUB StartLPTCapture (StartCapture AS CAPTURE)
  194. DECLARE SUB EndSpecificLPTCapture (ECap AS CAPTURE)
  195. DECLARE SUB CloseBindery (CloseBind AS OCBindery)
  196. DECLARE SUB OpenBindery (OpenBind AS OCBindery)
  197. DECLARE SUB GetServerTime (GetServTime AS GST)
  198. DECLARE SUB SetServerTime (SetServTime AS SST)
  199. DECLARE SUB SendMsgToConsole (SendC AS SCMESS)
  200. DECLARE SUB SendBroadcastMsg (SendB AS SBMESS)
  201. DECLARE SUB SetBroadcastMode (SetMode1 AS SBMODE)
  202. DECLARE SUB GetDefaultConnectionID (Defserver AS DefServ)
  203.  
  204.