A fix is available
APAR status
Closed as program error.
Error description
We forced I/O error on Directory data set at rename to Alternate name#2 just after writing type7012 log record. But type7013 log record did not have failure flag - OLCDFAIL flag.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: * * IMS V15 IMPORT DEFN SOURCE(CATALOG) users * **************************************************************** * PROBLEM DESCRIPTION: * * During IMPORT DEFN SOURCE(CATALOG) processing, an I/O error * * occurred on the catalog directory after IMSLOG7012. * * However, IMPORT processing did not set OLCDFAIL ( x'80' ) of * * OLCDFLAG in IMSLOG7013. This in turn caused IMSLOG7004 and * * IMSLOG7005 before IMSLOG7010 ABORT record is logged. * * Instead of OLCDFAIL in IMSLOG7013 being set to indicate an * * error occurred, OLC5FAIL ( x'80' ) of OLC5FLAG in * * IMSLOG7005 is set to indicate commit failed error. * **************************************************************** * RECOMMENDATION: * * INSTALL CORRECTIVE SERVICE FOR APAR/PTF * ****************************************************************
Problem conclusion
Modules DFSOLC10, DFSOLC50 and DFSMOLS0 are modified to correct the reported problem. When IMPORT DEFN SOURCE(CATALOG) processing detects I/O error after IMSLOG7012, it will set IMSLOG7013 OLCDFAIL to indicate commit failed error and abort IMPORT processing with IMSLOG7010. The log record sequence is "7002, 7003, 7012, 7013, 7010" instead of "7002, 7003, 7012, 7013, 7004, 7005, 7010". - DFSOLC10 DFSOLC10 is modified to restore DFSMOLC macro return code handling changed by PH18953. PH18953 changed DFSMOLC macro to use R15 as return code. R15 may not contain DFSMOLS0 return code because DFSMOLS0 sets DFSMOLC service return code in MOLPRC. DFSMOLC caller needs to extract return code from MOLPRC instead of R15. - DFSOLC50 Upon return from DFSMOLS0 MOLPALTNM function, DFSOLC50 is modified to set I/O error ( OLCDFIOE ) or dataset full error ( OLCDFSPC ) in addition to OLCDFAIL in OLCDFLAG of IMSLOG7013. - DFSMOLS0 DFSMOLS0 is modified to set the error return code in MOLPRC and MWACC for function MOLPALTNM. - DFSMOL10 DFSMOL10 is modified to correct a base error in processing IMSLOG7013. ----------- IMSMGDACBS/K
Temporary fix
Comments
APAR Information
APAR number
PH54375
Reported component name
IMS V15
Reported component ID
5635A0600
Reported release
500
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2023-05-08
Closed date
2025-09-04
Last modified date
2025-10-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UO04771
Modules/Macros
DFSOLC50 DFSOLC10 DFSMOLS0 DFSMOL10
Fix information
Fixed component name
IMS V15
Fixed component ID
5635A0600
Applicable component levels
R500 PSY UO04771
UP25/09/06 P F509
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":"SSEPH2","label":"IMS"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"15","Line of Business":{"code":"LOB70","label":"Z TPS"}}]
Document Information
Modified date:
02 October 2025