🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.asm370
Article #1046

JCL Question about the RC system Variable

#1046
From: Denis
Date: Fri, 31 Mar 2000 00:00
32 lines
1859 bytes
(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:

//S1 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
//S2 EXEC PGM=P2
...
// ENDIF

This JCL is generated via FTINCL statements from a REXX/ISPF proc and has a
(quite large) variable number of steps after the step S2. The idea is to
avoid to have to generate very complex IF/THEN/ENDIF construction for the
steps that follow S2 (for example by qualifying each test of RC with the
step name...)

Any idea?

Many thanks in advance
Technical Details
Message-ID: <8c1rst$dnl$1@hardcopy.ny.jpmorgan.com>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f8131,42752b244b2e1d2d,start
X-Google-Attributes: gidf8131,public
X-Google-Thread: 11415f,42752b244b2e1d2d,start
X-Google-Attributes: gid11415f,public
X-Google-Thread: 101deb,42752b244b2e1d2d,start
X-Google-Attributes: gid101deb,public
X-Google-Thread: 10d15b,42752b244b2e1d2d,start
X-Google-Attributes: gid10d15b,public
From: "Denis" <grossnou@antispam.skynet.be>
Subject: JCL Question about the RC system Variable
Date: 2000/03/31
Message-ID: <8c1rst$dnl$1@hardcopy.ny.jpmorgan.com>
X-Deja-AN: 604723367
Distribution: inet
Organization: J.P. Morgan & Co
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Newsgroups: comp.lang.asm370,comp.lang.cobol,comp.lang.pl1,bit.listserv.tsorexx