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 * * ZVSE. * **************************************************************** * PROBLEM 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. * **************************************************************** * RECOMMENDATION: Apply the APAR PH48778 * **************************************************************** 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
PH48778
Reported component name
RATL COBOL RUNT
Reported component ID
5648F6600
Reported release
750
Status
CLOSED PER
PE
YesPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2022-08-18
Closed date
2022-08-26
Last modified date
2022-10-12
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI82121
Modules/Macros
ELASMDES ELASMFRC ELASMFRE ELASMFRX ELASMGET ELASMGTM ELASMINI ELASMLHE ELASMMAN ELASMNMH ELASMOPD ELASMPRM ELASMPSC ELASMPSM ELASMRES ELASMSAV ELASMSER ELASMTRC EZESSM
Fix information
Fixed component name
RATL COBOL RUNT
Fixed component ID
5648F6600
Applicable component levels
R750 PSY UI82121
UP22/10/12 I 1000 {
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":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG32M"},"Platform":[{"code":"PF054","label":"z Systems"}],"Version":"750"}]
Document Information
Modified date:
12 October 2022