A fix is available
APAR status
Closed as program error.
Error description
Attempt to schedule FP Utility against a database which does exist ( DDIR exists ) but has no DBD in ACBLIB, causesFP system PSB DBF#FPU0 to fail schedule with DFS993I and become NOT-INIT. The error was added with PM90798. A DFSCBTS scan is done to locate DDIR, which succeeds since DDIR exists. DDIRADDR is zero, however, since there is no DBD in ACBLIB and hence no DMCB. Zero is used as DMCB pointer and the number of levels in DB ( DMCBHSLV ) is loaded from low cord ( x'0000003C') which happens to be a very large halfword value ( x'7FFF') and then used to calculate space required. Probably, if DDIRADDR is zero, we should take the same path as if DDIR isn't found - label FPUT100.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: IMSFP V13 DEDB users. * **************************************************************** * PROBLEM DESCRIPTION: DBF#FPU0 PSB SET TO NOTINIT STATUS * * AFTER DFS993I CSA PSB POOL TOO SMALL, * * WHEN DDIR EXISTS BUT NO DBD IN ACBLIB * * FOR TARGET DB. * **************************************************************** * RECOMMENDATION: INSTALL CORRECTIVE SERVICE FOR APAR/PTF * **************************************************************** Attempt to schedule FP Utility against a database which does exist ( DDIR exists ) but has no DBD in ACBLIB, causes FP system PSB DBF#FPU0 to fail schedule with DFS993I and become NOT-INIT. A DFSCBTS scan is done to locate DDIR, which succeeds since DDIR exists. DDIRADDR is zero, however, since there is no DBD in ACBLIB and hence no DMCB. Zero is used as DMCB pointer and the number of levels in DB ( DMCBHSLV ) is loaded from low cord ( x'0000003C') which happens to be a very large half word value ( x'7FFF') and then used to calculate space required.
Problem conclusion
GEN: KEYWORDS: *** END IMS KEYWORDS *** The following change has been made to correct the reported problem: DFSDLMP0: Check if DDIRADDR ( DMCB ) is zero, treat as if DDIR is not found case.
Temporary fix
********* * HIPER * *********
Comments
APAR Information
APAR number
PI08787
Reported component name
IMS V13
Reported component ID
5635A0400
Reported release
300
Status
CLOSED PER
PE
NoPE
HIPER
YesHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2013-12-30
Closed date
2014-05-02
Last modified date
2014-06-03
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI17655
Modules/Macros
DFSDLMP0
Fix information
Fixed component name
IMS V13
Fixed component ID
5635A0400
Applicable component levels
R300 PSY UI17655
UP14/05/07 P F405 ¢
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"}],"Version":"300","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
14 December 2020