It's about 50 years ago since I wrote Jol, the replacement or
enhancement language for JCL. And it's my birthday, so I thought I might
say a word or two.
One of the reasons I wrote Jol was to incorporate PL/I style IF's into
the language. And to generally simply the whole JCL process.
Now,
On Sun, 14 Nov 2021 17:50:21 +, Robert Prins wrote:
>The symbolic parameter is tested against a valid relational-expression
>keyword, and I'm not using some "IF THIS= THEN" expression!
>
>Maybe someone from IBM will chip in to once and for all clarify this,
>update the manual, either way, and
The symbolic parameter is tested against a valid relational-expression
keyword, and I'm not using some "IF THIS= THEN" expression!
Maybe someone from IBM will chip in to once and for all clarify this,
update the manual, either way, and tell us who is wrong...
Robert
On Sun, 14 Nov 2021 at
On Sun, 14 Nov 2021 10:19:12 +, Robert Prins wrote:
>
>> On Sat, 13 Nov 2021 13:54:15 -0600, Robert Prins wrote:
>>> Replying via the website, so no context, apologies
>>>
(The upside of that was it got the timestamp right.)
>>...
>>> //SET LI=4095 (skip link)
>>> //*SET LI=0 (link if
On 2021-11-13 21:05, Paul Gilmartin wrote:
On Sat, 13 Nov 2021 13:54:15 -0600, Robert Prins wrote:
Replying via the website, so no context, apologies
Replying via the website, with context from clicking on the quotation
mark at the upper left of the text composition box, no apologies.
Use
On Sat, 13 Nov 2021 13:54:15 -0600, Robert Prins wrote:
>Replying via the website, so no context, apologies
>
Replying via the website, with context from clicking on the quotation
mark at the upper left of the text composition box, no apologies.
>Use "impossible to match" if-then logic, this is
Replying via the website, so no context, apologies
Use "impossible to match" if-then logic, this is what I use in one particular
job to just compile:
//SET LI=4095 (skip link)
//*SET LI=0 (link if compile is OK)
//*
//IFLINKIF RC <= 4 & RC >= THEN
Robert
--
Robert AH Prins
//SYSPRINT DD SYSOUT=*
> //SYSTSIN DD *,SYMBOLS=JCLONLY
> /*
>
>
> Thanks,
> Kolusu
>
>
> "IBM Mainframe Discussion List" wrote on
> 11/10/2021 05:29:37 AM:
>
> > From: "Colin Paice"
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Date: 11/10
-dmarc-requ...@listserv.ua.edu]
Sent: Thursday, November 11, 2021 1:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: conditional JCL - Reinvent the wheel?
Billy's example explains it very well.
A) "IF" cannot be the first step, thus his IEFBR14 call
B) "IF" only allows num
On Thu, 11 Nov 2021 12:56:21 -0600, Wendell Lovewell wrote:
>Billy's example explains it very well.
>
( that apparently refers to:
// SET RUNTEST1=0 )
>A) "IF" cannot be the first step, thus his IEFBR14 call
>B) "IF" only allows numerics. // IF (="YES") will not work like you
>want,
Billy's example explains it very well.
A) "IF" cannot be the first step, thus his IEFBR14 call
B) "IF" only allows numerics. // IF (="YES") will not work like you
want, but // IF (=1) or // IF (=0) will work. I don't know how
high of a value you can check, but I've used up to 5 (for
On Wed, 10 Nov 2021 12:29:37 +, Colin Paice wrote:
>I'm looking at ways of doing customisation, and want an easy way to
>run/omit steps.
>For example
>ADDUSER ZZZ NAME('COLINS')NOPASSWORD -
> OMVS(AUTOUID ASSIZE(25600) THREADS(512))
>
>being a good person, I also want to
Billy,
great - thank you
I'll get the JCL manual updates, as it does not describe this way of doing
things - I read it as only supporting RC, ABEND etc., not variables
Colin
On Wed, 10 Nov 2021 at 15:59, Billy Ashton wrote:
> Here is a neat little trick I learned from a guy at CA, using SET
Here is a neat little trick I learned from a guy at CA, using SET and
IF. I use this a lot now, and other than needing a dummy step if I am
testing the first step in a job, it works great. I have been able to
nest my IF statements sometimes 3 deep when I have complex processing
that I want to
DD *,SYMBOLS=JCLONLY
/*
Thanks,
Kolusu
"IBM Mainframe Discussion List" wrote on
11/10/2021 05:29:37 AM:
> From: "Colin Paice"
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 11/10/2021 05:31 AM
> Subject: [EXTERNAL] conditional JCL - Reinvent the wheel?
> Sent
Hi Colin,
Add a TSO Step in which a CLIST/Rexx does a "LU Userid", trap the output
and if your program "sees" ICH30001I UNABLE TO LOCATE USER ENTRY, avoid
the DELUSER.
Regards,
David
On 2021-11-10 07:29, Colin Paice wrote:
I'm looking at ways of doing customisation, and want an easy way to
I'm looking at ways of doing customisation, and want an easy way to
run/omit steps.
For example
ADDUSER ZZZ NAME('COLINS')NOPASSWORD -
OMVS(AUTOUID ASSIZE(25600) THREADS(512))
being a good person, I also want to provide a delete step
DELUSER Z.
My fantasy JCL looks like
//
17 matches
Mail list logo