RC14(48) in Dataquery batch.

Document ID : KB000006332
Last Modified Date : 14/02/2018
Show Technical Document Details
Issue:

Have you ever issued a query using CA Dataquery online or batch, and received a RC14(48) or a RECORD NOT FOUND error? Or, you may have executed a COBOL program with embeded SQL statements and received the same error. Or you may have received a S0C4 abend. In either case, you KNOW the data exists!

 

Environment:
z/os, CA Datacom/DB 14.0 and above.
Resolution:

This article describes and shows the JCL SYSIN for the steps you need to run to clean up any "bad data" in your Dataquery system files after receiving a RC14(48), a RECORD NOT FOUND error, or a S0C4 abend in Dataquery. You may want to implement a practice of running through these steps every 6-month as preventative maintenance, to ensure your Dataquery System files have not become corrupted.

 

  1. Close down access via CICS to CA Datacom's Dataquery database, by issuing DBOC CLOSE=0003 from CICS regions that access your Multi-User Facility (MUF).

  2. Run a DBUTLTY batch job with the following SYSIN:

    ACCESS STATUS=OFF,DBID=3,USERS=FAIL

  3. Run DBUTLTY batch job with the following SYSIN:

    COMM OPTION=CLOSE,DBID=3

  4. Run the DBUTLTY INIT function for the following database 3 areas: DQE, DQF, DQR, DQS, DQT, and DQW. The SYSIN looks like:

    INIT AREA=DQE,DBID=3
    INIT AREA=DQF,DBID=3
    INIT AREA=DQR,DBID=3
    INIT AREA=DQS,DBID=3
    INIT AREA=DQT,DBID=3
    INIT AREA=DQW,DBID=3

  5. Run DBUTLTY LOAD, with FORMAT=NONE to null load each of the above areas. The SYSIN looks like:

    LOAD AREA=DQE,DBID=3,FORMAT=NONE,SORT=100000
    LOAD AREA=DQF,DBID=3,FORMAT=NONE,SORT=100000 
    LOAD AREA=DQR,DBID=3,FORMAT=NONE,SORT=100000
    LOAD AREA=DQS,DBID=3,FORMAT=NONE,SORT=100000
    LOAD AREA=DQT,DBID=3,FORMAT=NONE,SORT=100000
    LOAD AREA=DQW,DBID=3,FORMAT=NONE,SORT=100000

  6. Run the DQWFINIT function for the DQE, DQF, and DQW.

    for DQE:

    //SYSIN DD *
    DQE
    /*

    for DQF:

    //SYSIN DD *
    DQF
    /*

    for DQW:

    //SYSIN DD *
    DQW nn 
    /*

    Where nn is any number you have previously set. At installation time nn = 03

  7. Issue a DBOC OPEN=0003 command in each CICS communicating with the MUF to allow access to Datacom via CICS.

  8. After all jobs run successfully, run ACCESS STATUS=WRITE,DBID=3 to allow access to Dataquery database in batch.