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

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

 Syntax:
 lpszShortName = WSShtNmeGet()

 Parameters:
 None.

 Returns:
 A character string of length 40.

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

 Returns an empty string if an error occurs.

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