 PROCEDURE [XREF] csp$close_workstation
      (VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc cse$condition_codes
*copyc ost$status
?? POP ??

