
  TYPE
    dst$iou_resource = RECORD
      iou_number: dst$iou_number,
      channel_protocol: dst$channel_protocol_type,
      number: dst$physical_resource_number,
    RECEND;

?? PUSH (LISTEXT := ON) ??
*copyc dst$channel_protocol_type
*copyc dst$iou_number
*copyc dst$physical_resource_number
?? POP ??
