| 
**************************************************************** * * * Data Structure For API: QDCRLIND * * Format: LIND0100 * * Language: COBOL * * * **************************************************************** 01 LIND0100-RCVVAR. 05 BYTES-RETURNED PIC S9(9) COMP-4. 05 BYTES-AVAILABLE PIC S9(9) COMP-4. 05 NUM-ATTACHED-NS-CONTROL PIC S9(9) COMP-4. 05 DATE-INFO-RTV PIC X(7). 05 TIME-INFO-RTV PIC X(6). 05 LINE-NAME PIC X(10). 05 LINE-CAT PIC X(10). 05 ONLINE-AT-IPL PIC X(10). 05 TEXT-D PIC X(50). 05 EXTRA-FIELD PIC X(3). I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND0100 * |
|
I* Language: RPG * I* Note(s): * I* * I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC I 106 108 RESERV **************************************************************** * * * Data Structure For API: QDCRLIND * * Format: LIND0200 * * Language: COBOL * * * **************************************************************** |
|
01 LIND0200-RCVVAR. 05 BYTES-RETURNED PIC S9(9) COMP-4. 05 BYTES-AVAILABLE PIC S9(9) COMP-4. 05 NUM-ATTACHED-NS-CONTROL PIC S9(9) COMP-4. 05 DATA-INFO-RTV PIC X(7). 05 TIME-INFO-RTV PIC X(6). 05 LINE-NAME PIC X(10). 05 LINE-CAT PIC X(10). 05 ONLINE-AT-IPL PIC X(10). 05 TEXT-D PIC X(50). 05 EXTRA-FIELD PIC X(3). 05 OFFSET-TO-LST-OF-NS PIC S9(9) COMP-4. 05 ENTRY-LEN-OF-LIST-NS PIC S9(9) COMP-4. * 05 LST-ATTACHED-CONTROLLERS * 10 CONTROLLER-NAME OCCURS 0-N TIMES PIC X(10). * 10 CONTROLLER-CATEGORY OCCURS 0-N TIMES PIC X(10). * 10 CONTROLLER-TYPE OCCURS 0-N TIMES PIC X(10). * 10 CONTROLLER-TEXT-DESC OCCURS 0-N TIMES PIC X(50). I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND0200 * |
|
I* Language: RPG * I* Note(s): * I* * I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC I 106 108 RESERV I B 109 1120OFFNSW I B 113 1160LENNSW I*(List of attatched nonswitched controllers with basic information. I* Following four entries are repeated 0-n times.) I* CHAR(10) Controller name CTLNAM I* CHAR(10) Controller category CTLCAT I* CHAR(10) Controller type CTLTYP |
|
I* CHAR(50) Controller text description CTLTXT **************************************************************** * * * Data Structure For API: QDCRLIND * * Format: LIND0300 * * Language: COBOL * * * **************************************************************** 01 LIND0300-RCVVAR. 05 BYTES-RETURNED PIC S9(9) COMP-4. 05 BYTES-AVAILABLE PIC S9(9) COMP-4. 05 NUM-ATTACHED-NS-CONTROL PIC S9(9) COMP-4. 05 DATA-INFO-RTV PIC X(7). 05 TIME-INFO-RTV PIC X(6). 05 LINE-NAME PIC X(10). 05 LINE-CAT PIC X(10). 05 ONLINE-AT-IPL PIC X(10). 05 TEXT-D PIC X(50). 05 EMPTY-FIELD PIC X(3). 05 VARY-ON-WAIT PIC S9(9) COMP-4. 05 LINE-SPEED PIC S9(9) COMP-4. 05 INACTIVITY-TIMER PIC S9(9) COMP-4. |
|
05 MAX-BUF-SIZE PIC S9(9) COMP-4. 05 IDLE-TIMER PIC S9(9) COMP-4. 05 DSR-DROP-TIMER PIC S9(9) COMP-4. 05 CLEAR-SEND-TIMER PIC S9(9) COMP-4. 05 REMOTE-ANSWER-TIMER PIC S9(9) COMP-4. 05 RECOVERY-COUNT-LIMIT PIC S9(9) COMP-4. 05 RECOVERY-TIME-INT PIC S9(9) COMP-4. 05 OFFSET-TO-LST-OF-NS PIC S9(9) COMP-4. 05 ENTRY-LEN-OF-LST-NS PIC S9(9) COMP-4. 05 OFFSET-TO-LST-OF-SW PIC S9(9) COMP-4. 05 NUM-ENTRY-IN-LST-SW PIC S9(9) COMP-4. 05 ENTRY-LEN-OF-LST-SW PIC S9(9) COMP-4. 05 OFFSET-ACTIVE-SW PIC S9(9) COMP-4. 05 NUM-ENTRY-ACTIVE-SW PIC S9(9) COMP-4. 05 ENTRY-LEN-ACTIVE-SW PIC S9(9) COMP-4. 05 OFFSET-EOR-LIST PIC S9(9) COMP-4. 05 NUM-ENTRY-EOR PIC S9(9) COMP-4. 05 ENTRY-LEN-EOR PIC S9(9) COMP-4. 05 RESOURCE-NAME PIC X(10). 05 PHYSICAL-INTERFACE PIC X(10). 05 CONNECTION-TYPE PIC X(10). 05 SWITCHED-NET-BACKUP PIC X(10). |
|
05 ACTIVE-SW-NET-BACKUP PIC X(10). 05 AUTOCALL-UNIT PIC X(10). 05 BITS-PER-CHAR PIC X(10). 05 PARITY-TYPE PIC X(10). 05 NUM-STOP-BITS PIC X(10). 05 DUPLEX PIC X(10). 05 ECHO-SUPPORT PIC X(10). 05 MODEM-TYPE-SUPPORTED PIC X(10). 05 MODEM-DATA-RATE-SELECT PIC X(10). 05 SWITCHED-CONNECT-TYPE PIC X(10). 05 AUTOANSWER PIC X(10). 05 AUTODIAL PIC X(10). 05 DIAL-CMD-TYPE PIC X(10). 05 AUTOCALL-NAME PIC X(10). 05 CALL-NUM PIC X(32). 05 ERROR-THRESHOLD-LEVEL PIC X(10). 05 FLOW-CONTROL PIC X(10). 05 XON-CHAR PIC X(10). 05 XOFF-CHAR PIC X(10). 05 AUTOANSWER-TYPE PIC X(10). 05 EMPTY-FIELD2 PIC X(2). * 05 LST-ATTACHED-NS-CONTROLLERS. |
|
* 10 ATT-NS-CTRLR-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD3 OCCURS 0-N TIMES PIC X(2). * 05 LST-SW-CONTROLLERS. * 10 SWITCHED-CTRLR-NAME OCCURS 0-N TIMES PIC X(10). * 10 ENPTY-FIELD4 OCCURS 0-N TIMES PIC X(2). * 05 LST-ACTIVE-SW-CONTROLLERS. * 10 ACTIVE-SW-CTRLR-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD5 OCCURS 0-N TIMES PIC X(2). * 05 LST-EOR-CHARACTERS. * 10 NMBR-TRAILING-CHAR OCCURS 0-N TIMES PIC S9(9) COMP-4. * 10 EOR-CHARACTER OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD6 OCCURS 0-N TIMES PIC X(2). I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND0300 * I* Language: RPG * I* Note(s): * I* * I**************************************************************** IRCVVAR DS I B 1 40BYTRTN |
|
I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC I 106 108 RESERV I B 109 1120VRYONW I B 113 1160LINSPD I B 117 1200INATIM I B 121 1240MAXBUF I B 125 1280IDLTIM I B 129 1320DSRTIM I B 133 1360CTSTIM I B 137 1400RMATIM I B 141 1440CNTLMT I B 145 1480TIMINT I B 149 1520OFFNSW I B 153 1560LENNSW I B 157 1600OFFSW |
|
I B 161 1640NBRSW I B 165 1680LENSW I B 169 1720OFFASW I B 173 1760NBRASW I B 177 1800LENASW I B 181 1840OFFEOR I B 185 1880NBREOR I B 189 1920LENEOR I 193 202 RSCNAM I 203 212 PHYINT I 213 222 CNNTYP I 223 232 SWNB I 233 242 ASWNB I 243 252 CALUNT I 253 262 DTABPC I 263 272 TYPPTY I 273 282 NBRSTB I 283 292 DUPLEX I 293 302 ECHO I 303 312 MDMTYP I 313 322 MDMRAT I 323 332 SWCTYP |
|
I 333 342 ATA I 343 352 ATD I 353 362 CMDTYP I 363 372 ATCNAM I 373 404 CALNBR I 405 414 ERRLVL I 415 424 FLWCTL I 425 434 XON I 435 444 XOFF I 445 454 ATATYP I 455 456 RESRVD I* (LIST OF ATTATCHED NONSWITCHED CONTROLLERS. FOLLOWING TWO I* ENTRIES ARE REPEATED O-N TIMES) I* CHAR(10) ATTATCHED NONSWITCHED NSWNAM I* CONTROLLER NAME I* CHAR(2) (RESERVED) NSWRSV I* I* (List of switched controllers. Following two entries are I* are repeated 0-n times.) I* CHAR(10) Switched controller name SWNAM I* CHAR(2) (Reserved) SWRSV I* |
|
I* (List of active switched controllers. Following two entries I* are repeated 0-n times.) I* CHAR(10) Active switched ASWNAM I* controller name I* CHAR(2) (Reserved) ASWRSV I* I* (List of EOF characters. Following three entries are repeated I* 0-n times.) I* BINARY(4) Number of NBRTRL I* trailing characters I* CHAR(10) EOR character EORCHR I* CHAR(2) (Reserved) EOFRSV **************************************************************** * * * Data Structure For API: QDCRLIND * * Format: LIND0400 * * Language: COBOL * * * **************************************************************** 01 LIND0400-RCVVAR. 05 BYTES-RETURNED PIC S9(9) COMP-4. 05 BYTES-AVAILABLE PIC S9(9) COMP-4. |
|
05 NUM-ATTACHED-NS-CONTROL PIC S9(9) COMP-4. 05 DATA-INFO-RTV PIC X(7). 05 TIME-INFO-RTV PIC X(6). 05 LINE-NAME PIC X(10). 05 LINE-CAT PIC X(10). 05 ONLINE-AT-IPL PIC X(10). 05 TEXT-D PIC X(50). 05 EMPTY-FIELD PIC X(3). 05 VARY-ON-WAIT PIC S9(9) COMP-4. 05 LINE-SPEED PIC S9(9) COMP-4. 05 INACTIVITY-TIMER PIC S9(9) COMP-4. 05 MAX-BUF-SIZE PIC S9(9) COMP-4. 05 RECEIVE-TIMER PIC S9(9) COMP-4. 05 CONTINUE-TIMER PIC S9(9) COMP-4. 05 CONTENTION-STATE-RETRY PIC S9(9) COMP-4. 05 DATA-STATE-RETRY PIC S9(9) COMP-4. 05 TRANSMIT-TTD-OR-WACK-RETRY PIC S9(9) COMP-4. 05 RECEIVE-TTD-OR-WACK-RETRY PIC S9(9) COMP-4. 05 DATA-SET-READY-DROP-TIMER PIC S9(9) COMP-4. 05 CLEAR-TO-SEND-TIMER PIC S9(9) COMP-4. 05 REMOTE-ANSWER-TIMER PIC S9(9) COMP-4. 05 RECOVERY-LIMIT-COUNT PIC S9(9) COMP-4. |
|
05 RECOVERY-LIMIT-TIME PIC S9(9) COMP-4. 05 OFFSET-LST-NS PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-NS PIC S9(9) COMP-4. 05 OFFSET-LST-SW PIC S9(9) COMP-4. 05 NUM-ENTRY-LST-SW PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-SW PIC S9(9) COMP-4. 05 OFFSET-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 NUM-ENTRY-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 RESOURCE-NAME PIC X(10). 05 APPLICATION-TPYE PIC X(10). 05 PHYSICAL-INTERFACE PIC X(10). 05 CONNECTION-TYPE PIC X(10). 05 SWITCHED-NET-BACKUP PIC X(10). 05 ACTIVE-SWITCH-NET-BACKUP PIC X(10). 05 AUTOCALL-UNIT PIC X(10). 05 STATION-ADDRESS PIC X(10). 05 CLOCKING PIC X(10). 05 DUPLEX PIC X(10). 05 MODEM-TYPE-SUPPORTED PIC X(10). 05 MODEM-DATA-RATE-SELECT PIC X(10). 05 SWITCHED-CONNECTION-TYPE PIC X(10). |
|
05 AUTOANSWER PIC X(10). 05 AUTODIAL PIC X(10). 05 DIAL-COMMAND-TYPE PIC X(10). 05 AUTOCALL-RESOURCE-NAME PIC X(10). 05 CALLING-NUM PIC X(32). 05 CHAR-CODE PIC X(10). 05 SYNC-CHAR PIC X(10). 05 ERROR-THRESHOLD-LVL PIC X(10). 05 INCLUDE-STX-CHAR-IN-LRC PIC X(10). 05 AUTOANSWER-TYPE PIC X(10). * 05 LST-ATTACHED-NS-CONTROLLERS * 10 ATT-NS-CTRLR-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD2 OCCURS 0-N TIMES PIC X(2). * 05 LST-SW-CONTROLLERS * 10 SWITCHED-CTRLR-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD3 OCCURS 0-N TIMES PIC X(2). * 05 LST-ACTIVE-SW-CONTROLLERS * 10 ACTIVE-SW-CTRLR-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD4 OCCURS 0-N TIMES PIC X(2). I**************************************************************** I* * I* Data structure for API: QDCRLIND * |
|
I* Format: LIND0400 * I* Language: RPG * I* Note(s): * I* * I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC I 106 108 RESERV I B 109 1120VRYONW I B 113 1160LINSPD I B 117 1200INATIM I B 121 1240MAXBUF I B 125 1280RCVTIM I B 129 1320CONTIM |
|
I B 133 1360CNTTRY I B 137 1400DTATRY I B 141 1440TRNTRY I B 145 1480RCVTRY I B 149 1520DSRTIM I B 153 1560CTSTIM I B 157 1600RMATIM I B 161 1640CNTLMT I B 165 1680TIMINT I B 169 1720OFFNSW I B 173 1760LENNSW I B 177 1800OFFSW I B 181 1840NBRSW I B 185 1880LENSW I B 189 1920OFFASW I B 193 1960NBRASW I B 197 2000LENASW I 201 210 RSCNAM I 211 220 APPTYP I 221 230 PHYINT I 231 240 CNNTYP I 241 250 SWNB |
|
I 251 260 ASWNB I 261 270 CALUNT I 271 280 STNADR I 281 290 CLOCKG I 291 300 DUPLEX I 301 310 MDMTYP I 311 320 MDMRAT I 321 330 SWCTYP I 331 340 ATA I 341 350 ATD I 351 360 DILTYP I 361 370 ATCNAM I 371 402 CALNBR I 403 412 CHRCDE I 413 422 SYNC I 423 432 ERRLVL I 433 442 INCSTX I 443 452 ATATYP I* I* (List of attatched nonswitched controllers. Followinfg entries I* repeated O-n times) I* |
|
I* CHAR(10) Attatched nonswitched controller name NSWNAM I* CHAR(2) (reserved) NSWRSV I* I* (List of switched controllers. Following two entries are I* are repeated 0-n times.) I* I* CHAR(10) Switched controller name SWNAM I* CHAR(2) (reserved) SWRSV I* I* (List of active switched controllers. Following I* entries are repeated 0-n times.) I* I* CHAR(10) Active switched controller name ASWNAM I* CHAR(2) (reserved) ASWRSV **************************************************************** * * * Data Structure For API: QDCRLIND * * Format: LIND0500 * * Language: COBOL * * * **************************************************************** 01 LIND0500-RCVVAR. |
|
05 BYTES-RETURNED PIC S9(9) COMP-4. 05 BYTES-AVAILABLE PIC S9(9) COMP-4. 05 NUM-ATTACHED-NS-CONTROL PIC S9(9) COMP-4. 05 DATA-INFO-RTV PIC X(7). 05 TIME-INFO-RTV PIC X(6). 05 LINE-NAME PIC X(10). 05 LINE-CAT PIC X(10). 05 ONLINE-AT-IPL PIC X(10). 05 TEXT-D PIC X(50). 05 EMPTY-FIELD PIC X(3). 05 VARY-ON-WAIT PIC S9(9) COMP-4. 05 MAXIMUM-CONTROLLERS PIC S9(9) COMP-4. 05 LINK-SPEED PIC S9(9) COMP-4. 05 COST-PER-CONNECT-TIME PIC S9(9) COMP-4. 05 COST-PER-BYTE PIC S9(9) COMP-4. 05 USER-DEFINED1 PIC S9(9) COMP-4. 05 USER-DEFINED2 PIC S9(9) COMP-4. 05 USER-DEFINED3 PIC S9(9) COMP-4. 05 AUTODELETE-CONTROLLER PIC S9(9) COMP-4. 05 RECOVERY-COUNT-LIMIT PIC S9(9) COMP-4. 05 RECOVERY-LIMIT-TIME-INTERVAL PIC S9(9) COMP-4. 05 OFFSET-ACTIVE-SWITCH-CNTLRS PIC S9(9) COMP-4. |
|
05 NMBR-ENTRIES-SWITCHED-CNTLRS PIC S9(9) COMP-4. 05 ENTRY-LGTH-ACT-SWITCHED-CNTLRS PIC S9(9) COMP-4. 05 OFFSET-LIST-SSAP PIC S9(9) COMP-4. 05 NMBR-ENTRIES-LIST-SSAP PIC S9(9) COMP-4. 05 ENTRY-LGTH-LIST-SSAP PIC S9(9) COMP-4. 05 OFFSET-LIST-GROUP-ADDRESSES PIC S9(9) COMP-4. 05 NMBR-ENTRIES-LIST-GRP-ADDRSS PIC S9(9) COMP-4. 05 ENTRY-LGTH-LIST-GRP-ADDRSS PIC S9(9) COMP-4. 05 RESOURCE-NAME PIC X(10). 05 NETWORK-CONTROLLER PIC X(10). 05 LOCAL-ADAPTER-ADDRESS PIC X(12). 05 EXCHANGE-IDENTIFIER PIC X(10). 05 ETHERNET-STANDARD PIC X(10). 05 ERROR-THRESHOLD-LEVEL PIC X(10). 05 SECURITY-FOR-LINE PIC X(10). 05 PROPAGATION-DELAY PIC X(10). 05 AUTOCREATE-CONTROLLER PIC X(10). * 05 LST-ACTIVE-SW-CONTROLLERS * 10 ACTIVE-SW-CTRLR-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD2 OCCURS 0-N TIMES PIC X(2). * 05 LST-SSAPS * 10 SSAP-MAX-FRAME OCCURS 0-N TIMES PIC S9(9) COMP-4. |
|
* 10 SSAP-ADDRESS OCCURS 0-N TIMES PIC X(10). * 10 SSAP-TYPE OCCURS 0-N TIMES PIC X(10). * 05 LST-GROUP-ADDRESSES * 10 GROUP ADDRESS OCCURS 0-N TIMES PIC X(12). I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND0500 * I* Language: RPG * I* Note(s): * I* * I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC |
|
I 106 108 RESERV I B 109 1120VRYONW I B 113 1160MAXCTL I B 117 1200LNKSPD I B 121 1240CSTTIM I B 125 1280CSTBYT I B 129 1320USR1 I B 133 1360USR2 I B 137 1400USR3 I B 141 1440ATDCTL I B 145 1480CNTLMT I B 149 1520TIMINT I B 153 1560OFFASW I B 157 1600NBRASW I B 161 1640LENASW I B 165 1680OFFSSA I B 169 1720NBRSSA I B 173 1760LENSSA I B 177 1800OFFGRP I B 181 1840NBRGRP I B 185 1880LENGRP I 189 198 RSCNAM |
|
I 199 208 NETCTL I 209 220 ADPADR I 221 230 XID I 231 240 ETHSTD I 241 250 ERRLVL I 251 260 SECLIN I 261 270 PRPDLY I 271 280 CRTCTL I* I* (List of active switched controllers. Following I* entries are repeated 0-n times.) I* I* CHAR(10) Active switched controller name ASWNAM I* CHAR(2) (reserved) ASWRSV I* I* (List of SSAPs. Following entries are repeated 0-n times.) I* I* BINARY(4) SSAP maximum frame SSAFRM I* CHAR(10) SSAP address SSAADR I* CHAR(10) SSAP type SSATYP I* I* (List of group addresses. Following entry is |
|
I* repeated 0-n times.) I* I* CHAR(12) Group address GRPADR **************************************************************** * * * Data Structure For API: QDCRLIND * * Format: LIND0600 * * Language: COBOL * * * **************************************************************** 01 LIND0600-RCVVAR. 05 BYTES-RETURNED PIC S9(9) COMP-4. 05 BYTES-AVAILABLE PIC S9(9) COMP-4. 05 NUM-ATTACHED-NS-CONTROL PIC S9(9) COMP-4. 05 DATA-INFO-RTV PIC X(7). 05 TIME-INFO-RTV PIC X(6). 05 LINE-NAME PIC X(10). 05 LINE-CAT PIC X(10). 05 ONLINE-AT-IPL PIC X(10). 05 TEXT-D PIC X(50). 05 EMPTY-FIELD PIC X(3). 05 VARY-ON-WAIT PIC S9(9) COMP-4. |
|
05 LINE-SPEED PIC S9(9) COMP-4. 05 CRC-ERRORS-RCV PIC S9(9) COMP-4. 05 SHORT-FRAME PIC S9(9) COMP-4. 05 RCV-OVERRUN PIC S9(9) COMP-4. 05 TRANSMIT-OVERRUN PIC S9(9) COMP-4. 05 FRAME-ABORTS PIC S9(9) COMP-4. 05 RETANSMITTED-FRAME PIC S9(9) COMP-4. 05 FRAME-SEQ-ERRORS PIC S9(9) COMP-4. 05 MAX-FRAME-SIZE PIC S9(9) COMP-4. 05 DFT-FRAME-SIZE PIC S9(9) COMP-4. 05 FRAME-RETRY-LIMIT PIC S9(9) COMP-4. 05 RESPONSE-TIMER PIC S9(9) COMP-4. 05 CONNECT-RETRY-COUNT PIC S9(9) COMP-4. 05 LINK-SPEED PIC S9(9) COMP-4. 05 COST-PER-CONNECT-TIME PIC S9(9) COMP-4. 05 COST-PER-BYTE PIC S9(9) COMP-4. 05 USER-DEFINED-1 PIC S9(9) COMP-4. 05 USER-DEFINED-2 PIC S9(9) COMP-4. 05 USER-DEFINED-3 PIC S9(9) COMP-4. 05 RECOVERY-LIMITS-COUNT PIC S9(9) COMP-4. 05 RECOVERY-LIMITS-TIME PIC S9(9) COMP-4. 05 OFFSET-LST-NS PIC S9(9) COMP-4. |
|
05 ENTRY-LEN-LST-NS PIC S9(9) COMP-4. 05 OFFSET-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 NUM-ENTRY-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 OFFSET-LST-SW-NWIS PIC S9(9) COMP-4. 05 NUM-ENTRY-LST-SW-NWIS PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-SW-NWIS PIC S9(9) COMP-4. 05 CONNECTION-TYPE PIC X(10). 05 ATTACHED-NS-NWI PIC X(10). 05 NWI-CHANNEL-TYPE PIC X(10). 05 NWI-CHANNEL-NUMBER PIC X(10). 05 SWITCHED-CONNECTION-TYPE PIC X(10). 05 CONNECTION-LST PIC X(10). 05 EXCHANGE-ID PIC X(10). 05 ERROR-THRESHOLD-LVL PIC X(10). 05 INFO-TRANSFER-TYPE PIC X(13). 05 SWITCHED-NWI-SELECTION PIC X(10). 05 SECURITY-FOR-LINE PIC X(10). 05 PROPAGATION-DELAY PIC X(10). 05 EMPTY-FIELD2 PIC X(1). * 05 LST-ATTACHED-NS-CONTROLLERS * 10 ATTACHED-NS-CNTRL-NAME OCCURS 0-N TIMES PIC X(10). |
|
* 10 EMPTY-FIELD3 OCCURS 0-N TIMES PIC X(2). * 05 LST-ACTIVE-SW-CONTROLLERS * 10 ACTIVE-SW-CNTRL-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD4 OCCURS 0-N TIMES PIC X(2). * 05 LST-SW-NWIS * 10 NWI-NAME OCCURS 0-N TIMES PIC X(10). * 10 NWI-CHANNEL-TYPE OCCURS 0-N TIMES PIC X(10). * 10 NWI-CHANNEL-NUM OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD5 OCCURS 0-N TIMES PIC X(2). I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND0600 * I* Language: RPG * I* Note(s): * I* * I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF |
|
I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC I 106 108 RESERV I B 109 1120VRYONW I B 113 1160LINSPD I B 117 1200CRCERR I B 121 1240SHRFRM I B 125 1280RCVOVR I B 129 1320TRNOVR I B 133 1360FRMABT I B 137 1400RTRFRM I B 141 1440SEQERR I B 145 1480MAXFRM I B 149 1520DFTWS I B 153 1560TRYLMT I B 157 1600RSPTIM I B 161 1640TRYCNT I B 165 1680LNKSPD I B 169 1720CSTTIM |
|
I B 173 1760CSTBYT I B 177 1800USR1 I B 181 1840USR2 I B 185 1880USR3 I B 189 1920CNTLMT I B 193 1960TIMINT I B 197 2000OFFNSW I B 201 2040LENNSW I B 205 2080OFFASW I B 209 2120NBRASW I B 213 2160LENASW I B 217 2200OFFNWI I B 221 2240NBRNWI I B 225 2280LENNWI I 229 238 CNNTYP I 239 248 NSWNWI I 249 258 NWITYP I 259 268 NWINBR I 269 278 SWCTYP I 279 288 CNNLST I 289 298 XID I 299 308 ERRLVL |
|
I 309 321 INFTYP I 322 331 NWISLT I 332 341 SECLIN I 342 351 PRPDLY I 352 352 RESRVD I* I* (List of attatched nonswitched controllers. Following I* entries are repeated 0-n times.) I* I* CHAR(10) Attatched nonswitched controller name NSWNAM I* CHAR(2) (reserved) NSWRSV I* I* (List of active switched controllers. Following entries are I* repeated 0-n times.) I* I* CHAR(10) Active switched controller name ASWNAM I* CHAR(2) (reserved) ASWRSV I* I* (List of switched NWIs. Following entries are I* repeated 0-n times.) I* I* CHAR(10) NWI name NWINAM |
|
I* CHAR(10) NWI channel type NWITYP I* CHAR(10) NWI channel number NWINBR I* CHAR(2) (reserved) NWIRSV **************************************************************** * * * Data Structure For API: QDCRLIND * * Format: LIND0700 * * Language: COBOL * * * **************************************************************** 01 LIND0700-RCVVAR. 05 BYTES-RETURNED PIC S9(9) COMP-4. 05 BYTES-AVAILABLE PIC S9(9) COMP-4. 05 NUM-ATTACHED-NS-CONTROL PIC S9(9) COMP-4. 05 DATA-INFO-RTV PIC X(7). 05 TIME-INFO-RTV PIC X(6). 05 LINE-NAME PIC X(10). 05 LINE-CAT PIC X(10). 05 ONLINE-AT-IPL PIC X(10). 05 TEXT-D PIC X(50). 05 EMPTY-FIELD PIC X(3). 05 OFFSET-ATT-NONSWITCHED-CTRLR PIC S9(9) COMP-4. |
|
05 ENTRY-LGTH-ATT-NONSWCHED-CTRLR PIC S9(9) COMP-4. 05 ATT-NONSWITCHED-NWI PIC X(10). 05 EMPTY-FIELD2 PIC X(2). * 05 LST-ATTACHED-NS-CONTROLLERS * 10 ATT-NS-CTRLR-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD3 OCCURS 0-N TIMES PIC X(2). I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND0700 * I* Language: RPG * I* Note(s): * I* * I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT |
|
I 46 55 ONLINE I 56 105 TXTDSC I 106 108 RESERV I B 109 1120OFFNSW I B 113 1160LENNSW I 117 126 NSWNWI I 127 128 RESRVD I* I* (List of attatched nonswitched controllers. Following I* entries are repeated 0-n times.) I* I* CHAR(10) Attatched nonswitched controller name NSWNAM I* CHAR(2) (reserved) NSWRSV **************************************************************** * * * Data Structure For API: QDCRLIND * * Format: LIND0800 * * Language: COBOL * * * **************************************************************** 01 LIND0800-RCVVAR. 05 BYTES-RETURNED PIC S9(9) COMP-4. |
|
05 BYTES-AVAILABLE PIC S9(9) COMP-4. 05 NUM-ATTACHED-NS-CONTROL PIC S9(9) COMP-4. 05 DATA-INFO-RTV PIC X(7). 05 TIME-INFO-RTV PIC X(6). 05 LINE-NAME PIC X(10). 05 LINE-CAT PIC X(10). 05 ONLINE-AT-IPL PIC X(10). 05 TEXT-D PIC X(50). 05 EMPTY-FIELD PIC X(3). 05 VARY-ON-WAIT PIC S9(9) COMP-4. 05 MAX-CTRLRS PIC S9(9) COMP-4. 05 LINE-SPEED PIC S9(9) COMP-4. 05 SHM-CALL-TIMER PIC S9(9) COMP-4. 05 SHM-MAX-CONNECT-TIMER PIC S9(9) COMP-4. 05 SHM-ANSWER-DELAY-TIMER PIC S9(9) COMP-4. 05 CONNECT-POLL-RETRY PIC S9(9) COMP-4. 05 CONNECT-TIMER PIC S9(9) COMP-4. 05 SHORT-TIMER PIC S9(9) COMP-4. 05 LONG-TIMER PIC S9(9) COMP-4. 05 SHORT-RETRY PIC S9(9) COMP-4. 05 LONG-RETRY PIC S9(9) COMP-4. 05 MAX-FRAME-SIZE PIC S9(9) COMP-4. |
|
05 MAX-OUTSTANDING-FRAMES PIC S9(9) COMP-4. 05 INACTIVITY-TIMER PIC S9(9) COMP-4. 05 POLL-RESPONSE-DELAY PIC S9(9) COMP-4. 05 NONPRODUCTIVE-RECEIVE-TIMER PIC S9(9) COMP-4. 05 IDLE-TIMER PIC S9(9) COMP-4. 05 CONNECT-POLL-TIMER PIC S9(9) COMP-4. 05 POLL-CYCLE-PAUSE PIC S9(9) COMP-4. 05 FRAME-RETRY PIC S9(9) COMP-4. 05 FAIR-POLLING-TIMER PIC S9(9) COMP-4. 05 DATA-SET-READY-DROP-TIMER PIC S9(9) COMP-4. 05 CLEAR-SEND-TIMER PIC S9(9) COMP-4. 05 REMOTE-ANSWER-TIMER PIC S9(9) COMP-4. 05 LINK-SPEED PIC S9(9) COMP-4. 05 COST-PER-CONNECT-TIME PIC S9(9) COMP-4. 05 COST-PER-BYTE PIC S9(9) COMP-4. 05 USER-DEFINED1 PIC S9(9) COMP-4. 05 USER-DEFINED2 PIC S9(9) COMP-4. 05 USER-DEFINED3 PIC S9(9) COMP-4. 05 RECOVERY-LIMITS-COUNT-LIMIT PIC S9(9) COMP-4. 05 RECOVERY-LIMITS-TIME-INTERVAL PIC S9(9) COMP-4. 05 OFFSET-LST-ATT-NONSWCHD-CTRLR PIC S9(9) COMP-4. 05 ENTRY-LGTH-LST-ATT-NSWCH-CTRLR PIC S9(9) COMP-4. |
|
05 OFFSET-LST-ACT-SWITCHED-CTRLRS PIC S9(9) COMP-4. 05 NMBR-ENT-LST-ACT-SWTCH-CTRLRS PIC S9(9) COMP-4. 05 ENT-LGTH-LST-ACT-SWTCH-CTRLRS PIC S9(9) COMP-4. 05 OFFSET-LIST-RESOURCE-NAME PIC S9(9) COMP-4. 05 NMBR-ENTRIES-LST-RESOURCE-NAME PIC S9(9) COMP-4. 05 ENTRY-LGTH-LST-RESOURCE-NAME PIC S9(9) COMP-4. 05 OFFSET-LST-PRGSS-SGNL-RETRY PIC S9(9) COMP-4. 05 NMBR-ENT-LST-PRGSS-SGNL-RETRY PIC S9(9) COMP-4. 05 ENT-LGTH-LST-PRGSS-SGNL-RETRY PIC S9(9) COMP-4. 05 DATA-LINK-ROLE PIC X(10). 05 PHYSICAL-INTERFACE PIC X(10). 05 CONNECTION-TYPE PIC X(10). 05 SWITCHED-NETWORK-BACKUP PIC X(10). 05 ACTIVATE-SWITCHED-NTWRK-BACKUP PIC X(10). 05 SHM-NODE-TYPE PIC X(10). 05 AUTOCALL-UNIT PIC X(10). 05 EXCHANGE-IDENTIFIER PIC X(10). 05 NRZI-DATA-ENCODING PIC X(10). 05 CLOCKING PIC X(10). 05 MODEM-TYPE-SUPPORTED PIC X(10). 05 MODEM-DATA-RATE-SELECT PIC X(10). 05 SWITCHED-CONNECTION-TYPE PIC X(10). |
|
05 AUTOANSWER PIC X(10). 05 AUTODIAL PIC X(10). 05 DIAL-COMMAND-TYPE PIC X(10). 05 AUTOCALL-RESOURCE-NAME PIC X(10). 05 SHM-CALL-FORMAT PIC X(10). 05 SHM-ACCESS-CODE PIC X(10). 05 CALLING-NUMBER PIC X(32). 05 STATION-ADDRESS PIC X(10). 05 ERROR-THRESHOLD-LEVEL PIC X(10). 05 DUPLEX PIC X(10). 05 MODULUS PIC X(10). 05 AUTOANSWER-TYPE PIC X(10). 05 SECURITY-LINE PIC X(10). 05 PROPAGATION-DELAY PIC X(10). * 05 LST-ATTACHED-NS-CONTROLLERS * 10 ATT-NS-CTRLR-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD2 OCCURS 0-N TIMES PIC X(2). * 05 LST-ACTIVE-SW-CONTROLLERS * 10 ACTIVE-SW-CTRLR-NAME OCCURS0-N TIMES PIC X(10). * 10 EMPTY-FIELD3 OCCURS 0-N TIMES PIC X(2). * 05 LST-RESOURCE-NAMES * 10 RESOURCE-NAME OCCURS 0-N TIMES PIC X(10). |
|
* 10 EMPTY-FIELD4 OCCURS 0-N TIMES PIC X(2). * 05 LST-CALL-PROGRESS-SIGNAL-RETRY-VALUES * 10 CALL-PRG-SIGNAL-RETRY-VAL OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD5 OCCURS 0-N TIMES PIC X(2). I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND0800 * I* Language: RPG * I* Note(s): * I* * I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC |
|
I 106 108 RESERV I B 109 1120VRYONW I B 113 1160MAXCTL I B 117 1200LINSPD I B 121 1240CALTIM I B 125 1280MAXTIM I B 129 1320DLYTIM I B 133 1360POLTRY I B 137 1400CNNTIM I B 141 1440SHRTRY I B 145 1480LNGTRY I B 149 1520SHTRTY I B 153 1560LNGRTY I B 157 1600MAXFRM I B 161 1640MAXOUT I B 165 1680INATIM I B 169 1720RSPDLY I B 173 1760RCVTIM I B 177 1800IDLTIM I B 181 1840CNNPOL I B 185 1880POLPAU I B 189 1920FRMTRY |
|
I B 193 1960FARPOL I B 197 2000DSRTIM I B 201 2040CTSTIM I B 205 2080RMATIM I B 209 2120LNKSPD I B 213 2160CSTTIM I B 217 2200CSTBYT I B 221 2240USR1 I B 225 2280USR2 I B 229 2320USR3 I B 233 2360CNTLMT I B 237 2400TIMINT I B 241 2440OFFNSW I B 245 2480LENNSW I B 249 2520OFFASW I B 253 2560NBRASW I B 257 2600LENASW I B 261 2640OFFRSC I B 265 2680NBRRSC I B 269 2720LENRSC I B 273 2760OFFSIG I B 277 2800NBRSIG |
|
I B 281 2840LENSIG I 285 294 LNKROL I 295 304 PHYINT I 305 314 CNNTYP I 315 324 SWNB I 325 334 ASWNB I 335 344 SHMTYP I 345 354 CALUNT I 355 364 XID I 365 374 DTAENC I 375 384 CLOCKG I 385 394 MDMTYP I 395 404 MDMRAT I 405 414 SWCTYP I 415 424 ATA I 425 434 ATD I 435 444 DILTYP I 445 454 ATCNAM I 455 464 CALFMT I 465 474 ACCCDE I 475 506 CALNBR I 507 516 STNADR |
|
I 517 526 ERRLVL I 527 536 DUPLEX I 537 546 MODULS I 547 556 ATATYP I 557 566 SECLIN I 567 576 PRPDLY I* I* (List of attatched nonswitched controllers. Followinfg entries I* repeated O-n times) I* I* CHAR(10) Attatched nonswitched controller name NSWNAM I* CHAR(2) (reserved) NSWRSV I* I* (List of active switched controllers. Following two entries are I* are repeated 0-n times.) I* I* CHAR(10) Active switched controller name ASWNAM I* CHAR(2) (reserved) ASWRSV I* I* (List of resource names. Following two entries are I* are repeated 0-n times.) I* |
|
I* CHAR(10) Resource name RSCNAM I* CHAR(2) (reserved) RSCRSV I* I* (List of call progress signal retry values. Following entries I* are repeated 0-n times.) I* I* CHAR(10) Call progress signal retry value PROVAL I* CHAR(2) (reserved) PRORSV **************************************************************** * * * Data Structure For API: QDCRLIND * * Format: LIND0900 * * Language: COBOL * * * **************************************************************** 01 LIND0900-RCVVAR. 05 BYTES-RETURNED PIC S9(9) COMP-4. 05 BYTES-AVAILABLE PIC S9(9) COMP-4. 05 NUM-ATTACHED-NS-CONTROL PIC S9(9) COMP-4. 05 DATA-INFO-RTV PIC X(7). 05 TIME-INFO-RTV PIC X(6). 05 LINE-NAME PIC X(10). |
|
05 LINE-CAT PIC X(10). 05 ONLINE-AT-IPL PIC X(10). 05 TEXT-D PIC X(50). 05 EMPTY-FIELD PIC X(3). 05 OFFSET-LST-NS PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-NS PIC S9(9) COMP-4. 05 ATTACHED-WORK-STATION PIC X(10). 05 EMPTY-FIELD2 PIC X(2). * 05 LST-ATTACHED-NS-CONTROLLERS * 10 ATTACHED-NS-CONTROL-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD3 OCCURS 0-N TIMES PIC X(2). I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND0900 * I* Language: RPG * I* Note(s): * I* * I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL |
|
I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC I 106 108 RESERV I B 109 1120OFFNSW I B 113 1160LENNSW I 117 126 STNCTL I 127 128 RESRVD I* I* (List of attatched nonswitched controllers. Following I* entries are repeated 0-n times.) I* I* CHAR(10) Attatched nonswitched controller name NSWNAM I* CHAR(2) (reserved) NSWRSV **************************************************************** * * * Data Structure For API: QDCRLIND * * Format: LIND1000 * |
|
* Language: COBOL * * * **************************************************************** 01 LIND1000-RCVVAR. 05 BYTES-RETURNED PIC S9(9) COMP-4. 05 BYTES-AVAILABLE PIC S9(9) COMP-4. 05 NUM-ATTACHED-NS-CONTROL PIC S9(9) COMP-4. 05 DATA-INFO-RTV PIC X(7). 05 TIME-INFO-RTV PIC X(6). 05 LINE-NAME PIC X(10). 05 LINE-CAT PIC X(10). 05 ONLINE-AT-IPL PIC X(10). 05 TEXT-D PIC X(50). 05 EMPTY-FIELD PIC X(3). 05 VARY-ON-WAIT PIC S9(9) COMP-4. 05 MAX-CONTROLLERS PIC S9(9) COMP-4. 05 LINE-SPEED PIC S9(9) COMP-4. 05 MAX-FRAME-SIZE PIC S9(9) COMP-4. 05 LINK-SPEED PIC S9(9) COMP-4. 05 COST-PER-CONNECT-TIME PIC S9(9) COMP-4. 05 COST-PER-BYTE PIC S9(9) COMP-4. 05 USER-DEFINED-1 PIC S9(9) COMP-4. |
|
05 USER-DEFINED-2 PIC S9(9) COMP-4. 05 USER-DEFINED-3 PIC S9(9) COMP-4. 05 AUTODELETE-CONTROLLER PIC S9(9) COMP-4. 05 RECOVERY-LIMIT-COUNT PIC S9(9) COMP-4. 05 RECOVERY-LIMIT-TIME PIC S9(9) COMP-4. 05 OFFSET-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 NUM-ENTRY-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 OFFSET-LST-SSAPS PIC S9(9) COMP-4. 05 NUM-ENTRY-LST-SSAPS PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-SSAPS PIC S9(9) COMP-4. 05 OFFSET-LST-FNC-ADDR PIC S9(9) COMP-4. 05 NUM-ENTRY-LST-FNC-ADDR PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-FNC-ADDR PIC S9(9) COMP-4. 05 RESOURCE-NAME PIC X(10). 05 NET-CONTROLLER PIC X(10). 05 TRLAN-MGR-LOGGED-LVL-CONFIG PIC X(10). 05 TRLAN-MGR-LOGGED-LVL-CUR PIC X(10). 05 TRLAN-MGR-MODE PIC X(12). 05 LOG-CONFIG-CHG PIC X(10). 05 TOKEN-RING-INFORM-OF-BEACON PIC X(10). 05 LOCAL-ADAPTER-ADDR PIC X(12). |
|
05 EXCHANGE-ID PIC X(10). 05 EARLY-TOKEN-RELEASE PIC X(10). 05 ERROR-THRESHOLD-LVL PIC X(10). 05 SECURITY-FOR-LINE PIC X(10). 05 PROPAGATION-DELAY PIC X(10). 05 AUTOCREATE-CONTROLLER PIC X(10). * 05 LST-ACTIVE-SW-CONTROLLERS * 10 ACTIVE-SW-CNTRL-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD2 OCCURS 0-N TIMES PIC X(2). * 05 LST-SSAPS * 10 SSAP-MAX-FRAME OCCURS 0-N TIMES PIC S9(9) COMP-4. * 10 SSAP-VALUE OCCURS 0-N TIMES PIC X(10). * 10 SSAP-TYPE OCCURS 0-N TIMES PIC X(10). * 05 LST-FUNCTION-ADDRESSES * 10 FNC-ADDR OCCURS 0-N TIMES PIC X(12). I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND1000 * I* Language: RPG * I* Note(s): * I* * |
|
I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC I 106 108 RESERV I B 109 1120VRYONW I B 113 1160MAXCTL I B 117 1200LINSPD I B 121 1240MAXFRM I B 125 1280LNKSPD I B 129 1320CSTTIM I B 133 1360CSTBYT I B 137 1400USR1 I B 141 1440USR2 I B 145 1480USR3 |
|
I B 149 1520AUTDEL I B 153 1560CNTLMT I B 157 1600TIMINT I B 161 1640OFFASW I B 165 1680NBRASW I B 169 1720LENASW I B 173 1760OFFSSA I B 177 1800NBRSSA I B 181 1840LENSSA I B 185 1880OFFADR I B 189 1920NBRADR I B 193 1960LENADR I 197 206 RSCNAM I 207 216 NETCTL I 217 226 TRNCFG I 227 236 TRNCUR I 237 248 TRNMGR I 249 258 CFGCHG I 259 268 TRNBCN I 269 280 ADPADR I 281 290 XID I 291 300 TKNREL |
|
I 301 310 ERRLVL I 311 320 SECLIN I 321 330 PRPDLY I 331 340 AUTCTL I* I* (List of active switched controllers. Following I* entries are repeated 0-n times.) I* I* CHAR(10) Active switched controller name ASWNAM I* CHAR(2) (reserved) ASWRSV I* I* (List of SSAPs. Following entries are repeated I* O-n times.) I* I* BINARY(4) SSAP maximum frame SSAFRM I* CHAR(10) SSAP value SSAVAL I* CHAR(10) SSAP type SSATYP I* I* (List of function addresses. Following entry I* is repeated O-n times.) I* I* CHAR(12) Function address FNCADR |
|
**************************************************************** * * * Data Structure For API: QDCRLIND * * Format: LIND1100 * * Language: COBOL * * * **************************************************************** 01 LIND1100-RCVVAR. 05 BYTES-RETURNED PIC S9(9) COMP-4. 05 BYTES-AVAILABLE PIC S9(9) COMP-4. 05 NUM-ATTACHED-NS-CONTROL PIC S9(9) COMP-4. 05 DATA-INFO-RTV PIC X(7). 05 TIME-INFO-RTV PIC X(6). 05 LINE-NAME PIC X(10). 05 LINE-CAT PIC X(10). 05 ONLINE-AT-IPL PIC X(10). 05 TEXT-D PIC X(50). 05 EMPTY-FIELD PIC X(3). 05 VARY-ON-WAIT PIC S9(9) COMP-4. 05 LINE-SPEED PIC S9(9) COMP-4. 05 MAX-FRAME-SIZE PIC S9(9) COMP-4. 05 DFT-PACKET-SIZE-TRANSMIT PIC S9(9) COMP-4. |
|
05 DFT-PACKET-SIZE-RECEIVE PIC S9(9) COMP-4. 05 MAX-PACKET-SIZE-TRANSMIT PIC S9(9) COMP-4. 05 MAX-PACKET-SIZE-RECEIVE PIC S9(9) COMP-4. 05 DFT-WINDOW-SIZE-TRANSMIT PIC S9(9) COMP-4. 05 DFT-WINDOW-SIZE-RECEIVE PIC S9(9) COMP-4. 05 IDLE-TIMER PIC S9(9) COMP-4. 05 FRAME-RETRY PIC S9(9) COMP-4. 05 PREDIAL-DELAY PIC S9(9) COMP-4. 05 REDIAL-DELAY PIC S9(9) COMP-4. 05 DIAL-RETRIES PIC S9(9) COMP-4. 05 SW-DISCON-TIMERS-MIN-CON PIC S9(9) COMP-4. 05 SW-DISCON-TIMERS-DISCON-DELAY PIC S9(9) COMP-4. 05 DATA-SET-READY-DROP-TIMER PIC S9(9) COMP-4. 05 CLEAR-TO-SEND-TIMER PIC S9(9) COMP-4. 05 REMOTE-ANSWER-TIMER PIC S9(9) COMP-4. 05 LINK-SPEED PIC S9(9) COMP-4. 05 COST-PER-CONNECT-TIME PIC S9(9) COMP-4. 05 COST-PER-BYTE PIC S9(9) COMP-4. 05 USER-DEFINED-1 PIC S9(9) COMP-4. 05 USER-DEFINED-2 PIC S9(9) COMP-4. 05 USER-DEFINED-3 PIC S9(9) COMP-4. 05 RECOVERY-LIMIT-COUNT PIC S9(9) COMP-4. |
|
05 RECOVERY-LIMIT-TIME PIC S9(9) COMP-4. 05 OFFSET-LST-SW PIC S9(9) COMP-4. 05 NUM-ENTRY-LST-SW PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-SW PIC S9(9) COMP-4. 05 OFFSET-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 NUM-ENTRY-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-ACTIVE-SW PIC S9(9) COMP-4. 05 OFFSET-LST-LOG-CHANNEL-ENT PIC S9(9) COMP-4. 05 NUM-ENTRY-LST-LOG-CHANNEL-ENT PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-LOG-CHANNEL-ENT PIC S9(9) COMP-4. 05 OFFSET-LST-SW-NWI PIC S9(9) COMP-4. 05 NUM-ENTRY-LST-SW-NWI PIC S9(9) COMP-4. 05 ENTRY-LEN-LST-SW-NWI PIC S9(9) COMP-4. 05 RESOURCE-NAME PIC X(10). 05 LOCAL-NET-ADDR PIC X(20). 05 CONNECTION-INITIATION PIC X(10). 05 PHYSICAL-INTERFACE PIC X(10). 05 CONNECTION-TYPE PIC X(10). 05 ATTACHED-NS-NWI PIC X(10). 05 NWI-CHANNEL-TYPE PIC X(10). 05 NWI-CHANNEL-NUM PIC X(10). 05 X25-DCE-SUPPORT PIC X(10). |
|
05 NET-CONTROLLER PIC X(10). 05 EXCHANGE-ID PIC X(10). 05 PACKET-MODE PIC X(10). 05 INFO-TRANSFER-TYPE PIC X(13). 05 EXTENDED-NET-ADDR PIC X(10). 05 MODULUS PIC X(10). 05 INSERT-NET-ADDR-IN-PACKETS PIC X(10). 05 ERROR-THRESHOLD-LVL PIC X(10). 05 CONNECTION-NUM PIC X(32). 05 CALLING-NUM PIC X(32). 05 MODEM-TYPE-SUPPORTED PIC X(10). 05 MODEM-DATA-RATE-SELECT PIC X(10). 05 SWITCHED-CONNECTION-TYPE PIC X(10). 05 OUTGOING-CONNECTION-LST PIC X(10). 05 OUTGOING-CONNECTION-LST-ENTRY PIC X(10). 05 INCOMING-CONNECTION-LST PIC X(10). 05 AUTOANSWER PIC X(10). 05 AUTODIAL PIC X(10). 05 DIAL-CMD-TYPE PIC X(10). 05 CALL-IMMEDIATE PIC X(10). 05 AUTOCALL-UNIT PIC X(10). 05 AUTOCALL-RESOURCE-NAME PIC X(10). |
|
05 SWITCHED-DISCONNECT PIC X(10). 05 AUTOANSWER-TYPE PIC X(10). 05 SWITCHED-NWI-SELECTION PIC X(10). 05 SECURITY-FOR-LINE PIC X(10). 05 PROPAGATION-DELAY PIC X(10). 05 NET-USER-ID-FACILITY PIC X(214). 05 EMPTY-FIELD2 PIC X(1). * 05 LST-SW-CONTROLLERS * 10 SWITCHED-CNTRL-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD3 OCCURS 0-N TIMES PIC X(2). * 05 LST-ACTIVE-SW-CONTROLLERS * 10 ACTIVE-SW-CNTRL-NAME OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD4 OCCURS 0-N TIMES PIC X(2). * 05 LST-LOGICAL-CHANNEL-ENTRIES * 10 LOGICAL-CHANNEL-ID OCCURS 0-N TIMES PIC X(10). * 10 LOGICAL-CHANNEL-TYPE OCCURS 0-N TIMES PIC X(10). * 10 LOGICAL-CHANNEL-CNTRL OCCURS 0-N TIMES PIC X(10). * 10 EMPTY-FIELD5 OCCURS 0-N TIMES PIC X(2). * 05 LST-SW-NWIS * 10 NWI-NAME OCCURS 0-N TIMES PIC X(10). * 10 NWI-CHANNEL-TYPE OCCURS 0-N TIMES PIC X(10). * 10 NWI-CHANNEL-NUM OCCURS 0-N TIMES PIC X(10). |
|
* 10 EMPTY-FIELD6 OCCURS 0-N TIMES PIC X(2). I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND1100 * I* Language: RPG * I* Note(s): * I* * I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC I 106 108 RESERV I B 109 1120VRYONW I B 113 1160LINSPD |
|
I B 117 1200MAXFRM I B 121 1240DPSTRN I B 125 1280DPSRCV I B 129 1320MPSTRN I B 133 1360MPSRCV I B 137 1400DWSTRN I B 141 1440DWSRCV I B 145 1480IDLTIM I B 149 1520FRMTRY I B 153 1560PREDLY I B 157 1600REDDLY I B 161 1640DILTRY I B 165 1680MINCNN I B 169 1720DCTDLY I B 173 1760DSRTIM I B 177 1800CTSTIM I B 181 1840RMATIM I B 185 1880LNKSPD I B 189 1920CSTTIM I B 193 1960CSTBYT I B 197 2000USR1 I B 201 2040USR2 |
|
I B 205 2080USR3 I B 209 2120CNTLMT I B 213 2160TIMINT I B 217 2200OFFSW I B 221 2240NBRSW I B 225 2280LENSW I B 229 2320OFFASW I B 233 2360NBRASW I B 237 2400LENASW I B 241 2440OFFLOG I B 245 2480NBRLOG I B 249 2520LENLOG I B 253 2560OFFNWI I B 257 2600NBRNWI I B 261 2640LENNWI I 265 274 RSCNAM I 275 294 NETADR I 295 304 CNNITN I 305 314 PHYINT I 315 324 CNNTYP I 325 334 NSWNWI I 335 344 NWITYP |
|
I 345 354 NWINBR I 355 364 DCESUP I 365 374 NETCTL I 375 384 XID I 385 394 PACKET I 395 407 INFTYP I 408 417 XADR I 418 427 MODULS I 428 437 INSADR I 438 447 ERRLVL I 448 479 CNNNBR I 480 511 CLGNBR I 512 521 MDMTYP I 522 531 MDMRAT I 532 541 SWCTYP I 542 551 OUTLST I 552 561 OUTENT I 562 571 INCLST I 572 581 ATA I 582 591 ATD I 592 601 DILTYP I 602 611 CALIMD |
|
I 612 621 CALUNT I 622 631 ATCNAM I 632 641 SWDCT I 642 651 ATATYP I 652 661 SWNWI I 662 671 SECLIN I 672 681 PRPDLY I 682 895 NETID I 896 896 RESRVD I* I* (List of switched controllers. Following I* entries are repeated O-n times.) I* I* CHAR(10) Switched controller name SWCNAM I* CHAR(2) (reserved) SWCRSV I* I* (List of active switched controllers. I* Following entries are repeated O-n times.) I* I* CHAR(10) Active switched controller name ASWNAM I* CHAR(2) (reserved) ASWRSV I* |
|
I* (List of logical channel entries. Fol- I* lowing entries are repeated O-n times.) I* I* CHAR(10) Logical channel identifier LOGID I* CHAR(10) Logical channel type LOGTYP I* CHAR(10) Logical channel controller LOGCTL I* CHAR(2) (reserved) LOGRSV I* I* (List of switched NWIs. Following entries are I* repeated O-n times.) I* I* CHAR(10) NWI name NWINAM I* CHAR(10) NWI channel type NWITYP I* CHAR(10) NWI channel number NWINBR I* CHAR(2) (reserved) NWIRSV I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND1200 * I* Language: RPG * I* Note(s): * I* * |
|
I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC I 106 108 RESERV I B 109 1120VRYONW I B 113 1160MAXCTL I B 117 1200MAXFRM I B 121 1240TOKNRT I B 125 1280LINKSD I B 129 1320ADCNTR I B 133 1360CSTTIM I B 137 1400CSTBYT I B 141 1440USR1 I B 145 1480USR2 |
|
I B 149 1520USR3 I B 153 1560CNTLMT I B 157 1600TIMINT I B 161 1640OFFASW I B 165 1680NBRASW I B 169 1720LENASW I B 173 1760OFFLSS I B 177 1800NBRLSS I B 181 1840LENLSS I B 185 1880OFFGPA I B 189 1920NBRGPA I B 193 1960LENGPA I 197 206 RSCNAM I 207 216 NWINAM I 217 226 NWIDLC I 227 238 LCLADA I 239 248 EXCHID I 249 258 ATTMOD I 259 268 PRPDLY I 269 278 ATCCNT I* I* (List of active switched controllers. |
|
I* Following entries are repeated O-n times.) I* I* CHAR(10) Active switched controller name ASWNAM I* CHAR(2) (reserved) ASWRSV I* I* (List of SSAPs. Following entries are I* repeated O-n times.) I* I* BIN(4) SSAP MAXIMUM FRAME SSAPMF I* CHAR(10) SSAP ADDRESS SSAPAD I* CHAR(10) SSAP TYPE SSAPTY I* I* (List of GROUP ADDRESSES. Following entries are I* repeated O-n times.) I* I* CHAR(12) GROUP ADDRESSES GRPADD I**************************************************************** I* * I* Data structure for API: QDCRLIND * I* Format: LIND1300 * I* Language: RPG * I* Note(s): * |
|
I* * I**************************************************************** IRCVVAR DS I B 1 40BYTRTN I B 5 80BYTVAL I B 9 120NBRNSW I 13 19 DATINF I 20 25 TIMINF I 26 35 LINNAM I 36 45 LINCAT I 46 55 ONLINE I 56 105 TXTDSC I 106 108 RESERV I B 109 1120VRYONW I B 113 1160MAXCTL I B 117 1200MAXFRM I B 121 1240LINKSD I B 125 1280CSTTIM I B 129 1320CSTBYT I B 133 1360USR1 I B 137 1400USR2 I B 141 1440USR3 |
|
I B 145 1480CNTLMT I B 149 1520TIMINT I B 153 1560OFFASW I B 157 1600NBRASW I B 161 1640LENASW I B 165 1680OFFLSS I B 169 1720NBRLSS I B 173 1760LENLSS I 177 186 ATTNSW I 187 196 NWIDLC I 197 206 EXCHID I 207 216 SECLIN I 217 226 PRPDLY I* I* (List of active switched controllers. I* Following entries are repeated O-n times.) I* I* CHAR(10) Active switched controller name ASWNAM I* CHAR(2) (reserved) ASWRSV I* I* (List of SSAPs. Following entries are I* repeated O-n times.) |
|
I* I* BIN(4) SSAP MAXIMUM FRAME SSAPMF I* CHAR(10) SSAP ADDRESS SSAPAD I* CHAR(10) SSAP TYPE SSAPTY |
