  PROCEDURE [XREF] rap$write_correction_package (output_file_name: clt$file;
    VAR status: ost$status);

*copyc ost$status
*copyc clt$file

