
  TYPE
    pft$physical_mainframe_usage = record
      checksum: pft$checksum,
      mainframe_usage: pft$mainframe_usage_entry,
    recend;

*copyc pft$checksum
*copyc pft$mainframe_usage_entry
