您可以將 JCL 指定在行內,而成為 Rational® Build Agent 逐步指令的一部分。透過這種工作提交方法,您可以使用替代參數來指定值,如同來源資料集的 HLQ 一樣。在提交工作之前,會以「建置定義」內容標籤中指定的值,來取代參數。
.submitJCL -c
//HELLO JOB ,NOTIFY=${HLQ}
/*JOBPARM S=*
// SET HLQ=\'${HLQ}\'
//*
//* COBOL COMPILATION
//*
//COBOL EXEC PGM=IGYCRCTL,PARM='NODECK,OBJECT,LIB'
//STEPLIB DD DSN=COBOL.V4R1M0.SIGYCOMP,DISP=SHR
//SYSIN DD *
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
PROCEDURE DIVISION.
MAIN.
DISPLAY 'HELLO, RTCZ.'.
STOP RUN.
/*
//SYSLIN DD DSN=&HLQ..SAMPLE.OBJ(HELLO),DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD UNIT=SYSALLDA,SPACE=(CYL,(1,1))
//SYSUT2 DD UNIT=SYSALLDA,SPACE=(CYL,(1,1))
//SYSUT3 DD UNIT=SYSALLDA,SPACE=(CYL,(1,1))
//SYSUT4 DD UNIT=SYSALLDA,SPACE=(CYL,(1,1))
//SYSUT5 DD UNIT=SYSALLDA,SPACE=(CYL,(1,1))
//SYSUT6 DD UNIT=SYSALLDA,SPACE=(CYL,(1,1))
//SYSUT7 DD UNIT=SYSALLDA,SPACE=(CYL,(1,1))
//*
//* LINKEDIT
//*
//LINKEDIT EXEC
PGM=IEWBLINK,PARM='LIST,LET,MAP,XREF,REUS,RENT'
//SYSLIN DD *
INCLUDE SYSLIB(HELLO)
NAME HELLO(R)
/*
//SYSLIB DD DSN=&HLQ..SAMPLE.OBJ,DISP=SHR
// DD DSN=CEE.SCEELKED,DISP=SHR
//SYSLMOD DD DSN=&HLQ..SAMPLE.LOAD(HELLO),DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD UNIT=SYSALLDA,SPACE=(CYL,(1,1))
//*