{
{ dmt$log_flaw_init_data
{

  TYPE
    dmt$log_flaw_init_data = record
      recorded_vsn: rmt$recorded_vsn,
      first_dau: dmt$dau_address,
      last_dau: dmt$dau_address,
      operation_code: dmt$flaw_operation_code,
      initiator_code: dmt$flaw_initiator_code,
    recend;

  TYPE
    dmt$monitor_flaw_init_data = record
      message_type: integer,
      flaw_data: dmt$log_flaw_init_data,
    recend;

  TYPE
    dmt$flaw_initiator_code = 1 .. 3;

  CONST
    dmc$ic_system_initiated = 1,
    dmc$ic_operator_initiated = 2,
    dmc$ic_ce_initiated = 3;

  TYPE
    dmt$flaw_operation_code = 1 .. 2;

  CONST
    dmc$oc_flaw_define = 1,
    dmc$oc_flaw_remove = 2;

?? PUSH (LISTEXT := ON) ??
*copyc dmt$device_allocation_unit
*copyc rmt$recorded_vsn
?? POP ??
