*COPY SDRBLOK                                                           00001000
         PUSH  PRINT                                                    00002000
         AIF   ('&SYSPARM' NE 'SUP').SDR01                              00003000
.SDR01   ANOP                                                           00004000
SDRBLOK  DSECT                                                          00005000
         SPACE 1                                                        00006000
***               SDRBLOK - STATISTICAL DATA RECORDING BLOCK            00007000
*                                                                       00008000
*          0   +-----------------------+-----+-----+-----+-----+        00009000
*              |        SDRRDEV        | S*1 | S*2 | S*3 | S*4 |        00010000
*          8   +-----+-----------------+-----+-----+-----+-----+        00011000
*              | S*5 |     SDRCUA      |                       |        00012000
*         10   +-----+-----------------+  SDRCTRS  +-----------+        00013000
*              |                                   |           |        00014000
*         18   +-----------------------------------+ SDRCTRS1  |        00015000
*              |                                               |        00016000
*         20   +-----------------------------------------------+        00017000
*                                                                       00018000
***               SDRBLOK - STATISTICAL DATA RECORDING BLOCK            00019000
         SPACE 1                                                        00020000
SDRRDEV  DS    1F             ADDRESS OF ASSOCIATED RDEVBLOK            00021000
SDRFLAGS DS    1X        S*1  SDRBLOK FLAGS                             00022000
SDRPRMCT DS    1X        S*2  PARAMETER LIST COUNTER                    00023000
SDRFLCT  DS    1X        S*3  FULL BYTE COUNTER                         00024000
SDROVFWK DS    1X        S*4  STATISTICAL UPDATE WORK BYTE              00025000
SDRLNGTH DS    1X        S*5  LENGTH(BYTES) OF SDR COUNTERS             00026000
SDRCUA   DS    3X             PRIMARY CUA OF DEVICE BEING USED          00027000
SDRBSIZE EQU   (*-SDRBLOK)    SDRBLOK BASE SIZE, IN BYTES               00028000
SDRCTRS  DS    10X            SDR ERROR COUNTERS                        00029000
         SPACE 1                                                        00030000
SDRSIZE  EQU   (*-SDRBLOK+7)/8                                          00031000
         SPACE 1                                                        00032000
SDRCTRS1 DS    10X            ADDITIONAL SDR ERROR COUNTERS             00033000
*                             FOR DEVICES WHICH USE MORE THAN           00034000
*                             10 SDR COUNTERS. EXAMPLE 3400             00035000
*                             TAPE DRIVES                               00036000
         SPACE 1                                                        00037000
SDRSIZE1 EQU   (*-SDRBLOK)/8                                            00038000
         SPACE                                                          00039000
*        BITS DEFINED IN SDRFLAGS                                       00040000
SDRSHRT  EQU   X'80'          SHORT OBR TO BE WRITTEN                   00041000
SDRRECD  EQU   X'40'          OBR TO BE RECORDED ON COUNTER OVERFLOW    00042000
SDRMAX   EQU   X'20'          MAX NUMBER OF SDR COUNTERS HANDLED        00043000
*                                                                       00044000
*                                                                       00045000
*                                                                       00046000