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

 PSSocketNumberGet()
------------------------------------------------------------------------------
 Purpose:
 Get the print server socket number.

 Syntax:
 iSktNum = PSSocketNumberGet()

 Parameters:
 None.

 Returns:
 A numeric value (unsigned short int).

 The CA-Clipper name for this function is:
 PSSktNumGet()

 Description:
 PSSocketNumberGet() returns the SPX socket number that the workstation
 is using to talk to the print server.

 Returns 0 if not logged into a print server.

 Example:
 // To find out the SPX socket number being used to talk to the print
 // server.
 iSockNo = PSSocketNumberGet()
 if ( iSockNo > 0 )
    ? "You are using SPX socket number", iSockNo
    ??"to talk to a print server"
 endif

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

 This function is useful if you intend to use the NOVLIB IPX and SPX
 functions to avoid using a socket that is already in use by the print
 server.