A fix is available
APAR status
Closed as program error.
Error description
An ABENDS0C4 can occur in module DFSORP50 because the DFSOCMD address is invalid. The release of the INIT OLR command AWE by DFSCST00 was handled incorrectly. After the INIT OLR command processes, DFSCST00 releases the INIT OLR AWE using the EPLOC (entry point location) instead of the EPAD (entry point address). The FREE= parameter on the DFSSQPP macro call in DFSORC00 to queue the AWE to DFSCST00 specified (IMODULE,=CL8'DFSORC00',241), but should have specified (IMODULE_EPAD,(Rxx),241), where Rxx is the register containing the length of the AWE storage to be released. EPLOC=CL8'DFSORC00' was used on the IMODULE GETMAIN when the AWE storage was gotten in DFSORC00, but if multiple INIT OLR commands are processed in parallel, using the EPLOC in the FREE= parameter on the DFSSQPP macro call to queue the AWE to DFSCST00 can free the wrong AWE when an INIT OLR command completes, eventualy causing an ABEND0C4 if an AWE storage is released too soon and reused before the INIT OLR command associated with that AWE completes.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All IMS V11 HALDB users running multiple * * OLRs in parallel initiated using type-2 * * INIT OLR command in an OM environment with * * apar PM57826 / ptf UK76815 applied. * **************************************************************** * PROBLEM DESCRIPTION: When running multiple OLRs in parallel * * initiated using type-2 INIT OLR command * * in an OM environment, an ABEND0C4 can * * occur in module DFSORP50 because the * * OCMD ( DFSOCMD ) address in R7 is * * invalid. * **************************************************************** * RECOMMENDATION: INSTALL CORRECTIVE SERVICE FOR APAR/PTF * **************************************************************** An ABENDS0C4 can occur in module DFSORP50 because the DFSOCMD address is invalid. The release of the INIT OLR command AWE by DFSCST00 was handled incorrectly. After the INIT OLR command processes, DFSCST00 releases the INIT OLR AWE using the EPLOC (entry point location) instead of the EPAD (entry point address). The FREE= parameter on the DFSSQPP macro call in DFSORC00 to queue the AWE to DFSCST00 specified (IMODULE,=CL8'DFSORC00',241), but should have specified (IMODULE_EPAD,(Rxx),241), where Rxx is the register containing the length of the AWE storage to be released. EPLOC=CL8'DFSORC00' was used on the IMODULE GETMAIN when the AWE storage was gotten in DFSORC00, but if multiple INIT OLR commands are processed in parallel, using the EPLOC in the FREE= parameter on the DFSSQPP macro call to queue the AWE to DFSCST00 can free the wrong AWE when an INIT OLR command completes, eventualy causing an ABEND0C4 if an AWE storage is released too soon and reused before the INIT OLR command associated with that AWE completes. Additional Symptoms: ABENDS602. DFSISERW hang in DFSOCMD0 called from DFSORP50.
Problem conclusion
GEN: KEYWORDS: *** END IMS KEYWORDS *** The following modules have been modified to correct the reported problem: ************ * DFSORC00 * ************ Code has been modified to use FREE=(IMODULE_EPAD,(R14),241) on the DFSSQPP macro call when the AWE is queued to DFSCST00. When the AWE release is done by DFSCST00, it will be released based on the entry point address (EPAD) instead of the entry point location (EPLOC). ************ * DFSORP50 * ************ Code has been modified to use DFSKFUNC FUNC=CHKDLAD to determine if an ISWITCH to the CTL region is needed.
Temporary fix
********* * HIPER * *********
Comments
APAR Information
APAR number
PM71481
Reported component name
IMS V11
Reported component ID
5635A0200
Reported release
100
Status
CLOSED PER
PE
YesPE
HIPER
YesHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2012-08-23
Closed date
2013-02-05
Last modified date
2013-03-04
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
DFSORC00 DFSORP50
Fix information
Fixed component name
IMS V11
Fixed component ID
5635A0200
Applicable component levels
R100 PSY UK91408
UP13/02/14 P F302 «
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":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"100","Edition":"","Line of Business":{"code":"","label":""}},{"Business Unit":{"code":"BU048","label":"IBM Software"},"Product":{"code":"SSCVRBJ","label":"System Services"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"100","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
04 March 2013