Previous Topic: #PMJRLDSNext Topic: #PMPGMDS


#PMLNEDS

                        COPY #PMLNEDS
               *********************************************************************
               ***                                                               ***
               ***      #PMLNE - PMIM LINE WAIT RECORD                           ***
               ***                                                               ***
               ***      COPYRIGHT (C) 2007 CA technologies. ALL RIGHTS RESERVED.              ***
               ***                                                               ***
               ***                                                               ***
               ***                                                               ***
               *********************************************************************
               *
               *        ONE LINE WAIT RECORD FOR EACH LINE IN SYSGEN
               *
               *--------------------------------------------------------------------
               *

Offset  Value

000000         #PMLNE   DSECT                                                07/11/91
               *
               *--------------------------------------------------------------------
               *
000000         LNEHDR   DS    0H                  RECORD HEADER
               *
000000         LNELEN   DS    H                   RECORD LENGTH         (INCLUSIVE)
000002         LNERTYPE DS    X                   RECORD TYPE
        00007  LNE$TYPE EQU       7               ..PMIM LINE WAIT RECORD
000003         LNESEQ#  DS    X                   SEQUENCE NUMBER       (ALWAYS 1)
000004         LNEVER#  DS    X                   RECORD VERSION
        00001  LNE$VER  EQU       1               ..CURRENT VERSION
000005                  DS    XL3                 ** RESERVED **
               *
000008                  DS    F                   ** RESERVED **
00000C         LNESDATE DS    PL4                 INTERVAL START DATE   (00YYYDDF)
000010         LNESTIME DS    F                   INTERVAL START TIME   (10**-4 SEC)
000014         LNEEDATE DS    PL4                 INTERVAL END DATE     (00YYYDDF)
000018         LNEETIME DS    F                   INTERVAL END TIME     (10**-4 SEC)
               *
        0001C  LNEHDRLN EQU   *-LNEHDR            HEADER LENGTH
               *
               *--------------------------------------------------------------------
               *
        0001C  LNEDATA  EQU   *                   START OF LINE DATA
               *
00001C         LNENAME  DS    CL8                 NAME OF LINE
000024         LNEDRVR  DS    CL8                 NAME OF LINE DRIVER
               *
00002C         LNELTYPE DS   0CL2
00002C         LNETYPE  DS    C                   LINE TYPE               (PLETYPE)
00002D         LNEMETH  DS    C                   ACCESS METHOD           (PLEMETH)
00002E         LNE#TERM DS    H                   # TERMINALS ON THE LINE (PLENTERM)
               *
000030         LNESTATS DS    X                   STATUS AT INTVL START   (PLEFLAGS)
000031         LNESTATE DS    X                   STATUS AT INTVL END     (PLEFLAGS)
000032                  DS    H                   ** RESERVED **
               *
000034         LNE#READ DS    F                   # READS
000038         LNE#WRIT DS    F                   # WRITES
00003C         LNE#RDER DS    F                   # READ ERRORS
000040         LNE#WRER DS    F                   # WRITE ERRORS
               *
000044         LNEBLEN  DS    F                   # CHARS BEFORE COMPACT  (PLEBLEN)
000048         LNECLEN  DS    F                   # CHARS AFTER COMPACT   (PLECLEN)
Offset  Value

               *
00004C         LNE#RPLS DS    H                   # RPLS SYSGENNED        (PLE5NRPL)
00004E                  DS    H                   ** RESERVED **
               *
000050         LNE#RPLQ DS    F                   # RPL REQUESTS          (PLE5QRPL)
000054         LNE#RPLW DS    F                   # RPL WAITS             (PLE5WRPL)
               * IF HAVE AN RPL WAIT BUCKET, NEED ABOVE?
               *  (ABOVE IS FROM PLE.  WAIT BUCKET IS FROM CECB.
               *   SO MAY DIFFER THO WHY I CAN'T SAY.)
               *
000058         LNE#BYTR DS    F                   # BYTES READ
00005C         LNE#BYTW DS    F                   # BYTES WRITTEN
               *                                CAN WE DO THESE?
000060                  DS    F                   ** RESERVED **
               *
               *--------------------------------------------------------------------
               *
000064         LNEWBKTS DS   0F                   START OF WAIT TIME STATISTICS
               *
000064         LNETPIR  DS   0F                   TERMINAL READ WAIT
000064         LNETPIRT DS    F                   ....SUM OF WAIT TIMES (10**-4 SEC)
000068         LNETPIRH DS    F                   ....HIGHEST WAIT TIME (10**-4 SEC)
00006C         LNETPIR# DS    F                   ....# WAITS
               *
000070         LNETPIW  DS   0F                   TERMINAL WRITE WAIT
000070         LNETPIWT DS    F                   ....SUM OF WAIT TIMES (10**-4 SEC)
000074         LNETPIWH DS    F                   ....HIGHEST WAIT TIME (10**-4 SEC)
000078         LNETPIW# DS    F                   ....# WAITS
               *
00007C         LNERPL   DS   0F                   RPL WAIT
00007C         LNERPLT  DS    F                   ....SUM OF WAIT TIMES (10**-4 SEC)
000080         LNERPLH  DS    F                   ....HIGHEST WAIT TIME (10**-4 SEC)
000084         LNERPL#  DS    F                   ....# WAITS
               *
000088                  DS   0F                   ** RESERVED **
000088                  DS    F                   ....SUM OF WAIT TIMES (10**-4 SEC)
00008C                  DS    F                   ....HIGHEST WAIT TIME (10**-4 SEC)
000090                  DS    F                   ....# WAITS
               *
               *--------------------------------------------------------------------
               *
        00094  LNEDSLEN EQU   ((*-#PMLNE+3)/4)*4  LENGTH OF LOG RECORD
               *
               *--------------------------------------------------------------------
               *
        00003  LNE#BKTS EQU   3                   # WAIT BUCKETS
        00078  LNEDTLEN EQU   LNEDSLEN-LNEHDRLN   LENGTH OF RECORD DATA
               *
               *--------------------------------------------------------------------