Resources



Problem Fix Number: 4803

For SYSTEM 2000 Version: 12.0

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

Description of Problem:

CICS ABENDS WITH A SYSTEM 301 ABEND.


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 4803  MVS                                                    
 *                                                                               
 *  THIS FIX PREVENTS A 301 ABEND OF CICS                                        
 *                                                                               
 *  THE FIX IS TO RECOGNIZE THAT THE URB ECB IS CURRENTLY                        
 *  BEING WAITED ON AND BYPASS IMMEDIATE PROCESSING OF THE                       
 *  URB.                                                                         
 *                                                                               
 ./ CHANGE NAME=SCFTERM                                                          
 * *16* 22MAR95 GOH BUG 4803 HONOR WAIT FLAG TO PREVENT 301 ABENDS       00026920
          TM    URBFLAG1,URBWAIT     URB IN WAIT STATE ?            *16* 00186010
          BO    TERM0295             YES. LEAVE IT ALONE            *16* 00186020

End of Zap Deck