

  PROCEDURE [XREF] cmp$begin_transition (sys_dev_lun: iot$logical_unit;
        channel_number: cmt$channel_ordinal;
        equipment_number: cmt$physical_equipment_number;
        unit_number: cmt$physical_unit_number;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc IOT$LOGICAL_UNIT
*copyc CMT$CHANNEL_TYPE
*copyc CMT$CHANNEL_ORDINAL
*copyc CMT$CONTROLLER_PORT_NUMBER
*copyc CMT$PHYSICAL_EQUIPMENT_NUMBER
*copyc CMT$PHYSICAL_UNIT_NUMBER
*copyc OST$STATUS
?? POP ??
