**********************************************************************          
*  EZDB  5.5 PTF CD409.115                                Feb 2006   *          
*                                                                    *          
*  KEYWORDS   : COALLOC SEGMENT DYNAMIC ALLOCATION MISSING FILES     *          
*                                                                    *          
*  DESCRIPTION: When using ALLOC8 against a segment, if a file       *          
*               allocation fails, all subsequent file allocations    *          
*               are ommitted.                                        *          
*               With this PTF applied, if a file allocation fails    *          
*               while allocating a segment, ALLOC8 will move on to   *          
*               the next Area in the segment and continue.           *          
*                                                                    *          
*  TAPES      : EZ-DB C40901. CA-IDMS R16                            *          
*                                                                    *          
**********************************************************************          
* CD409.115                                                 IDMS R16 *          
**********************************************************************          
*                                                                               
NAME COALLOC8 COALLOC8                                                          
VER 0710 4580,C706            BAL   R8,INFOMSG                                  
VER 0714 47F0,C5CA            B     EXIT                                        
VER 077E 4540,C7BA            BAL   R4,HEXOUT                                   
VER 0788 4540,C7BA            BAL   R4,HEXOUT                                   
VER 082A 07F4                 BR    R4                                          
VER 1AA0 D000,D002                                                              
VER 1AA4 D004,D006                                                              
VER 1AA8 D008,D00A                                                              
VER 1AAC D00C,D00E                                                              
VER 1AB0 D010                                                                   
*                                                                               
REP 0710 58F0,C9A8            L     R15,APATCHSP                                
REP 0714 47F0,F000            B     PATCH+X'000'                                
REP 077E 45E0,C7BA            BAL   R14,HEXOUT                                  
REP 0788 45E0,C7BA            BAL   R14,HEXOUT                                  
REP 082A 07FE                 BR    R14                                         
*                                                                               
REP 1AA0 4580,C706            BAL   R8,INFOMSG                                  
REP 1AA4 9110,B000            TM    WKOPTFLG,WKOPTSEG                           
REP 1AA8 4780,C5CA            BZ    EXIT                                        
REP 1AAC 5880,B0B8            L     R8,PROCLINK                                 
REP 1AB0 07F8                 BR    R8                                          
*                                                                               
NAME COXAPTCH COXAZAPS                                                          
VER 0390 0000,0000,0000,0000                                                    
REP 0390 C3C4,F4F0,F9F1,F1F5  CD409.115