
  TYPE
    dst$signal_contents = RECORD
      CASE 1 .. 2 OF
      = 1 =
        signal: pmt$signal,
      = 2 =
        identifier: pmt$signal_id,
        contents: dst$signal_contents_entry,
      CASEND,
    RECEND,

    dst$signal_contents_entry = RECORD
      CASE kind: dst$signal_kinds OF
      = dsc$signal_lock_unlock_window =
        luw_data: dst$signal_luw_data,
      = dsc$signal_post_operator_action =
        poa_data: dst$signal_poa_data,
      = dsc$signal_hung_pp_process =
        hpp_data: dst$signal_hpp_data,
      CASEND,
    RECEND,

    dst$signal_hpp_data = RECORD
      date_time: ost$date_time,
      sci_reload_failed: boolean,
      check_entire_table: boolean,
      logical_pp_index: iot$pp_number,
    RECEND,

    dst$signal_kinds = (dsc$signal_lock_unlock_window, dsc$signal_post_operator_action,
          dsc$signal_hung_pp_process, dsc$signal_reserved_4, dsc$signal_reserved_5, dsc$signal_reserved_6,
          dsc$signal_reserved_7, dsc$signal_reserved_8),

    dst$signal_luw_data = RECORD
      password: string (7),
      lock_window: boolean,
    RECEND,

    dst$signal_poa_data = RECORD
      date_time: ost$date_time,
      kind: dst$signal_poa_kinds,
    RECEND,

    dst$signal_poa_kinds = (dsc$signal_poa_sp_timeout, dsc$signal_poa_sys_in_degrade,
          dsc$signal_poa_cpu_down_by_sys);

*copyc iot$pp_number
*copyc ost$date_time
*copyc pmt$signal
