🚀 go-pugleaf

Thomas David Rivers wrote:

> Terry Heinze wrote:
>
> > You can't set the RC in JCL with a JCL statement, but you COULD exec a COBOL
> > pgm that set the value of RETURN-CODE for the step the pgm was executed in.
> > The value of the RC in your first step would remain that value for the
> > during of the job.  In other words, replace // SET RC=4 by // EXEC
> > PGM=SETRC4 then test the result of the step executing SETRC4.  Each step
> > returns it's own RC, so in ob containing 4 steps, there are 4 different RCs
> > you can test.
>
> Well - a COBOL program may be a little overboard; just write a quick
> ASM program that puts 4 in R15 and does a BALR 14,15.   That will
> set the 4 as the RC.
>
> Something like:
>
>        SET4RC  CSECT
>                L    15,=F'4'
>                BALR 14,15      ???????????
>                LTORG
>                END  SET4RC

I think you are at the wrong end of the program for that instruction.  Try
                  LA 15,4
                  BR 14
after the registers have been restored.  The BALR would load the address of the
next instruction in Reg 14 and branch to the address in Reg 15, but the system
wouldn't let you branch to low core.
--
Warren Porter   - Remove digits