A fix is available
APAR status
Closed as program error.
Error description
In a complex CICS application, the amount of storage that is saved on TSQ during segmented converse can be large. While this does not have functional impact, some users would like to minimize this storage. The modification in this APAR reduces the amount of storage when possible.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Customers who uses TSQ in TUI Programs for * * ZOS. * **************************************************************** * PROBLEM DESCRIPTION: In a complex application, with many * * programs performing * * segmented converse, a large amount of * * TSQ storage is used. * **************************************************************** * RECOMMENDATION: Apply the APAR * **************************************************************** In a complex application, with many programs performing segmented converse, a large amount of TSQ storage is used.
Problem conclusion
A new user symbolic parameter DELETETSQ is introduced in the build descriptor. With the value of DELETETSQ=YES, the generated Cobol code will delete the previous TSQ used for any segmented Converse on every Converse and create a new TSQ. This may reduce storage requirement for the TSQ for the application in case there are multiple programs doing converse in the run-unit.
Temporary fix
Comments
APAR Information
APAR number
PH43809
Reported component name
RATL COBOL RT Z
Reported component ID
5655R2900
Reported release
601
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2022-02-02
Closed date
2022-06-09
Last modified date
2022-09-08
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
CSOCMQI CSOMQI ELACCU16 ELACCU17 ELASMDES ELASMFRC ELASMFRE ELASMFRX ELASMGET ELASMGTM ELASMINI ELASMLHE ELASMMAN ELASMNMH ELASMOPD ELASMPRM ELASMPSC ELASMPSM ELASMRES ELASMSAV ELASMSER ELASMTRC
Fix information
Fixed component name
RATL COBOL RT Z
Fixed component ID
5655R2900
Applicable component levels
R601 PSY UI80961
UP22/06/17 P F206
Fix is available
Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSN27B","label":"Rational COBOL Runtime for zSeries"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"6.0.1","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
08 September 2022