Re: Gratuitous EXECIO Documentation

On Sat, 6 Jun 2020 23:43:57 -0400, Phil Smith III wrote: >Wow, cool. Never noticed that ADDRESS (foo) evaluates FOO, but of course in >retrospect it should. A good day! > ... and it's way hard to put in a formal syntax. Chaotically intuitive. -- gil

Re: Gratuitous EXECIO Documentation

On Sat, 6 Jun 2020 22:16:02 -0400, Phil Smith III wrote: >Gil wrote, in part: > >> ADDRESS >>sometimes not quoted >Um. When would it be quoted? You *can* but you never need to: > >fruit='KIWI' >address value fruit /* Sets the environment to KIWI */ > But that's different from: address value

Re: Gratuitous EXECIO Documentation

Wow, cool. Never noticed that ADDRESS (foo) evaluates FOO, but of course in retrospect it should. A good day! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the

Re: Gratuitous EXECIO Documentation

There really is nothing that needs to be quoted. The requirement is that the various expressions have the correct value, and there is not much practical difference between foo='BAR' baz=value(foo,,env) and baz=value('BAR',,env) WRT ADDRESS, the command is the value of one string

PCRE2 10.35 with LE and Rexx API is available

Hi AllPCRE2 10.35 with LE and Rexx API is available in CBTTAPE.org, file939 Please try the Rexx API which really is simple and smooth and bring Regular Expressions to TSO-Rexx Ze'ev Atlas -- For IBM-MAIN subscribe / signoff /

Re: Gratuitous EXECIO Documentation

Gil is correct. Sometimes you need to quote. Read the *full* description of ADDRESS. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Phil Smith III [li...@akphs.com]

Re: Gratuitous EXECIO Documentation

Gil wrote, in part: > ADDRESS >sometimes not quoted Um. When would it be quoted? You *can* but you never need to: address banana /* Always sets the environment to BANANA */ address 'banana' /* Also sets the environment to BANANA */ fruit='KIWI' address value fruit /* Sets the

Re: COBOL Question

BIT(1) and BINARY are two different things in PL/I. The coercion of bit strings into FIXED BINARY looked good at the time, but I believe that it was a bad decision, as your example shows. OTOH, it's even worse to treat numerical or character data as boolean. -- Shmuel (Seymour J.) Metz

Re: COBOL Question

https://www.cs.sjsu.edu/~mak/CS185C/KnuthStructuredProgrammingGoTo.pdf -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Bob Bridges [robhbrid...@gmail.com] Sent:

Re: COBOL Question

OTOH, REXX does not have an ENDIF, although SELECT does require an END. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Paul Gilmartin

Re: Gratuitous EXECIO Documentation

It doesn't matter whether it's part of REXX or not; the rules for expressions are the same whether the environment is built in or addon. I've been on the other side of this, where the tech writer's prose was much cleaner than mine, but no longer described the product I was building. -- Shmuel

Re: Gratuitous EXECIO Documentation

I'm expect this got added because people, especially non-VMers*, seem to get confused about whether EXECIO is part of Rexx or not, leading to the confusing scenarios others have described. ...phsiii *In VM, EXECIO predates Rexx, so old-timers, at least, don't get confused. And on some

Re: Gratuitous EXECIO Documentation

I like syntax diagrams. On Fri, Jun 5, 2020 at 4:46 PM Charles Mills wrote: > > The documentation is written to aid human beings. It is not a hard-core > exercise in logic. > > In writing doc I am often struck by a contrast to coding. In coding, if you > had to do the same three-line sequence

Re: COBOL Question

[Default] On 6 Jun 2020 12:43:09 -0700, in bit.listserv.ibm-main joemon...@gmail.com (Joe Monk) wrote: >Granted its been awhile since ive done application code, but if you >dont end-if they become a nested condition, which I dont think was the >original intent. A conditional statement in COBOL

Re: SMPe download, unpack, receive

On Sat, 6 Jun 2020 13:53:27 -0500, Bill Giannelli wrote: >This is command I am currently using: > SET BOUNDARY (GLOBAL) . > > RECEIVE > >FROMNETWORK(

Re: COBOL Question

Granted its been awhile since ive done application code, but if you dont end-if they become a nested condition, which I dont think was the original intent. Joe On Sat, Jun 6, 2020 at 1:40 PM Paul Gilmartin < 000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > On Sat, 6 Jun 2020 15:28:57

Re: COBOL Question

https://www.tutorialspoint.com/cprogramming/c_operators.htm for C operators I don't know VBA at all, only some VB. Are you sure about the ! operator being "complement"? https://bytecomb.com/the-bang-exclamation-operator-in-vba/ https://www.tutorialspoint.com/vba/vba_operators.htm Charles

Re: SMPe download, unpack, receive

This is command I am currently using: SET BOUNDARY (GLOBAL) . RECEIVE FROMNETWORK(

Re: COBOL Question

On Sat, 6 Jun 2020 15:28:57 -0300, Clark Morris wrote: >On 6 Jun 2020 10:53:44 -0700, (Bob Bridges) wrote: > >>Oh, you need an END-IF even for a single-statement IF? I forgot; I've been >>thinking in REXX too long. In that case you're close; I guess I really meant > But in Rexx similarly, END

Re: COBOL Question

[Default] On 6 Jun 2020 10:53:44 -0700, in bit.listserv.ibm-main robhbrid...@gmail.com (Bob Bridges) wrote: >Oh, you need an END-IF even for a single-statement IF? I forgot; I've been >thinking in REXX too long. In that case you're close; I guess I really meant In your example the END-IF is

Re: SMPe download, unpack, receive

On Sat, 6 Jun 2020 13:06:07 -0500, Bill Giannelli wrote: >previously I had a SMPe environment that required me to run the download from >IBM (GIMSMP) to mu USS. Then unpack the files from USS. And then run a receive >against those unpacked files. >Now I have a new SMPe environment (new CSI,etc)

SMPe download, unpack, receive

previously I had a SMPe environment that required me to run the download from IBM (GIMSMP) to mu USS. Then unpack the files from USS. And then run a receive against those unpacked files. Now I have a new SMPe environment (new CSI,etc) that was setup by someone else. And when I run the IBM

Re: COBOL Question

Really, a different operator? I didn't know; I bought a C compiler once, a couple decades ago, but then never used it. Now I'm wondering whether VBA has such a distinction and I simply assumed, and never looked for it. I don't think so, but I should remember to look. --- Bob Bridges,

Re: Gratuitous EXECIO Documentation

On Fri, 5 Jun 2020 17:13:58 +, Seymour J Metz wrote: >foo = value('BAR',,baz) > >From: Charles Mills >Sent: Friday, June 5, 2020 12:27 PM > >It is SO counter-intuitive to put the name of a variable in quotes. You would >not code ENQ

Re: COBOL Question

Oh, you need an END-IF even for a single-statement IF? I forgot; I've been thinking in REXX too long. In that case you're close; I guess I really meant PERFORM 1050-LOOP THRU 1050-EXIT VARYING JC FROM 1 BY 1 TO 99 1050-LOOP. IF X > 999 GOTO 1050-EXIT END-IF. IF FIRST-NAME =

RACF Administration the Easy Way using an Open Source ISPF Dialog

A group of us have been working on an open source project to simplify RACF Administration - it is called RACFADM and is available in File 417 at www.cbttape.org (check the updates page for the latest) or on GitHub at https://github.com/lbdyck/racfadm. This has been a

Re: XCF/GRS question

When we were transforming our environment from separate CPUs/LPARs to sysplex, we did so by subdividing existing systems into sysplex members rather than combining systems into sysplexes. Resulting sysplexes were based on traditional workloads. We ended up with one sysplex that only one member.

Re: COBOL Question

The problem would seem to me to stem from having the same operator for Boolean Not and for Bit Complement. Apparently VBA uses ! for both. I believe that in C or C++ if ( ! Result ) would evaluate as you expected: first Result would be evaluated as true or false, then that truth value would be

Re: zSHOP order too large to download

Hi Dejan, THANK YOU!! Now I understand! I thought I was ordering incorrectly because I got 24gig also! I am having difficulty at my site getting that space on our sand box USS. Now the next question for me is, can we get IBM to package this differently so that the "CAE server" is optional?

Re: zSHOP order too large to download

Hi. I ordered Db2 Query Monitor v3.3 a week ago and order is 24 GB large. It was strange to me so I called a colleague from another company and she had the same experience. She checked with IBM and it turns out that there is some CAE server that you can run on z/OS or Windows. If you plan to

Re: COBOL Question

I think what you mean is this: PERFORM 1050-LOOP THRU 1059-EXIT VARYING JC FROM 1 BY 1 UNTIL JC = 99 END-PERFORM 1050-LOOP. IF FIRST-NAME NOT = "ROBERT" GO TO 1059-EXIT END-IF IF TYPE NOT = 195 GO TO 1059-EXIT END-IF IF NOT SO-ON GO TO 1059-EXIT

Re: COBOL Question

Reminds me of a situation I had some years ago while writing a VBA program that used a class (for FTP, I think) that had been written in some flavor of C. I was testing a supposedly Boolean return code and getting unexpected results. I tried several ways, and eventually proved to myself that