
  PROCEDURE [XREF] csp$change_partial_screen
    (    file_identifier: amt$file_identifier;
         interaction_style: cst$interaction_style;
         rows: 0 .. csc$max_y_position;
     VAR old_interaction_style: {input,output} cst$interaction_style;
     VAR reserve: cst$lines_used;
     VAR status: ost$status);

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