
  PROCEDURE [XREF] clp$get_reason_for_call
    (VAR information_request: boolean;
     VAR display_file: fst$path;
     VAR prompting_activated: boolean;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc fst$path
*copyc ost$status
?? POP ??
