Fixes are available
APAR status
Closed as program error.
Error description
When invoking 3rd party web service from generated COBOL in CICS, sometimes the response array is not correctly populated. Some items are missing.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: * * Users that are using cobolGen services that use dynamic * * arrays of records containing elements that are nullable. * **************************************************************** * PROBLEM DESCRIPTION: * * The calculation for the control block size for records that * * contain nullable items was incorrect. This length was too * * short and caused the last nullable item in the record to be * * null, even though it was not. This length was also too * * short, so when the length was added to point at the next * * block of container IDs, used to fill the next records, it * * was not pointing at the proper location, causing the 2nd * * through nth records to be ignored. * **************************************************************** * RECOMMENDATION: * ****************************************************************
Problem conclusion
The logic has been updated to use the COBOL LENGTH OF construct instead of calculating the value length. This would make it work in all cases.
Temporary fix
Comments
APAR Information
APAR number
PI55959
Reported component name
RATL BUS DEV
Reported component ID
5724S5000
Reported release
911
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2016-01-22
Closed date
2016-04-05
Last modified date
2016-04-05
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Fix information
Fixed component name
RATL BUS DEV
Fixed component ID
5724S5000
Applicable component levels
R901 PSY
UP
R911 PSY
UP
R950 PSY
UP
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSMQ79","label":"Rational Business Developer"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"9.1.1","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
14 October 2021