|
View previous topic :: View next topic
|
| Author |
Message |
abdulrafi
Active User
Joined: 14 Sep 2009
Posts: 184
Location: Coimbatore
|
|
|
|
Hi,
I am getting the following error while executing my JCL,
10 IEF645I INVALID REFERBACK IN THE RC FIELD
jcl:
==
| Code: |
//T040D5ZX JOB (P904030,T040,99,99),'VIC7IX-TEST1',
// NOTIFY=&SYSUID,MSGCLASS=Q,TIME=(02,00),REGION=0M
//VIC7IX6A EXEC FAMVS,REGION=6M
//SYSPRINT DD SYSOUT=*
//SYSLIST DD SYSOUT=*
//DD01 DD DISP=SHR,DSN=NVSTN.VIC7IX.THROWIN.DATA.G5
//SYSIN DD DISP=SHR,DSN=T040D5Z.PDS.CNTLCARD(VIC7IX6A)
/*
//IF3A IF (VIC7IX6A.RC = 0) THEN
//VIC7IX6B EXEC XMITIP
//*
//SYSTSIN DD DISP=SHR,DSN=T040D5Z.PDS.CNTLCARD(VIC7IX6B)
//*
//VIC7IX6C EXEC PGM=CAN444
//ENDIF3A ENDIF |
jesjcl:
====
| Code: |
1 //T040D5ZX JOB (P904020,T040,99,99),'VIC7IX-TEST1',
// NOTIFY=&SYSUID,MSGCLASS=Q,TIME=(02,00),REGION=0M
IEFC653I SUBSTITUTION JCL - (P904020,T040,99,99),'VIC7IX-TEST1',NOTIFY
REGION=0M
2 //VIC7IX6A EXEC FAMVS,REGION=6M
3 XXFAPROC PROC ENTRY=FILEAID
4 XXFAMVS EXEC PGM=&ENTRY,REGION=4M
IEFC653I SUBSTITUTION JCL - PGM=FILEAID,REGION=4M
5 XXSTEPLIB DD DSN=COMPWARE.FAMVS.LOAD,DISP=SHR
6 //SYSPRINT DD SYSOUT=*
X/SYSPRINT DD SYSOUT=*
7 //SYSLIST DD SYSOUT=*
X/SYSLIST DD SYSOUT=*
8 //DD01 DD DISP=SHR,DSN=NVSTN.VIC7IX.THROWIN.DATA.G5
/*
9 //SYSIN DD DISP=SHR,DSN=T040D5Z.PDS.CNTLCARD(VIC7IX6A)
10 //IF3A IF (VIC7IX6A.RC > 0) THEN
11 //VIC7IX6B EXEC XMITIP
12 XXXMITIP PROC
XX*================================================
XX*= XMITIP V564 =
XX*= =
XX*= XMITIP IS SHAREWARE PROVIDED BY THE VEHICLES =
XX*= APPLICATION GROUP. =
XX*= =
XX*= IT ALLOWS A BATCH JOB TO SEND AN EMAIL WITH =
XX*= ATTACHMENT IN ONE STEP.. =
XX*================================================
13 XXTRANSMIT EXEC PGM=IKJEFT01,
XX REGION=0M,
XX DYNAMNBR=100
14 XXSTEPLIB DD DSN=ATSPN.SHR.XMITIP.LOAD,
XX DISP=SHR
15 XXSYSEXEC DD DSN=ATSPN.SHR.XMITIP.EXEC,
XX DISP=SHR
16 XXSYSPRINT DD SYSOUT=*
17 XXSYSTSPRT DD SYSOUT=*
18 XXSYSTERM DD SYSOUT=*
19 XXSYSIN DD TERM=TS
//*
20 //SYSTSIN DD DISP=SHR,DSN=T040D5Z.PDS.CNTLCARD(VIC7IX6B)
//*
21 //VIC7IX6C EXEC PGM=CAN444
22 //ENDIF3A ENDIF |
The jcl works when I replaced IF (VIC7IX6A.RC = 0) with IF (RC = 0) after looking at the solution of already posts.
But in my production already I have scenarios to check IF (VIC7IX6A.RC = 0) using the step condition. But here when I test its not working.
Can you please me to resolve it ?. I need to use with step name. |
|
| Back to top |
|
 |
Akatsukami
Global Moderator
Joined: 03 Oct 2009
Posts: 1787
Location: Bloomington, IL
|
|
|
|
| Step VIC7IX6A is executing a JCL procedure, which has steps of its own. The procstepname, FAMVS, must be used to qualify VIC7IX6A on the IF statement. |
|
| Back to top |
|
|
abdulrafi
Active User
Joined: 14 Sep 2009
Posts: 184
Location: Coimbatore
|
|
|
|
| Oh yes. I got it. Thanks for your help. :-). Its working fine now. |
|
| Back to top |
|
|
Thabo Mosikidi
New User
Joined: 06 Jul 2022
Posts: 1
Location: South Africa
|
|
|
|
i.e. IF VIC7IX6A.FAMVS.RC = 0
Sorry, I had the same error and didn't understand the solution. |
|
| Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015
Posts: 1329
Location: Bamberg, Germany
|
|
|
|
| Create a new topic for your issue, please! |
|
| Back to top |
|
|
|
|
|
