
  PROCEDURE [XREF] bap$set_file_instance_abnormal
    (    file_identifier: amt$file_identifier;
         exception_condition: ost$status_condition;
         request_name: string ( * <= osc$max_name_size);
         text: string ( * );
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc amc$condition_code_limits
*copyc amt$file_identifier
*copyc ost$name
*copyc ost$status
?? POP ??
