NAME DIRECTOR TNDDISP
VER 1A26 4780,9A6A B DISP7090
REP 1A26 4780,CD1A B *PATCH*
NAME DIRECTOR TNDPATCH
VER 0D1A CD1A,CD1C,CD1E
VER 0D20 CD20,CD22,CD24,CD26,CD28,CD2A,CD2C,CD2E
VER 0D30 CD30,CD32,CD34,CD36,CD38,CD3A,CD3C,CD3E
VER 0D40 CD40,CD42,CD44,CD46,CD48,CD4A,CD4C,CD4E
VER 0D50 CD50,CD52,CD54,CD56,CD58,CD5A,CD5C,CD5E
VER 0D60 CD60,CD62,CD64,CD66,CD68,CD6A
VER 2056 00 VERIFY PTF IS NOT ON
REP 0D1A 4130,C028 LA R3,PDAHIX-4
REP 0D1E BF3F,3004 ICM R3,B'1111',HIXNEXT
REP 0D22 4780,CD2E BZ *CHECK HDE*
REP 0D26 9601,3003 OI HIXFLAG,HIXFREE
REP 0D2A 47F0,CD1E
REP 0D2E 4130,C024 LA R3,PDAHDE-4
REP 0D32 BF3F,3004 ICM R2,B'1111',HDENEXT
REP 0D36 4780,9A6A BZ DISP7090
REP 0D3A 9601,3003 OI HDEFLAG,HDEFREE
REP 0D3E BFFF,3018 ICM R15,B'1111',HDEDATA
REP 0D42 4780,CD32 BZ *NEXT HDE*
REP 0D46 4110,D058 LA R1,WAEPARMS
REP 0D4A 4100,0010 LA R0,16
REP 0D4E 5001,0000 ST R0,0(R1)
REP 0D52 50F1,0004 ST R15,4(R1)
REP 0D56 4100,0008 LA R0,8
REP 0D5A 5001,0008 ST R0,8(R1)
REP 0D5E 92FF,100C MVI 12(R1),PDAE255
REP 0D62 58F0,C3B0 L R15,PDASTOR
REP 0D66 05EF BALR R14,R15
REP 0D68 47F0,CD32 B *NEXT HDE*
REP 2056 DF THIS PTF IS NOW ON |
