OK. Let me change the requirements again ;) How about also handling
single quotes for a fully qualified data set.
Simple to do with a regex. Not so simple using REXX.
Syntax:
INDSN(DSNAME(MEMBER))
INDSN(DSNAME)
INDSN('HLQ.DSNAME(MEMBER)')
INDSN('HLQ.DSNAME')
On
Surprising? After the gross negligence and stonewalling on the 737 max?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Mike Schwab [mike.a.sch...@gmail.com]
Sent:
You can also use UNTIL to simulate an IF block from which you can LEAVE.
Otherwise it's difficult, or at least a little complicated. Like this:
/* hard way */
if condition1 then do
if \subcondition2 then do
v1=calculation(a,b)
v2=calculation(c,d)
if v15 then do
??
4 *-* myVar = 'word1 word2 9.12 word3.ext'
>>> "word1 word2 9.12 word3.ext"
5 *-* Parse Value myVar with . . . myVal2 '.' .
>>> "word1 word2 9.12 word3.ext"
>.> "word1"
>.> "word2"
Of course, I meant to say that perl is a "write only" language. Lua
certainly doesn't suffer from the same disease. It's syntax is concise.
In fact, it was first designed as a configuration language which is my
favorite way to use it. CONFIG DD is a lua script which I load and
process in the
https://www.orlandosentinel.com/space/os-bz-boeing-safety-commercial-crew-20200226-bgvthodnjzgmlc36hsxcaopahu-story.html
Boeing didn’t perform full end-to-end test of its astronaut capsule
before troubled mission, ‘surprising’ NASA safety panel.
Critically, the panel learned early this month
I love the ITERATE statement, to the extent that I've insisted on its
availability in other languages. In VBA, for instance, like this:
For each oxct in xcts
If Not Exists(Collection, xct.Key) Then Goto IterateXct
...blah, blah, blah...
IterateXct:
Next oxct
Very handy
On Mon, Feb 24, 2020 at 09:30:19PM +, Wayne Driscoll wrote:
> To be fair, while the PL/X source is retained in comments to the
> assembler, those macros are generated in way that allows them to be used
> in both assemblies and PL/X compiles.
Is it really true that *all* the PL/X source is
On Fri, 28 Feb 2020 10:39:46 +0800, David Crayford wrote:
>
>David Pitts ported gawk to z/OS years ago. If you've got a C compiler
>you can easily build it yourself.
>
I brushed up against one of David Pitts's ports (gcc, IIRC) several years
ago. My impression is that David is oriented to
I think most people spell that without any spaces at all, ie "i.e.". Also
"e.g.". Me, I eschew periods in abbreviations that are common enough; "ie",
"eg", "Mr", "Dr", "JRR Tolkein" and so on. I add them to my dictionary so
spell-check doesn't get annoyed. (Spell-check always believes me,
My impression is that each group decides on its own what compiler options to
use.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Michael Stein [m...@zlvfc.com]
Sent:
Yes, but does it have the depth of coverage of CPAN?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Pew, Curtis G [curtis@austin.utexas.edu]
Sent: Thursday,
On 2020-02-28 4:13 AM, Farley, Peter x23353 wrote:
Given IBM's long and steadfast reluctance to break compatibility with whatever
they implement in software the first time around it may never happen that it
changes either.
And maybe Rocket will someday get a z/OS version of gawk out the door.
On 2020-02-28 4:13 AM, Farley, Peter x23353 wrote:
Given IBM's long and steadfast reluctance to break compatibility with whatever
they implement in software the first time around it may never happen that it
changes either.
And maybe Rocket will someday get a z/OS version of gawk out the door.
*JRR Tolkien
On 2020-02-27 22:43, Bob Bridges wrote:
I think most people spell that without any spaces at all, ie "i.e.". Also "e.g.". Me, I eschew periods in abbreviations that
are common enough; "ie", "eg", "Mr", "Dr", "JRR Tolkein" and so on. I add them to my dictionary so
spell-check
Vs e e cummings.
https://cummingsatsilverlake.files.wordpress.com/2015/06/cummingscartoon.jpg
On Thu, Feb 27, 2020 at 9:55 PM David Spiegel wrote:
>
> *JRR Tolkien
>
>
>
> On 2020-02-27 22:43, Bob Bridges wrote:
> > I think most people spell that without any spaces at all, ie "i.e.". Also
>
David patched the gawk regex for EBCDIC. That's pretty much all that was
required to get gawk running on z/OS as it's very portable.
From what I've seen of David's work he's a very good engineer.
On 2020-02-28 10:51 AM, Paul Gilmartin wrote:
On Fri, 28 Feb 2020 10:39:46 +0800, David Crayford
It's considered "old" because it's how people were taught to type on
typewriters, so the theory is "If you do this, you learned back when people
learned on typewriters, which makes you old". In any case, it's not
considered standard any more: style guides eschew it.
On Thu, Feb 27, 2020 at 10:44
Not surprising. The radio problems are really suspicious. I mean,
didn't they mount one on a plane and try to call the ground? You
should be able to get about 100 km 62 miles before 40,000 ft goes over
the horizon.
On Thu, Feb 27, 2020 at 9:04 PM Seymour J Metz wrote:
>
> Surprising? After
As a Yorkshireman, two spaces is a waste of paper :)
Then there's the tale of the Scotsman and the pins in an early stock
control system.
On Fri, Feb 28, 2020 at 4:01 PM zMan wrote:
> It's considered "old" because it's how people were taught to type on
> typewriters, so the theory is "If you
I consider simple to be a single line regular expression which can
handle the parsing grammar in one hit. Now, that may not to simple to
most mainframe old timers
but it's a walk in the park for young guys.
Like I said I have a RE package on github that can do this stuff in REXX
but I don't
Is this one of the PTF's? I recall this PTF. The PTF updates the CEEMKDIR
to then run against your service directories to add. There should be a hold
action. Maybe this PTF was applied some time earlier, and no one noticed the
hold action then?
APAR Identifier .. PH07107 Last
On Thu, Feb 27, 2020 at 8:59 AM David Crayford wrote:
> You are being pedantic, but that's ok.
>
> I have found (from my co-workers especially) that most mainframe people
> of a certain vintage are not willing to learn new stuff.
> So regular expressions are off the menu when they can write
I am reading the Using Data Sets manual for z/OS 2.2 (DFSMS stuff).
Has anyone attempted to use the version feature of PDSE?
I'd love to hear about your experiences before I even think about
suggesting this for a current client of mine.
What they want is a replacement of a librarian product
You are being pedantic, but that's ok.
I have found (from my co-workers especially) that most mainframe people
of a certain vintage are not willing to learn new stuff.
So regular expressions are off the menu when they can write logic to do
the same thing using their language of choice.
Of
Hey David,
What do you mean by simple ? Less stmts ?
On Thu, Feb 27, 2020 at 8:50 AM Seymour J Metz wrote:
> As an alternative to regexen, there is a package called PROC that does the
> subset of IKJPARSE needed for CLIST style parameters. There may be other
> such tools out there; if I knew
> but I don't expect anybody on this forum to bother downloading it
> because writing logic is preferable to learning something new ;)
1. This is a listserv mailing list, not a forum
2. I am far from the only reader of this list to enjoy new things,
and in particular I am far from being
UHG?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
John McKown [john.archie.mck...@gmail.com]
Sent: Thursday, February 27, 2020 10:06 AM
To: IBM-MAIN@LISTSERV.UA.EDU
As an alternative to regexen, there is a package called PROC that does the
subset of IKJPARSE needed for CLIST style parameters. There may be other such
tools out there; if I knew of a decent search engine ...
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
Disclaimer here: I work for Rocket Software who offer lot of ported
tools for free. My opinions are my own!
REXX is great but it doesn't scale for writing large software solutions.
It doesn't have modules, variable scoping and all those things
we expect from modern languages. it's pervasive
> You are being pedantic, but that's ok.
When I was at NSF there was a van with the license number PEDANT. I had lust in
my heart for that plate,
> I have found (from my co-workers especially) that most mainframe people
> of a certain vintage are not willing to learn new stuff.
My experience
I'm unfortunately at this SHARE only in spirit.
I'm sure enough that no official PDFs of these manuals exist that I
didn't see a need to pipe up earlier (others have provided what I
believe are all the best references), but I can try digging further and
report back if I find anything.
Note
On Thu, Feb 27, 2020 at 9:31 AM Seymour J Metz wrote:
> UHG?
>
Sorry - the corporation that owns the company that I work for --
UnitedHealth Group. The largest multinational health insurer. They have the
to do whatever it takes to force the mainframe to disappear -- to
which they are
Don't confuse logic with habit; there is nothing illogical about regexen. Yes,
the syntax is clumsy and not nearly as readable as patterns in, e.g., SNOBOL,
but there's nothing magic about them, I could teach a bright elementary school
student to write simple regexen, although probably not to
Lionel:
So it is the nightmare I thought.
I will be looking at your website and tool very shortly.
Thank you muchly.
Steve Thompson
On 2/27/20 10:54 AM, Lionel B Dyck wrote:
PDSE member generations are a nice idea that doesn't really work in the
production world. I say that because the
On Thu, 27 Feb 2020 19:07:37 +0800, David Crayford wrote:
>OK. Let me change the requirements again ;) How about also handling
>single quotes for a fully qualified data set.
>
>Simple to do with a regex. Not so simple using REXX.
>
>Syntax:
>
> INDSN(DSNAME(MEMBER))
> INDSN(DSNAME)
>
Too bad IBM hasn't upgraded to oorexx. I'm a REXX bigot, but I find myself
using Perl because CPAN and regexen make it more suitable than REXX for the
task at hand.
Why Lua, as opposed to, e.g., Perl, Python, Ruby, Rust?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
I'm confused by this whole thread. I'm surprised at the behavior of the
program, I'm baffled why Shmuel would ask why Thomas is surprised, and I
don't understand what Thomas means by saying "it is the definition of a
blank delimited word" that escaped him.
The obvious behavior of the parse
Ah, I withdraw my confusion; IBM needed to emphasize the word "first" more than
they did, perhaps, but Gil's explanation finally got through to me. It's
something I may be able to keep in mind in the future. Or maybe not. But:
myVar = 'word1 word2 9.12 word3.ext'
Parse Var myVar . . .
Alter Kocker. The Eglish equivalent would be OF, where O is Old.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
David Spiegel [dspiegel...@hotmail.com]
Sent: Thursday,
The quotes were OK, the space between translate and the left paren was not.
Fixing that
parm="INDSN('HLQ.DSNAME(MEMBER)')"
Parse Value Translate(parm,"","'")' ' With fill1 '(' val ') ' fill2;say
'fill1='fill1 'val='val 'fill2='fill2
gives me
fill1=INDSN val= HLQ.DSNAME(MEMBER
The problem that I have is not viewing the manuals myself, but rather providing
links in Wikipedia articles that readers can clcik on to view the manuals
without installing any additional software; I am assuming that they already
have a PDF viewer, but not, e.g., BookManager READ.
--
Shmuel
On Thu, Feb 27, 2020 at 9:47 AM Tony Thigpen wrote:
> Now, that is a bunch of BS.
>
> Old timers do want to learn new things, but...
>
> Our minds have been trained over many years to use logic paths that are
> built on 'logic'. Some of the newer tools being used conflict with those
> ingrained
R'Shmuel,
You may have to explain what "AK" means.
I'm not sure that everyone is familiar with this.
Regards,
David
On 2020-02-27 10:46, Seymour J Metz wrote:
You are being pedantic, but that's ok.
When I was at NSF there was a van with the license number PEDANT. I had lust in
my heart for
On Feb 27, 2020, at 10:13 AM, Seymour J Metz wrote:
>
> Don't confuse logic with habit; there is nothing illogical about regexen.
> Yes, the syntax is clumsy and not nearly as readable as patterns in, e.g.,
> SNOBOL, but there's nothing magic about them, I could teach a bright
> elementary
I never said "old programmers". That would be self defeating as I "am"
an old programmer. My point was that experienced z/OS guys don't want to
learn new stuff. And I stand by that because it's true!
On 2020-02-28 12:24 AM, Tony Thigpen wrote:You
The late father-in-law to my wife's sister
Why Lua? Because it can run in TSO/ISPF/CICS which the others cannot.
Rocket has a decent port of Python which runs well in USS and has a
massive runtime library. It nukes Perl!
Perl sucks! t'it a read only language!
Rust hasn't been ported to z/OS. It's the best modern systems
programming
Well, if you're looking for snarky quotes try "EMACS is a wonderful operating
system; all that it needs is a good editor."
While I don't like Perl, I use it by choice when it is the best tool for the
jobs. I've certainly seen a lot of poorly written regexen, but I don't recall
ever seeing Perl
Anybody over 40! We are are old and there is no point in denying it!
On 2020-02-28 1:08 AM, Seymour J Metz wrote:
Then what did you mean by "of a certain vintage"?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion
Now, that is a bunch of BS.
Old timers do want to learn new things, but...
Our minds have been trained over many years to use logic paths that are
built on 'logic'. Some of the newer tools being used conflict with those
ingrained thought processes because they are designed contrary to how we
PDSE member generations are a nice idea that doesn't really work in the
production world. I say that because the member generations are not exposed
outside of tools that have been written to specifically access them. You can't
use member generations in JCL, dynamic allocation, OMVS services,
haha! It's not BS, it's true!
I'm an old timer! 30+ years on mainframes and still going. But I still
want to use new stuff as it's orders of magnitude better than we use in
our old toolsets.
On 2020-02-27 11:46 PM, Tony Thigpen wrote:
Now, that is a bunch of BS.
Old timers do want to learn
The late father-in-law to my wife's sister worked for NASA in Huntsville
on the Saturn 5 rocket motors. Joe used to tell a lot of stories about
what working on the moon program in the '60s was like.
When Challenger blew up, he was brought out of retirement to be on a
panel discussing
I would never call APL intuitive, because of all the symbols you have to learn,
but IMHO it is well integrated and has some poweful mechanisms. If it only had
more modern control structures and name spaces.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
Then what did you mean by "of a certain vintage"?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
David Crayford [dcrayf...@gmail.com]
Sent: Thursday, February 27, 2020
On Thu, 27 Feb 2020 10:29:08 -0600, Dale R. Smith
wrote:
>On Thu, 27 Feb 2020 19:07:37 +0800, David Crayford wrote:
>
>>OK. Let me change the requirements again ;) How about also handling
>>single quotes for a fully qualified data set.
>>
>>Simple to do with a regex. Not so simple using REXX.
Do you take bets on how up to date the documentation is?
On Thu, Feb 27, 2020 at 7:52 AM, Susan Shumway wrote:
> I'm unfortunately at this SHARE only in spirit.
>
> I'm sure enough that no official PDFs of these manuals exist that I
> didn't see a need to pipe up earlier (others have provided
Member generations are not a nightmare. They're not as well-integrated as
they should be. But that's been the story on PDSE from the get-go.
The built-in ISPF support is usable, once you train yourself on it. It
could be better, and PDSEGEN goes a long way towards making it a lot
better. I do
Sorry David, but I must disagree with your blanket opinion that "...
experienced z/OS guys don't want to learn new stuff".
I would say rather that "... SOME experienced z/OS guys don't want to learn new
stuff". I am not one of those, and I have more than several colleagues at work
who like me
Yes, I am fully aware that z/OS awk is not among the "blessed" utilities that
officially support MVS dataset names. I'm guessing that the underlying awk
implementation is fortuitously using fopen() rather than open(). As long as it
works I'll continue to use it.
If it ever fails I will use
On Feb 27, 2020, at 11:48 AM, Seymour J Metz wrote:
>
> Perl is ugly, but the only thing that I might call read only is the regex
> syntax, and Lua seems tom suffer from the same disease. The obvious advantage
> of Perl is the massive collection of packages in CPAN; if I had an equivalrnt
>
Thanks for another reminder I'm "really old" :-). The rule, btw, is two
spaces at the end of a sentence. And I think it makes at least as much
sense for proportional fonts as mono. You can (and I do) have Word check
to make sure they're always there...
sas
...
>
>
> P.S. I've heard that you
On Thu, 27 Feb 2020 15:48:44 -0500, Steve Smith wrote:
>Thanks for another reminder I'm "really old" :-). The rule, btw, is two
>spaces at the end of a sentence. And I think it makes at least as much
>sense for proportional fonts as mono. You can (and I do) have Word check
>to make sure
For DCF and DLF, the product literally hasn't changed in decades, so sure.
> -Original Message-
> From: IBM Mainframe Discussion List On
> Behalf Of Adam Jacobvitz
> Sent: Thursday, February 27, 2020 9:33 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: URL for DCF manuals
>
> Do you
There are many RFE's for PDSE member generation support and IBM has accepted
most of them.
Lionel B. Dyck <
Website: http://www.lbdsoftware.com
"Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are." - John Wooden
On Thu, 27 Feb 2020 17:31:24 +, Farley, Pe
>
>For the record I am personally very comfortable with regexen and use them all
>the time in awk scripts for work (yes, in both z/OS Unix and z/OS JCL) ...
>
???
In which z/OS release did JCL gain support for regexen? I've long
wished for even the
There seems to be a maddening tendency for people to write "JCL" when they mean
"batch". Even when you telnet to a Unix shell, there's JCL under the covers.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List
Agenda and link for registration available here:
https://www.gse.org.uk/?post_type=event=1182
Thanks
--
Best regards,
Anna Shugol
IBM Z and LinuxONE Client Technical Specialist
mailto:anna.shu...@ibm.com
+44 7392 199851
@anka_shugol
Unless stated otherwise above:
IBM United Kingdom Limited -
Two recent examples from my employer's z/OS V2.2 system (sanitized):
//AWKSPLIT EXEC PGM=BPXBATCH,MEMLIMIT=256M
//STDENV DD *
SCRIPT=TSOUSER.TEST.EXEC(AWKSPLIT)
INPUT=TSOUSER.TEST.CSV
//STDPARM DD *
SH echo awk
It's a matter of operator precedence; the '.' breaks the string into two
substrings and applies subpatterns to each; your
Parse Value myVar with . . . myVal2 '.' .
is equivalent to
Parse Value myVar with left '.' right
Parse Var left . . . myVal2
Parse Var right .
--
Perl is ugly, but the only thing that I might call read only is the regex
syntax, and Lua seems tom suffer from the same disease. The obvious advantage
of Perl is the massive collection of packages in CPAN; if I had an equivalrnt
for a more modern language then I might be tempted to switch.
That's better, but it still yields the same result for qualified and
unqualified names.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Dale R. Smith
On Thu, Feb 27, 2020 at 9:17 AM Steve Thompson wrote:
> A.B.C.GVnn(member) in order to access the "archived" member.
Each generation is a completely different PDS member and only contains
the members written to this PDS. Our shop did use them.
--
Mike A Schwab, Springfield IL USA
Where
Nice examples! But you might be missing
//STDENV DD *
_BPX_SHAREAS=MUST
If you are using the DDs allocated in the job.
Regards,
Leo
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Farley, Peter x23353
Sent: Thursday, February 27, 2020 1:25 PM
To:
On Thu, 27 Feb 2020 17:30:03 +, Seymour J Metz wrote:
>The quotes were OK, the space between translate and the left paren was not.
>Fixing that
>
>parm="INDSN('HLQ.DSNAME(MEMBER)')"
>Parse Value Translate(parm,"","'")' ' With fill1 '(' val ') ' fill2;say
> 'fill1='fill1 'val='val
> “Some people, when confronted with a problem, think "I know, I'll use
regular expressions." Now they have two problems.”
Funny! And this is quite a thread I'm skimming over. I'm not totally
sure if it's about old programmers who won't/can't change, or regular
expressions. But I'll add my
Very true, good catch. The STDENV DD with that parameter set was actually in
the second example that I gave but I missed copying it to the email.
Peter
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Leonardo Vaz
Sent: Thursday, February 27, 2020 1:46 PM
To:
On Thu, 27 Feb 2020 21:58:29 +, Gibney, Dave wrote:
>I left out the bit where the addition was conditional.
>I suppose using the while or until is actually more understandable anyway.
>
UNTIL has the minor simplification over WHILE in that it's not evaluated
until the end, so its variables
On further contemplation, I also wanted to use iterate, so I surrounded the
whole thing with
i = 1
do forever
do i = i to stem.0
/* Processing with conditional additions and iterates */
end
if i > stem.0 leave
end
> -Original Message-
> From: IBM Mainframe Discussion List On
>
Single space after a period if not end of sentence. I. E. abbreviations.
On Thu, Feb 27, 2020 at 2:59 PM Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Thu, 27 Feb 2020 15:48:44 -0500, Steve Smith wrote:
>
> >Thanks for another reminder I'm "really old" :-). The
(ROFLOL) I resemble that remark! Two spaces after every period that ends a
sentence was the ironclad rule they taught us in high school typing class on
those old manual typewriters, and it still makes sense today!
Two spaces after periods makes paragraphs typed in the monospace fonts (yay for
I've got a Dolly-Parton quote somewhere around here saying "I'm not offended by
all the dumb-blond jokes because I know I'm not dumband also I know I'm not
blond". I was kind of ignoring the subthread about mainframers not wanting to
learn new things, because I know it doesn't apply to me.
On Thu, 27 Feb 2020 18:25:03 +, Farley, Peter x23353 wrote:
>... examples from my employer's z/OS V2.2 system (sanitized):
>
>//AWKSPLIT EXEC PGM=BPXBATCH,MEMLIMIT2256M
>//STDENV DD *
>SCRIPT=TSOUSER.TEST.EXEC(AWKSPLIT)
>INPUT=TSOUSER.TEST.CSV
This may be a little bit off topic, but ...
some years ago my customer asked me to do a similar project;
they had (and still have) a home grown software development tool, based
on ISPF services,
written in PL/1 and REXX, which used CA-LIBRARIAN as archiving system.
It supported all the
We have defined SERVAUTH profiles EZB.NETACCESS.x.x.x and made the appropriate
entries in SYS1.TCPPARMS (PROFILE) NETACCESS. (Our client requires that we
follow the DISA STIG which requires these profiles to be setup.)
Everything was working as designed until...
One of our employees was
I would type two spaces after a period, except that software handles it for me.
Is there any reason to follow the rule when typing, e.g., text with LaTeX
markup?
No, If you're talking about comments in code, then call me an AK.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
Unlock the userid and reset the password.
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
William Boyer
Sent: Thursday, February 27, 2020 1:06 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SERVAUTH (RACF CLASS) profile causing a looping CPU
[CAUTION: This Email is from
I wish to process a basic stem variable with stem.0 containing the occurrences,
do I = 1 to stem.0
/* but, inside here, I wish to add additional occurrences */
a = stem.0 + 1
stem.a = 'New item'
stem.0 = a
end
It appears that the do start and stop are evaluated and fixed at the beginning
By definition:
"They are evaluated only one time, before the loop begins and before the
control variable is set to its initial value."
Use WHILE or UNTIL
On Thu, 27 Feb 2020 21:14:49 + "Gibney, Dave" wrote:
:>I wish to process a basic stem variable with stem.0 containing the
Going back to the original post, as I'm not sure we are all talking about
the same thing. Your example dsname would be for a PDSE GDG, not PDSE
member generations (which are not accessible with JCL at all). And you're
basically correct, as JCL doesn't (yet?) support both a relative gen and a
I think thats true. You should be able to code
do while i <= stem.0
to do what you want. You will have to set initial value for i and increment it
in your loop.
Dana
On Thu, 27 Feb 2020 21:14:49 +, Gibney, Dave wrote:
>
>It appears that the do start and stop are evaluated and fixed at
Dave, you are correct that stem.0 is resolved at the start. If you think
about it, if it were dynamic, then your code would be a never-ending
loop.
The key here is to know how many items you want to add, and where in the
stem list you want to add them. Give us a little more detail, and we can
Yup. Page 53 of z/OS V2R1.0 TSO/E REXX Reference. I see it now.
> -Original Message-
> From: IBM Mainframe Discussion List On
> Behalf Of Binyamin Dissen
> Sent: Thursday, February 27, 2020 1:51 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: New Rexx Question
>
> By definition:
>
>
I left out the bit where the addition was conditional.
I suppose using the while or until is actually more understandable anyway.
> -Original Message-
> From: IBM Mainframe Discussion List On
> Behalf Of Billy Ashton
> Sent: Thursday, February 27, 2020 1:52 PM
> To:
94 matches
Mail list logo