🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.asm370
Article #1048

Re: JCL Question about the RC system Variable

#1048
From: Terry Heinze
Date: Fri, 31 Mar 2000 00:00
36 lines
2391 bytes
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.

Denis <grossnou@antispam.skynet.be> wrote in message
news:8c1rst$dnl$1@hardcopy.ny.jpmorgan.com...
> (I know that this question is off-topic but I do not know in which
newsgroup
> to post-it)
> I have a JCL question: Is it possible to reset the RC system variable in a
> JCL ? for example, with a statement like:
> // SET RC=0
> Obviously this statement does not work as RC it is not a normal "variable"
>
> The goal is to have a JCL like the following:
>
> EXEC PGM=P1
> ...
> //  IF (RC GE 8) THEN   <--- start of the "does not work" construction
> //   SET RC=4                 <--- does not work the idea is to "reset"
the
> RC variable to 4
> // ENDIF                          <--- end of the "does not work"
> construction
>
> // IF (RC GE 4) THEN  <--- want to test with RC = 4 even if S1 ended with
> RC=8
> file://S2 EXEC PGM=P2
> ...
> // ENDIF
>SNIP<
Technical Details
Message-ID: <8c28kc$2a5k$1@newssvr04-int.news.prodigy.com>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <8c1rst$dnl$1@hardcopy.ny.jpmorgan.com>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f8131,42752b244b2e1d2d
X-Google-Attributes: gidf8131,public
X-Google-Thread: 101deb,42752b244b2e1d2d
X-Google-Attributes: gid101deb,public
X-Google-Thread: 11415f,42752b244b2e1d2d
X-Google-Attributes: gid11415f,public
X-Google-Thread: 10d15b,42752b244b2e1d2d
X-Google-Attributes: gid10d15b,public
From: "Terry Heinze" <terryheinze@prodigy.net>
Subject: Re: JCL Question about the RC system Variable
Date: 2000/03/31
Message-ID: <8c28kc$2a5k$1@newssvr04-int.news.prodigy.com>
X-Deja-AN: 604784048
References: <8c1rst$dnl$1@hardcopy.ny.jpmorgan.com>
X-Priority: 3
X-Mimeole: Produced By Microsoft MimeOLE V5.00.2615.200
X-Complaints-To: abuse@prodigy.net
X-Trace: newssvr04-int.news.prodigy.com 954508748 3961879 63.253.194.73 (31 Mar 2000 13:19:08 GMT)
Organization: Prodigy Internet http://www.prodigy.com
X-MSMail-Priority: Normal
NNTP-Posting-Date: 31 Mar 2000 13:19:08 GMT
Newsgroups: comp.lang.asm370,comp.lang.cobol,comp.lang.pl1,bit.listserv.tsorexx