z/VSE JCL

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

z/VSE JCL

Sample z/VSE JCL for Central Version

ADSOBTAT (z/VSE)

// UPSI     b                if specified in the IDMSOPTI module  
// DLBL      userlib
// EXTENT    ,nnnnnn
// LIBDEF    *,SEARCH=(userlib.cdmslib)
// EXEC     ADSOBTAT
control statements 
SYSIDMS parameters

b	appropriate 1- through 8-character UPSI bit switch, as specified in the IDMSOPTI module
nnnnnn	volume serial number of the library
userlib	filename of the user library
userlib.cdmslib	file-id of the CA IDMS sublibrary
SYSIDMS parameters	A list of SYSIDMS parameters for this job

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

Sample z/VSE JCL for Local Mode

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

Remove the UPSI specification.

Add the following statements before the EXEC statement:

// 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.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
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
sys009	logical unit assignment for the tape journal file
sys016	logical unit assignment for the data dictionary message area
sys017	logical unit assignment for data dictionary load area