
  TYPE
    stt$dm_packet_storage = record
      case dm_packet_ever_stored: boolean of
      = TRUE =
        dm_packet: stt$dm_packet,
      = FALSE =
        ,
      casend,
    recend;

*copyc stt$dm_packet
