The JCL to assemble DBDs for use when generating IPSB source statements is shown below:
DBD (z/OS)
//JOB //ASM EXEC PGM=ASMA90 //SYSPRINT DD SYSOUT=A //SYSLIB DD DSN=yourHLQ.CAGJMAC,DISP=SHR //SYSUT1 DD DSN=&&SYSUT1,UNIT=disk,SPACE=(1700,(600,100)) //SYSUT2 DD DSN=&&SYSUT2,UNIT=disk,SPACE=(1700,(300,50)) //SYSUT3 DD DSN=&&SYSUT3,UNIT=disk,SPACE=(1700,(30,50)) //SYSPUNCH DD DUMMY //SYSGO DD DSN=&&OBJSET,UNIT=SYSDA,SPACE=(80,(200,50)),DISP=(MOD,PASS) //SYSIN DD * DBD source code /* //LINK EXEC PGM=HEWL //SYSPRINT DD SYSOUT=A //SYSUT1 DD DSN=&&SYSUT1,UNIT=disk,SPACE=(1024,(50,20)) //SYSLMOD DD DISP=SHR,DSN=user.loadlib(dbdname) //SYSLIN DD DSN=&&OBJSET,DISP=(OLD,DELETE) //
|
yourHLQ.CAGJMAC |
data set name of the CA IDMS/DB macro library |
|
dbdname |
member name of the DBD |
|
disk |
symbolic device type for a disk file |
|
user.loadlib |
data set name of the load library that is to contain the resulting assembled DBD |
DBD (z/VSE)
// JOB // LIBDEF *,SEARCH=idms.library' // LIBDEF *,CATALOG=user.library // OPTION CATAL PHASE dbdname,* // EXEC ASSEMBLY insert DBD source code here /* // EXEC LNKEDT
|
idms.library |
name of the CA IDMS/DB source library |
|
user.library |
name of the library that is to contain the resulting assembled DBD |
|
dbdname |
name of the DBD source statements |
|
Copyright © 2013 CA.
All rights reserved.
|
|