Resources



Problem Fix Number: 4894

For SYSTEM 2000 Version: 12.1

Problem Status: ZD -- R12.1 FFD3

Description of Problem:

OPT054 ALLOWS THE SAVE COMMAND TO UPDATE FILE 1 INFORMATION WITHOUT CREATING A SAVEFILE. USEFUL WHEN USING NON-S2K UTILITIES TO BACKUP DATABASE FILES.


Download Fix:

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 4894  MVS                                                    
 *                                                                               
 * WHEN APPLIED THIS FIX INSTALLS OPT054.  OPT054 IS AN EXECUTION                
 * PARAMETER THAT MAY BE SPECIFIED IN THE PARM PARAMETER ON THE                  
 * PROGRAM EXECUTION STATEMENT IN THE JCL OR IN THE S2KPARMS FILE.               
 * IT EFFECTS ALL SAVE COMMANDS DURING THAT EXECUTION.  OPT054=YES               
 * DOES NOT CREATE A SAVE FILE WHEN THE SAVE COMMAND IS ISSUED. IT               
 * UPDATES THE DATABASE AS IF SAVE COMPLETED SUCCESSFULLY BUT DOES NOT           
 * CREATE THE SAVE FILE.  KEEP FILE INFORMATION SPECIFIED IN THE SAVE            
 * COMMAND IS RECORDED IN THE USUAL MANNER.  NEWLY CREATED MESSAGES              
 * 640 AND 641 REFLECT THE FACT THAT NO SAVE FILE WAS CREATED AND THE            
 * KEEP FILE INFORMATION, IF PROVIDED, WAS RECORDED.   IF NO KEEP FILE           
 * INFORMATION WAS PROVIDED, MESSAGE 641 IS NOT PRINTED.  OPT054=NO              
 * (THE DEFAULT) EXECUTES THE SAVE COMMAND AS IF THIS FIX WAS NOT                
 * APPLIED.                                                                      
 *                                                                               
 * RUN PRELNK AFTER APPLYING THIS FIX                                            
 *                                                                               
 NAME S2K00 MSGTBL                                                               
 VER 0FE0 0001                                                                   
 VER 5E22 4040,4040,4040,4040,4040,4040,4040,4040                                
 VER 5E32 4040,4040,4040,4040,4040,4040,4040,4040                                
 VER 5E42 4040,4040,4040,4040,4040,4040,4040,4040                                
 VER 5E52 4040,4040,4040,4040,4040,4040,4040                                     
 VER 5E68 4040,4040,4040,4040,4040,4040,4040,4040                                
 VER 5E78 4040,4040,4040,4040,4040,4040,4040,4040                                
 VER 5E88 4040,4040,4040,4040,4040,4040,4040,4040                                
 VER 5E98 4040,4040                                                              
 REP 0FE0 0000                                                                   
 REP 5E22 D6D7,E3F0,F5F4,7EE8,C5E2,4060,6040,D5D6                                
 REP 5E32 40E2,C1E5,C540,C6C9,D3C5,40C3,D9C5,C1E3                                
 REP 5E42 C5C4,4060,6040,D5D6,40E2,C1E5,C540,C6C9                                
 REP 5E52 D3C5,40C3,D9C5,C1E3,C5C4,4060,0000                                     
 REP 5E68 40C1,D5E8,40D2,C5C5,D740,C6C9,D3C5,40C9                                
 REP 5E78 D5C6,D640,E6C1,E240,E4E2,C5C4,40E3,D640                                
 REP 5E88 C1D9,D440,E3C8,C540,D2C5,C5D7,40C6,C9D3                                
 REP 5E98 C540,6000                                                              
 NAME S2K50 SAVEDB                                                               
 VER 00A0 4120,0006,1B00,5000,D0B4,41E0                                          
 REP 00A0 5880,CBE4,58F0,80C0,47F0,F648                                          
 NAME S2K00 S2KPATCH                                                             
 VER 0648 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 0658 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 0668 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 0678 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 0688 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 0698 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 06A8 0000,0000,0000,0000,0000,0000,0000,0000                                
 REP 0648 5880,8040,9101,816F,47E0,F69E,188F,4110                                
 REP 0658 86B0,45E0,C9CA,4110,D050,5010,700C,4110                                
 REP 0668 700C,58F0,CBC4,05EF,9501,A807,4770,8692                                
 REP 0678 4110,86B4,45E0,C9CA,4110,D050,5010,700C                                
 REP 0688 4110,700C,58F0,CBC4,05EF,4100,0000,4000                                
 REP 0698 D15C,47F0,CAD4,4120,0006,1B00,5000,D0B4                                
 REP 06A8 41E0,D108,47F0,C0AE,0000,0280,0000,0281                                
 CHECKSUM 0E63301D                                                               

End of Zap Deck