PQ30394: SUPPORT FOR IMS 7.1 PARTITIONED DATA BASE ACCESS TYPES

APAR status

• Closed as unreproducible in next release.

Error description

• Support for IMS 7.1 partitioned data base access types
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: DATA DICTIONARY DB/DC REL6 USERS WITH IMS7   *
  ****************************************************************
  * PROBLEM DESCRIPTION: ADD SUPPORT FOR IMS KEYWORDS PSNAME     *
  *                      DSGROUP, RKSIZE, XCI AND STAGE2         *
  ****************************************************************
  * RECOMMENDATION: INSTALL CORRECTIVE SERVICE FOR APAR/PTF      *
  ****************************************************************
  
  THIS APAR ADDS SUPPORT FOR IMS 7 INCLUDING FORMATS
  FOR IMS DC.
  
  THREE NEW DATABASE ACCESS TYPES HAVE BEEN ADDED TO THE
  DICTIONARY:
   1. PHDAM - PARTITIONED HDAM FOR IMS ACCESS TYPE PHDAM.
   2. PHIDAM - PARTITIONED HIDAM FOR IMS ACCESS TYPE PHIDAM.
   3. PINDEX - PARTITIONED SECONDARY INDEX FOR IMS ACCESS
               TYPE PSINDEX.
  
  TWO NEW SUBJECT CODES HAVE BEEN ADDED TO SUPPORT PARTITIONED
  DATABASES:
    1. 'H' FOR PARTITIONED PHYSICAL DATABASES WITH ACCESS
       PHDAM AND PHIDAM, I.E., (T,H,PHDAM01,0)
    2. 'Z' FOR PARTITIONED SECONDARY INDEX DATABASES WITH
       ACCESS PINDEX, I.E., (T,Z,PHDAMIDX,0).
  
  FIVE KEYWORDS HAVE BEEN ADDED TO THE DICTIONARY:
    1.PSNAME TO MATCH IMS KEYWORD PSNAME.
      THE KEYWORD APPEARS ON THE PHYSICAL DATABASE FORMAT.
      VALID VALUE IS AN 8 CHARACTER PARTITION NAME.
    2.PDSGROUP TO MATCH IMS KEYWORD DSGROUP.
      THE KEYWORD APPEARS ON THE PHYSICAL DATABASE STRUCTURE
      FORMAT AS FIELD PDSG.
      VALID VALUES ARE A THROUGH J.
    3.RKSIZE TO MATCH IMS KEYWORD RKSIZE.
      THE KEYWORD APPEARS ON THE SECONDARY INDEX FORMAT
      VALID VALUE 0 TO 32767
    4.STAGE2 TO MATCH IMS KEYWORD STAGE2.
      THE KEYWORD APPEARS ON DATA ENTRY DATABASE FORMAT
      VALID VALUES ARE Y(YES) AND N(NO).
    5.XCI TO MATCH IMS KEYWORD XCI.
      THE KEYWORD APPEARS ON DATA ENTRY DATABASE FORMAT
      VALID VALUES ARE Y(YES) AND N(NO).
  
  THE DBD_IN AND DBD_OUT FUNCTIONS AND REPORTS HAVE BEEN
  MODIFIED TO SUPPORT THE NEW KEYWORDS.
  

Problem conclusion

Temporary fix

Comments

• IT WILL BE NECESSARY TO PERFORM THE FOLLOWING STEPS TO COMPLETE
  INSTALLATION OF THIS PTF.
  
  1. THE PTF SHOULD BE APPLIED WITH JCLIN IN ORDER TO SELECT THE
     NEW DATA MIGRATION MODULE DBDAMTB4.
  
  2. REVIEW THE SECTION ON 'MAINTENANCE PROCEDURES' IN CHAPTER 1
     OF THE INSTALLATION GUIDE.
  
  3. RECOMPILE THE NEW AND MODIFIED FORMATS. JOB DBDAMFS
     MAY BE USED. THE NEW/MODIFIED FORMATS ARE:
     DBDXBD  DBDXDP  DBDXDS  DBDXSL  DBDXXD  DBDXXF DBDXXS
  
  4. UNLOAD THE CURRENT DATA DICTIONARY DATABASES. JOB DBDAUNLD IS
     SUPPLIED FOR THIS PURPOSE.
  
  5. USE THE UNLOAD UTILITY REPORT TO UPDATE THE DBD RANDOMIZING
     PARAMETERS, AS DISCUSSED IN CHAPTER 2 OF THE INSTALLATION
     GUIDE.
  
  6. REGENERATE DBD'S MODIFIED BY THIS SPE (DDSOURCE MEMBERS
     DBDPDBS$ AND DBDPSEG$) OR FOR CHANGES TO THE
     RANDOMIZING PARAMETERS. JOB DBDADBD MAY BE USED.
  
  7. REGENERATE THE ACB'S. JOB DBDAACB MAY BE USED.
  
  8. ALLOCATE AND LOAD THE NEW DATABASES. JOB DBDARELD MAY BE USED
     TO LOAD THE NEW DATABASES AFTER THE FOLLOWING CHANGES:
       A. DELETE STEP DBSPREL.
       B. CHANGE THE DFSUINPT OF THE NEXT STEP, DBSREL, TO
          SPECIFY THE DATASET THAT WAS THE SYSUT1 INPUT TO STEP
          DBSPREL. (DBD60.DBSUNL IN THE SUPPLIED JCL.)
  
  9. LINKEDIT THE TEMPORARY MIGRATION MODULE DBDAMIG4. THE
     FOLLOWING STATEMENTS MAY BE USED. THE DATASET NAMES
     SHOULD BE CHANGED TO FIT YOUR INSTALLATION.
  
     LINK   EXEC  PGM=IEWL,PARM='XREF,NCAL,LET,LIST',SIZE=(,9000)'
     SYSLMOD  DD DSN=DBD60.IMSVS.DDPGMLIB,DISP=OLD
     DDLOAD   DD DSN=DBD60.DBD60.DDOBJLIB,DISP=SHR
              DD DSN=DBD60.DDLOAD,DISP=SHR
     SYSPRINT DD SYSOUT=
     SYSUTI   DD UNIT=SYSDA,
                 DISP=(NEW,DELETE),
                 SPACE=(CYL,(5,5))
     SYSLIN   DD
     INCLUDE DDLOAD(DBDAMTB4)
     INCLUDE SYSLMOD(DBDAMIGR)
     ENTRY DBDAMIGR
     NAME=DBDAMIG4(R)
  
  10. UPDATE THE EXTENSIBILITY DATABASE. USE JOB DBDAEXLD AFTER
      CHANGING STEP MIGRATE TO SPECIFY DBDAMIG4, IN PLACE OF
      DBDAMIGR, IN THE DL/I PARAMETER LIST.
  
  11. HOUSEKEEPING. USE JOB DBDACLN TO DELETE THE DATABASE UTILITY
      FILES CREATED BY THE PREVIOUS JOB.
  

APAR Information

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

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

  UQ47471 UQ47472

Modules/Macros

• DBDALOAD DBDAMTBL DBDAMTB4 DBDBDATA DBDBDBS0
  DBDBMGR  DBDBNMED DBDBROOT DBDBSEGS DBDBUPDT DBDB0000 DBDDBDM
  DBDDBDP  DBDDDPM  DBDDDPP  DBDDDSM  DBDDDSP  DBDDHDP  DBDDHDSP
  DBDDXDM  DBDDXDP  DBDEDBD  DBDEDBD0 DBDELCHL DBDEMGR  DBDESEGM
  DBDE0000 DBDGCKQ  DBDGRBDP DBDGRDPP DBDGRDSP DBDGRXDP DBDISRRA
  DBDLCMDT DBDLDBST DBDLSEGT DBDPDBS  DBDPDBS$ DBDPSEG  DBDPSEG$
  DBDRDBSY DBDRDBSZ DBDRDBS0 DBDRDEDB DBDRFDP  DBDRGLOS DBDRGLSI
  DBDRGLSO DBDRSEGL DBDRSEGX DBDRSEG0 DBDUDBST DBDURBST DBDXBD
  DBDXDP   DBDXDS   DBDXSL   DBDXXD   DBDXXF   DBDXXS   DBSDSECT
  DBSPATRB DBSRSEG  DBSSEG   DDIDBD   HDD1602J SEGLCHIL
  

Fix information

• Fixed component name

  OS/VS DATA DICT

• Fixed component ID

  5740XXF00

Applicable component levels

• R602 PSY UQ47471

     UP00/10/03 P F010

• R663 PSY UQ47472

     UP00/10/03 P F010