CICS Message DFHPG0104 on URT programs

Products

• Datacom
• DATACOM - AD
• CIS
• COMMON SERVICES FOR Z/OS
• 90S SERVICES
• DATABASE MANAGEMENT SOLUTIONS FOR DB2 FOR Z/OS
• COMMON PRODUCT SERVICES COMPONENT
• Common Services
• CA ECOMETER SERVER COMPONENT FOC
• Easytrieve Report Generator for Common Services
• INFOCAI MAINTENANCE
• IPC
• UNICENTER JCLCHECK COMMON COMPONENT
• Mainframe VM Product Manager
• CHORUS SOFTWARE MANAGER
• CA ON DEMAND PORTAL
• CA Service Desk Manager - Unified Self Service
• PAM CLIENT FOR LINUX ON MAINFRAME
• MAINFRAME CONNECTOR FOR LINUX ON MAINFRAME
• GRAPHICAL MANAGEMENT INTERFACE
• WEB ADMINISTRATOR FOR TOP SECRET
• Xpertware

Issue/Introduction

I am getting the following message on my CICS URTS.

 I checked in the documentation and I don't see any recommendation on how these should be defined releative to the AMODE of the DATALOCATION  in the CICS program definition .  This is CICS TS 5.4 

 

DFHPG0104 10/20/2017 19:36:40 CICSRA1 Program DBURT161 is defined with DATALOCATION(ANY) but is linkedited with AMODE(24).

How to ASM/LINK URT under CICS?

Environment

z/OS, CICS TS 5.4

Resolution

You need to use AMODE(31) now that you are CICS CTS 5.4 

See following IBM Knowledge Center link: 

https://www.ibm.com/support/knowledgecenter/en/SSGMCP_5.4.0/upgrading/process/upgrade_regions.html 

Paragraph: 

Review program and transaction definitions 

------------------------------------------------- 

Defaults of the following resource attributes are changed in CICS TS 5.4. This change will have a different impact on resources, depending on the way the resources are defined. Review your resource definitions to ensure that the specification of these new defaults is appropriate. 

.... 
Only AMODE(24) programs need to use DATALOCATION(BELOW). CICS issues a DFHPG0104 warning message when it loads an AMODE(24) program that is defined with DATALOCATION(ANY). Specify DATALOCATION(BELOW) explicitly for definitions of AMODE(24) programs instead of using the default value. 

Only transactions that run AMODE(24) programs need to use TASKDATALOC(BELOW). CICS abends transactions with an AEZC abend code if an AMODE(24) program is run under a transaction that runs with TASKDATALOC(ANY). Specify TASKDATALOC(BELOW) explicitly when you define transactions that run AMODE(24) programs instead of using the default value. 

 

Additional Information

Your CICS URTs can be assembled/linked to move above the line. 

You would use AMODE=31 and RMODE=ANY. 

Make the change to the URT on the DBUREND macro. It might look like:

DBUREND SYSTEM=OS,USRINFO=...,AMODE=31,RMODE=ANY 

Once the assemble/link is done, you also need to make sure the PPT entry for DATALOCATION should be ANY.