For SYSTEM 2000 Version: 12.1
Problem Status: ZD -- ZAP DISTRIBUTED IN FIELD FIX 12.1-02
Description of Problem:
THIS ALLOWS SAVE AND KEEP FILES DYNAMICALLY ALLOCATED AND DESIGNATED AS GDG'S TO BE CREATED AS (+1) AND S2000 UPDATE THE CATALOG WITH THE PROPERVERSIO
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 R12.1 BUG 4861 MVS * * THIS FIX ALLOWS EVERY ISSUANCE OF THE SAVE COMMAND OR KEEP * COMMAND REFERENCING A GDS WITH (+1) AND BEING DYNAMICALLY * ALLOCATED TO CREATE A NEW DATASET, REGARDLESS OF THE NUMBER * OF TIMES THE COMMAND IS ISSUED IN A JOB. THE CATALOG IS * UPDATED WHEN THE FILE IS CLOSED INSTEAD OF WAITING FOR JOB * TERMINATION. THE SAVE AND KEEP FILES ARE CLOSED WHEN THE * RESPECTIVE COMMAND COMPLETES. * * WITHOUT THIS FIX EVERY REFERENCE TO THE (+1) DATASET THROUGH * OUT THE JOB ALWAYS POINTS TO THE SAME GDS. IF YOU WANT TO * CREATE MULTIPLE GDS'S IN ONE JOB YOU MUST REFER TO THE FIRST * ONE AS (+1), THE NEXT CREATED GDS AS (+2), AND SO ON. THE * CATALOG IS NOT UPDATED UNTIL JOB TERMINATION. * * YOU MUST RE-LINK SYS2K AND S2KPLI AFTER APPLYING THIS ZAP * NAME S2K50 COPRIM VER 05B2 1920,4720,C5EA,0620,4420,C5F6 VER 05D0 1920,4720,C5EA,9240,1000,D22A,1001,1000 VER 05E0 0620,4420,C5F6,47F0,C61E REP 05B2 47F0,C5DA,5840,40C0,47F0,426A REP 05D0 9240,1000,D22A,1001,1000,1920,4720,C5EA REP 05E0 5840,C70C,47F0,C5B6,0000 NAME S2K00 S2KPATCH VER 026A 0000,0000,0000,0000,0000,0000,0000,0000 VER 027A 0000,0000,0000,0000,0000,0000,0000,0000 VER 028A 0000,0000,0000,0000,0000,0000,0000,0000 VER 029A 0000,0000,0000,0000,0000,0000,0000,0000 VER 02AA 0000,0000,0000,0000,0000,0000,0000,0000 VER 02BA 0000,0000,0000,0000,0000,0000,0000,0000 VER 02CA 0000,0000,0000,0000,0000,0000,0000,0000 VER 02DA 0000,0000,0000,0000,0000,0000,0000,0000 VER 02EA 0000 REP 026A 0620,4420,C5F6,9501,A807,4780,4280,4110 REP 027A A848,47F0,4284,4110,A898,5010,42D8,41E0 REP 028A 002B,954D,1000,4780,42A0,4110,1001,46E0 REP 029A 428C,47F0,C61E,4100,010C,58F0,42E4,1B11 REP 02AA 0A78,12FF,4770,C5EA,5010,42E0,4110,42D4 REP 02BA 0A1A,12FF,4770,C5EA,4100,010C,4110,42E0 REP 02CA 58F0,42E8,0A78,47F0,C61E,4400,0000,0000 REP 02DA 0000,0000,0000,0000,0000,0000,0010,0000 REP 02EA 0001 CHECKSUM 4BDA73E1
End of Zap Deck