Resources



Problem Fix Number: 4826

For SYSTEM 2000 Version: 12.1

Problem Status: ZD -- ZAP DISTRIBUTED IN FIELD FIX 12.1-01

Description of Problem:

YEARCUTOFF DOES NOT WORK FOR LEAP YEAR PROCESSING. RECEIVE SCF MESSAGE 308 WHEN DATE IS ENTERED AS 02/29/00.


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 V12.1   BUG 4826  OS                                                     
 *                                                                               
 *  VALDATE WAS NOT TAKING INTO CONSIDERATION THE YEAR CUT OFF DATE              
 *  WHEN TESTING FOR LEAP YEAR.  IT ALSO ASSUMED THAT A TWO BYTE YEAR            
 *  OF 00 WAS 1900.  NOW THE CENTURY LEAP YEAR TESTING IS DONE AFTER             
 *  THE DATE IS CONVERTED INTO INTERNAL FORMAT.  THIS ALLOWS FOR THE             
 *  YEAR CUTOFF DATE TO BE CONSIDERED.                                           
 *                                                                               
 *  SYS2K AND S2KPLI DOES NEED TO BE RELINKED AFTER APPLYING THIS ZAP            
 *                   ---- ---  -- -- --------                                    
 NAME S2K30 VALDATE                                                              
 VER 011E 1288                                                                   
 VER 0120 4770,C132                                                              
 VER 012A 4780,C26C                                                              
 VER 012E 47F0,C15E                                                              
 VER 0132 D501,3008,C2A6                                                         
 VER 0138 4770,C15E                                                              
 VER 013C D503,3006,C288                                                         
 VER 0142 4780,C15E                                                              
 VER 0146 D503,3006,C28C                                                         
 VER 014C 4780,C15E                                                              
 VER 0150 D503,3006,C290                                                         
 VER 0156 4780,C15E                                                              
 VER 015A 47F0,C26C                                                              
 *                                                                               
 VER 01F6 D201,D050,D04E                                                         
 VER 01FC D201,D04E,D04B                                                         
 VER 0202 D202,D04B,D048                                                         
 VER 0208 1B44                                                                   
 *                                                                               
 VER 020A F236,2000,D04B                                                         
 *                                                                               
 REP 011E 47F0,C15E                                                              
 REP 0122 1B44                                                                   
 REP 0124 D501,D04B,C277                                                         
 REP 012A 4770,C20A                                                              
 REP 012E D501,D04D,C2A2                                                         
 REP 0134 4770,C20A                                                              
 REP 0138 D501,D049,C276                                                         
 REP 013E 4770,C20A                                                              
 REP 0142 95F1,D048                                                              
 REP 0146 4780,C20A                                                              
 REP 014A 95F5,D048                                                              
 REP 014E 4780,C20A                                                              
 REP 0152 95F9,D048                                                              
 REP 0156 4780,C20A                                                              
 REP 015A 47F0,C26C                                                              
 *                                                                               
 REP 01F6 D201,D04D,D04E                                                         
 REP 01FC 47F0,C122                                                              
 REP 0200 0000,0000,0000,0000,0000                                               
 *                                                                               
 REP 020A F236,2000,D048                                                         
 *                                                                               
 CHECKSUM A4159119                                                               

End of Zap Deck