IBM Support

DFHSR0001 0CA decimal overflow exception in PL/I application after upgrading to CICS TS 5.2 or higher

Question & Answer


Question

My PL/I application program receiving a 'decimal overflow exception' after I upgrade from CICS Transaction Server for z/OS (CICS TS) V5.1 to V5.2 or higher? The Decimal-overflow exception (system code 0CA) is reported in the following message:

DFHSR0001 An abend (code 0CA/AKEA) has occurred at offset X'0000xxxx' in program .

In CICS TS V5.1, the program runs without any indication that there is a FIXEDOVERFLOW condition. But in CICS TS V5.3, the program gets the following message:

IBM0482S ONCODE=310 The FIXEDOVERFLOW condition was raised.

I am using the same PL/I libraries in both cases, so why it failing when running under CICS TS V5.3?

Answer

There was a bug in CICS TS reported in APAR PM73097 (in CICS TS V3.2 in 2012). It was created because an overflow condition is not raised in a PL1 program that has handled a CICS condition. It was closed as a REQuirement, due to the scope of the change, so there was no PTF, but CICS development agreed to consider adding a fix to this problem in a future release of CICS.

That fix was included in the base of CICS TS 5.2. This is why your program runs, at CICS TS 5.1, without any indication that there is a FIXEDOVERFLOW condition. But at CICS TS 5.3, the program gets the following message:

IBM0482S ONCODE=310 The FIXEDOVERFLOW condition was raised.

The program will need to be changed so that it doesn't cause the FIXEDOVERFLOW condition and (or) include an ON-unit to handle the condition as documented in the "Programmer response" for message IBM0482S under the PL/I runtime messages:

Modify the program to ensure that the condition does not recur or provide an ON-unit to handle the condition.

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Platform":[{"code":"PF035","label":"z\/OS"}],"Component":"PLI","Version":"5.2,5.3,5.4,5.5","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Product Synonym

CICS/TS CICSTS CICS TS CICS Transaction Server

Document Information

Modified date:
26 October 2017

UID

dwa1407845