
  PROCEDURE [XREF] dfp$display_server
    (    mainframe_name: pmt$mainframe_id;
         output_file_fid: amt$file_identifier;
         page_width: amt$page_width;
     VAR status: ost$status);

*copyc amt$file_identifier
*copyc amt$page_width
*copyc pmt$mainframe_id
*copyc ost$status
