TRANSFER Release D30 Documentation Supplement

TRANSFER D30 Documentation Supplement
TRANSFER Release D30 Documentation Supplement—118474 1-19
READQ-D30 UOW
05 Queue-Name TYPE * VALUE SPACES.
05 Priority TYPE * VALUE 0.
05 Data-Byte-Count TYPE Max-Data-Size VALUE 0.
*
* Applications should define the actual format of the data
* portion.
*
END
DEF Enq-D30-Rsp.
05 Hdr TYPE Uow-Hdr.
05 Retn-Code TYPE Uow-Retn-Code.
*^ OK
*^ E-BAD-TRANSACTION
*^ E-MUST-BE-YN
*^ E-RESERVED-MUST-BE-N
*^ E-INVALID-PRIORITY
*^ E-DATA-TOO-LONG
*^ E-ERR-QUEUE-FILE
*^ E-IO-TIMEOUT
*^ E-WAITMANAGER-UNAVAIL
*^ E-INCOMPATIBLE-QFILE
05 Retn-Code-Detail TYPE Uow-Retn-Code-Detail.
05 Time-Of-Enq PIC X(8).
05 PHandle PIC X(20).
END
READQ-D30 UOW
If the READQ-D30 UOW is used and the queue file is in the old format, the new error
E-INCOMPATIBLE-QFILE is returned.
READQ-D30-UOW looks like READQ-UOW, but has a different UOW-HDR, has
ANY-PHANDLE to replace ANY-CPU-PIN flag, and has PHANDLE instead of CPU-
PIN. READQ-D30-RSP looks like READQ-RSP, but has a process handle instead of
CPU-PIN.
DEF Readq-D30-Uow.
05 Hdr TYPE Uow-Hdr VALUE 514.
05 Flags.
10 Any-Queue-Name TYPE Boolean VALUE "N".
10 Any-Priority TYPE Boolean VALUE "Y".
10 Any-Time-Of-Enq TYPE Boolean VALUE "Y".
10 Any-PHandle TYPE Boolean VALUE "Y".
10 Skip-Exact TYPE Boolean VALUE "N".
10 Reposition TYPE Boolean VALUE "N".
10 Reserved6 TYPE Boolean VALUE "N".
10 Reserved7 TYPE Boolean VALUE "N".
05 Queue-Name TYPE * VALUE SPACES.
05 Priority TYPE * VALUE 0.
05 Time-Of-Enq PIC X(8) VALUE LOW-VALUES.
05 PHandle PIC X(20) VALUE LOW-VALUES.
05 Max-Data-Size TYPE *.
05 Pad-Char PIC X(1) VALUE LOW-VALUE.