z/OS JES2 Macros
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


$QPUT – Return job queue element to the JES2 job queue

z/OS JES2 Macros
SA32-0996-00

Use $QPUT to return a job queue element to the JES2 job queue, placing it in the specified logical queue.

Format description

Read syntax diagramSkip visual syntax diagram
>>-+--------+--$QPUT--+-element-addrx-+--+-queue-value-+-------->
   '-symbol-'         '-(--R1--)------'  '-(--R0--)----'   

               .-NO--.   
>--,--KEEP--=--+-YES-+-----------------------------------------><

element
Specifies the address of an element which is to be returned to the JES2 job queue. If register 1 is used, the address must be loaded into register 1 before the execution of this macro instruction.
Note: The JQE returned may be real or artificial.
queue
Specifies the logical queue where the job queue element is to be placed. This value must always be one of the eight logical queue types. If register 0 is used, one of these values must be loaded into register 0 before the execution of this macro instruction. If $XEQ is specified and the execution node is not equal to the local node, the queue type is altered to $XMIT.
The queue type specifications may be ignored if the job queue element has been flagged for cancellation. The resulting logical queue is as follows:
  • JQE10CAN bit on and JQE1PURG bit off. Any $QPUT with a $XEQ or $XMIT specification is altered to $OUTPUT.
  • JQE10CAN bit off and JQE1PURG bit on. Any $QPUT with a JQEJOECT and JQEHLDCT fields 0 is altered to $PURGE. Any $QPUT with a JQEJOECT or JQEHLDCT field nonzero is altered to $HARDCPY.
Note:

The specified job queue element must be previously obtained with a $QGET or $QADD macro instruction or the action of the $QPUT macro instruction is unpredictable.

KEEP=
Indicates a YES or NO. The option is valid only if the JQE is an artificial JQE. KEEP=NO frees the memory for the artificial JQE.

Environment

  • Main task.
  • $WAIT can occur.

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014