JCL

z/OS JCL Under Central Version

JCL for running the print log utility (ADSOBPLG) is shown below:

ADSOBPLG (z/OS)

//ADSOBPLG EXEC PGM=ADSOBPLG,REGION=1024K
//STEPLIB  DD   DSN=idms.dba.loadlib,DISP=SHR
//         DD   DSN=idms.loadlib,DISP=SHR
//sysctl   DD   DSN=idms.sysctl,DISP=SHR
//adslog   DD   DSN=ads.log.file,DISP=SHR
//SYSLST   DD   SYSOUT=A
//SYSIDMS  DD   *
DMCL=dmcl-name
DICTNAME=dictionary-name
Other SYSIDMS parameters, as appropriate
/*
//SYSIPT   DD   *
control statements
/*
//SYSUDUMP DD   SYSOUT=A

idms.dba.loadlib	data set name of the load library containing the DMCL and database name table load modules
idms.loadlib	data set name of DC/UCF load library
sysctl	ddname of SYSCTL file
idms.sysctl	data set name of SYSCTL file
adslog	ddname of CA ADS Batch log file
ads.log.file	data set name of CA ADS Batch log file

Local Mode

To execute ADSOBPLG in local mode, the following steps are required:

Remove the sysctl DD statement.

Add the following statements:

//sysjrnl DD   DSN=idms.tapejrnl,DISP=NEW,UNIT=tape
//dictdb  DD   DSN=idms.dictdb,DISP=OLD
//dloddb  DD   DSN=idms.dloddb,DISP=SHR
//dmsgdb  DD   DSN=idms.dmsgdb,DISP=SHR
//dlogdb  DD   DSN=idms.dlogdb,DISP=SHR
additional journal file assignments, as required

sysjrnl	ddname of journal file
idms.tapejrnl	data set name of journal file
tape	symbolic device name of journal file
dictdb	ddname of data dictionary
idms.dictdb	data set name of data dictionary
dloddb	ddname of data dictionary load area
idms.dloddb	data set name of data dictionary load area
dmsgdb	ddname of data dictionary message area
idms.dmsgdb	data set name of data dictionary message area
dlogdb	ddname of data dictionary log area
idms.dlogdb	data set name of data dictionary log area

z/VSE JCL Under Central Version ADSOBPLG (z/VSE)

// DLBL SYSCTL,'idms.sysctl',1999/365,SD
// DLBL SYSIDMS,'#SYSIPT'
// DLBL     ciln,'idms.cilib'
// EXTENT   ,nnnnnn
// LIBDEF   CL,SEARCH=(ciln),TEMP
// DLBL     adsloga,'log.file'
// EXTENT   sysnnn,nnnnnn
   ASSGN    sysnnn,DISK,VOL=nnnnnn,SHR
// EXEC     IDMSFILE,SIZE=(ADSOBPLG,128K)
SYSIDMS control statements
IDMSFILE control statements
ADSOBPLG control statements

idms.sysctl	data set name of SYSCTL file
ciln	filename of core-image library
idms.cilib	file-id of DC/UCF core-image library
nnnnnn	volume serial number
adsloga	filename of the log file
log.file	file-id of the log file
sysnnn	logical unit of the device on which the log file is located
SYSIDMS control statements	control statements used by SYSIDMS to describe physical runtime environments as described in CA IDMS Common Facilities Guide.
IDMSFILE control statements	control statements used by IDMSFILE to describe the characteristics of the log file, as described in z/VSE File Characteristics Program.
ADSOBPLG control statements	control statements used by ADSOBPLG

Note: A /* card must follow each SYSIPT file.

Local Mode

To execute ADSOBPLG in local mode, the following steps are required:

Remove the SYSCTL DLBL card

Add the following statements:

// DLBL     dictdb,'idms.dictdb',,DA
// EXTENT   sys005,nnnnnn
// ASSGN    sys005,DISK,VOL=nnnnnn,SHR
// DLBL     dloddb,'idms.dloddb',,DA
// EXTENT   sys017,nnnnnn
// ASSGN    sys017,DISK,VOL=nnnnnn,SHR
// DLBL     dmsgdb,'idms.dmsgdb',,DA
// EXTENT   sys016,nnnnnn
// ASSGN    sys016,DISK,VOL=nnnnnn,SHR
// DLBL     dlogdb,'idms.dlogdb',,DA
// EXTENT   sys019,nnnnnn
// ASSGN    sys019,DISK,VOL=nnnnnn,SHR
// TLBL     sysjrnl,'idms.tapejrnl',,nnnnnn,,f
// ASSGN    sys009,TAPE,VOL=nnnnnn
additional journal file assignments, as required

dictdb	filename of data dictionary
idms.dictdb	file-id of data dictionary
sys005	logical unit assignment for data dictionary
nnnnnn	volume serial number
dloddb	filename of data dictionary load area
idms.dloddb	file-id of data dictionary load area
sys017	logical unit assignment for data dictionary load area
dmsgdb	filename of data dictionary message area
idms.dmsgdb	file-id of data dictionary message area
sys016	logical unit assignment for data dictionary message area
dlogdb	filename of data dictionary log area
idms.dlogdb	file-id of data dictionary log area
sys019	logical unit assignment for data dictionary log area
sysjrnl	filename of tape journal file
idms.tapejrnl	file-id of tape journal file
f	file number of tape journal file
sys009	logical unit assignment for tape journal file

Local Mode

To execute ADSOBPLG in local mode, the following steps are required:

Remove the ADD-FILE-LINK statement for sysctl

Add the following statements:

/ADD-FILE-LINK L-NAME=dictdb,F-NAME=idms.appldict.dictdb,SHARED-UPD=*YES
/ADD-FILE-LINK L-NAME=dloddb,F-NAME=idms.appldict.dloddb,SHARED-UPD=*YES
/ADD-FILE-LINK L-NAME=dcmsg,F-NAME=idms.sysmsg.ddldcmsg,SHARED-UPD=*YES
/ADD-FILE-LINK L-NAME=sysjrnl,F-NAME=idms.tapejrnl
additional journal file assignments, as required

dictdb	linkname of data dictionary file
idms.appldict.dictdb	filename of data dictionary file
dloddb	linkname of data dictionary load area file
idms.appldict.dloddb	filename of data dictionary load area file
dcmsg	linkname of data dictionary message area file
idms.sysmsg.ddldcmsg	filename of data dictionary message area file
sysjrnl	linkname of tape journal file
idms.tapejrnl	filename of tape journal file