PQ80964: BATCH COLLECT JCL NOT SAVED

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• On panel IDLGNJCQ you are given the option to save the batch
  collect JCL to a Dataset. When this option is chosen, the
  resulting Dataset contains random data.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: ALL USERS OF DATABASE CONTROL SUITE R310     *
  ****************************************************************
  * PROBLEM DESCRIPTION: VARIOUS PROBLEMS FOUND IN THE COLLECT   *
  *                      FUNCTION, THE LINK TO DBS REPAIR AND    *
  *                      THE JCL GENERATED FOR DBS RECOVERY      *
  *                      FACILITY.                               *
  ****************************************************************
  * RECOMMENDATION: INSTALL CORRECTIVE SERVICE FOR APAR/PTF      *
  ****************************************************************
  1. THE BATCH COLLECT JCL GENERATION STEP ISSUES THE FOLLOWING
     MESSAGE - IDLR287: IDLRISPF - CC = 4; QBASELIB ISPTABL;
     4 - THE SPECIFIED DDNAME IS NOT DEFINED.
  2. PANEL IDLGNJCQ GIVES THE USER THE OPTION TO SAVE GENERATED
     JCL TO A USER SPECIFIED DATASET. THIS DOESN'T WORK IF THE
     USER HAS SELECTED TO RUN THE BATCH COLLECT FUNCTION. RANDOM
     DATA IS SAVED IN THE SPECIFIED DATA SET INSTEAD OF THE JCL.
  3. CHANGE.DBDS GENMAX AND RECOVPD COMMANDS FAIL FOR AN
     ACTIVE DATABASE. USER RECEIVES MESSAGE  -
     DSP0045I  DATA BASE STILL AUTHORIZED BY A SUBSYSTEM
     DSP0209I  PROCESSING TERMINATED WITH CONDITION CODE = 12.
  4. THIS PROBLEM OCCURS IF THE USER ELECTS TO LINK TO THE
     DATABASE REPAIR FACILITY FROM CONTROL SUITE.
     WHEN CONTROL IS RETURNED TO CONTROL SUITE, THE DATABASE
     REPAIR FACILITY PRODUCT NAME, RELEASE AND APAR LEVEL ARE
     DISPLAYED AT THE TOP OF THE CONTROL SUITE PANEL.
  5. THE COLLECT FUNCTION REQUIRES THAT DATABASE DATA SET NAMES
     BE INCLUDED IN EITHER THE DYNLIB OR RECON. IF NOT, AN ERROR
     MESSAGE IS ISSUED. IN THIS PROBLEM, THE MESSAGE WAS NOT
     ISSUED FOR A FAST PATH DATA BASE WITH NO DATASETS IN EITHER
     THE RECON OR DYNLIB, EVEN THOUGH THE DATA BASE WAS REGISTERED
     IN THE RECON. FURTHER PROCESSING FAILS WITHOUT THE DATA SET
     INFORMATION.
  6. THE JCL GENERATED FOR THE DATABASE RECOVERY FACILITY INCLUDES
     THE WRONG DDNAME, IMS, FOR DBDLIBS. IT SHOULD BE DBDLIB.
  

Problem conclusion

• 1. CONTROL SUITE ASSUMED THAT ISPTABL WAS ALWAYS ALLOCATED
  DURING THE ISPF LOGON. ISPTABL, HOWEVER, IS AN OPTIONAL FILE.
  THE PRE-ALLOCATION CHECK FOR ISPTABL HAS BEEN REMOVED FROM THE
  BATCH JCL GENERATION PROCESS.
  2. THE BATCH SAVE JCL PROCESS USED THE WRONG DATA SET NAME AS
  THE COPY FROM FILE. THE DATA SET NAME HAS BEEN CORRECTED.
  3. THE COLLECT PROCESS HAS BEEN MODIFIED TO BYPASS ALL CHANGE
  COMMANDS FOR ACTIVE DATA BASES.
  4. THE DATABASE REPAIR FACILITY USES SOME OF THE SAME VARIABLES
  AS CONTROL SUITE, I.E IDLIUD AND IDLNAME. IDLNAME CONTAINS THE
  PRODUCT NAME, RELEASE AND APAR LEVEL FOR BOTH PRODUCTS. THE
  CONTROL SUITE VALUES WILL NOW BE SAVED AND RESTORED BEFORE AND
  AFTER LINKING TO DB REPAIR.
  5. THE COLLECT PROCESS HAS BEEN MODIFIED TO ISSUE AN ERROR IF
  A FAST PATH DATABASE IN THE RECON HAS NO AREA DATA SETS DEFINED
  IN EITHER THE RECON OR DYNLIB.
  6. THE JCL GENERATED FOR DATABASE RECOVERY FACILITY HAS BEEN
     CORRECTED TO USE THE DDNAME, DBDLIB.
  

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:

  UQ82676

Modules/Macros

• IDLC0001 IDLC50   IDLIJOB3 IDLM04   IDLRINIT
  IDLRREX2 IDLRUTIL IDLSMAIN IDLSMAI2
  

Fix information

• Fixed component name

  IMS DB CNTL SUI

• Fixed component ID

  5655F7600

Applicable component levels

• R310 PSY UQ83082

     UP03/12/17 P F312

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.