IBM Support

PQ67124: CORRECT ISPF PANEL SKELETON FOR ASSEMBLY OF DBD'S

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • JCL skeleton for DBD assemblies uses old assembler (IEV90).
    Correct tutorial panels where appropriate.  Correct parms passed
    to skeletons from the panels.
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: All users of IMS HSDCE V2R2M0 who use the    *
    *                 ISPF Dialog Manager clists, panels,          *
    *                 skeletons, and tutorials to create           *
    *                 database compression routines.               *
    ****************************************************************
    * PROBLEM DESCRIPTION: The JCL jobstream built by the BUILD    *
    *                      process uses the old Assembler (IEV90)  *
    *                      in the DBDGEN job step for the DBD      *
    *                      associated with the new or revised      *
    *                      compression routine.                    *
    *                                                              *
    *                      Tutorial panels for the JCL examples    *
    *                      need to be updated to reflect the       *
    *                      this assembler update.                  *
    *                                                              *
    *                      change the panels for dbd source        *
    *                      information.                            *
    ****************************************************************
    * RECOMMENDATION: INSTALL CORRECTIVE SERVICE FOR APAR/PTF      *
    ****************************************************************
    ***************************************************************
    HDCE ISPF DIALOG PANELS, SKELETONS, TUTORIAL PANELS, AND CLISTS
    REQUIRE UPDATES TO BRING THEM CURRENT. THE DBDGEN PANEL AND
    SKELETONS FOR JCL JOBSTREAM GENERATION NEED TO BE UPDATED FROM
    USING THE ASSEMBLER PGM (IEV90) AND ITS PARMS TO THE HIGH LEVEL
    ASSEMBLER (ASMA90) AND ITS PARMS. THE LINKAGE EDITOR STEP WHICH
    FOLLOWS NEEDS TO BE CHANGED TO ACCEPT THE NEW OUTPUT FROM THE
    HI-LEVEL ASSEMBLER. THE INPUT PANELS FOR THE ASSEMBLER PROCESS
    NEED TO BE MORE USER FRIENDLY. THE ISPF IVP PARMS NEED TO BE
    UPDATED TO PASS THE HDCE DRIVER MODULE NAME TO THE BUILD
    PROCESS SKELETONS CORRECTLY. THE TUTORIAL PANELS NEED TO BE
    UPDATED TO SHOW THE USE OF THE HI-LEVEL ASSEMBLER AND ITS PARMS.
    IMS RELEASE LEVEL REFERENCES ON THE TUTORIAL PANELS NEED TO BE
    UPDATED TO MATCH THE USER GUIDE DOCUMENT.
    

Problem conclusion

  • HSDCE ISPF dialog panels, skeletons, tutorial panels, and
    clists have been updated so that they are now current. The
    DBDGEN skeleton has been updated to use the Assembler pgm
    ASMA90 and its parms. The panels for the assembler process have
    been changed so that data set and member names are now on
    separate input lines. ISPF IVP parms have been updated to pass
    the appropriate HSDCE driver module name to the build process
    skeletons. The tutorial panels have been changed to show the
    use of the Hi-Level Aassembler ASMA90 and it's parms.
    IMS release level references shown on the tutorial panels have
    been updated to match the Users Guide.
    The examples of the COMPRTN keyword of the SEGM statement will
    be corrected in the Users Guide to show the correct syntax.
    
    A new data entry field with keword 'Database Identifier' has
    been added to the Examine panel so that the Examine function
    can be run independently of the Detail Analyze function.
    
    A sample JCL jobstream has been added to the product for
    customers who need to put the HSDCE product in a common tools
    loadlib which is APF authorized. This new jobstream will
    re-linkedit load modules HCOZLDE0, HCOZLDH0, and HCOZLDU0 to
    remove the attributes of reentrant, refreshable, and reusable
    (RN,RF,RU), because these modules get ABENDS0C4 errors when
    executed from an APF authorized library. The name of this sample
    JCL jobstream is HCORLNK.
    
    ****************************************************************
    Users Guide documentation updates follow:
    
    On page 11, Chapter 2. Customization, after bullet one
    ('updating and executing the generic dictionary installation
    job') add the following bullet:
    'JCL jobstream to re-linkedit HSDCE load modules into an APF
    authorized IMS tools common library'.
    
    On page 12, after figure 3. HCOGEND member (part 2 of 2)
    include the following statements.
    
    The JCL jobstream to re-linkedit the HSDCE load modules:
    HCOZLDE0, HCOZLDH0, and HCOZLDU0 to make them compliant with
    residence in an APF authorized library is shown below.
    
    ---------------------------------------------------------------
    //*************************************************************/
    //*HCORLNK   JOB (ACCT#),PGMRNAME,                            */
    //*              MSGCLASS=H,CLASS=A,MSGLEVEL=(1,1)            */
    //*************************************************************/
    //*                                                           */
    //* DESCRIPTIVE NAME = SAMPLE JCL JOBSTREAM FOR RELINKING LOAD*/
    //*                    MODULES: HCOZLDE0,HCOZLDH0,AND HCOZLDU0*/
    //*                    TO REMOVE THE LOAD MODULE ATTRIBUTES OF*/
    //*                    REENTRANT, REFRESHABLE, REUSABLE (RN,  */
    //*                    RF,RU) TO ELIMINATE ABEND0C4 FAILURES  */
    //*                    WHICH OCCUR WHEN THESE THREE MODULES   */
    //*                    NEED TO RESIDE IN APF PROGRAM LIBRARIES*/
    //*                                                           */
    //*             IBM IMS HD COMPRESSION - EXTENDED FOR Z/OS    */
    //*                                                           */
    //* FUNCTION = DEFINE YOUR TARGET LIBRARY STRUCTURE           */
    //*                                                           */
    //*          LICENSED MATERIALS - PROPERTY OF IBM             */
    //*          5655-E02 (C) COPYRIGHT IBM CORP. 1996,2000       */
    //*          ALL RIGHTS RESERVED.                             */
    //*          US GOVERNMENT USERS RESTRICTED RIGHTS - USE,     */
    //*          DUPLICATION OR DISCLOSURE RESTRICTED             */
    //*          BY GSA ADP SCHEDULE CONTRACT WITH IBM CORP.      */
    //*                                                           */
    //*************************************************************/
    //*
    //LINK01  EXEC PGM=IEWL,
    //    PARM=('SIZE=(880K,64K)',MAP,LET,LIST,NCAL)
    //SYSPRINT DD SYSOUT=*
    //SYSLMOD  DD DSN=HCOHLQ.SHCOLMOD,DISP=SHR
    //INPTLMOD DD DSN=HCOHLQ.SHCOLMOD,DISP=SHR
    //SYSUT1   DD UNIT=SYSDA,DISP=(,DELETE),SPACE=(CYL,(10,1),RLSE)
    //SYSLIN   DD *
       INCLUDE INPTLMOD(HCOZLDE0)
         ENTRY HCOZLDE0
           NAME HCOZLDE0(R)
       INCLUDE INPTLMOD(HCOZLDH0)
         ENTRY HCOZLDH0
           NAME  HCOZLDH0(R)
       INCLUDE INPTLMOD(HCOZLDU0)
         ENTRY HCOZLDU0
           NAME  HCOZLDU0(R)
    /*
    //
    //**************************************************************
    ----------------------------------------------------------------
    FIGURE X. HCORLNK
    
    On page 48, in section edit dbd panel, figure 24. edit dbd panel
    
     ------- IBM IMS HD Compression -------- Function = BUILD  ----
    
    
     COMMAND ===>
    
       DBD MACRO LIBRARY DATASET NAME
         ==>
       DBD SOURCE LIBRARY
         ==>
       DBD SOURCE LIBRARY MEMBER NAME
         ==>
       NEW DBD LOAD LIBRARY
         ==>
       NEW DBD LOAD LIBRARY MEMBER NAME
         ==>
    
     Press END to exit.
    
    On page 51 of user guide, figure 26. link-edit and DBDGEN JCL,
    change the following lines in the assemble DBD step:
    to read as follows:
    
     //STEP1    EXEC PGM=ASMA90,REGION=0M,
     //            PARM='OBJECT,NODECK,NOUSING'
    
    Change the following lines in the link DBD step to read as
    follows:
    
     //STEP2 EXEC PGM=IEWL,PARM='XREF,LIST',
     //           COND=(0,LT,STEP1),REGION=0M
    
    On page 53 change the COMPRTN parameter text as follows
    
    'COMPRTN = (EXITNAME,DATA,INIT)'
    'COMPRTN = (EXITNAME,KEY,INIT)'
    'COMPRTN = (EXITNAME,DATA,INIT,MAX,PAD)'
    'COMPRTN = (EXITNAME,KEY,INIT,MAX,PAD)'
    
    should now be:
    
    'COMPRTN=(EXITNAME,DATA,INIT)'
    'COMPRTN=(EXITNAME,KEY,INIT)'
    'COMPRTN=(EXITNAME,DATA,INIT,MAX,PAD)'
    'COMPRTN=(EXITNAME,KEY,INIT,MAX,PAD)' respectively.
    
    On page 59 of the Users Guide, figure 29. replace the examine
    panel figure with the following new version.
    
    ---- IBM IMS HD Compression ----- (Function = EXAMINE   ) ------
    
    COMMAND ===>
    
        DICTIONARY NAME        ==>
    
        INPUT SOURCE           ==>   1  = Image Copy File
                                     2  = HD Unload File
                                     3  = Other - enter INPUT DSNAME
    
        INPUT DSNAME           ==>
    
        USER DSN HLQ           ==>
    
        START BYTE             ==>
    
        DATABASE IDENTIFIER    ==>
    
    Press END to exit.
    
    On page 59, the following text description bullet needs to
    be changed 'INPUT SOURCE'.
    Replace the word 'extract' with the word 'file'.
    
    Add to the bottom of page 59, the following text description:
    
      DATABASE IDENTIFIER
        A name to identify the database whose segments are being
        examined. You have to use a valid DBD name.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PQ67124

  • Reported component name

    IMS HDCE

  • Reported component ID

    5655E0200

  • Reported release

    220

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2002-10-10

  • Closed date

    2002-11-04

  • Last modified date

    2002-12-04

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

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

    UQ71474

Modules/Macros

  •    HCOCIVP  HCOC10   HCOP10A  HCOP16   HCOP22
    HCORLNK  HCOS11   HCOS12   HCOS13   HCOS23   HCOT3221 HCOT3224
    HCOT5433 HCOT5434
    

Publications Referenced
SC27100502    

Fix information

  • Fixed component name

    IMS HDCE

  • Fixed component ID

    5655E0200

Applicable component levels

  • R220 PSY UQ71474

       UP02/11/06 P F211

[{"Line of Business":{"code":null,"label":null},"Business Unit":{"code":"BU048","label":"IBM Software"},"Product":{"code":"SSCX89B","label":"IMS HD Compression Extended"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"2.2.0"}]

Document Information

Modified date:
20 October 2020