*COPY MIHREC 00000500 PUSH PRINT 00000510 AIF ('&SYSPARM' NE 'SUP').MIH01 00000520 PRINT OFF,NOGEN 00000530 .MIH01 ANOP 00000540 MIHREC DSECT 00001000 * 00002000 *** MISSING INTERRUPT HANDLER ERROR RECORD 00003000 * 00004000 * +---------+----+----+----+----+---------+ 00005000 * | MIHKEYN | S1 | S2 | S3 | S4 | MIHSPE1 | 00006000 * +---------+----+----+----+----+---------+ 00007000 * | MIHDTEN | MIHTMEN | 00008000 * +-------------------+-------------------+ 00009000 * | MIHCPID | 00010000 * +---------------------------------------+ 00011000 * | MIHJOB | 00012000 * +-------------+---------------+---------+ 00013000 * | MIHCUA2 | MIHCUA1 | MIH - | 00014000 * +-------------------+-------------------+ 00015000 * | VOL | MIHDEVT | 00016000 * +-------------------+-------------------+ 00017000 * | MIHINT | 00018000 * +---------------------------------------+ 00019000 * 00020000 *** MIH RECORD 00021000 * 00022000 * 00023000 * 24 BYTE HEADER 00024000 * 00025000 MIHKEYN DS 1H TYPE AND OP SYSTEM 00026000 MIHSWS1 DS 1C S1 -SWITCH BYTE 0 00027000 MIHSWS2 DS 1C S2 - NOT USED 00028000 MIHSWS3 DS 1C S3 - NOT USED 00029000 MIHRECNT DS 1C S4 - NOT USED 00030000 MIHSPE1 DS 1H NOT USED 00031000 MIHDTEN DS 1F DATE 00032000 MIHTMEN DS 1F TIME 00033000 MIHCPID DS 2F CPU ID AND MODEL 00034000 * 00035000 * REST IS DEVICE DEPENDENT 00036000 * 00037000 MIHJOB DS 8X JOB WHOSE I/O REQUEST PENDING 00038000 MIHCUA2 DS 3X CUA USED TO ADDRESS THE DEVICE 00039000 MIHCUA1 DS 3X PRIMARY DEVICE ADDRESS 00040000 MIHVOL DS 6X VOLUME SERIAL 00041000 MIHDEVT DS 4X DEVICE TYPE 00042000 MIHINT DS 8X TIME INTERVAL USED TO CHECK PEND INT 00043000 MIHSIZE EQU (*-MIHREC) MIH RECORD SIZE 00043500 EJECT 00044000 POP PRINT 00045000 SPACE 00046000