{ Deck:  DFT$MAINFRAME_TASK_STATUS
  TYPE
    dft$mainframe_task_status = record
      task_status: pmt$task_status,
      mainframe_id: pmt$mainframe_id,
    recend;

*copyc pmt$task_status
*copyc pmt$mainframe_id

