For SYSTEM 2000 Version: 11.6
Problem Status: ZD -- ZAP DISTRIBUTED
Description of Problem:
3390 DISK SUPPORT. ALLOW SYSTEM 2000 TO WORK WITH 3390 DISKS.
Note: Please send email to s2k@sas.com telling us which problem fixes you have downloaded so we can keep track of the fixes at your site in case questions or problems arise.
Top of Zap Deck:
* IBM R11.6 BUG 4457 OS * * ***** THIS ZAP IS FOR MVS ONLY ***** * * 3390 DISK SUPPORT. ALLOW SYSTEM 2000 TO WORK WITH 3390 DISKS. * THE VER AND REP LINES ARE IDENTICAL FOR ALL NAME LINES THAT HAVE * PGSTRK AS CSECT (SECOND NAME IN NAME LINE). * NOTE: * 1) PARAMETER DISK=3390 IS NOT VALID. USE 3380. * 2) MAX BLOCK SIZE (POOL) FOR 3390 ALLOWED WITH THIS ZAP IS 23464, * SAME AS 3380. * 3) SAVE DATABASE TO 3390 DISK FILE WILL USE BLOCK SIZE OF 29776 FOR * THE SAVE FILE. TWO 29776 BLOCKS WILL FIT ON ONE 3390 TRACK. * NAME S2K00 PGSTRK VER 0030 41E0,E060 VER 005C 950E,1003,4780,C0F0,950C,1003,4780,C112 VER 006C 4850,6008,1B22,1255,4770,C07C,4320,1010 VER 007C 1B33,4330,100F,9108,1011,47E0,C08E,4830 VER 008C 100E,1B32,4A50,600A,1A35,4C50,1012,8850 VER 009C 0009,1B44,4340,100E,9108,1011,47E0,C0B0 VER 00AC 4840,100E REP 0030 41E0,E070 REP 005C 50A0,D060,D200,D067,1003,D200,D06D,6008 REP 006C D201,D06E,600A,4110,D064,43F0,D067,42F0 REP 007C 1003,9286,1004,9201,1008,43F0,D06D,42F0 REP 008C 1009,48F0,D06E,40F0,100A,58F0,0010,58F0 REP 009C F0E8,45E0,F00C,58A0,D060,12FF,4780,C0DE REP 00AC 47F0,C0CA NAME S2KSIP PGSTRK VER 0030 41E0,E060 VER 005C 950E,1003,4780,C0F0,950C,1003,4780,C112 VER 006C 4850,6008,1B22,1255,4770,C07C,4320,1010 VER 007C 1B33,4330,100F,9108,1011,47E0,C08E,4830 VER 008C 100E,1B32,4A50,600A,1A35,4C50,1012,8850 VER 009C 0009,1B44,4340,100E,9108,1011,47E0,C0B0 VER 00AC 4840,100E REP 0030 41E0,E070 REP 005C 50A0,D060,D200,D067,1003,D200,D06D,6008 REP 006C D201,D06E,600A,4110,D064,43F0,D067,42F0 REP 007C 1003,9286,1004,9201,1008,43F0,D06D,42F0 REP 008C 1009,48F0,D06E,40F0,100A,58F0,0010,58F0 REP 009C F0E8,45E0,F00C,58A0,D060,12FF,4780,C0DE REP 00AC 47F0,C0CA NAME FORMATSK PGSTRK VER 0030 41E0,E060 VER 005C 950E,1003,4780,C0F0,950C,1003,4780,C112 VER 006C 4850,6008,1B22,1255,4770,C07C,4320,1010 VER 007C 1B33,4330,100F,9108,1011,47E0,C08E,4830 VER 008C 100E,1B32,4A50,600A,1A35,4C50,1012,8850 VER 009C 0009,1B44,4340,100E,9108,1011,47E0,C0B0 VER 00AC 4840,100E REP 0030 41E0,E070 REP 005C 50A0,D060,D200,D067,1003,D200,D06D,6008 REP 006C D201,D06E,600A,4110,D064,43F0,D067,42F0 REP 007C 1003,9286,1004,9201,1008,43F0,D06D,42F0 REP 008C 1009,48F0,D06E,40F0,100A,58F0,0010,58F0 REP 009C F0E8,45E0,F00C,58A0,D060,12FF,4780,C0DE REP 00AC 47F0,C0CA NAME LOADTSK PGSTRK VER 0030 41E0,E060 VER 005C 950E,1003,4780,C0F0,950C,1003,4780,C112 VER 006C 4850,6008,1B22,1255,4770,C07C,4320,1010 VER 007C 1B33,4330,100F,9108,1011,47E0,C08E,4830 VER 008C 100E,1B32,4A50,600A,1A35,4C50,1012,8850 VER 009C 0009,1B44,4340,100E,9108,1011,47E0,C0B0 VER 00AC 4840,100E REP 0030 41E0,E070 REP 005C 50A0,D060,D200,D067,1003,D200,D06D,6008 REP 006C D201,D06E,600A,4110,D064,43F0,D067,42F0 REP 007C 1003,9286,1004,9201,1008,43F0,D06D,42F0 REP 008C 1009,48F0,D06E,40F0,100A,58F0,0010,58F0 REP 009C F0E8,45E0,F00C,58A0,D060,12FF,4780,C0DE REP 00AC 47F0,C0CA NAME SAVETSK PGSTRK VER 0030 41E0,E060 VER 005C 950E,1003,4780,C0F0,950C,1003,4780,C112 VER 006C 4850,6008,1B22,1255,4770,C07C,4320,1010 VER 007C 1B33,4330,100F,9108,1011,47E0,C08E,4830 VER 008C 100E,1B32,4A50,600A,1A35,4C50,1012,8850 VER 009C 0009,1B44,4340,100E,9108,1011,47E0,C0B0 VER 00AC 4840,100E REP 0030 41E0,E070 REP 005C 50A0,D060,D200,D067,1003,D200,D06D,6008 REP 006C D201,D06E,600A,4110,D064,43F0,D067,42F0 REP 007C 1003,9286,1004,9201,1008,43F0,D06D,42F0 REP 008C 1009,48F0,D06E,40F0,100A,58F0,0010,58F0 REP 009C F0E8,45E0,F00C,58A0,D060,12FF,4780,C0DE REP 00AC 47F0,C0CA NAME PADCALC PGSTRK VER 0030 41E0,E060 VER 005C 950E,1003,4780,C0F0,950C,1003,4780,C112 VER 006C 4850,6008,1B22,1255,4770,C07C,4320,1010 VER 007C 1B33,4330,100F,9108,1011,47E0,C08E,4830 VER 008C 100E,1B32,4A50,600A,1A35,4C50,1012,8850 VER 009C 0009,1B44,4340,100E,9108,1011,47E0,C0B0 VER 00AC 4840,100E REP 0030 41E0,E070 REP 005C 50A0,D060,D200,D067,1003,D200,D06D,6008 REP 006C D201,D06E,600A,4110,D064,43F0,D067,42F0 REP 007C 1003,9286,1004,9201,1008,43F0,D06D,42F0 REP 008C 1009,48F0,D06E,40F0,100A,58F0,0010,58F0 REP 009C F0E8,45E0,F00C,58A0,D060,12FF,4780,C0DE REP 00AC 47F0,C0CA NAME SAVETSK SAVETSK VER 039A 910E,D10F,47E0,C3AA REP 039A 5870,A068,47F0,7208 NAME S2K00 S2KPATCH VER 0208 0000,0000,0000,0000,0000,0000,0000,0000 VER 0218 0000,0000,0000,0000,0000,0000,0000 REP 0208 910F,D10F,4780,721C,910E,D10F,47E0,C3AA REP 0218 47F0,C3A2,4810,722C,47F0,C3E2,7450 CHECKSUM 690ED038
End of Zap Deck