
  TYPE
    jmt$mainframe_leveling_data = record
      mainframe_id: pmt$mainframe_id,
      mainframe_data_size: ost$segment_length,
    recend;

*copyc osd$virtual_address
*copyc pmt$mainframe_id
