IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

IEF645I INVALID REFERBACK IN THE RC FIELD


IBM Mainframe Forums -> JCL & VSAM
Post new topic   This topic is locked: you cannot edit posts or make replies.
View previous topic :: View next topic  
Author Message
abdulrafi

Active User


Joined: 14 Sep 2009
Posts: 184
Location: Coimbatore

PostPosted: Mon Aug 29, 2016 10:57 am
Reply with quote

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
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Mon Aug 29, 2016 11:32 am
Reply with quote

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
View user's profile Send private message
abdulrafi

Active User


Joined: 14 Sep 2009
Posts: 184
Location: Coimbatore

PostPosted: Mon Aug 29, 2016 11:45 am
Reply with quote

Oh yes. I got it. Thanks for your help. :-). Its working fine now.
Back to top
View user's profile Send private message
Thabo Mosikidi

New User


Joined: 06 Jul 2022
Posts: 1
Location: South Africa

PostPosted: Wed Jul 06, 2022 9:48 am
Reply with quote

i.e. IF VIC7IX6A.FAMVS.RC = 0
Sorry, I had the same error and didn't understand the solution.
Back to top
View user's profile Send private message
Joerg.Findeisen

Active Member


Joined: 15 Aug 2015
Posts: 911
Location: Bamberg, Germany

PostPosted: Wed Jul 06, 2022 9:50 am
Reply with quote

Create a new topic for your issue, please!
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies. View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
This topic is locked: you cannot edit posts or make replies. Construct new record using specific f... DFSORT/ICETOOL 6
No new posts Count the number of characters in a f... CA Products 1
No new posts Find the occurrence of Key Field (Par... DFSORT/ICETOOL 6
No new posts Expand ISPF field up to a limit - is ... TSO/ISPF 9
No new posts Need to add field to copybook, proble... COBOL Programming 14
Search our Forums:

Back to Top