| 
**************************************************************** * * * API: QWDRSBSD * * Format: SBSI0100 * * * **************************************************************** 01 SBSI0100-RCVVAR. 05 BYTES-RETURNED PIC S9(9) COMP-4. 05 BYTES-AVAILABLE PIC S9(9) COMP-4. 05 SBSD-NAME PIC X(10). 05 SBSD-LIBRARY PIC X(10). 05 SBS-STATUS PIC X(10). 05 SIGN-ON-DEVICE-FILE-NAME PIC X(10). 05 SIGN-ON-DEVICE-FILE-LIBRARY PIC X(10). 05 SECONDARY-LANGUAGE-LIBRARY PIC X(10). 05 MAX-ACTIVE-JOBS PIC S9(9) COMP-4. 05 CURRENTLY-ACTIVE-JOBS PIC S9(9) COMP-4. 05 NUMBER-OF-STORAGE-POOLS PIC S9(9) COMP-4. 05 POOL-INFO OCCURS 10 TIMES. 10 POOL-ID PIC S9(9) COMP-4. 10 POOL-NAME PIC X(10). 10 RESERVED PIC X(6). |
|
10 POOL-SIZE PIC S9(9) COMP-4. 10 POOL-ACTIVITY-LEVEL PIC S9(9) COMP-4. **************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTAVL I 9 18 SBSDNM I 19 28 SBSDLB I 29 38 SBSDST I 39 48 SODFNM I 49 58 SODFLB I 59 68 SLNGLB I B 69 720MAXJOB I B 73 760CURJOB I B 77 800STGPL£ I B 81 840PLID01 I 85 94 PLNM01 I 95 100 RESV01 I B 101 1040PLSZ01 I B 105 1080PLAC01 I B 109 1120PLID02 I 113 122 PLNM02 |
|
I 123 128 RESV02 I B 129 1320PLSZ02 I B 133 1360PLAC02 I B 137 1400PLID03 I 141 150 PLNM03 I 149 156 RESV03 I B 157 1600PLSZ03 I B 161 1640PLAC03 I B 165 1680PLID04 I 169 178 PLNM04 I 179 184 RESV04 I B 185 1880PLSZ04 I B 189 1920PLAC04 I B 193 1960PLID05 I 197 206 PLNM05 I 207 212 RESV05 I B 211 2160PLSZ05 I B 217 2200PLAC05 I B 221 2240PLID06 I 225 234 PLNM06 I 235 240 RESV06 I B 241 2440PLSZ06 |
|
I B 245 2480PLAC06 I B 249 2520PLID07 I 253 262 PLNM07 I 263 268 RESV07 I B 269 2720PLSZ07 I B 273 2760PLAC07 I B 277 2800PLID08 I 281 290 PLNM08 I 291 296 RESV08 I B 297 3000PLSZ08 I B 301 3040PLAC08 I B 305 3080PLID09 I 309 318 PLNM09 I 319 324 RESV09 I B 325 3280PLSZ09 I B 329 3320PLAC09 I B 333 3360PLID10 I 337 346 PLNM10 I 347 352 RESV10 I B 351 3560PLSZ10 I B 357 3600PLAC10 |
