****************************************************************
* *
* Data Structure For API: QMHQRDQD *
* Format: RDQD0100 *
* Language: Cobol *
* *
****************************************************************
01 RDQD0100-FORMAT.
05 BYTES-RETURNED PIC S9(9) BINARY.
05 BYTES-AVAILABLE PIC S9(9) BINARY.
05 MESSAGE-LENGTH PIC S9(9) BINARY.
05 KEY-LENGTH PIC S9(9) BINARY.
05 SEQUENCE PIC X(01).
05 INCLUDE-SENDER-ID PIC X(01).
05 FORCE-INDICATOR PIC X(01).
05 TEXT-DESCRIPTION PIC X(50).
05 RESERVED PIC X(03).
05 NUMBER-MESSAGES-ENQUEUED PIC S9(9) BINARY.
05 MAXIMUM-NUMBER-MESSAGES PIC S9(9) BINARY.
I****************************************************************
| 
| 
| 