{
{                    common deck dmdldad
{

  TYPE
    dmt$ms_logical_device_address = record
      allocation_unit_mau_address: dmt$mau_address,
      maus_per_position: dmt$maus_per_position,
      logical_unit_number: iot$logical_unit,
      transfer_length: dmt$maus_per_transfer,
      transfer_mau_offset: dmt$mau_offset_within_tu,
      CASE write_translation:BOOLEAN OF
           =TRUE=
              au_was_previously_written:BOOLEAN,
              maus_per_allocation_unit:dmt$maus_per_allocation,
              preset_value:amt$preset_value,
           =FALSE=
              ,
      CASEND,
    recend;

  TYPE
    dmt$write_tu_status = (dmc$tu_written, dmc$tu_not_written);

*copyc AMT$PRESET_VALUE
*copyc DMT$MINIMUM_ALLOCATION_UNIT
*copyc IOT$LOGICAL_UNIT
