
   VAR
    cmv$default_ioct_entry: [STATIC, READ, oss$mainframe_paged_literal]
      cmt$io_completion_table_entry := [TRUE, [0, 0], [*,*],
      cmc$subsystem_io_not_active, [cmc$no_io,osc$null_name, [NIL, 'Z', FALSE, FALSE]],
      NIL, NIL, NIL, NIL, *,
      [osc$millisecond_time,'00000000'],jmc$blank_system_supplied_name];

?? PUSH (LISTEXT := ON) ??
*copyc iot$io_completion_table
*copyc oss$mainframe_paged_literal
*copyc ost$name
*copyc jmt$system_supplied_name
*copyc cmt$io_request_type
*copyc ost$global_task_id
*copyc ost$time
?? POP ??
