Sample of the DBD Reorg utility JCL
The following figure shows an example of the DBD Reorg utility JCL, which is contained in member DPIREORG in the distribution SAMP data set.
//*
//* ****************************************************************
//* SAMPLE JCL FOR REORG DBD GEN DPI VERSION 2
//* ****************************************************************
//*
//DPIREORG PROC STEPLIB='DPI.V2.LOAD', <=== DPI LOAD LIBRARY
// DBDLIB='IMSVS.DBDLIB', <=== DBD LIBRARY
// DBDOUT='DPI.V2.REORG.DBDLIB' <=== REORG DBD LIBRARY
//*
//DPIDBD EXEC PGM=DPIDBD
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
// DD DSN=IMSVS.RESLIB,DISP=SHR <=== MODIFY
//DBDLIB DD DSN=&DBDLIB,DISP=SHR
//DBDOUT DD DSN=&DBDOUT,DISP=SHR
//DPIPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
// PEND
//DPIDBD EXEC DPIREORG
//DPIDBD.DPISYSIN DD *
BUILD DBD(DBDNAME1)
BUILD DBD(DBDNAME2),SEGMENTS(SEGNAME1(EXPAND))
BUILD DBD(DBDNAME3),COPYREL(N),
SEGMENTS(SEGNAME1(EXPAND),SEGNAME2(EXPAND),
SEGNAME3(EXPAND))
/*
//
Specify information for the following statements:
EXEC | Required. The program is DPIDBD. |
|---|---|
STEPLIB DD | Required. Specify the following data sets:
|
DBDLIB DD | Required. Specify the name of the DBDLIB containing the DBDs for the input to the utility. |
DBDOUT DD | Required. Specify the output DBDLIB containing the Reorg DBDs. This is usually a temporary data set; the DBD load module cannot exist in the output data set prior to execution. |
DPIPRINT DD | Required. Specify the name of the print data set for control statement analysis and informational messages. The report can be sent to SYSOUT or to a data set. |
SYSPRINT DD | Required. Specify SYSOUT or the name of the system output unit. |
DPISYSIN DD | Required. Specify the command statements. |
Related topic