TRANSFER Release D30 Documentation Supplement

TRANSFER D30 Documentation Supplement
TRANSFER Release D30 Documentation Supplement—118474 1-17
DEQ-D30 UOW
are allowed only when the queue file is in the new format. If the format of the queue file
and the UOW is not compatible, a new error code E-INCOMPATIBLE-QFILE (6007) is
returned.
DEF Queue-File-Def.
05 Partition-Key PIC X(2).
05 Entry-Type PIC S9(4) COMP.
88 Visible-Entry VALUE 0.
88 Pending-Entry VALUE 1.
05 Effective-Time PIC X(8).
88 Effective-Now VALUE LOW-VALUES.
05 Queue-Name TYPE *.
05 Priority PIC 9(4) COMP.
05 Time-Of-Enq PIC X(8).
05 Cpu-Pin.
10 Cpu PIC X(1).
10 Pin PIC X(1).
05 PHandle PIC X(20).
05 FILLER PIC X(52).
05 Data-Field PIC X(.....).
66 Full-Key RENAMES Partition-Key THRU PHandle.
END
DEQ-D30 UOW
In order to support high PIN processes in the Queue Manager facility, the CPU-PIN field
of the DEQ-D30 UOW had to be expanded to contain a process handle.
If a DEQ-D30 UOW is used with a queue in the old format, the new error E-
INCOMPATIBLE-QFILE is returned.
DEQ-D30-UOW looks like DEQ-UOW, but has a process handle instead of CPU-PIN
and also has a different UOW-HDR. DEQ-D30-RSP looks like DEQ-RSP, but has a
process handle instead of CPU-PIN.
DEF Deq-D30-Uow.
05 Hdr TYPE Uow-Hdr. *-
VALUE 511.
05 Flags.
10 Specific-Deq TYPE Boolean VALUE "N".
10 Reserved1 TYPE Boolean VALUE "N".
10 Reserved2 TYPE Boolean VALUE "N".
10 Reserved3 TYPE Boolean VALUE "N".
10 Reserved4 TYPE Boolean VALUE "N".
10 Reserved5 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.