Author: Csongor
Subject: ZTEMPF RC
Posted: Thu Jun 09, 2016 1:37 am (GMT 5.5)
Hello!
Can you please tell me, is there a possibilty to work with the tailored jobs (skelajm) RC in rexx, after it get executed as ztempf?
What i want: if RC= 0 than go on working, if not than exit.
Subject: ZTEMPF RC
Posted: Thu Jun 09, 2016 1:37 am (GMT 5.5)
Hello!
Can you please tell me, is there a possibilty to work with the tailored jobs (skelajm) RC in rexx, after it get executed as ztempf?
What i want: if RC= 0 than go on working, if not than exit.
Code: |
/* FILE TAILORING REXX*/ GROUP='var1' NET='var2' "ISPEXEC LIBDEF ISPSLIB DATASET ID('xxxxxx.yyyyyyy.CNTL')" ADDRESS ISPEXEC "FTOPEN TEMP" ADDRESS ISPEXEC "FTINCL SKELAJM" ADDRESS ISPEXEC "FTCLOSE" ADDRESS ISPEXEC "VGET (ZTEMPF)" ADDRESS TSO "SUBMIT ("ZTEMPF")" EXIT |