A fix is available
APAR status
Closed as program error.
Error description
AbendU0845 "Not and IMS RPL" using BTS in DBBBATCH mode. Under DBBBATCH mode, BTS uses the UNLD call between each BTS call, to do cleanup of locks and blocks. Under V12 there are changes made for assignment of DMB numbers in a new module called DFSLDMB0. Due to these changes, existing code in DFSBIND0 no longer works as expected during the UNLD call to remove DMBs. This causes an attempt to close a DMB twice, which causes VSAM to uses it's own RPL and PLH combo to attempt this. IMS in DFSDVSM0 catches this attempt, and fails it with U0845. Add search keywords E4084533 x'E4084533'
Local fix
Contact BTS for temporary bypass.
Problem summary
**************************************************************** * USERS AFFECTED: All IMS V12 users of Batch Terminal * * Simulator ( BTS ) in a DBB batch region. * **************************************************************** * PROBLEM DESCRIPTION: ABENDU0845 occurs in module DFSDVSM0 * * when BTS issues an unload ( UNLD ) call * * in a DBBBATCH region. * **************************************************************** * RECOMMENDATION: INSTALL CORRECTIVE SERVICE FOR APAR/PTF * **************************************************************** ABENDU0845 occurs in module DFSDVSM0 when BTS issues an UNLD call in a DBB batch region. BTS uses the UNLD call at the end of each transaction. During an UNLD call VSAM attempts to close the database twice due to incorrect DMB numbers assigned in module DFSLDMB0. Incorrect DMB numbers are assigned when module DFSBIND0 is called repeatedly with each BTS transaction. With each call to module DFSBIND0 the DMB table ( SCDLDMBT ) is reused causing DMB numbers to be assigned to DMBs that do not correspond to the DMB table. When the DMB table is reused in the next BTS transaction bit positions, which represent DMBs in use, are enabled from the prior BTS transaction. When this occurs DMB numbers are assigned to DMBs that do not correspond to the DMB bit table and therefore cause a U0845 during database close.
Problem conclusion
GEN: KEYWORDS: *** END IMS KEYWORDS *** ************ * DFSBIND0 * ************ Code is added in module DFSBIND0 after label IND2000 to initialize the DMB table by issuing an INIT function call to module DFSLDMB0. *********** * DFSLDMB * *********** Code is added to macro DFSLDMB to add function INIT. ************ * DFSLDMB0 * ************ Code is added to module DFSLDMB0 to add function INIT. This function will initialize an existing DMB table. The initialization will include clearing the DMB table to zero and clearing words SCDDMBHI and SCDDMBLA.
Temporary fix
********* * HIPER * *********
Comments
APAR Information
APAR number
PI08656
Reported component name
IMS V12
Reported component ID
5635A0300
Reported release
200
Status
CLOSED PER
PE
NoPE
HIPER
YesHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2013-12-23
Closed date
2014-02-27
Last modified date
2015-04-14
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PI11333 UI15539
Modules/Macros
DFSBIND0 DFSLDMB DFSLDMB0
Fix information
Fixed component name
IMS V12
Fixed component ID
5635A0300
Applicable component levels
R200 PSY UI15539
UP14/03/04 P F403 ¢
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"},"Platform":[{"code":"PF054","label":"z Systems"}],"Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
14 December 2020