**************************************************************** SPC00010
* * SPC00020
* Data Structure For API: QUSRUSAT * SPC00030
* Format: SPCA0100 * SPC00040
* Language: Cobol * SPC00050
* * SPC00060
**************************************************************** SPC00070
01 SPCA0100-RCVVAR. SPC00080
05 BYTES-RETURNED PIC S9(9) COMP-4. SPC00090
05 BYTES-AVAILABLE PIC S9(9) COMP-4. SPC00100
05 SPACE-SIZE PIC S9(9) COMP-4. SPC00110
05 AUTOEXTENDABLE PIC X(1). SPC00120
05 INITIAL-VALUE PIC X(1). SPC00130
05 LIBRARY-FOUND-IN PIC X(10). SPC00140
IRCVVAR DS
I B 1 40BYTRTN
I B 5 80BYTVAL
I B 9 120SPCSIZ
I 13 13 AUTOEX
I 14 14 INTVAL
I 15 24 LIBFND
| 
| 
