FG Adds are getting an EIN7999 error

Products

• Endevor
• Endevor Natural Integration

Issue/Introduction

When doing FG Adds in Endevor Integration for the Natural Environment (EINE), the first Add is successfully but subsequent Adds get an EIN7999 error.

*** 2015-03-24 10:01:23.0 *** API function: EADQ ; User: USERID1 ; Return code: 7999 ; Reason: 0000 ; Hi Msg ID: EIN7999

The EIN7999 error produces additional diagnostic messages in the Endevor INE Server that provides the actual Natural error encountered during the Add process.

Look for diagnostic messages in the CMPRT01 data set of the EINE Server that looks like this:

.DNOE Command: 
. ==> UNLOAD PROGRAM1 LIB EINEJJ DBID 9 FNR 209 OBJTYPE N SCKIND S WITH 
. ==> NEWNAME PROGRAM1 WHERE TRANSFER USE-LNI 
. RC: 0 
.CMD RC: -1520 
. MSG1: Natural error 1520 occurred in line 1030 of program PROGRAM1 
. MSG2: Processing stopped! 

Environment

 Release: All supported releases

Cause

NAT1520       :1: file :2: not available.  

Ex *** Explanation ***

The specified print or work file is not available. Either the file is not defined in Natural, neither by JCL nor profile parameters or the file access method is not available.

Resolution

If you are getting a Natural 1520 - file not available error, there are a couple things to check.

1)  Verify the CMWKF01 file is defined in the Endevor EINE Server :

//*** ENDEVOR DATASETS                                            
//SYSOUT   DD DUMMY                                              
//SYMDUMP  DD SYSOUT=*                                            
//SYSUDUMP DD SYSOUT=*                                            
//BSTERR   DD SYSOUT=*                                            
//CMWKF01  DD  DISP=(,CATLG,DELETE),DSN=&PREFIX..&SERVER..CMWKF01,
//             UNIT=SYSDA,SPACE=(CYL,(5,1)),                      
//             DCB=(RECFM=VB,LRECL=256,BLKSIZE=2560)

2)  If the FG Add works successfully once, that indicates that the CMWKF01 file was defined to the Server and could be used successfully,  and then the file was released after the Add action.

A possible reason for the CMWKF01 file being released is a Generate was done following the Add and the Generate Processor was modified to use the DDNAME CMWKF01 :

//CMPRMIN  DD   *                                
&NATPARM,                                        
WORK=((1),DEST=CMWKF01),                          
AUTO=ON,                                          
EDPSIZE=64                                        
//CMPRINT  DD   DSN=&&NATLIST1,DISP=(OLD,PASS)  
//CMWKF01  DD   DSN=&&ELMOUT,DISP=OLD         

When the Generate Processor deletes the temporary file associated with the DDNAME CMWKF01, the CMWKF01 allocated to the Endevor INE Server is also released resulting in the EIN7999 / NAT1520 error.

Modify the Generate Processor changing CMWKF01 in the DEST= and DD statements to NATWK01:

//CMPRMIN  DD   *                                
&NATPARM,                                        
WORK=((1),DEST=NATWK01),                          
AUTO=ON,                                          
EDPSIZE=64                                        
//CMPRINT  DD   DSN=&&NATLIST1,DISP=(OLD,PASS)    
//NATWK01  DD   DSN=&&ELMOUT,DISP=OLD   

 

Regenerate the PNATGEN Generate Processor and retest.

Also verify that the PNATMOV Move Processor was not similarly been modified changing NATWK01 to CMWKF01.