Prefix Update (Step 6)

CA IDMS DLI Transparency JCL › Load Utility JCL › Prefix Update (Step 6)

Prefix Update (Step 6)

The JCL to update the logical child database records with the resolved prefixes is shown below. This step uses the hierarchically sorted workfile from Step 5.

Central Version

Prefix Update (Step 6) (z/OS)

//PFXU  EXEC PGM=IDMSDLRC,PARM='PFXU,IDMSDLLD,ipsbname'
//STEPLIB DD DSN=idms.loadlib,DISP=SHR
//   DD DSN=ipsb.loadlib,DISP=SHR
//sysctl DD DSN=idms.sysctl,DISP=SHR
//SYSOUT DD SYSOUT=A
//SYSLST DD SYSOUT=A
//SYSPRINT DD SYSOUT=A
//SYS004 DD DSN=step5.workfile,DISP=OLD,UNIT=TAPE
//

idms.loadlib	data set name of the CA IDMS DLI Transparency load library
idms.sysctl	data set name of the SYSCTL file
ipsb.loadlib	data set name of the IPSB load library
ipsbname	name of the IPSB load module
step5.workfile	hierarchically sorted workfile from step 5
sysctl	ddname of the SYSCTL file

Local Mode JCL

To execute the prefix update process in local mode, remove the SYSCTL statement and replace with the following:

//dictdb DD DSN=idms.dictdb 
//sysjrnlDD DSN=idms.tapejrnl,DISP=(NEW,KEEP),UNIT=tape
//userdb DD DSN=user.userdb,DISP=SHR

idms.dictdb	data set name of the data dictionary
idms.tapejrnl	data set name of the tape journal file
dictdb	ddname of the data dictionary
sysjrnl	ddname of the tape journal file
tape	symbolic device type for the tape journal file
user.userdb	data set name of the user database
userdb	ddname of the user database

Central Version

Prefix Update (Step 6) (z/VSE)

Note: Use the following LOAD utility if IDMSDLPC is included in the IDMSDLRC linkedit.

// JOB
// LIBDEF *,SEARCH=(idms.library,user.library)
// DLBL fileid,'idms.database',,DA
// EXTENT SYS018,nnnnnn
// ASSGN SYS018,DISK,VOL,=nnnnnn,SHR
// TLBL  SYS004,'final.workfile'
// ASSGN SYS004,nnn
// EXEC  IDMSDLRC
system parameter statements
/*
PFXU,IDMSDLLD,ipsbname
/*
/&

idms.library	data set name of the CA IDMS DLI Transparency library
user.library	name of the library that contains the IPSB and SUBSCHEMA modules
fileid	DMCL database file assignment
idms.database	name of the CA IDMS database file
nnnnnn	volume serial number of the disk unit
final.workfile	name of the tape dataset that contains the previous step's sorted output
ipsbname	name of the LOAD IPSB (Interface PSB with processing options of 'LOAD')

Note: The following LOAD utility JCL is for use if IDMSDLPC is not included in the IDMSDLRC linkedit.

// JOB
// LIBDEF *,SEARCH=(idms.library,user.library)
// DLBL fileid,'idms.database',,DA
// EXTENT SYS018,nnnnnn
// ASSGN SYS018,DISK,VOL,=nnnnnn,SHR
// TLBL  SYS004,'final.workfile'
// ASSGN SYS004,nnn
// EXEC IDMSDLRC,PARM='PFXU.IDMSDLLD,ipsbname
system parameter statements
/*
/&

idms.library	data set name of the CA IDMS DLI Transparency library
user.library	name of the library that contains the IPSB and SUBSCHEMA modules
fileid	DMCL database file assignment
idms.database	name of the CA IDMS database file
nnnnnn	volume serial number of the disk unit
final.workfile	name of the tape dataset that contains the previous step's sorted output
ipsbname	name of the LOAD IPSB (Interface PSB with processing options of 'LOAD')

Local Mode JCL

To execute the prefix update process in local mode, remove the UPSI statement and insert the following after the ASSGN statement:

// DLBL  dictdb,'idms.dictdb'
// EXTENT sys015,nnnnnn,1,,SSSS,LLLL
// ASSGN sys015,dddd,VOL=nnnnnn,SHR
// TLBL  journal,idms.tapejrnl'
// ASSGN SYS009,X'ttt'
// DLBL  userdb,'user.userdb',,DA
// EXTENT sys018,nnnnnn,1,,SSSS,LLLL
// ASSGN sys018,dddd,VOL=nnnnnn,SHR

idms.dictdb	file-id of the data dictionary
idms.tapejrnl	data set name of the tape journal file
dddd	device assignment for the disk file
dictdb	filename of the data dictionary
journal	filename of the tape journal
nnnnnn	volume serial number
sys015	logical-unit assignment of the data dictionary
sys018	logical-unit assignment of the user database
ttt	channel-unit assignment of the journal file
user.userdb	file-id of the user database
userdb	filename of the user database