Resources



Problem Fix Number: 4882

For SYSTEM 2000 Version: 12.0

Problem Status: ZC (Zap Coded) -- Fix has received limited testing

Description of Problem:

0C4 RUNNING PROC DBLOAD FROM MULTI-USER DATABASE TO SINGLE-USER DATABASE


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.0   BUG 4882  MVS                                                    
 *                                                                               
 * FIXES PROBLEM OF DELETING WRONG COPY OF GOTOSAS                               
 * FOR IBM RELEASE 12.0                                                          
 *                                                                               
 * NOTE: RELINK LOAD MODULE "GOTOSAS" SPECIFYING                                 
 * ALIAS OF "GOTOSASS"                                                           
 *                                                                               
 * SAMPLE JCL:                                                                   
 *                                                                               
 * //JCLRELNK JOB (,),                                                           
 * //    ACCTID,REGION=0M,TIME=(,5)                                              
 * /*JOBPARM FETCH                                                               
 * //LNK EXEC PGM=IEWL,                                                          
 * // PARM='MAP,XREF,LET,LIST,NCAL,SIZE=(164K,24K)'                              
 * //SYSPRINT DD  SYSOUT=A                                                       
 * //SYSUT1   DD  UNIT=RIO,SPACE=(1024,(400,20))                                 
 * //LOAD     DD  DSN=S2K.R121.LOAD,DISP=SHR                                     
 * //SYSLMOD  DD  DSN=S2K.R121.LOAD,DISP=OLD                                     
 * //SYSLIN   DD  *                                                              
 *   INCLUDE LOAD(GOTOSAS)                                                       
 *   ENTRY GOTOSAS                                                               
 *   MODE AMODE(31),RMODE(24)                                                    
 *   ALIAS GOTOSASS                                                              
 *   NAME GOTOSAS(R)                                                             
 * //                                                                            
 *                                                                               
 NAME S2KPLR S2KPLR                                                              
 VER 0078 4100,C080,47F0,C088,C7D6,E3D6,E2C1,E240                                
 VER 07B0 4500,C7BC,C7D6,E3D6,E2C1,E240,0A09                                     
 VER 0F00 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 0F10 0000,0000,0000,0000,0000,0000,0000                                     
 REP 0078 4100,CF00,9500,901B,4780,C088,4100,CF08                                
 REP 07B0 41F0,CF10,4100,CF00,9500,901B,07FF                                     
 REP 0F00 C7D6,E3D6,E2C1,E2E2,C7D6,E3D6,E2C1,E240                                
 REP 0F10 4780,CF18,4100,CF08,0A09,47F0,C7BE                                     
 CHECKSUM A9B36279                                                               

End of Zap Deck