**********************************************************************          
*  EZDB  5.6 PTF CGI05.007                          November 2009    *          
*                                                                    *          
*  KEYWORDS   : EZ-IMAGE ABEND CV STARTUP FCBUSER=YES                *          
*                                                                    *          
*  Description: CV may abend at startup when EZ-IMAGE is active and  *          
*               FCBUSER=YES is set in COXATAB.                       *          
*                                                                    *          
*  Tapes      : EZDB CI0502 CA-IDMS Release 17                       *          
*                                                                    *          
**********************************************************************          
* CGI05.007                                                IDMS 17.0 *          
**********************************************************************          
*                                                                               
NAME COFABMGR COFABMGR                                                          
VER 019C 9140,6072                TM   CCSAFLGB,CCSFABDA                        
VER 01A0 47E0,C14C                BNO  OKRTN2                                   
*                                                                               
VER 05F4 5810,60E8                L    R1,CCSAIDMC                              
VER 05F8 5810,10A8                L    R1,DMCFCN-DMC(,R1)                       
*                                                                               
REP 019C 58E0,6018                L    R14,CCSAPTCH                             
REP 01A0 47F0,E160                B    PATCH+X'160'                             
*                                                                               
REP 05F4 58E0,6018                L    R14,CCSAPTCH                             
REP 05F8 47F0,E17E                L    PATCH+X'17E'                             
*                                                                               
NAME COXAPTCH COXAPTCH                                                          
VER 0160 F160,F162,F164,F166,F168,F16A,F16C,F16E                                
VER 0170 F170,F172,F174,F176,F178,F17A,F17C,F17E                                
VER 0180 F180,F182,F184,F186,F188,F18A,F18C,F18E                                
*                                                                               
REP 0160 9140,6072                TM   CCSAFLGB,CCFABDA                         
REP 0164 47E0,C14C                BNO  OKRTN2                                   
REP 0168 58E0,60E8                L    R14,CCSAIDMC                             
REP 016C 12EE                     LTR  R14,R14                                  
REP 016E 4780,C14C                BZ   OKRTN2                                   
REP 0172 9120,606D                TM   CCSAFLG6,CCSACVAC                        
REP 0176 47E0,C14C                BNO  OKRTN2                                   
REP 017A 47F0,C148                B    INLINE                                   
*                                                                               
REP 017E 5810,60E8                L    R1,CCSAIDMC                              
REP 0182 1211                     LTR  R1,R1                                    
REP 0184 4780,C5F0                BZ   EXPN0560                                 
REP 0188 5810,10A8                L    R1,DMCFCN-DMC(,R1)                       
REP 018C 47F0,C5A0                B    INLINE                                   
*                                                                               
NAME COXAPTCH COXAZAPS                                                          
VER 0030 0000,0000,0000,0000                                                    
REP 0030 C3C7,C9F0,F5F0,F0F7      CGI05.007