PI93975: ENABLE IMS MANAGED ACB SUPPORT FOR HDTA

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• This APAR enables HDTA to use the database definitions (DBD)
  from the IMS catalog instead of DBD libraries when IMS
  management of ACBs is enabled.
  

Local fix

Problem summary

• ****************************************************************
  
  * USERS AFFECTED: IBM IMS High Performance Pointer Checker for *
  
  *                 z/OS Version 3 Release 1 (FMID=HPC2310)      *
  
  *                 users who run HD Tuning Aid (HDTA).          *
  
  ****************************************************************
  
  * PROBLEM DESCRIPTION: This APAR enables HDTA to use database  *
  
  *                      definitions (DBD) from IMS directory    *
  
  *                      data sets instead of DBD libraries      *
  
  *                      when IMS managed ACBs is enabled.       *
  
  ****************************************************************
  
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  
  ****************************************************************
  
  This APAR enables HDTA to use database definitions (DBD) from
  IMS directory data sets instead of DBD libraries when IMS
  managed ACBs is enabled. In this case, the SGLXLOAD library of
  IBM IMS Tools Base for z/OS, Version 1 Release 6 or later needs
  to be specified to the STEPLIB DD statements.
  
  In addition, HDTA has been changed to show the CI or Block size
  used for DBDS allocation in the following HDTA reports when a CI
  
  or Block size for HDAM/VSAM or HALDB is not specified in a
  FABTROOT CTL data set:
  For HDAM/VSAM,
  -DBD Parameters and Overrides report
  -Assigned Roots per RAP report
  -Assigned Roots per Block report
  For partitions of HALDB,
  -Assigned Roots per RAP report
  -Assigned Roots per Block report
  Before this APAR is applied, HDTA shows a value of the CI size
  defined in the DBD definition in case of HDAM/VSAM and a value
  of 0 as a CI or block size in case of partitions of HALDB in the
  
  HDTA reports.
  
  This APAR fixes the following problems that can occur when a DB
  statement with PART statements and a DB statements with no PART
  statements are specified in the CTL DD:
  -MSGFABT3861E and ABENDU3861 are wrongly issued.
  -MSGFABT3864I is wrongly issued for a HALDB even though the DEL
  parameter is not specified on the PART statement for the HALDB.
  -Even though values are not specified for a database in the CTL
  DD, indicators ** that means values are specified in CTL DD are
  printed wrongly in the DBD parameters and overrides reports.
  
  Documentation Changes:
  Note: The Part, Chapter, and Table numbers are those of the PDF
  file.
  The documentation is modified as follows:
  ================================================================
  
  IMS High Performance Pointer Checker for z/OS, V3R1,
  User's Guide (SC19240104)
  ================================================================
  
  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  
  Part 1. Introduction and product setup
  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  
  ----------------------------------------------------------------
  
  Chapter 2. Configuring IMS HP Pointer Checker
  - Processing environment
  ----------------------------------------------------------------
  
  Software requirements
  HD Tuning Aid utility
  << The following requirement is added >>
  |If the IMS management of ACBs is enabled, IBM IMS Tools Base
  |for z/OS, Version 1 Release 6 or later must be installed.
  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  
  Part 3. HD Tuning Aid utility
  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  
  ----------------------------------------------------------------
  
  Chapter 16. Overview of HD Tuning Aid
  - Program structure
  ----------------------------------------------------------------
  
  << The following has been updated >>
  :
  - FABTRAPS produces the Assigned Roots per RAP report and the
   Assigned Roots per Block report.
  
  |If any of the following conditions are met, the FABTROOT
  |program must be run under the IMS batch region controller:
  |- The database is a HALDB.
  |- The database is a non-HALDB and a user randomizing routine
  |  requires to access IMS control blocks.
  |- The IMS management of ACBs is enabled
  Otherwise, both programs (FABTROOT and FABTRAPS) run as a
  standard batch jobs.
  :
  ----------------------------------------------------------------
  
  - Data flow
  ----------------------------------------------------------------
  
  << The following has been updated >>
  Data flow for non-HALDB
  :
  The HD Tuning Aid reads control statements from the CTL data
  set, root keys from a data set that is created by the SCAN
  process of HD Pointer Checker, and information about processing
  |databases from the DBD/PSB library of IMS or from the IMS
  |directory. :
  ----------------------------------------------------------------
  
  Chapter 17. Using HD Tuning Aid
  - Restrictions and considerations
  ----------------------------------------------------------------
  
  << The following has been added >>
  |If the IMS management of ACBs is enabled, you must run HD
  |Tuning Aid under the IMS batch region controller.
  
  ----------------------------------------------------------------
  
  - Job control language
   - FABTROOT JCL
  ----------------------------------------------------------------
  
  << The row of the IMS DD in Table 39 has been changed >>
  Table 39. FABTROOT DD statements for all runs
  DDNAME Use   Format Need
  ------ ----- ------ --------
  |IMS    Input PDS    Optional
  
  << The following row has been added to Table 40 >>
  Table 40. Additional FABTROOT DD statements for IMS runs
  DDNAME   Use   Format Need
  ------   ----- ------ --------
  |DFSHDBSC Input PDS    Optional
  
  << The following requirement for the EXEC statement has been
    added >>
  |Additional requirement when the IMS management of ACBs is
  |enabled
  | When the IMS management of ACBs is enabled, run HD Tuning Aid
  | under the IMS batch region controller and specify the DFSDF=
  | parameter for the PARM= parameter. The value must be the
  | 3-character suffix (xxx) of the DFSDFxxx member (in
  | IMS.PROCLIB data set) that enables IMS-managed ACBs.
  | For example:
  | //        EXEC PGM=DFSRRC00,
  | //             PARM='DLI,FABTROOT,psbname,,,,,,,,,,,dbrc,N,
  | //             ,,,,,,,,,,,,DFSDF=xxx'
  |
  | If you specify the library that contains the Catalog
  | Definition exit routine (DFS3CDX0) in the STEPLIB DD
  | statement, you do not need to specify the DFSDF=xxx parameter.
  
  
  << The following explanations have been updated >>
  IMS DD
  This required input data set is a library(partitioned data set)
  that contains your PSB and DBD load modules. It must contain
  all DBDs that are referenced (either directly or indirectly) by
  your PSB. If your PSB and DBDs are not in the same library, all
  appropriate libraries must be concatenated.
  |If the IMS management of ACBs is enabled, you do not need to
  |specify this DD statement.  If the HD Tuning Aid utility finds
  |this DD statement, the utility ignores the statement.
  
  STEPLIB DD
  |When the utility runs as a standard MVS batch program, this
  |statement defines the IMS HP Pointer Checker production library
  
  |(required).
  |When the utility runs as an IMS batch program, this statement
  |defines the following input data sets:
  |-IMS HP Pointer Checker production library (required)
  |-IMS RESLIB  (required)
  |-The library that contains the DFSMDA members for dynamic
  | allocation (optional)
  |-The library that contains the partition selection exit routine
  
  | if a partition selection exit is defined to your input PHDAM
  | or PHIDAM database in the RECON data sets
  |-IMS Tools Base library (SGLXLOAD) of IMS Tools Base Version 1
  | Release 6 or later if the IMS management of ACBs is enabled
  |-The library that contains the Catalog Definition exit routine
  | (optional)
  
  PROCLIB DD
  This statement defines the library that contains all
  IMS-generated cataloged procedures and jobs. This statement is
  applicable only if you are running this program as an IMS batch
  program, in which case it is optional. If it is omitted, a
  warning message may be issued by IMS. You may ignore this
  warning message.
  |If you specify the DFSDF=xxx subparameter on the EXEC PARM
  |parameter, you must specify the IMS PROCLIB data set that
  |contains the DFSDFxxx member.
  
  |DFSHDBSC DD
  |This optional input DD statement points to the IMS catalog
  |partition definition data set.  When the IMS management of
  |ACBs is enabled and an IMS catalog database is not registered
  |in the RECON data set, you must specify the IMS catalog
  |partition definition data set in which the IMS catalog database
  
  |is defined. If you omit this DD statement, the DFSHDBSC data
  |set is allocated dynamically by the DFSMDA member.
  ----------------------------------------------------------------
  
  Chapter 18. JCL examples for HD Tuning Aid
  ----------------------------------------------------------------
  
  << The following sample has been added >>
  |Example 7: Running HD Tuning Aid in an IMS-managed ACBs
  |environment
  | This example JCL shows how to run HD Tuning Aid to evaluate
  | data distribution of databases when the IMS management of ACBs
  
  | is enabled.
  | Points to be considered:
  | -The HD Tuning Aid utility must be executed under the IMS
  |  batch region controller.
  | -Specify the DFSDF=CAT parameter for the PARM= parameter on
  |  the EXEC statement. In this example, it is assumed that the
  |  DFSDFCAT member enables IMS-managed ACBs and that this member
  
  |  exists in the data set (HPS.TEST.PROCLIB) that is specified
  |  to the PROCLIB DD.
  | -The IMS Tools Base library (SGLXLOAD) of IMS Tools Base
  |  Version 1 Release 6 or later is specified on the STEPLIB DD
  |  statement.
  | -In this example, it is assumed that the KEYSIN data set
  |  (HPS.TEST.KEYSIN) has been created in an earlier HD Pointer
  |  Checker job and contains root keys for the databases to be
  |  analyzed.
  |
  |//STEP1   EXEC PGM=DFSRRC00,
  |//             PARM='DLI,FABTROOT,P33J001G,,,,,,,,,,,Y,N,
  |//             ,,,,,,,,,,,,DFSDF=CAT',
  |//             REGION=1000K,TIME=(,30)
  |//STEPLIB   DD DSN=HPS.SHPSLMD0,DISP=SHR
  |//          DD DSN=ITKBHLQ.SGLXLOAD,DISP=SHR
  |//          DD DSN=IMSVS.RESLIB,DISP=SHR
  |//SYSUDUMP  DD SYSOUT=A
  |//RAPSIN    DD DSN=&&RAPSIN,DISP=(,PASS,DELETE),
  |//             UNIT=SYSDA,SPACE=(CYL,(10,10)),
  |//             DCB=BLKSIZE=8400
  |//IMS2      DD DSN=IMSVS.RESLIB,DISP=SHR
  |//IEFRDER   DD DUMMY,DCB=BLKSIZE=1408
  |//DFSRESLB  DD DSN=IMSVS.RESLIB,DISP=SHR
  |//DFSVSAMP  DD DSN=HPS.SHPSSAMP(FABPVSAM),DISP=SHR
  |//PR8       DD SYSOUT=A,DCB=BLKSIZE=6118
  |//PR10      DD SYSOUT=A,DCB=BLKSIZE=6118
  |//KEYSIN    DD DSN=HPS.TEST.KEYSIN,DISP=OLD
  |//PROCLIB   DD DSN=HPS.TEST.PROCLIB,DISP=SHR
  |//RECON1    DD DSN=HPS.TEST.RECON1,DISP=SHR
  |//RECON2    DD DSN=HPS.TEST.RECON2,DISP=SHR
  |//RECON3    DD DSN=HPS.TEST.RECON3,DISP=SHR
  |//*------------------------------------------------------------
  
  |//STEP2   EXEC PGM=SORT,PARM='',COND=(0,LT,STEP1)
  |//SORTIN    DD DSN=*.STEP1.RAPSIN,DISP=(OLD,DELETE,DELETE),
  |//             DCB=(LRECL=42,BLKSIZE=8400,RECFM=FB)
  |//SORTOUT   DD DSN=&&KEYSOUT,DISP=(,PASS,DELETE),
  |//             UNIT=SYSDA,SPACE=(CYL,(10,10)),
  |//             DCB=(LRECL=42,BLKSIZE=8400,RECFM=FB)
  |//SORTWK01  DD UNIT=SYSDA,SPACE=(CYL,(10,10))
  |//SORTWK02  DD UNIT=SYSDA,SPACE=(CYL,(10,10))
  |//SORTWK03  DD UNIT=SYSDA,SPACE=(CYL,(10,10))
  |//SORTWK04  DD UNIT=SYSDA,SPACE=(CYL,(10,10))
  |//SORTWK05  DD UNIT=SYSDA,SPACE=(CYL,(10,10))
  |//SORTWK06  DD UNIT=SYSDA,SPACE=(CYL,(10,10))
  |//SYSOUT    DD SYSOUT=A
  |//SYSIN     DD DSN=HPS.SHPSSAMP(FABPSORT),DISP=SHR
  |//*------------------------------------------------------------
  
  |//STEP3   EXEC PGM=FABTRAPS,COND=(0,LT,STEP2)
  |//STEPLIB   DD DSN=HPS.SHPSLMD0,,DISP=SHR
  |//SYSUDUMP  DD SYSOUT=A
  |//PR9       DD SYSOUT=A,DCB=BLKSIZE=6118
  |//PR9X      DD SYSOUT=A,DCB=BLKSIZE=6118
  |//KEYSOUT   DD DSN=*.STEP2.SORTOUT,DISP=(OLD,DELETE,DELETE),
  |//             DCB=(LRECL=42,BLKSIZE=8400,RECFM=FB)
  |
  |Figure x. HD Tuning Aid JCL example: IMS-managed ACBS
  |environment
  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  
  Part 8. Troubleshooting
  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  
  ----------------------------------------------------------------
  
  Chapter 37. Messages and codes
  - HD Tuning Aid messages and codes
   - HD Tuning Aid messages
  ----------------------------------------------------------------
  
  << The following new messages have been added >>
  FABT3580E ERROR RETURNED FROM IMS TOOLS CATALOG INTERFACE (text)
  
  Explanation: HD Tuning Aid received an error return code from
  the IMS Tools Catalog Interface. text provides additional
  information: - FUNC=OPEN RC=return_code RSN=reason_code
  - FUNC=CLOSE RC=return_code RSN=reason_code
  - FUNC=GET DBD=dbdname RC=return_code RSN=reason_code
  return_code and reason_codes are the codes returned from the IMS
  
  Tools Catalog Interface.
  System action: HD Tuning Aid ends with an abend code of 3580.
  User response: See IMS Tools Catalog Interface messages
  (GEX3xxxx) to determine the cause of the error.
  If the function is OPEN, ensure that the SGLXLOAD library of IMS
  
  Tools Base Version 1 Release 6 or later is specified on the
  STEPLIB DD statements. Otherwise, contact IBM Software Support.
  
  FABT3581E DBD dbdname IS NOT FOUND IN THE IMS DIRECTORY DATA
  SETS Explanation: HD Tuning Aid could not obtain the indicated
  DBD from the IMS directory data sets.
  System action: HD Tuning Aid ends with an abend code of 3581.
  User response: Ensure that the high-level qualifier of the
  bootstrap data set indicated by message FABT3582I is correct and
  
  that the DBD identified by dbdname exists in the IMS directory
  data sets. Then correct the error and rerun the job.
  
  FABT3582I HD TUNING AID IS RUNNING IN AN IMS-MANAGED ACBS
  ENVIRONMENT. BSDS HLQ=bsds_hlq
  Explanation: HD Tuning Aid is running in an IMS managed ACBs
  environment and is referring to the database definitions in the
  IMS catalog directory data set instead of the DBD library.
  bsds_hlq is the high-level qualifier of the bootstrap data set
  (BSDS) that is used for this run.
  System action: Processing continues.
  User response: None. This message is informational.
  

Problem conclusion

• IMSMGDACBS/K
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  UI57993

Modules/Macros

• FABPHDTS FABTHDRH FABTHOUT FABTMSGS FABTROOT
  

Fix information

• Fixed component name

  IMS POINTER CHE

• Fixed component ID

  5655E0900

Applicable component levels

• R310 PSY UI57993

     UP18/08/24 P F808

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.