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

 WSShortNameGet()
------------------------------------------------------------------------------
 Purpose:
 Get the workstation short hardware name.

 Syntax:
 lpszShortName = WSShortNameGet()

 Parameters:
 None.

 Returns:
 A character string of length 40.

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

 Description:
 WSShortNameGet() returns the workstation short hardware name.

 Returns an empty string if an error occurs.

 Example:
 // To display the short hardware name:
 lpszShortName = WSShortNameGet()
 if ( !empty ( lpszShortName ) )
    ? "Short hardware name is",lpszShortName
 endif