DCT (destination control table)

DSQ1CDCS and DSQ1CDCT in QMF720.SDSQSAPE describe the QMF trace data set to CICS.

1. Edit your CICS source for DFHDCT.
2. Find the local entry for TYPE=SDSCI and add a copy statement for DSQ1CSCS as shown in the following example:

   *------------------------------------------------------------------
   *    LOCAL ENTRIES FOR TYPE=SDSCI SHOULD BE PLACED BELOW THIS BOX
   *------------------------------------------------------------------
             COPY DSQ1CDCS

3. Install the QMF trace facility.

   Find where local entries are specified and add a copy statement (DSQ1CDCT) for TYPE=EXTRA, as shown in the following example:

   *------------------------------------------------------------------
   *    OTHER LOCAL ENTRIES SHOULD BE PLACED BELOW THIS BOX
   *------------------------------------------------------------------
             COPY DSQ1CDCT

4. Assemble and link-edit the member to create a new DFHDCT module.

Ensure the job completes with a return code of 0. If you receive higher return codes, check the list output and correct the error.

Update the CSD

DSQ1ECSD creates a new LIST called QMF, which is defined in the CSD. CICS offers a utility program (DFHCSDUP) to update the CSD with a batch job. Use DFHCSDUP to update all QMF/CICS control tables except the RCT and DCT. For other RCT considerations, see Step 19--Describe QMF to DB2 UDB for OS/390 in CICS.

1. Use the RDO VIEW Lsrpool(name) command to check the current definitions of the LSRPOOL.

   The QMF panel data set requires a VSAM CI size of 32K. QMF does not explicitly define an LSRPOOL entry. Instead, QMF defaults to the CICS default of 1. If the LSRPOOL in your installation is smaller than 32K, specify an LSRPOOL that supports a VSAM CI size of 32K through DFHCSDUP.

2. Edit QMF720.SDSQSAPE(DSQ1ECSD).
3. Verify or change the installation parameters in the instream procedure of the job to match your tailoring specifications.

4. //DSQ1ECSD PROC REG=2048K,        Job Step Region
   //      QMFTPRE='QMF720 ',         DSN Prefix for QMF 
   //      CLOAD='CICS.LOADLIB',     Name of CICS Program Lib
   //      CCSD='CICS.DFHCSD',       Name of CICS CSD file
   //      OUTC='*'                  Print sysout class

5. Submit the job and check that the job ran with a return code of 0. If you receive higher return codes, check the list output and correct the error.
   Note
   For CICS V4 and later you can ignore the following error:

   E 'RESSECNUM' is not valid and is ignored
    

   from the DEFINE FILE(DSQPNLE) statement or the DEFINE FILE(DSQUCFRM) statement. Any other errors should be corrected.