
  TYPE
    jmt$leveled_job_connect_data = record
      system_job_name: jmt$system_supplied_name,
      destination_mainframe_id: pmt$mainframe_id,
      encrypted_password: ost$name,
    recend;

*copyc jmt$system_supplied_name
*copyc ost$name
*copyc pmt$mainframe_id
