Endevor abended on U0401 and Module C1DEFL not found
search cancel

Endevor abended on U0401 and Module C1DEFL not found

book

Article ID: 242960

calendar_today

Updated On:

Products

Endevor

Issue/Introduction

After upgrading Endevor batch ACMQ jobs created and submitted from Endevor are failing with the following errors: 

 C1DEFLTS MODULE C1DEFL   NOT FOUND OR NOT LINKED WITH RENT ATTRIBUTE.         
 +CCSR010E C1SSESTA U0401 at 3179555C LMOD BC1PAFSM CSECT ENSRVCIN +0005D4  
 +CCSR021I OWNER = Endevor R19.0                                        
 +CCSR022I MODULE = ENSRVCIN FMID = CSIQJ00 RMID = CSIQJ00                     
 +CCSR061I PSW: 00000000 00000000 073C1000 9DB0427C                            
 +CCSR062I ILC: 02 INTERRUPT CODE: 0D                                          
 +CCSR067I COMPLETION CODE U0401 REASON CODE 00080806                   
    

Environment

Release : All Supported versions

Resolution

The message "C1DEFLTS MODULE C1DEFL   NOT FOUND OR NOT LINKED WITH RENT ATTRIBUTE"   indicates that Endevor is looking for a C1DEFLTS table named C1DEFL.

As of v18.1 a default ENUXSITE table is delivered with the product. The default ENUXSITE  will swap the C1DEFLTS to a new value based on the allocation of the //EN$DFT??  DD statement. If the value of ?? is 02, then C1DEFLT02 will be used instead of C1DEFTS.  The above message indicates the table C1DEFL could not be allocated.

To resolve the problem, check if the following line in the Batch JCL that is being submitted: 

//EN$DFT  DD DUMMY

If it is coded, remove the line or comment it out.  

 

Note: This may happen in generated JCL. For example generating reports or submitting a batch ACMQ job.  PTFs LU12110 (V19.0) and LU12111 (V18.1)  have been published to fix the CSIQSENU(SCMM@LIB) member.

FROM:

)SEL &CIDFLTNM NE C1DEFLTS                                                 
)SETF DFLSF = &SUBSTR(&CIDFLTNM,7,2)                                       
//EN$DFT&DFLSF DD DUMMY                <<=== REQUEST DEFAULTS &CIDFLTNM    
//EN$TROPT DD SYSOUT=*             <<=== REQUEST OPTIONS REPORT            
)ENDSEL    

TO:

)IF &CIDFLTNM NE &Z THEN )DO                                     
)SEL &CIDFLTNM NE C1DEFLTS                                       
)SETF DFLSF = &SUBSTR(&CIDFLTNM,7,2)                             
//EN$DFT&DFLSF DD DUMMY         <<=== REQUEST DEFAULTS &CIDFLTNM 
)ENDSEL                                                          
)ENDDO