 TYPE
    cmt$physical_identification = record
        product_identification: cmt$product_identification,
        serial_number: cmt$serial_number,
        hardware_address: cmt$hardware_address,
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc cmt$hardware_address
*copyc cmt$product_identification
*copyc cmt$serial_number
?? POP ??
