*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