Trying to start the EINE Server with V18.1 and getting a NAT3041

Products

• Endevor Natural Integration
• Endevor

Issue/Introduction

Upgrading from V17 to V18.1 and getting a FATAL NATURAL ERROR -- in SERVER line 3080  error 3041

 

Environment

Release : 18.1 or 19.0

Cause

If upgrading from a version prior to v18.0, there were a couple of PTFs that updated the EINE System Profile file.

The changed made by these PTFs need to be implemented on the V18.1 or V19.0 EINE System Profile file.

Resolution

Run an ADAREP for the EINE System Profile file - LFILE 126:

//DDKARTE  DD    *     
ADAREP REPORT FILE=126,NOSTD

Check the AC field.

The V18.0 PTF SO07588 changed the AC field from:

  2   I  AC  I   24   I    A   I NU   

to

  2   I  AC  I    0   I    A   I LA,NU 

 

The V18.0 PTF SO08873 added 2 new fields - CR and CS

 

Run the following job to change the AC field:

//ADADBS   EXEC PGM=ADARUN,REGION=2008K         
//STEPLIB  DD   DSN=ADAVVV.LOAD,DISP=SHR        
//*                                             
//DDASSOR1 DD DSN=ADA.DBXXX.ASSOR1,DISP=SHR     
//DDDATAR1 DD DSN=ADA.DBXXX.DATAR1,DISP=SHR     
//DDSORTR1 DD DSN=ADA.DBXXX.SORTR1,DISP=SHR     
//DDWORKR1 DD DSN=ADA.DBXXX.WORKR1,DISP=SHR     
//DDTEMPR1 DD DSN=ADA.DBXXX.TEMPR1,DISP=SHR     
//*                                             
//DDDRUCK  DD   SYSOUT=*                        
//DDPRINT  DD   SYSOUT=*                        
//*                                             
//DDCARD   DD *                                 
ADARUN PROG=ADADBS                              
ADARUN DEVICE=8390,MODE=MULTI,DB=DDD,SVC=YYY    
//*                                             
//DDKARTE  DD    *                              
ADADBS CHANGE FILE=EINE126,FIELD='AC',OPTION=LA 
/*       

 

To add the new fields run the following job:                                        

//ADADBS   EXEC PGM=ADARUN,REGION=2048K      
//STEPLIB  DD   DSN=ADAVVV.LOAD,DISP=SHR     
//*                                          
//DDASSOR1 DD DSN=ADA.DBXXX.ASSOR1,DISP=SHR  
//DDDATAR1 DD DSN=ADA.DBXXX.DATAR1,DISP=SHR  
//DDSORTR1 DD DSN=ADA.DBXXX.SORTR1,DISP=SHR  
//DDWORKR1 DD DSN=ADA.DBXXX.WORKR1,DISP=SHR  
//DDTEMPR1 DD DSN=ADA.DBXXX.TEMPR1,DISP=SHR  
//*                                          
//DDDRUCK  DD   SYSOUT=*                     
//DDPRINT  DD   SYSOUT=*                     
//*                                          
//DDCARD   DD *                              
ADARUN PROG=ADADBS                           
ADARUN DEVICE=8390,MODE=MULTI,DB=DDD,SVC=YYY 
//*                                          
//DDKARTE  DD    *                           
ADADBS NEWFIELD FILE=EINE126                 
ADADBS    FNDEF='02,CR,228,A,NU'             
ADADBS    FNDEF='02,CS,7,P,NU'               
/*              

 

NOTE:  The EINE Message Queue (MQ) file should be deleted and reloaded by running the LOADADA job in the CEW8JCL library as part of the upgrade.