{Job Control Block (JCB).}

  VAR
    jmv$jcb: [XREF] jmt$job_control_block;
?? PUSH (LISTEXT := ON) ??
*copyc JMT$JOB_CONTROL_BLOCK
?? POP ??
