Running Datacom DDUPDATE with input CABDSAMP(DSTMPA) for LU01844 to add a new Dynamic System Table, it fails in the CATALOG with:
FUNCTION = CATALOG-STRUCTURE ENTITY-TYPE = TABLE OCCURRENCE = MUF_BFR_POOL_AREA VERSION = PROD
*** ERROR **** DB RETURN CODE = 75 (038) CXX-CREATE TABLE WITH DUPLICATE NAME
The problem could occur with any DSTnnn CABDSAMP member.
Release: 15.1
The problem occurs when you run the DDUPDATE with this DSTMPA or any DSTnnn CABDSAMP member a second time.
The reason for the error is that you can't run this DDUPDATE with a DSTnnn member as input to make changes to the definition of an existing Dynamic System Table. It can only be used to add a new Dynamic System Table.
To make changes to an existing Dynamic System Table, you have to first delete the table from the CXX.
This is documented in section Updating the Definition of an Existing Dynamic System Table
When you are ready to install the changes, you must complete the following steps:
- Close the individual table involved if it is open.
- Delete its definition from the CXX by running a DBUTLTY job specifying the DBID where the System Tables exist and the individual table you plan to recatalog. See the following example:
CXXMAINT OPTION=DELETEOP,DBID=1000,TABLE=nnn- Catalog the changed table using the same method that is listed previously for cataloging a new table.
The following example shows how you can substitute the DRI table name if you intended to install changes to the DIR_INDEX Dynamic Systems Table using the DSTDRI member:
/CXXMAINT EXEC DBUTLTY//SYSIN DD *SET OPTION1=ECHO_FUNCTIONSCXXMAINT OPTION=DELETEOP,DBID=1000,TABLE=nnn/*//DDUPDATE EXEC DDUPDATE//SYSIN DD DISP=SHR,DSN=nnn(DDUSER)// DD DISP=SHR,DSN=your.CABDSAMP(DSTnnn)
In this case there is no need to run the DSTMPA member a second time but if changes were being made to the table then first run a DBUTLTY with the input below to delete the MPA (MUF_BFR_POOL_AREA) table from the CXX then run the DDUDATE job again.
//SYSIN DD * SET OPTION1=ECHO_FUNCTIONS CXXMAINT OPTION=DELETEOP,DBID=1000,TABLE=MPA /*