A fix is available
APAR status
Closed as program error.
Error description
When shutting down the QCF server with "P QCFSERVER" or "F QCFSERVER,SHUTDOWN", the address space ends with RC=3919 or RC=4095. This only occurs when the z/OS DIAG TRAP IGVINITGETMAIN is enabled.
Local fix
Turn off the z/OS DIAG IGVINITGETMAIN trap until this APAR is in place.
Problem summary
**************************************************************** * USERS AFFECTED: All IBM IMS Queue Control Facility for z/OS * * Version 3 Release 2 (FMID=H0GN320) users. * **************************************************************** * PROBLEM DESCRIPTION: This APAR fixes several issues: * * 1. When shutting down the QCF server * * with "P QCFSERVER" or * * "F QCFSERVER,SHUTDOWN", the address * * space ends with RC=3919 or RC=4095. * * This only occurs when the z/OS DIAG * * TRAP IGVINITGETMAIN is enabled. * * 2. ABENDS978 in IQCABAT0 when the z/OS * * DIAG TRAP IGVINITGETMAIN is enabled. * * 3. IQCSPLIT shows incorrect count in * * SYSPRINT report when the z/OS DIAG TRAP * * IGVINITGETMAIN is enabled. * * 4. The QCF batch shows an unexpected * * debug message of IQCBMST0 in joblog * * when the z/OS DIAG TRAP IGVINITFREEMAIN * * is enabled. * * 5. ABEND0C4 in IQCSELCT when the LOGIN * * DD is not specified in JCL and the * * LOGIN DD could not be dynamically * * allocated. * **************************************************************** * RECOMMENDATION: Apply the maintenance for this APAR. * **************************************************************** The explanations for each issue are as follows: 1. The storage where the field is placed for the return code is not initialized. As a result, the unexpected value becomes the return code. 2. The storage that stores the address of an unused control block is not initialized. As a result, it tries to release the control block even if it has not been obtained. 3. The storage where the field are placed for the record counter is not initialized. As a result, unexpected value is shown in report. 4. The storage for debug control information is released before putting the last debug message. As a result, it determines whether or not to show debug message based on the destroyed debug control information. 5. The open status of LOGIN DD is not checked. As a result, the GET macro is issued even though the LOGIN DD is not opened.
Problem conclusion
The QCF has been changed modified as follows for each issue: 1. Initialize the field for the return code. 2. Remove logics that refer to unused control blocks. 3. Initialize the field for the record counter. 4. Hold debug control information until the end of the debug process. 5. If LOGIN DD cannot be opened, consider it empty and continue processing.
Temporary fix
Comments
APAR Information
APAR number
PH51885
Reported component name
IMS QUEUE CNTL
Reported component ID
5697E9900
Reported release
320
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2023-01-12
Closed date
2023-03-09
Last modified date
2023-04-03
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI90899
Modules/Macros
IQCABAT0 IQCAEG01 IQCASELO IQCBMST0 IQCSELCT IQCSPLIT IQCZIN10
Fix information
Fixed component name
IMS QUEUE CNTL
Fixed component ID
5697E9900
Applicable component levels
R320 PSY UI90899
UP23/03/11 P F303
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":"BU048","label":"IBM Software"},"Product":{"code":"SSCX8A6","label":"IMS Tools"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"320"}]
Document Information
Modified date:
03 April 2023