Queue Manager Manual

DEQ (UOW Code 501)
Queue Manager Server Interface
2–10 46517 Tandem Computers Incorporated
DEQ (UOW Code 501) DEQ dequeues an entry from a queue. The operation requires a TMF transaction.
Following is the DDL definition:
DEF deq-uow.
02 hdr.
03 self-ident PIC AA VALUE “UW”.
03 uow-code PIC 9(4) COMP VALUE 501.
02 flags.
03 specific-deq TYPE BOOLEAN VALUE “N”.
03 reserved-1 TYPE BOOLEAN VALUE “N”.
03 reserved-2 TYPE BOOLEAN VALUE “N”.
03 reserved-3 TYPE BOOLEAN VALUE “N”.
03 reserved-4 TYPE BOOLEAN VALUE “N”.
03 reserved-5 TYPE BOOLEAN VALUE “N”.
03 reserved-6 TYPE BOOLEAN VALUE “N”.
03 reserved-7 TYPE BOOLEAN VALUE “N”.
02 queue-name PIC X(32) VALUE SPACES.
02 priority PIC 9(3) COMP VALUE 0.
02 time-of-enq PIC X(8) VALUE LOW-VALUES.
02 cpu-pin PIC X(2) VALUE LOW-VALUES.
02 max-data-size PIC 9(5) COMP.
02 pad-char PIC X(1) VALUE LOW-VALUE.
02 filler PIC X(1) VALUE LOW-VALUE.
END.
DEF deq-rsp.
02 hdr.
03 self-ident PIC AA VALUE “UW”.
03 uow-code PIC 9(4) COMP VALUE 501.
02 retn-code PIC S9(4) COMP.
02 retn-code-detail PIC S9(4) COMP.
02 queue-name PIC X(32) VALUE SPACES.
02 priority PIC 9(3) COMP.
02 time-of-enq PIC X(8) VALUE LOW-VALUES.
02 cpu-pin PIC X(2) VALUE LOW-VALUES.
02 data-len PIC 9(5) COMP.
* Applications should define the actual format of the data
* portion, for example:
* 02 data-field PIC X(!queue length!).
END.