ALERT: Some images may not load properly within the Knowledge Base Article. If you see a broken image, please right-click and select 'Open image in a new tab'. We apologize for this inconvenience.

RSYN abends in CICS after upgrading to V18.0

book

Article ID: 20129

calendar_today

Updated On:

Products

IDMS IDMS - Database IDMS - ADS

Issue/Introduction

Description:

After upgrading to V18.0 transaction RSYN might abend with the following messages in the CICS log:

 +DFHAP0001 RCICSTA AN ABEND (CODE 0C1/AKEA) HAS OCCURRED AT OFFSET 
  X'0000002E' IN MODULE IDMSCSYN.                                        
 and                                                                   
 +GSVC201E Tran=RSYN Task= 1313 Code=ASRA Program=IDMSCSYN

Solution:

Relink IDMSCSYN with entry point CSYNEP1:

//SYSIN    DD  *                     
 INCLUDE CICSLIB(DFHEAI)             
 INCLUDE IDMSLIB(IDMSCSYN)           
 INCLUDE CINTLIB(idmscint)           
 INCLUDE CICSLIB(DFHEAI0)            
 ENTRY CSYNEP1              <--------
 NAME idmsrsyn(R)                    
/*                        

Environment

Release: IDADSO00100-18.5-ADS-for CA-IDMS
Component: