V2R30 Liste données de performance

BoTTom |    Changer de couleur
      ****************************************************************
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *
      * FORMAT:  PFRD0100 (JOB DATA)                                 *
      * LANGUAGE:  COBOL                                             *
      *                                                              *
      ****************************************************************
       01 PFRD0100.
           05 JOB.
               10 JOB-NAME                   PIC X(10).
               10 USER-NAME                  PIC X(10).
               10 JOB-NUMBER                 PIC X(06).
           05 JOB-TYPE                       PIC X(01).
           05 JOB-SUBTYPE                    PIC X(01).
           05 PASSTHRU-SOURCE-FLAG           PIC X(01).
           05 PASSTHRU-TARGET-FLAG           PIC X(01).
           05 EMULATION-FLAG                 PIC X(01).
           05 PC-SUPPORT-FLAG                PIC X(01).
           05 DDM-FLAG                       PIC X(01).
           05 MRT-FLAG                       PIC X(01).
           05 SYSTEM36-FLAG                  PIC X(01).
           05 JOB-PRIORITY                   PIC X(02).


|    Changer de couleur
           05 JOB-POOL                       PIC X(02).
           05 RESERVED                       PIC X(01).
           05 JOB-END-TIME                   PIC X(12).
           05 TIME-SLICE                     PIC S9(9) COMP-4.
           05 CPU-TIME                       PIC S9(9) COMP-4.
           05 TNS-COUNT                      PIC S9(9) COMP-4.
           05 TNS-TIME                       PIC S9(9) COMP-4.
           05 SYNC-DB-READS                  PIC S9(9) COMP-4.
           05 SYNC-DB-WRITES                 PIC S9(9) COMP-4.
           05 SYNC-NONDB-READS               PIC S9(9) COMP-4.
           05 SYNC-NONDB-WRITES              PIC S9(9) COMP-4.
           05 ASYNC-DB-READS                 PIC S9(9) COMP-4.
           05 ASYNC-DB-WRITES                PIC S9(9) COMP-4.
           05 ASYNC-NONDB-READS              PIC S9(9) COMP-4.
           05 ASYNC-NONDB-WRITES             PIC S9(9) COMP-4.
           05 COMM-PUTS                      PIC S9(9) COMP-4.
           05 COMM-GETS                      PIC S9(9) COMP-4.
           05 EAO-EXCEPTIONS                 PIC S9(9) COMP-4.
           05 BINARY-OVERFLOWS               PIC S9(9) COMP-4.
           05 DECIMAL-OVERFLOWS              PIC S9(9) COMP-4.
           05 FP-OVERFLOWS                   PIC S9(9) COMP-4.
           05 LOGICAL-DB-READS               PIC S9(9) COMP-4.


|    Changer de couleur
           05 LOGICAL-DB-WRITES              PIC S9(9) COMP-4.
           05 MISC-DB-OPERATIONS             PIC S9(9) COMP-4.
           05 PERMANENT-WRITES               PIC S9(9) COMP-4.
           05 CHECKSUM-IO                    PIC S9(9) COMP-4.
           05 PAG-FAULTS                     PIC S9(9) COMP-4.
           05 PRINT-LINES                    PIC S9(9) COMP-4.
           05 PRINT-PAGES                    PIC S9(9) COMP-4.
           05 ACTIVE-WAIT                    PIC S9(9) COMP-4.
           05 WAIT-INELIGIBLE                PIC S9(9) COMP-4.
           05 ACTIVE-INELIGIBLE              PIC S9(9) COMP-4.
           05 LINE-DESCRIPTION               PIC X(10).
           05 SECONDARY-LINE-DESC            PIC X(10).
     I****************************************************************
     I*                                                              *
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0100 (JOB DATA)                                  *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************
     IRCVVAR      DS
     I                                        1  10 JBNAME
     I                                       11  20 JBUSER


|    Changer de couleur
     I                                       21  26 JBNBR
     I                                       27  27 JBTYPE
     I                                       28  28 JBSTYP
     I                                       29  29 JBPTSF
     I                                       30  30 JBPTTF
     I                                       31  31 JBEAF
     I                                       32  32 JBPSCF
     I                                       33  33 JBDDMF
     I                                       34  34 JBMRTF
     I                                       35  35 JBS36E
     I                                       36  37 JBPRTY
     I                                       38  39 JBPOOL
     I                                       40  40 JBRESV
     I                                       41  52 JBENDT
     I                                    B  53  560JBSLC
     I                                    B  57  600JBCPU
     I                                    B  61  640JB£TR
     I                                    B  65  680JBRSP
     I                                    B  69  720JBDBR
     I                                    B  73  760JBDBW
     I                                    B  77  800JBNDR
     I                                    B  81  840JBNDW


|    Changer de couleur
     I                                    B  85  880JBADBR
     I                                    B  89  920JBADBW
     I                                    B  93  960JBANDR
     I                                    B  97 1000JBANDW
     I                                    B 101 1040JBCPT
     I                                    B 105 1080JBCGT
     I                                    B 109 1120JBEAO
     I                                    B 113 1160JBOBIN
     I                                    B 117 1200JBODEC
     I                                    B 121 1240JBOFLP
     I                                    B 125 1280JBLRD
     I                                    B 129 1320JBLWT
     I                                    B 133 1360JBDBU
     I                                    B 137 1400JBPW
     I                                    B 141 1440JBCS
     I                                    B 145 1480JBPAGF
     I                                    B 149 1520JBPLN
     I                                    B 153 1560JBPPG
     I                                    B 157 1600JBAW
     I                                    B 161 1640JBWI
     I                                    B 165 1680JBAI
     I                                      169 178 JBLND


|    Changer de couleur
     I                                      179 188 JB2LND
      ****************************************************************
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *
      * FORMAT:  PFRD0200 (POOL DATA)                                *
      * LANGUAGE:  COBOL                                             *
      *                                                              *
      ****************************************************************
       01 PFRD0200.
           05 POOL-NUMBER                    PIC S9(9) COMP-4.
           05 ACTIVITY-LEVEL                 PIC S9(9) COMP-4.
           05 POOL-SIZE                      PIC S9(9) COMP-4.
           05 MACHINE-RESERVED               PIC S9(9) COMP-4.
           05 DATABASE-FAULTS                PIC S9(9) COMP-4.
           05 NON-DATABASE-FAULTS            PIC S9(9) COMP-4.
           05 DATABASE-PAGES                 PIC S9(9) COMP-4.
           05 NON-DATABASE-PAGES             PIC S9(9) COMP-4.
           05 ACTIVE-WAIT                    PIC S9(9) COMP-4.
           05 WAIT-INELIGIBLE                PIC S9(9) COMP-4.
           05 ACTIVE-INELIGIBLE              PIC S9(9) COMP-4.
     I****************************************************************
     I*                                                              *


|    Changer de couleur
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0200 (POOL DATA)                                 *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************
     IRCVVAR      DS
     I                                    B   1   40PONBR
     I                                    B   5   80POACTL
     I                                    B   9  120POSIZ
     I                                    B  13  160PORES
     I                                    B  17  200PODBF
     I                                    B  21  240PONDBF
     I                                    B  25  280PODBPG
     I                                    B  29  320PONDPG
     I                                    B  33  360POAW
     I                                    B  37  400POWI
     I                                    B  41  440POAI
      ****************************************************************
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *
      * FORMAT:  PFRD0300 (DISK DATA)                                *
      * LANGUAGE:  COBOL                                             *


|    Changer de couleur
      *                                                              *
      ****************************************************************
       01 PFRD0300.
           05 BUS-NUMBER                     PIC S9(9) COMP-4.
           05 IOP-ADDRESS                    PIC S9(9) COMP-4.
           05 ARM-NUMBER                     PIC X(04).
           05 DRIVE-TYPE                     PIC X(04).
           05 MIRROR-FLAG                    PIC X(01).
           05 MIRROR-STATUS                  PIC X(01).
           05 RESERVED                       PIC X(02).
           05 TIMES-NOT-BUSY                 PIC S9(9) COMP-4.
           05 SAMPLES-TAKEN                  PIC S9(9) COMP-4.
           05 DRIVE-CAPACITY                 PIC S9(9) COMP-4.
           05 DRIVE-AVAILABLE                PIC S9(9) COMP-4.
           05 BLOCKS-READ                    PIC S9(9) COMP-4.
           05 BLOCKS-WRITTEN                 PIC S9(9) COMP-4.
           05 READ-COMMANDS                  PIC S9(9) COMP-4.
           05 WRITE-COMMANDS                 PIC S9(9) COMP-4.
           05 IDLE-LOOP-COUNT                PIC S9(9) COMP-4.
           05 IDLE-LOOP-TIME                 PIC S9(9) COMP-4.
           05 SEEKS-23                       PIC S9(9) COMP-4.
           05 SEEKS-13-23                    PIC S9(9) COMP-4.


|    Changer de couleur
           05 SEEKS-16-13                    PIC S9(9) COMP-4.
           05 SEEKS-112-16                   PIC S9(9) COMP-4.
           05 SEEKS-112                      PIC S9(9) COMP-4.
           05 ZERO-SEEKS                     PIC S9(9) COMP-4.
           05 BUFFER-OVERRUNS                PIC S9(9) COMP-4.
           05 BUFFER-UNDERRUNS               PIC S9(9) COMP-4.
           05 AVG-QUEUE-LENGTH               PIC S9(9) COMP-4.
           05 ASP-NUMBER                     PIC X(02).
           05 CHECKSUM-NUMBER                PIC X(02).
           05 PERMANENT-CAPACITY             PIC S9(9) COMP-4.
           05 PERMANENT-AVAILABLE            PIC S9(9) COMP-4.
     I****************************************************************
     I*                                                              *
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0300 (DISK DATA)                                 *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************
     IRCVVAR      DS
     I                                    B   1   40DSIOPB
     I                                    B   5   80DSIOPA
     I                                        9  12 DSARM


|    Changer de couleur
     I                                       13  16 DSTYPE
     I                                       17  17 DMFLAG
     I                                       18  18 DMSTS
     I                                       19  20 DSRES
     I                                    B  21  240DSNBSY
     I                                    B  25  280DSSMPL
     I                                    B  29  320DSCAP
     I                                    B  33  360DSAVL
     I                                    B  37  400DSBLKR
     I                                    B  41  440DSBLKW
     I                                    B  45  480DSRDS
     I                                    B  49  520DSWRTS
     I                                    B  53  560DSIDLC
     I                                    B  57  600DSIDLT
     I                                    B  61  640DSSK1
     I                                    B  65  680DSSK2
     I                                    B  69  720DSSK3
     I                                    B  73  760DSSK4
     I                                    B  77  800DSSK5
     I                                    B  81  840DSSK6
     I                                    B  85  880DSBUFO
     I                                    B  89  920DSBUFU


|    Changer de couleur
     I                                    B  93  940DSQUEL
     I                                       95  96 DSASP
     I                                       97 100 DSCSS
     I                                    B 101 1040DSPCAP
     I                                    B 105 1080DSPAVL
      ****************************************************************
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *
      * FORMAT:  PFRD0400 (IOP DATA)                                 *
      * LANGUAGE:  COBOL                                             *
      *                                                              *
      ****************************************************************
       01 PFRD0400.
           05 BUS-NUMBER                     PIC S9(9) COMP-4.
           05 IOP-ADDRESS                    PIC S9(9) COMP-4.
           05 IOP-TYPE                       PIC X(1).
           05 RESOURCE-TYPE                  PIC X(4).
           05 RESERVED                       PIC X(3).
           05 IDLE-LOOP-COUNT                PIC S9(9) COMP-4.
           05 IDLE-LOOP-TIME                 PIC S9(9) COMP-4.
           05 RAM-UTIL                       PIC S9(9) COMP-4.
           05 IOP-SYSTEM-TIME                PIC S9(9) COMP-4.


|    Changer de couleur
           05 ALL-COMM-TIME                  PIC S9(9) COMP-4.
           05 SDLC-TIME                      PIC S9(9) COMP-4.
           05 ASYNC-TIME                     PIC S9(9) COMP-4.
           05 BISYNC-TIME                    PIC S9(9) COMP-4.
           05 X25-LLC-TIME                   PIC S9(9) COMP-4.
           05 X25-PLC-TIME                   PIC S9(9) COMP-4.
           05 X25-DLC-TIME                   PIC S9(9) COMP-4.
           05 LAN-TIME                       PIC S9(9) COMP-4.
           05 SDLD-TIME                      PIC S9(9) COMP-4.
           05 ISDN-TIME                      PIC S9(9) COMP-4.
           05 ISDN-Q931-TIME                 PIC S9(9) COMP-4.
           05 DISK-TIME                      PIC S9(9) COMP-4.
     I****************************************************************
     I*                                                              *
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0400 (IOP DATA)                                  *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************
     IRCVVAR      DS
     I                                    B   1   40IIIOPB
     I                                    B   5   80IIIOPA


|    Changer de couleur
     I                                        9   9 IIIOPT
     I                                       10  13 IITYPE
     I                                       14  16 IIRES1
     I                                    B  17  200IIIDLC
     I                                    B  21  240IIIDLT
     I                                    B  25  280IIRAMU
     I                                    B  29  320IISYSF
     I                                    B  33  360IICOMM
     I                                    B  37  400IISDLC
     I                                    B  41  440IIASYN
     I                                    B  45  480IIBSC
     I                                    B  49  520IIX25L
     I                                    B  53  560IIX25P
     I                                    B  57  600IIX25D
     I                                    B  61  640IILAN
     I                                    B  65  680IISDLD
     I                                    B  69  720IILAP
     I                                    B  73  760IIQ931
     I                                    B  77  800IIDISK
      ****************************************************************
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *


|    Changer de couleur
      * FORMAT:  PFRD0500 (ASYNCHRONOUS COMMUNICATIONS DATA)         *
      * LANGUAGE:  COBOL                                             *
      *                                                              *
      ****************************************************************
       01 PFRD0500.
           05 BUS-NUMBER                     PIC S9(9) COMP-4.
           05 IOP-ADDRESS                    PIC S9(9) COMP-4.
           05 PROTOCOL                       PIC X(01).
           05 LINE-DESCRIPTION               PIC X(10).
           05 LINE-ACTIVE                    PIC X(01).
           05 RESERVED1                      PIC X(12).
           05 LINE-SPEED                     PIC S9(9) COMP-4.
           05 NBR-VARY-ON                    PIC S9(9) COMP-4.
           05 ACTIVE-TIME                    PIC S9(9) COMP-4.
           05 BYTES-TRANS                    PIC S9(9) COMP-4.
           05 BYTES-RCVD                     PIC S9(9) COMP-4.
           05 PDU-TRANS                      PIC S9(9) COMP-4.
           05 PDU-RCVD                       PIC S9(9) COMP-4.
           05 PDU-RCVD-ERROR                 PIC S9(9) COMP-4.
           05 RESERVED2                      PIC X(132).
     I****************************************************************
     I*                                                              *


|    Changer de couleur
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0500 (ASYNCHRONOUS COMMUNICATIONS DATA)          *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************
     IRCVVAR      DS
     I                                    B   1   40ASIOPB
     I                                    B   5   80ASIOPA
     I                                        9   9 ASPRCL
     I                                       10  19 ASLND
     I                                       20  20 ASLACT
     I                                       21  32 ASRES1
     I                                    B  33  360ASLSP
     I                                    B  37  400ASVRYO
     I                                    B  41  440ASACTT
     I                                    B  45  480ASBTRN
     I                                    B  49  520ASBRCV
     I                                    B  53  560ASPDUT
     I                                    B  57  600ASPDUR
     I                                    B  61  640ASPDUE
     I                                       65 196 ASRES2
      ****************************************************************


|    Changer de couleur
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *
      * FORMAT:  PFRD0510 (BISYNCHRONOUS COMMUNICATIONS DATA)        *
      * LANGUAGE:  COBOL                                             *
      *                                                              *
      ****************************************************************
       01 PFRD0510.
           05 BUS-NUMBER                     PIC S9(9) COMP-4.
           05 IOP-ADDRESS                    PIC S9(9) COMP-4.
           05 PROTOCOL                       PIC X(01).
           05 LINE-DESCRIPTION               PIC X(10).
           05 LINE-ACTIVE                    PIC X(01).
           05 RESERVED1                      PIC X(12).
           05 LINE-SPEED                     PIC S9(9) COMP-4.
           05 NBR-VARY-ON                    PIC S9(9) COMP-4.
           05 ACTIVE-TIME                    PIC S9(9) COMP-4.
           05 BYTES-TRANS                    PIC S9(9) COMP-4.
           05 BYTES-RCVD                     PIC S9(9) COMP-4.
           05 DATA-CHAR-TRANS                PIC S9(9) COMP-4.
           05 DATA-CHAR-RCVD                 PIC S9(9) COMP-4.
           05 DATA-CHAR-RETRANS              PIC S9(9) COMP-4.
           05 DATA-CHAR-RCVD-ERROR           PIC S9(9) COMP-4.


|    Changer de couleur
           05 CHAR-RCVD-ERROR                PIC S9(9) COMP-4.
           05 NAK-RCVD                       PIC S9(9) COMP-4.
           05 WRONG-ACK                      PIC S9(9) COMP-4.
           05 ENQUEUE-TEXT-SENT              PIC S9(9) COMP-4.
           05 INVALID-FORMAT                 PIC S9(9) COMP-4.
           05 ENQUEUE-TO-ACK                 PIC S9(9) COMP-4.
           05 DISCONNECT-ABORT               PIC S9(9) COMP-4.
           05 EOT-ABORT                      PIC S9(9) COMP-4.
           05 DISCONNECT-FABORT              PIC S9(9) COMP-4.
           05 EOT-FABORT                     PIC S9(9) COMP-4.
           05 DATA-BLOCKS-TRANS              PIC S9(9) COMP-4.
           05 DATA-BLOCKS-RCVD               PIC S9(9) COMP-4.
           05 RESERVED2                      PIC X(80).
     I****************************************************************
     I*                                                              *
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0510 (BISYNCHRONOUS COMMUNICATIONS DATA)         *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************
     IRCVVAR      DS
     I                                    B   1   40BSIOPB


|    Changer de couleur
     I                                    B   5   80BSIOPA
     I                                        9   9 BSPRCL
     I                                       10  19 BSLND
     I                                       20  20 BSLACT
     I                                       21  32 BSRES1
     I                                    B  33  360BSLSP
     I                                    B  37  400BSVRYO
     I                                    B  41  440BSACTT
     I                                    B  45  480BSBTRN
     I                                    B  49  520BSBRCV
     I                                    B  53  560BSDCTR
     I                                    B  57  600BSDCRV
     I                                    B  61  640BSLDRT
     I                                    B  65  680BSDCRE
     I                                    B  69  720BSCRER
     I                                    B  73  760BSLNK
     I                                    B  77  800BSLWA
     I                                    B  81  840BSLQTS
     I                                    B  85  880BSLINV
     I                                    B  89  920BSLQAK
     I                                    B  93  960BSLDRA
     I                                    B  97 1000BSLEAB


|    Changer de couleur
     I                                    B 101 1040BSLDFA
     I                                    B 105 1080BSLEFA
     I                                    B 109 1120BSLDBT
     I                                    B 113 1160BSLDBR
     I                                      117 196 BSRES2
      ****************************************************************
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *
      * FORMAT:  PFRD0520 (SDLC COMMUNICATIONS DATA)                 *
      * LANGUAGE:  COBOL                                             *
      *                                                              *
      ****************************************************************
       01 PFRD0520.
           05 BUS-NUMBER                     PIC S9(9) COMP-4.
           05 IOP-ADDRESS                    PIC S9(9) COMP-4.
           05 PROTOCOL                       PIC X(01).
           05 LINE-DESCRIPTION               PIC X(10).
           05 LINE-ACTIVE                    PIC X(01).
           05 RESERVED1                      PIC X(12).
           05 LINE-SPEED                     PIC S9(9) COMP-4.
           05 NBR-VARY-ON                    PIC S9(9) COMP-4.
           05 ACTIVE-TIME                    PIC S9(9) COMP-4.


|    Changer de couleur
           05 BYTES-TRANS                    PIC S9(9) COMP-4.
           05 BYTES-RCVD                     PIC S9(9) COMP-4.
           05 IFRAMES-RETRANS                PIC S9(9) COMP-4.
           05 ERROR-FREE-FRAMES              PIC S9(9) COMP-4.
           05 FRAMES-RCVD-ERROR              PIC S9(9) COMP-4.
           05 INVALID-FRAMES-RCVD            PIC S9(9) COMP-4.
           05 LINK-RESETS                    PIC S9(9) COMP-4.
           05 IFRAMES-TRANS                  PIC S9(9) COMP-4.
           05 FRAMES-RETRANS                 PIC S9(9) COMP-4.
           05 RR-FRAMES-TRANS                PIC S9(9) COMP-4.
           05 RR-FRAMES-RCVD                 PIC S9(9) COMP-4.
           05 RNR-FRAMES-TRANS               PIC S9(9) COMP-4.
           05 RNR-FRAMES-RCVD                PIC S9(9) COMP-4.
           05 POLL-WAIT-TIME                 PIC S9(9) COMP-4.
           05 RESERVED2                      PIC X(96).
     I****************************************************************
     I*                                                              *
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0520 (SDLC COMMUNICATIONS DATA)                  *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************


|    Changer de couleur
     IRCVVAR      DS
     I                                    B   1   40SHIOPB
     I                                    B   5   80SHIOPA
     I                                        9   9 SHPRCL
     I                                       10  19 SHLND
     I                                       20  20 SHLACT
     I                                       21  32 SHRES1
     I                                    B  33  360SHLSP
     I                                    B  37  400SHVRYO
     I                                    B  41  440SHACTT
     I                                    B  45  480SHBTRN
     I                                    B  49  520SHBRCV
     I                                    B  53  560SHIFRT
     I                                    B  57  600SHEFFR
     I                                    B  61  640SHFRIE
     I                                    B  65  680SHIFR
     I                                    B  69  720SHLNKR
     I                                    B  73  760SHIFTR
     I                                    B  77  800SHFRT
     I                                    B  81  840SHRRFT
     I                                    B  85  880SHRRFR
     I                                    B  89  920SHRNRT


|    Changer de couleur
     I                                    B  93  960SHRNRR
     I                                    B  97 1000SHCPT
     I                                      101 196 SHRES2
      ****************************************************************
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *
      * FORMAT:  PFRD0530 (X.25 COMMUNICATIONS DATA)                 *
      * LANGUAGE:  COBOL                                             *
      *                                                              *
      ****************************************************************
       01 PFRD0530.
           05 BUS-NUMBER                     PIC S9(9) COMP-4.
           05 IOP-ADDRESS                    PIC S9(9) COMP-4.
           05 PROTOCOL                       PIC X(01).
           05 LINE-DESCRIPTION               PIC X(10).
           05 LINE-ACTIVE                    PIC X(01).
           05 RESERVED1                      PIC X(12).
           05 LINE-SPEED                     PIC S9(9) COMP-4.
           05 NBR-VARY-ON                    PIC S9(9) COMP-4.
           05 ACTIVE-TIME                    PIC S9(9) COMP-4.
           05 BYTES-TRANS                    PIC S9(9) COMP-4.
           05 BYTES-RCVD                     PIC S9(9) COMP-4.


|    Changer de couleur
           05 IFRAMES-RETRANS                PIC S9(9) COMP-4.
           05 FRAMES-RCVD-ERROR              PIC S9(9) COMP-4.
           05 INVALID-FRAMES-RCVD            PIC S9(9) COMP-4.
           05 LINK-RESETS                    PIC S9(9) COMP-4.
           05 IFRAMES-TRANS                  PIC S9(9) COMP-4.
           05 ERROR-FREE-FRAMES              PIC S9(9) COMP-4.
           05 RR-FRAMES-TRANS                PIC S9(9) COMP-4.
           05 RR-FRAMES-RCVD                 PIC S9(9) COMP-4.
           05 RNR-FRAMES-TRANS               PIC S9(9) COMP-4.
           05 RNR-FRAMES-RCVD                PIC S9(9) COMP-4.
           05 RESET-PACKETS-TRANS            PIC S9(9) COMP-4.
           05 RESET-PACKETS-RCVD             PIC S9(9) COMP-4.
           05 RESERVED2                      PIC X(96).
     I****************************************************************
     I*                                                              *
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0530 (X.25 COMMUNICATIONS DATA)                  *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************
     IRCVVAR      DS
     I                                    B   1   40XIOPB


|    Changer de couleur
     I                                    B   5   80XIOPA
     I                                        9   9 XHPRCL
     I                                       10  19 XLLND
     I                                       20  20 XLACT
     I                                       21  32 XRES1
     I                                    B  33  360XLLSP
     I                                    B  37  400XVRYO
     I                                    B  41  440XACTT
     I                                    B  45  480XHBTRN
     I                                    B  49  520XHBRCV
     I                                    B  53  560XHIFRT
     I                                    B  57  600XHFRIE
     I                                    B  61  640XHIFR
     I                                    B  65  680XHLNKR
     I                                    B  69  720XHIFTR
     I                                    B  73  760XHEFFR
     I                                    B  77  800XHRRFT
     I                                    B  81  840XHRRFR
     I                                    B  85  880XHRNRT
     I                                    B  89  920XHRNRR
     I                                    B  93  960XPRPT
     I                                    B  97 1000XPRPR


|    Changer de couleur
     I                                      101 196 XRES2
      ****************************************************************
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *
      * FORMAT:  PFRD0540 (ECL COMMUNICATIONS DATA)                  *
      * LANGUAGE:  COBOL                                             *
      *                                                              *
      ****************************************************************
       01 PFRD0540.
           05 BUS-NUMBER                     PIC S9(9) COMP-4.
           05 IOP-ADDRESS                    PIC S9(9) COMP-4.
           05 PROTOCOL                       PIC X(01).
           05 LINE-DESCRIPTION               PIC X(10).
           05 LINE-ACTIVE                    PIC X(01).
           05 RESERVED1                      PIC X(12).
           05 LINE-SPEED                     PIC S9(9) COMP-4.
           05 NBR-VARY-ON                    PIC S9(9) COMP-4.
           05 ACTIVE-TIME                    PIC S9(9) COMP-4.
           05 IFRAME-CHAR-TRANS              PIC S9(9) COMP-4.
           05 IFRAME-CHAR-RCVD               PIC S9(9) COMP-4.
           05 RNR-FRAMES-TRANS               PIC S9(9) COMP-4.
           05 RNR-FRAMES-RCVD                PIC S9(9) COMP-4.


|    Changer de couleur
           05 REJECT-FRAMES-TRANS            PIC S9(9) COMP-4.
           05 REJECT-FRAMES-RCVD             PIC S9(9) COMP-4.
           05 IFRAMES-TRANS                  PIC S9(9) COMP-4.
           05 IFRAMES-RCVD                   PIC S9(9) COMP-4.
           05 SABME-FRAMES-TRANS             PIC S9(9) COMP-4.
           05 SABME-FRAMES-RCVD              PIC S9(9) COMP-4.
           05 N2-RETRIES-EXPIRATION          PIC S9(9) COMP-4.
           05 T1-TIMER-EXPIRATION            PIC S9(9) COMP-4.
           05 FRAMES-TRANS                   PIC S9(9) COMP-4.
           05 FRAMES-RCVD                    PIC S9(9) COMP-4.
           05 RI-FRAMES-TRANS                PIC S9(9) COMP-4.
           05 RI-FRAMES-RCVD                 PIC S9(9) COMP-4.
           05 LINE-ERRORS                    PIC S9(9) COMP-4.
           05 INTERNAL-ERRORS                PIC S9(9) COMP-4.
           05 BURST-ERROR                    PIC S9(9) COMP-4.
           05 ARI-FCI-ERROR                  PIC S9(9) COMP-4.
           05 ABORT-DELIMITER                PIC S9(9) COMP-4.
           05 LOST-FRAME                     PIC S9(9) COMP-4.
           05 RX-CONGESTION                  PIC S9(9) COMP-4.
           05 FRAME-COPIED-ERROR             PIC S9(9) COMP-4.
           05 FREQUENCY-ERROR                PIC S9(9) COMP-4.
           05 TOKEN-ERROR                    PIC S9(9) COMP-4.


|    Changer de couleur
           05 DMA-BUS-ERROR                  PIC S9(9) COMP-4.
           05 DMA-PARITY-ERROR               PIC S9(9) COMP-4.
           05 ADDRESS-NOT-RECOGNIZED         PIC S9(9) COMP-4.
           05 FRAME-NOT-COPIED               PIC S9(9) COMP-4.
           05 TRANS-STRIP-ERROR              PIC S9(9) COMP-4.
           05 UNAUTHORIZED-AP                PIC S9(9) COMP-4.
           05 UNAUTHORIZED-MF                PIC S9(9) COMP-4.
           05 SOFT-ERROR                     PIC S9(9) COMP-4.
           05 TRANS-BEACON                   PIC S9(9) COMP-4.
           05 IOA-STATUS-OVERRUN             PIC S9(9) COMP-4.
           05 FRAMES-DISCARDED               PIC S9(9) COMP-4.
           05 SPURIOUS-INTERRUPTS            PIC S9(9) COMP-4.
     I****************************************************************
     I*                                                              *
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0540 (ECL COMMUNICATIONS DATA)                   *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************
     IRCVVAR      DS
     I                                    B   1   40EIOPB
     I                                    B   5   80EIOPA


|    Changer de couleur
     I                                        9   9 ELPRCL
     I                                       10  19 ELLND
     I                                       20  20 ELACT
     I                                       21  32 ERES1
     I                                    B  33  360ELLSP
     I                                    B  37  400EVRYO
     I                                    B  41  440EACTT
     I                                    B  45  480ELICT
     I                                    B  49  520ELICR
     I                                    B  53  560ELRFT
     I                                    B  57  600ELRFR
     I                                    B  61  640ELRJFT
     I                                    B  65  680ELRJFR
     I                                    B  69  720ELIFT
     I                                    B  73  760ELIFR
     I                                    B  77  800ELSFT
     I                                    B  81  840ELSFR
     I                                    B  85  880ELN2R
     I                                    B  89  920ELT1T
     I                                    B  93  960ELTFT
     I                                    B  97 1000ELTFR
     I                                    B 101 1040EMRIT


|    Changer de couleur
     I                                    B 105 1080EMRIR
     I                                    B 109 1120EMLNER
     I                                    B 113 1160EMINER
     I                                    B 117 1200EMBRE
     I                                    B 121 1240EMAFE
     I                                    B 125 1280EMABT
     I                                    B 129 1320EMLST
     I                                    B 133 1360EMRXC
     I                                    B 137 1400EMFCE
     I                                    B 141 1440EMFQE
     I                                    B 145 1480EMTKE
     I                                    B 149 1520EMDBE
     I                                    B 153 1560EMDPE
     I                                    B 157 1600EMANR
     I                                    B 161 1640EMFNC
     I                                    B 165 1680EMTSE
     I                                    B 169 1720EMUAP
     I                                    B 173 1760EMUMF
     I                                    B 177 1800EMSFT
     I                                    B 181 1840EMTBC
     I                                    B 185 1880EMIOA
     I                                    B 189 1920EMFDC


|    Changer de couleur
     I                                    B 193 1960EMSIN
      ****************************************************************
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *
      * FORMAT:  PFRD0550 (ETHERNET COMMUNICATIONS DATA)             *
      * LANGUAGE:  COBOL                                             *
      *                                                              *
      ****************************************************************
       01 PFRD0550.
           05 BUS-NUMBER                     PIC S9(9) COMP-4.
           05 IOP-ADDRESS                    PIC S9(9) COMP-4.
           05 PROTOCOL                       PIC X(01).
           05 LINE-DESCRIPTION               PIC X(10).
           05 LINE-ACTIVE                    PIC X(01).
           05 RESERVED1                      PIC X(12).
           05 LINE-SPEED                     PIC S9(9) COMP-4.
           05 NBR-VARY-ON                    PIC S9(9) COMP-4.
           05 ACTIVE-TIME                    PIC S9(9) COMP-4.
           05 IFRAME-CHAR-TRANS              PIC S9(9) COMP-4.
           05 IFRAME-CHAR-RCVD               PIC S9(9) COMP-4.
           05 RNR-FRAMES-TRANS               PIC S9(9) COMP-4.
           05 RNR-FRAMES-RCVD                PIC S9(9) COMP-4.


|    Changer de couleur
           05 REJECT-FRAMES-TRANS            PIC S9(9) COMP-4.
           05 REJECT-FRAMES-RCVD             PIC S9(9) COMP-4.
           05 IFRAMES-TRANS                  PIC S9(9) COMP-4.
           05 IFRAMES-RCVD                   PIC S9(9) COMP-4.
           05 SABME-FRAMES-TRANS             PIC S9(9) COMP-4.
           05 SABME-FRAMES-RCVD              PIC S9(9) COMP-4.
           05 N2-RETRIES-EXPIRATION          PIC S9(9) COMP-4.
           05 T1-TIMER-EXPIRATION            PIC S9(9) COMP-4.
           05 TOTAL-FRAMES-TRANS             PIC S9(9) COMP-4.
           05 TOTAL-FRAMES-RCVD              PIC S9(9) COMP-4.
           05 INBOUND-FRAMES-MISSED          PIC S9(9) COMP-4.
           05 CRC-ERROR                      PIC S9(9) COMP-4.
           05 MORE-16-RETRIES                PIC S9(9) COMP-4.
           05 OUT-WINDOW-COLLISION           PIC S9(9) COMP-4.
           05 ALIGNMENT-ERROR                PIC S9(9) COMP-4.
           05 CARRIER-LOSS                   PIC S9(9) COMP-4.
           05 TIMEDOMAIN-REFLECT             PIC S9(9) COMP-4.
           05 RECEIVE-BUFFER-ERRORS          PIC S9(9) COMP-4.
           05 SPURIOUS-INTERRUPTS            PIC S9(9) COMP-4.
           05 DISCARD-INBOUND-FRAMES         PIC S9(9) COMP-4.
           05 RECEIVE-OVERRUNS               PIC S9(9) COMP-4.
           05 MEMORY-ERROR                   PIC S9(9) COMP-4.


|    Changer de couleur
           05 INTERRUPT-OVERRUN              PIC S9(9) COMP-4.
           05 TRANSMIT-UNDERFLOW             PIC S9(9) COMP-4.
           05 BABBLE-ERRORS                  PIC S9(9) COMP-4.
           05 SIGNAL-QUALITY-ERROR           PIC S9(9) COMP-4.
           05 MORE-1-RETRY                   PIC S9(9) COMP-4.
           05 EXACTLY-1-RETRY                PIC S9(9) COMP-4.
           05 DEFERRED-CONDITIONS            PIC S9(9) COMP-4.
           05 RESERVED2                      PIC X(20).
     I****************************************************************
     I*                                                              *
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0550 (ETHERNET COMMUNICATIONS DATA)              *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************
     IRCVVAR      DS
     I                                    B   1   40ETIOPB
     I                                    B   5   80ETIOPA
     I                                        9   9 ETPRCL
     I                                       10  19 ETLLND
     I                                       20  20 ETLACT
     I                                       21  32 ETRES1


|    Changer de couleur
     I                                    B  33  360ETLLSP
     I                                    B  37  400ETVRYO
     I                                    B  41  440ETACTT
     I                                    B  45  480ETLICT
     I                                    B  49  520ETLICR
     I                                    B  53  560ETLRFT
     I                                    B  57  600ETLRFR
     I                                    B  61  640ETLRJT
     I                                    B  65  680ETLRJR
     I                                    B  69  720ETLIFT
     I                                    B  73  760ETLIFR
     I                                    B  77  800ETLSFT
     I                                    B  81  840ETLSFR
     I                                    B  85  880ETLN2R
     I                                    B  89  920ETLT1T
     I                                    B  93  960ETLTFT
     I                                    B  97 1000ETLTFR
     I                                    B 101 1040ETMIFM
     I                                    B 105 1080ETMCRE
     I                                    B 109 1120ETMEXR
     I                                    B 113 1160ETMOWC
     I                                    B 117 1200ETMALE


|    Changer de couleur
     I                                    B 121 1240ETMCRL
     I                                    B 125 1280ETMTDR
     I                                    B 129 1320ETMRBE
     I                                    B 133 1360ETMSPI
     I                                    B 137 1400ETMDIF
     I                                    B 141 1440ETMROV
     I                                    B 145 1480ETMMEE
     I                                    B 149 1520ETMIOV
     I                                    B 153 1560ETMTUN
     I                                    B 157 1600ETMBBE
     I                                    B 161 1640ETMSQE
     I                                    B 165 1680ETMM1R
     I                                    B 169 1720ETM1R
     I                                    B 173 1760ETMDCN
     I                                      177 196 ETRES2
      ****************************************************************
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *
      * FORMAT:  PFRD0560 (IDLC COMMUNICATIONS DATA)                 *
      * LANGUAGE:  COBOL                                             *
      *                                                              *
      ****************************************************************


|    Changer de couleur
       01 PFRD0560.
           05 BUS-NUMBER                     PIC S9(9) COMP-4.
           05 IOP-ADDRESS                    PIC S9(9) COMP-4.
           05 PROTOCOL                       PIC X(01).
           05 LINE-DESCRIPTION               PIC X(10).
           05 NETWORK-INTERFACE-DESC         PIC X(10).
           05 LINE-ACTIVE                    PIC X(01).
           05 RESERVED1                      PIC X(02).
           05 LINE-SPEED                     PIC S9(9) COMP-4.
           05 NBR-VARY-ON                    PIC S9(9) COMP-4.
           05 ACTIVE-TIME                    PIC S9(9) COMP-4.
           05 BYTES-TRANS                    PIC S9(9) COMP-4.
           05 BYTES-RCVD                     PIC S9(9) COMP-4.
           05 RECEIVE-CRC-ERRORS             PIC S9(9) COMP-4.
           05 SHORT-FRAME-ERRORS             PIC S9(9) COMP-4.
           05 ABORTS-RECEIVED                PIC S9(9) COMP-4.
           05 SEQUENCE-ERRORS                PIC S9(9) COMP-4.
           05 FRAMES-TRANS                   PIC S9(9) COMP-4.
           05 RETRANS-FRAMES                 PIC S9(9) COMP-4.
           05 FRAMES-RCVD                    PIC S9(9) COMP-4.
           05 FRAMES-RCVD-ERRORS             PIC S9(9) COMP-4.
           05 B1-CHANNEL                     PIC X(01).


|    Changer de couleur
           05 B2-CHANNEL                     PIC X(01).
           05 RESERVED2                      PIC X(110).
     I****************************************************************
     I*                                                              *
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0560 (IDLC COMMUNICATIONS DATA)                  *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************
     IRCVVAR      DS
     I                                    B   1   40ISIOPB
     I                                    B   5   80ISIOPA
     I                                        9   9 ISPRCL
     I                                       10  19 ISLND
     I                                       20  29 ISNWI
     I                                       30  30 ISLACT
     I                                       31  32 ISRES1
     I                                    B  33  360ISLSP
     I                                    B  37  400ISVRYO
     I                                    B  41  440ISACTT
     I                                    B  45  480ISBTRN
     I                                    B  49  520ISBRCV


|    Changer de couleur
     I                                    B  53  560ILCRCE
     I                                    B  57  600ILSFE
     I                                    B  61  640ILABRT
     I                                    B  65  680ISSEQE
     I                                    B  69  720ISFTRN
     I                                    B  73  760ISFRT
     I                                    B  77  800ISFRCV
     I                                    B  81  840ILFRIE
     I                                       85  85 ISB1
     I                                       86  86 ISB2
     I                                       87 196 ISRES2
      ****************************************************************
      *                                                              *
      * DATA STRUCTURE FOR API:  QPMLPFRD                            *
      * FORMAT:  PFRD0570 (LAPD COMMUNICATIONS DATA)                 *
      * LANGUAGE:  COBOL                                             *
      *                                                              *
      ****************************************************************
       01 PFRD0570.
           05 BUS-NUMBER                     PIC S9(9) COMP-4.
           05 IOP-ADDRESS                    PIC S9(9) COMP-4.
           05 PROTOCOL                       PIC X(01).


|    Changer de couleur
           05 NETWORK-INTERFACE-DESC         PIC X(10).
           05 LINE-ACTIVE                    PIC X(01).
           05 RESERVED1                      PIC X(12).
           05 LINE-SPEED                     PIC S9(9) COMP-4.
           05 NBR-VARY-ON                    PIC S9(9) COMP-4.
           05 ACTIVE-TIME                    PIC S9(9) COMP-4.
           05 BYTES-TRANS                    PIC S9(9) COMP-4.
           05 BYTES-RCVD                     PIC S9(9) COMP-4.
           05 LOSS-FRAME-ALIGN               PIC S9(9) COMP-4.
           05 LOCAL-END-CODE                 PIC S9(9) COMP-4.
           05 DTSE-IN-ERRORS                 PIC S9(9) COMP-4.
           05 DTSE-OUT-ERRORS                PIC S9(9) COMP-4.
           05 FAR-END-CODE                   PIC S9(9) COMP-4.
           05 ERRORED-SECS                   PIC S9(9) COMP-4.
           05 SEVERELY-ERRORED-SECS          PIC S9(9) COMP-4.
           05 COLLISION-DETECT               PIC S9(9) COMP-4.
           05 RECEIVE-CRC-ERRORS             PIC S9(9) COMP-4.
           05 SHORT-FRAME-ERRORS             PIC S9(9) COMP-4.
           05 ABORTS-RCVD                    PIC S9(9) COMP-4.
           05 SEQUENCE-ERRORS                PIC S9(9) COMP-4.
           05 FRAMES-TRANS                   PIC S9(9) COMP-4.
           05 RETRANS-FRAMES                 PIC S9(9) COMP-4.


|    Changer de couleur
           05 FRAMES-RCVD                    PIC S9(9) COMP-4.
           05 FRAMES-RCVD-ERROR              PIC S9(9) COMP-4.
           05 OUTGOING-CALLS                 PIC S9(9) COMP-4.
           05 OUTGOING-RETRIES               PIC S9(9) COMP-4.
           05 INCOMING-CALLS                 PIC S9(9) COMP-4.
           05 INCOMING-RETRIES               PIC S9(9) COMP-4.
           05 MAINTENANCE-CHANNEL            PIC X(01).
           05 RESERVED2                      PIC X(63).
     I****************************************************************
     I*                                                              *
     I* DATA STRUCTURE FOR API:  QPMLPFRD                            *
     I* FORMAT: PFRD0570 (LAPD COMMUNICATIONS DATA)                  *
     I* LANGUAGE: RPG                                                *
     I*                                                              *
     I****************************************************************
     IRCVVAR      DS
     I                                    B   1   40LDIOPB
     I                                    B   5   80LDIOPA
     I                                        9   9 LDPRCL
     I                                       10  19 LDNWI
     I                                       20  20 LDLACT
     I                                       21  32 LDRES1


|    Changer de couleur
     I                                    B  33  360LDLSP
     I                                    B  37  400LDVRYO
     I                                    B  41  440LDACTT
     I                                    B  45  480LDBTRN
     I                                    B  49  520LDBRCV
     I                                    B  53  560LPLOFA
     I                                    B  57  600LPLECV
     I                                    B  61  640LPDTSI
     I                                    B  65  680LPDTSO
     I                                    B  69  720LPFECV
     I                                    B  73  760LPES
     I                                    B  77  800LPSES
     I                                    B  81  840LPCOL
     I                                    B  85  880LLCRCE
     I                                    B  89  920LLSFE
     I                                    B  93  960LLABRT
     I                                    B  97 1000LSSEQE
     I                                    B 101 1040LSFTRN
     I                                    B 105 1080LSFRT
     I                                    B 109 1120LSFRCV
     I                                    B 113 1160LLFRIE
     I                                    B 117 1200LQTOC


|    Changer de couleur
     I                                    B 121 1240LQROC
     I                                    B 125 1280LQTIC
     I                                    B 129 1320LQRIC
     I                                      133 133 LDCHS1
     I                                      134 196 LDRES2




©AF400