PROCEDURE [XREF] csp$accept_input
      (VAR control: cst$control;
       VAR x_position: cst$x_position;
       VAR y_position: cst$y_position;
       VAR status: ost$status);

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

