Sample JCL to assemble High Level Assembler source for impact analysis
This sample JCL assembles High Level Assembler source code to generate impact analysis data.
- 1 The library containing the High Level Assembler, if needed, followed by any other concatenated DDs.
- 2 The High Level Assembler source file to be assembled.
- 3 The High Level Assembler macro library followed by any other concatenated macro library partitioned data sets.
- 4 The PDS member to contain the High Level Assembler output.
- 5 The library containing the BCC2XML program.
- 6 The z/OS® Extensions load library.
- 7 The library filter file described in Gathering initial impact analysis data .
//ADMIN JOB ,
// MSGCLASS=H,MSGLEVEL=(1,1),TIME=(,4),REGION=70M
//*-------------------------------------------------------------------
//* Delete datasets that will be created later
//*-------------------------------------------------------------------
//DELETE EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
DELETE ADMIN.PROJ3.SYSADATA
IF LASTCC = 8 THEN SET MAXCC = 4
DELETE ADMIN.PROJ3.SYSIADSD
IF LASTCC = 8 THEN SET MAXCC = 4
//*-------------------------------------------------------------------
//* Use the High Level Assembler V1R5+ to generate ADATA
//*-------------------------------------------------------------------
//HLASM EXEC PGM=ASMA90,PARM='OBJECT,NODECK,ADATA'
//STEPLIB DD DSN=<HLASM15 assembler>,DISP=SHR 1
//* DD DSN=<other concatenated libraries>,DISP=SHR
//SYSIN DD DSN=ADMIN.PROJ3.HLASM.SRC(PGM1),DISP=SHR 2
//SYSLIB DD DSN=ADMIN.PROJ3.HLASM.MACLIB,DISP=SHR 3
//* DD DSN=<other concatenated copy library PDSes>,DISP=SHR
//SYSADATA DD DSN=ADMIN.PROJ3.SYSADATA,DISP=(NEW,CATLG),
// DCB=(RECFM=VB,LRECL=32756,BLKSIZE=32760),
// SPACE=(TRK,(200,40))
//SYSLIN DD DSN=<assembler output PDS member>,DISP=SHR 4
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD UNIT=VIO,SPACE=(32000,(30,30)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)
//*-------------------------------------------------------------------
//* Use BCC2XML to generate Impact Analysis data
//*-------------------------------------------------------------------
//DOADATA EXEC PGM=BCC2XML,REGION=512K,PARM='/HLASM15'
//STEPLIB DD DSN=RCC.IA.TSCLOAD,DISP=SHR 5
//SYSADATA DD DSN=ADMIN.PROJ3.SYSADATA,DISP=SHR
//SYSIADSD DD DSN=ADMIN.PROJ3.SYSIADSD,DISP=(NEW,CATLG),
// DCB=(RECFM=FB,LRECL=112,BLKSIZE=27888),
// SPACE=(TRK,(200,40))
//SYSPRINT DD SYSOUT=*
//SYSOUT DD DUMMY
//*-------------------------------------------------------------------
//* Update VSAM KSDS with Impact Analysis data
//*-------------------------------------------------------------------
//UPKSDS EXEC PGM=BCCIAUPD,COND=((4,LT,HLASM),(8,LT,DOADATA))
//STEPLIB DD DSN=RCC.IA.TSCLOAD,DISP=SHR 6
//SYSPRINT DD SYSOUT=*
//SYSTERM DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//PLIDUMP DD SYSOUT=*
//SYSABEND DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//COPYAIX1 DD DSN=ADMIN.VSAM1.CCZVSAM.COPY.NUPATH1,DISP=SHR
//CALLAIX1 DD DSN=ADMIN.VSAM1.CCZVSAM.CALL.NUPATH1,DISP=SHR
//SEQCLUS DD DSN=ADMIN.VSAM1.CCZVSAM.SEQ.BASE,DISP=SHR
//SYSIADSD DD DSN=ADMIN.PROJ3.SYSIADSD,DISP=SHR
//*SYSIN DD DSN=ADMIN.PROJ3.FILTER,DISP=SHR 7
//* or specify this as an in-stream dataset as below:
//SYSIN DD *
ADMIN.PROJ3.HLASM.SRC
ADMIN.PROJ3.HLASM.MACLIB
/*
//