CA IDMS DLI Transparency JCL › Syntax Generator JCL › Assemble a PSB

Assemble a PSB

The JCL to assemble a PSB for use when generating IPSB source statements is shown below:

PSB (z/OS)

//JOB
//ASM  EXEC PGM=ASMA90
//SYSPRINT DD SYSOUT=A
//SYSLIB DD DSN=yourHLQ.CAGJSRC,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  *
Insert PSB source code here.
/*
//SYSIN  DD  *
//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(psbname) 
//SYSLIN DD DSN=&&OBJSET,DISP=(OLD,DELETE)
//       DD  DDNAME=SYSIN
//

PSB (z/VSE)

// JOB
// LIBDEF *, SEARCH=idms.library
// LIBDEF *, CATALOG=user.library
// OPTION CATAL
   PHASE psbname,*
// EXEC  ASSEMBLY
insert PSB source code here
/*
// EXEC  LNKEDT