RSYN abends in CICS after upgrading to V18.0

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)                    
/*