Hi all,
How do I assign user define variable in REXX utility JOBONCSF. I am trying to assign variable SWITCH value of Y when job DATA* completed so that the job TWGASCS2 can use that value . I need to assign value within the REXXON cause I have some further if statement checking . Sample code bellow is my current coding on this.
Any suggestion and advice would be much appreciate.
JOB TWGASCS2
SUBAPPL TEST01 WAIT
REXXON PROC
J = JOBONCSF('DATA*','X')
DO I= 1 TO J
IF XAPPLG.I = CLANGVAR('%ESPAPGEN') THEN DO
SAY 'JOBNAME ' XJOBN.I
SAY 'PNODE ' XPNODE.I
SAY 'AGENT ' XAPPLG.I
SAY 'STATUS ' XSTATUS.I
SAY 'JOBNO ' XJOBNO.I
SWITCH1 = 'Y' /* seem not working value do not get assign
END
END
REXXOFF
SE 'SWITCH = %SWITCH ' U(ORMA001) /*display value of switch from joboncsf
RUN TODAY
ENDJOB
Thanks
MSA