Link to home
Start Free TrialLog in
Avatar of jimsweb
jimswebFlag for India

asked on

REstarting a proc step that falls through IF

//IFCKDP  IF (IMB0540.RC EQ 0) THEN                                 
//IMB0588  EXEC PGM=IMB0588                                         
//******************************************                        
//*  THIS WILL COMPARE CURRENT "ENCRIPTED" NDM FILE WITH PREVIOUS.  
//*  IF DUPLICATE, RC=99, STOP PROCESSING                           
//IMB0588A DD DSN=&HLVL4..NONX.IMB540ND.IMB54005(&GEN01),DISP=SHR   
//IMB0588B DD DSN=&HLVL4..NONX.IMB540ND.IMB54005(&GEN02),DISP=SHR   
//SYSOUT   DD SYSOUT=*                                              
//ENDCKDP ENDIF                                                     
//*                                                                 

Open in new window


Whenever i try to restart this step using 'procstepname.stepname' method, it doesn't seem to be working.  Probably because of the if condition check or the condition check itself.

I would love to hear from the mainframe experts here, how can i restart a proc step which is having condition check or that falls through 'IF'
Avatar of garypfirstech
garypfirstech

I'm assuming that IMB0540 refers to a previous step in the same PROC.  If you try to restart on that step, the condition evaluates as FALSE because it refers to a previous step that was not executed during the restart.

Try changing your IF statement to:

//IFCKDP IF (IMB0540.RC EQ 0 | ¬IMB0540.RUN) THEN

Open in new window


I haven't seen the rest of your job stream but I'm assuming that IMB0540 usually executes unconditionally.

Avatar of jimsweb

ASKER

yes you are right.
How can i restart STEP2 that is having condition checks.
//STEP1     EXEC PGM=ABCD ...
//.........
....

//STEP2     EXEC PGM=IMB0588,con=(0,NE,STEP1) 
..........

Open in new window


Will it get restarted or fail due to the conditin check?

ASKER CERTIFIED SOLUTION
Avatar of garypfirstech
garypfirstech

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial