jackzhang75
Active User
Joined: 09 Jun 2014 Posts: 119 Location: CT
|
|
|
|
Hi Guys,
I want to pass the value you entered from panel to the JCL. And then use REXX to submit this JCL , how can i do that ?
my panel :
Code: |
)ATTR
% TYPE(TEXT) COLOR(WHITE) CAPS(OFF) SKIP(ON)
* TYPE(TEXT) CAPS(OFF) INTENS(HIGH) COLOR(GREEN) SKIP(ON)
! TYPE(TEXT) CAPS(OFF) INTENS(HIGH) COLOR(BLUE) SKIP(ON)
_ TYPE(INPUT) PAD('_') INTENS(HIGH) COLOR(TURQ)
@ TYPE(NEF) CAPS(ON) PADC(USER)
# TYPE(OUTPUT) PAD(' ') CAPS(OFF) COLOR(YELLOW) JUST(LEFT)
? TYPE(NT)
)BODY WIDTH(80) CMD(ZCMD) EXPAND(//)
*
!/ /hello #user/ /
*
*COMMAND ====> @ZCMD
%/ / please enter the filed / /
*
*
*
*
*
*
*/ /dataset name:_dataset * / /
*/ /outputname: _jobname * / /
*
*
*
*
*
*
*
)end |
This is the JCL I wan to submit form the REXX
//TU14REX2 JOB (T,TSP,TSP8000,4,WD33),'HAO ZHANG',
// CLASS=4,MSGCLASS=T,
// NOTIFY=TU14
//STEP1 EXEC PGM=IKJEFT01,DYNAMNBR=30,REGION=4096K
//SYSEXEC DD DSN=TTAT.TSP.TU14.REXX,DISP=SHR
//SYSTSPRT DD SYSOUT=A
//SYSTSIN DD *
REXXSRCH 'TTAT.TSP.TU14.RPTS(APP069)' JOBLOG
My question is how to pass the value of dataset name and ouputname to REXXSRCH 'datset name ' 'outputname' thanks |
|