z/VSE JCL

Application and Dialog Utilities › ADSOBSYS › JCL and Commands › z/VSE JCL

z/VSE JCL

Sample z/VSE JCL for Central Version

ADSOBSYS (z/VSE)

// UPSI b                 if specified in IDMSOPTI module 
// DLBL       userlib
// EXTENT     ,nnnnnn
// LIBDEF     *,SEARCH=idmslib.sublib
// LIBDEF     *,CATALOG=(userlib.cdmslib)
// DLBL    IDMSPCH,'temp.adsootpi'
// EXTENT  sysnnn,nnnnnn,,,ssss,llll
   ASSGN   sysnnn,DISK,VOL=nnnnnn,SHR
// EXEC    ADSOBSYS
 SYSTEM=nnnn,MODULE=adsoopti
SYSIDMS parameters 
/*
// DLBL    IJSYSIN,'temp.adsoopti'
// EXTENT  SYSIPT,nnnnnn
   ASSGN   SYSIPT,DISK,VOL=nnnnnn,SHR
// OPTION  CATAL
 PHASE adsoopti,*
 INCLUDE
 ENTRY (adsoopti)
// EXEC    LNKEDT
 CLOSE SYSIPT,SYSRDR
 CLOSE sysclb,UA

adsoopti	ADSOOPTI module name
SYSIDMS parameters	a list of SYSIDMS parameters for this job
b	appropriate 1- to 8-character UPSI bit switch, as specified in the IDMSOPTI module
llll	number of tracks (CKD) or blocks (FBA) of the disk extent
nnnn	version number of the DC/UCF system
nnnnnn	volume serial number of the library
ssss	starting track (CKD) or block (FBA) of the disk extent
sysnnn	logical unit assignment of the temporary adsoopti module
temp.adsoopti	temporary file-id of the ADSOOPTI module
userlib	filename of the user library
userlib.cdmslib	file-id of the CA IDMS sublibrary

Note: For more information about SYSIDMS parameters, see the CA IDMS Database Administration.

Sample z/VSE JCL for Local Mode

To execute ADSOBSYS in local mode, perform the following steps:

Remove the UPSI specification.

Add the following statements before the EXEC ADSOBSYS statement:

// DLBL    dictcb,'idms.appldict.ddldml',,DA
// EXTENT  sys015,nnnnnn
// ASSGN   sys015,DISK,VOL=nnnnnn,SHR
// DLBL    dloddb,'idms.appldict.ddldclod',,DA
// EXTENT  sys017,nnnnnn
// ASSGN   sys017,DISK,VOL=nnnnnn,SHR
// DLBL    dmsgdb,'idms.sysmsg.ddldcmsg',,DA
// EXTENT  sys016,nnnnnn
// ASSGN   sys016,DISK,VOL=nnnnnn,SHR
// TLBL    sys009,'idms.tapejrnl',, nnnnnn,,f
// ASSGN   sys009,TAPE,VOL=nnnnnn

idms.appldict.ddldml	file-id of the data dictionary DDLDML area
idms.appldict.ddldclod	file-id of the data dictionary load area
idms.sysmsg.ddldcmsg	file-id of the data dictionary message area
idms.tapejrnl	file-id of the tape journal file
dictdb	filename of the data dictionary DDLDML area
dloddb	filename of the data dictionary load area (DDLDCLOD)
dmsgdb	filename of the data dictionary message area (DDLDVM/ESAG)
f	file number of the tape journal file
nnnnnn	volume serial number of the library
sys009	logical unit assignment for the tape journal file
sys015	logical unit assignment for the data dictionary DDLDML area
sys016	logical unit assignment for the data dictionary message area
sys017	logical unit assignment for the data dictionary load area
userlib	filename of the user library
userlib.cdmslib	file-id of the CA IDMS sublibrary