
 TYPE
   iot$media_request_results = RECORD
     CASE key: iot$general_request_results OF
     = ioc$mount_volume_complete =
       mount_element: cmt$element_name,
     = ioc$dismount_volume_complete =
       ,
     = ioc$force_vol_dismount_complete =
       ,
     = ioc$request_not_complete =
       present_queue_type: rmt$queue_type,
     CASEND
   RECEND;

*copyc cmt$element_name
*copyc iot$general_request_results
*copyc rmt$queue_type
