Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Wayne Bickerdike
During my early training we were sent to learn Michael Jackson structured programming. MJ quotes Dijkstra a lot, however, I didn't realise that he was a PL/I hater. That was the first language I learned and still think it was a masterpiece. I encountered COBOL after I left IBM and it happened to

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Tony Harminc
On Mon, 27 Mar 2023 at 23:22, David Crayford wrote: > > I think it was flippant Edsger W. Dijkstra quote: > > “The use of COBOL cripples the mind; its teaching should, > therefore, be regarded as a criminal offense.” Dijkstra wasn't hot on a lot of languages: "If Fortran has been called

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Bill Johnson
You said internet banking was going to destroy large banks. How’s that working out? Microfocus COBOL isn’t regular COBOL. And is a tiny fraction of the COBOL market. Sent from Yahoo Mail for iPhone On Monday, March 27, 2023, 11:26 PM, David Crayford wrote: On 27/3/23 22:07, Bill Johnson

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread David Crayford
On 27/3/23 22:07, Bill Johnson wrote: +1 About a year or so ago I posted about the number of lines of COBOL code in use worldwide and stated COBOL was going to be the language of choice for many decades to come. Estimates say 800 billion lines (and growing) in use today. As usual, I was

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread David Crayford
I think it was flippant Edsger W. Dijkstra  quote:     “The use of COBOL cripples the mind; its teaching should, therefore, be regarded as a criminal offense.” I use programming languages that I don't like all the time. C, in particular, I dislike a lot. That doesn't mean they're not useful.

Re: A question or two on zOS issues

2023-03-27 Thread Seymour J Metz
AIF is your friend. That's especially true if you distribute source. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Steve Thompson [ste...@wkyr.net] Sent: Monday,

Re: A question or two on zOS issues

2023-03-27 Thread Seymour J Metz
Remember, the early worm gets the bird. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Schmitt, Michael [michael.schm...@dxc.com] Sent: Monday, March 27, 2023 2:57 PM

Re: [EXTERNAL] Re: Stop the ragging on COBOL please

2023-03-27 Thread Seymour J Metz
What I hate are people who take one of my jobs, modify it, and bomplain about it when their changes don't work' "Which part of as-is don't you understand?" -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List

Re: [EXTERNAL] Re: Stop the ragging on COBOL please

2023-03-27 Thread Seymour J Metz
For that matter, there were a couple of things that EXEC had but EXEC2 didn't. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Pommier, Rex [rpomm...@sfgmembers.com]

Re: Stop the ragging on COBOL please

2023-03-27 Thread Seymour J Metz
Actually, REXX does have nested variables; that's one of the things that you can doo with the VALUE() BIF. There's no such thing as an in REXX. As for turning off substitution of variables, if you want a constant than use a constant, as in SAY 'foo='foo address isredit 'change all' tempdsn1

Re: CLIST but not REXX

2023-03-27 Thread Seymour J Metz
A subcommand environment is certainly important, but it doesn't provide an eauivalent to DATA/DATA PROMPT. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Phil Smith

Re: separate SMPe environments

2023-03-27 Thread Seymour J Metz
I prefer a shared global zone, but that's problematical if you have to rework sysmods. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Bill Giannelli

Re: separate SMPe environments

2023-03-27 Thread Mark Zelden
On Mon, 27 Mar 2023 16:43:46 -0500, Bill Giannelli wrote: >Another stupid SMPe question. >Currently, we have one CSI with one target and one dlib. (I inherited this). I >want to setup at least another target and dlib zones for a "before" >maintenance level. >Might you ever consider creating a

Re: SMPe securing zones

2023-03-27 Thread Mark Jacobs
That's disappointing. It's not being done now, but another good way to handle that problem is to enhance the GIM.* Facility class profiles to include zone support for commands. User can run certain zone altering SMP/e commands against TZONE1, but not TZONE2. Something like that. Mark Jacobs

Re: CLIST but not REXX

2023-03-27 Thread Seymour J Metz
There is a REXX function for parsing;it's either XPARSE or XPROC. Yes, REXX isn't as well integrated with the TSO stack as XLIST is. What happens if you do CHAROUT with no terminating LF or NL? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3

Re: [EXTERNAL] Re: Stop the ragging on COBOL please

2023-03-27 Thread Bob Bridges
Right, I forgot about that. Gotta give you that one. --- Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313 /* I think what happens to toddlers is that they suddenly realize their parents have essentially been lying to them their whole lives. We represent the world as this wonderful place

Re: [EXTERNAL] Re: Stop the ragging on COBOL please

2023-03-27 Thread Pommier, Rex
Which without going into macros is about as close to IF/THEN as you are going to find in assembler, not? And I don't think anybody on here (at least in their right mind) would argue that assembler is not a programming language. :-) -Original Message- From: IBM Mainframe Discussion

Re: CLIST but not REXX

2023-03-27 Thread Phil Smith III
Bob Bridges wrote, in part: >2) The ability to interact live with subsystems. In CLIST I can start an> FTP session and interact with it, grabbing FTP's responses and deciding on> the fly what command to issue next. In REXX I have to queue up an entire> session, then call FTP and decide afterward

Re: Stop the ragging on COBOL please

2023-03-27 Thread Seymour J Metz
Well, I'm a programmer, and I believe that the behavior of uninitialized variables makes pefect sense when using REXX as a CMS scripting language. The things that I would change are: 1. Not matching the operand of an end against the label of a DO. and, no, matching it against the control

Re: [EXTERNAL] separate SMPe environments

2023-03-27 Thread Pommier, Rex
Bill, I've done both and for myself personally, I found it easier to have them completely separate. One reason for this is that I can easily clone my system and SMP/E environment onto a separate set of volumes and play with it. If I completely hork up the install I can just restore the

Re: [EXTERNAL] Re: Stop the ragging on COBOL please

2023-03-27 Thread Mike Schwab
JCL COND is similar to an assembler branch, skip if true. On Mon, Mar 27, 2023 at 5:01 PM Pommier, Rex wrote: > > That's why I said "most basic". :-) And if you want to get pedantic, COND= > logic (as backwards as it started out, everybody remember "if it's true > you're through"?) was a

Re: Stop the ragging on COBOL please

2023-03-27 Thread Phil Smith III
Michael Schmitt wrote, in part: >REXX is so much better but I want to ask Mike Cowlishaw >what he was thinking in making uninitialized variables >default to their own name. While as a programmer I agree with you, I'm pretty sure I know the answer: Rexx was designed to be usable by

Re: [EXTERNAL] Re: Stop the ragging on COBOL please

2023-03-27 Thread Pommier, Rex
That's why I said "most basic". :-) And if you want to get pedantic, COND= logic (as backwards as it started out, everybody remember "if it's true you're through"?) was a REALLY primitive if/then construct. Rex -Original Message- From: IBM Mainframe Discussion List On Behalf Of

CLIST but not REXX

2023-03-27 Thread Bob Bridges
Three things: 1) As Phil says, more-or-less automatic parsing of keyword and positional arguments. I get around that in REXX by using a standard opening paragraph that for most purposes works just fine with a minimum of customization. But mostly I prefer to use one-word arguments without any

Re: [EXTERNAL] Re: Stop the ragging on COBOL please

2023-03-27 Thread Pommier, Rex
It's a scripting language that originally built JCL but apparently has been enhanced to actually "do" JCL functions like dynamically allocating datasets and running jobs. Another poster supplied the following URL. https://jol.oscar-jol.com/ Rex -Original Message- From: IBM Mainframe

Re: [EXTERNAL] Re: Stop the ragging on COBOL please

2023-03-27 Thread Bob Bridges
Ok, I'll ask: What ~is~ JOL? Never heard of it. I'm repeatedly surprised at the number of mainframers who never learned JCL past the ability to modify a job by replacing a DSN or two. Yet somehow they manage to function, sometimes by asking someone else to help fix their JCL. A new

separate SMPe environments

2023-03-27 Thread Bill Giannelli
Another stupid SMPe question. Currently, we have one CSI with one target and one dlib. (I inherited this). I want to setup at least another target and dlib zones for a "before" maintenance level. Might you ever consider creating a whole new csi for that or just as normal have different zones

Re: Stop the ragging on COBOL please

2023-03-27 Thread Schmitt, Michael
CLIST has nested variables, REXX doesn't. And CLIST has keyword style parms, while REXX arguments are strictly positional. And, in REXX you can't turn off first level substitution of when sending commands to ISREDIT, which makes it tricky to do Edit macros, such as "change all to ". But

Re: Stop the ragging on COBOL please

2023-03-27 Thread Bob Bridges
Chiming in here because of the overwhelming popular demand for my unsolicited opinions: I ~mostly~ agree with your definition of "programming language", but I usually add that it has to have at least some primitive sort of if-then construction. JCL didn't use to make the grade, but it does

Re: SMPe securing zones

2023-03-27 Thread Matthew Stitt
I've found that GIMSMP opens the datasets in UPDATE mode, so the user will still need UPDATE or higher access. READ access fails when the program starts. I've growled that GIMSMP needs to open in READ mode, then close/open in the desired UPDATE mode if needed. Matthew On Mon, 27 Mar 2023

Re: Stop the ragging on COBOL please

2023-03-27 Thread Phil Smith III
Steve Thompson wrote, in part: >Oh, I haven't had to deal with it for a while, but as I recall >there is a function that CLIST can do that REXX couldn't (well >back in the 1990s). I wonder if that is still true. Perhaps easily parsing a typical TSO command: verb arg1(value1) arg2(value2a,value2b)

Re: [EXTERNAL] Re: Stop the ragging on COBOL please

2023-03-27 Thread Pommier, Rex
Steve, no, no, no, no. I'm not bashing Rexx or CLISTS or JCL. I'm trying to do just the opposite. Another poster (read:Michael) was (I'm presuming tongue-in-cheek) bashing CLISTs and I came to CLIST's defense by pointing out that it still does what it was intended to do, and it's probably

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Bob Bridges
Oh, calling it out is fine. I was talking only about resenting it, which harms you and does no balancing benefit. You can do the one without the other. Me, I'm more likely to ignore it, or at least to ignore it longer, but that's a personal choice. --- Bob Bridges, robhbrid...@gmail.com,

Re: Stop the ragging on COBOL please

2023-03-27 Thread Steve Thompson
I fine it interesting that a person by the name of Rex is bashing CLIST. Yep And yes, I do write JCL from scratch (answer the next post) because I right now, I'm working on migration code and need examples of certain constructs so I can make sure the migration code handles it correctly.

Re: [EXTERNAL] Re: Stop the ragging on COBOL please

2023-03-27 Thread Pommier, Rex
Sorry, I'm going to "rag" on a language... :-) Admittedly I know next to nothing about it. My exposure to it consists of reading an article where somebody took a 14 line JCL job and converted it to JOL and the JOL code ended up somewhere around 70+ lines plus comments to explain what the

Re: Stop the ragging on COBOL please

2023-03-27 Thread Pommier, Rex
Using my most basic definition of a computer language - it's a list of commands that can be saved to run it multiple times just by invoking the list name, then both JCL and CLIST are languages (as is HTML), and both have redeeming qualities. How many of you (hypothetically) are running JCL

Re: Stop the ragging on COBOL please

2023-03-27 Thread Mike Schwab
https://jol.oscar-jol.com/about-jol JCL On Line On Mon, Mar 27, 2023 at 2:43 PM Farley, Peter <031df298a9da-dmarc-requ...@listserv.ua.edu> wrote: > > Maybe . . .  > -- For IBM-MAIN subscribe / signoff / archive access

Re: Stop the ragging on COBOL please

2023-03-27 Thread zMan
Now we get to argue over whether JCL is a language! (Despite the "L" in the name, I'm 100% sure there are folks who will argue that it is not, just as there are folks who argue that HTML isn't a language. I'm not one of them, don't throw things at me!) On Mon, Mar 27, 2023 at 3:43 PM Farley,

Re: Stop the ragging on COBOL please

2023-03-27 Thread Farley, Peter
Maybe . . .  -Original Message- From: IBM Mainframe Discussion List On Behalf Of Schmitt, Michael Sent: Monday, March 27, 2023 3:36 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Stop the ragging on COBOL please Is it OK to rag on languages with no redeeming qualities? -- This

Re: Stop the ragging on COBOL please

2023-03-27 Thread Schmitt, Michael
Is it OK to rag on languages with no redeeming qualities? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Farley, Peter
In one of those cases we can agree: dumber to provide resentment when that was the OP's intent. Trolls should simply be ignored. "Unintentional" is a different case. Once is no problem - even perhaps a few times. When it becomes more regular or even expected is when it becomes unacceptable,

Re: [EXTERNAL] Re: A question or two on zOS issues

2023-03-27 Thread Pommier, Rex
We did... Had several discussions on TRUNC and various other options in the compiler/runtime. Plenty of heartburn. Rex -Original Message- From: IBM Mainframe Discussion List On Behalf Of Steve Thompson Sent: Monday, March 27, 2023 12:27 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject:

Re: A question or two on zOS issues

2023-03-27 Thread Frank Swarbrick
Sometimes the worm that the early bird gets is diseased. :-) From: IBM Mainframe Discussion List on behalf of Schmitt, Michael Sent: Monday, March 27, 2023 12:57 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: A question or two on zOS issues You're right, and

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Bob Bridges
I definitely get having enough of it, old/cranky/ornery or not. And you'll notice (or maybe you didn't) that I said nothing about ragging on COBOL programmers. There I'm much more inclined to agree with you. While I'm making disclaimers, I don't need much in the way of respect when you're

Re: A question or two on zOS issues

2023-03-27 Thread Schmitt, Michael
You're right, and fortunately we were saved from that pain because we procrastinated so long. And we skipped v5 completely. We procrastinated because it took me a long time to rewrite our load module analyzer, as well as other PDS-dependencies. -Original Message- From: IBM Mainframe

Re: A question or two on zOS issues

2023-03-27 Thread Frank Swarbrick
As long as you use the correct compiler options with COBOL 5+ to replicate those of your pre-5 COBOL you were likely OK. In our shop we did not do this properly (*) and had issues. (*) I believe the main issue was some pre-v5 options were not originally implemented in V5, so there was no

Re: ASM call by value

2023-03-27 Thread Frank Swarbrick
I think you are explaining what, in COBOL terms, is CALL BY CONTENT, not CALL BY VALUE. CALL BY CONTENT seems to be similar (same?) as what Bernd is describing in PL/I with the placement of parentheses around the argument. CALL BY CONTENT (in COBOL) creates a "dummy" variable, copies the

Lebanon fully starts DST on Wednesday.

2023-03-27 Thread Mike Schwab
https://apnews.com/article/lebanon-daylight-saving-time-a85575b650af7fcc419e3fdb1b2090e8 Mostly started Sunday but a last minute delay was issued but mostly not followed. -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all?

Re: setfacl question

2023-03-27 Thread Mark Jacobs
It's interesting you mentioned /tmp. That's what started this entire exercise. We migrated our /tmp filesystem from a ZFS to TFS and ran into a problem with our scheduling product. Turned out that it's documented that the product doesn't support TFS event triggering. So if batch job put a file

Anyone Running / Experienced with ZOS Tectia Product / SFTP Transmissions

2023-03-27 Thread Steve Estle
All, We have Tectia ZOS (https://www.ssh.com/products/mainframe-security-software) product running in our installation and need to setup for allowing public / private key SFTP transmissions related to EDI application / product used internally. Tectia Product manuals while quite verbose do not

Re: A question or two on zOS issues

2023-03-27 Thread Steve Thompson
"And, we're not gaining the full benefit because we can't allow it to use vector packed instructions until all sites where the code can run are on compatible hardware." Welcome to the developer's heart burn. Steve Thompson On 3/27/2023 1:43 PM, Schmitt, Michael wrote: I didn't mention that

Re: setfacl question

2023-03-27 Thread Rick Troth
I'm not sure that's possible. In any case, I don't know specifically how to do it. Best practice on Unix is for /tmp to be set as 'chmod 1777'. That way, anyone can write to /tmp but they can then only delete or rename or move files which they own. But if you then created a sub-directory like

Re: ASM call by value

2023-03-27 Thread Frank Swarbrick
So it looks like all I need is the following: CALL @@GETCB,(3) which should call the @@GETCB function passing integer 3 by value, returning 0 or 1 in R15 to indicate if the task is running in a CICS environment. Will give this a shot. Thanks! Frank From: IBM

Re: A question or two on zOS issues

2023-03-27 Thread Schmitt, Michael
I didn't mention that because I consider it to be self-inflicted. We believed that we were consistently using correct signs, so we changed from NUMPROC(MIG) to (PFD) in 2015. We're STILL running into issues with this, in fact I hit some just last week. But not enough to give up and downgrade

Re: A question or two on zOS issues

2023-03-27 Thread Steve Thompson
Glad to hear that someone followed all the rules so that, unannounced COBOL 5+ didn't cause you packed decimal problems with Truncation and the like. Or same thing with binary. Steve Thompson On 3/27/2023 10:31 AM, Schmitt, Michael wrote: The last time we mass-converted and recompiled our

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Frank Swarbrick
As a COBOL programmer for almost 27 years I agree that COBOL should not be dismissed. Though, as someone who has "studied" 30+ other languages I would say that COBOL is somewhat unique and if it's your first and primary language it may cause hardships when trying to learn other languages. But

Re: DFSORT to count and sum subsets of data

2023-03-27 Thread Sri h Kolusu
Billy, On second thoughts, you don't even need the IFTHEN statement as you can perform the numeric check in the INCLUDE cond itself. //SYSINDD * INCLUDE COND=(19,03,FS,EQ,NUM,AND, 22,01,CH,EQ,C'D') SORT FIELDS=(01,03,CH,A) OUTFIL REMOVECC,NODETAIL,

Re: ASM call by value

2023-03-27 Thread Frank Swarbrick
Oops, "typo". I meant "*k = i + j". From: IBM Mainframe Discussion List on behalf of Steve Smith Sent: Sunday, March 26, 2023 7:34 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ASM call by value My C is rusty... I need to review pointer/address-of syntax. The

Re: DFSORT to count and sum subsets of data

2023-03-27 Thread Sri h Kolusu
>> What I want to do is produce a single line for each Department (cols 1-3), >> that tells me the number of articles (Count of all rows with a numeric value >> in cols 19-21, and an Indicator in col 22 of "D"), and a sum of the Counter >> (cols 102-110, pic 9), with a grand total. It

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Farley, Peter
Bob, Respectfully, I disagree. It isn't a waste of time or energy to be offended by patent insults, however slyly delivered or with whatever level of snigger behind the words. I did not used to support any of the campaigns against "micro-aggressions" so popular in recent years on university

Re: A question or two on zOS issues

2023-03-27 Thread Mike Schwab
There are faster instruction that the older compilers didn't have available, such as relative addressing instead of base register / offset. https://www.ibm.com/products/automatic-binary-optimizer-zos can copy the load module and replace binary instructions with newer instructions for testing and

Re: DFSORT to count and sum subsets of data

2023-03-27 Thread Martin Packer
Hint: A count might be achieved by summing the constant X’0001’ inserted into qualifying rows. (That is if you don’t want to do it in eg OUTFIL.) Cheers, Martin From: IBM Mainframe Discussion List on behalf of Billy Ashton Date: Monday, 27 March 2023 at 16:03 To: IBM-MAIN@LISTSERV.UA.EDU

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Bob Bridges
I've been resisting the temptation, because it's a repeat, but it's still a good one: /* Joke begins */ Jack was a COBOL programmer in the late 1990s who (after years of being treated as a technological dinosaur by all the UNIX programmers, Client/Server programmers, website developers etc)

Re: ASM call by value

2023-03-27 Thread Joel C. Ewing
All you really need to do a "call by value" in ASM is a special Call macro (say maybe VCALL)  that allocates "hidden" space for a copy of the variable value, copies the original variable, and somehow passes that to the called program, and a programming rule that says you only invoke that

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Bob Bridges
Yeah, #3 is the one I keep coming back to. "COBOL? I took a COBOL class in 1975; how can it compete with a modern language like ?" The same thing with mainframes; they're from the 1950s, and should long since have gone to a well-deserved grave. They were great in their day, but... We had this

Re: ASM call by value am

2023-03-27 Thread Seymour J Metz
You are repeating your claim instead of explaining it. I understood, and disagreed with, what you claimed the first few times. What I am asking for is the basis of your claim that when the compiler puts the address of a dummy variable in the plist it is not a call by value. In fact, your

DFSORT to count and sum subsets of data

2023-03-27 Thread Billy Ashton
Hey everyone - happy Monday! I am trying to come up with a single SORT step to give me counts and a sum of a field on subsets of data, and using control breaks. Here is a sample of my input with lines shortened for the email: A01DDATE 001D<< Cols 23 to 101 MISCELLANEOUS DATA >>

Re: A question or two on zOS issues

2023-03-27 Thread Schmitt, Michael
The last time we mass-converted and recompiled our COBOL was from OS/VS COBOL to VS COBOL II in 1992. Since then we've migrated our 7 million lines of COBOL code... - 1998 Language Environment - 2000 COBOL for MVS & VM - 2003 COBOL for OS/390 & VM - 2004 COBOL for z/OS & OS/390 3.2 - 2005 3.3

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Farley, Peter
Apologies - I should have said SNOBOL4, which is what I used at that time, not any earlier SNOBOL version. Peter -Original Message- From: IBM Mainframe Discussion List On Behalf Of Seymour J Metz Sent: Monday, March 27, 2023 8:15 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Stop the

Re: ASM call by value

2023-03-27 Thread Bernd Oppolzer
Counter example: DCL X BIN FIXED (31);    CALL SUB (X); SUB: PROC (P);    DCL P BIN FIXED (31) BYVALUE;    END SUB; This is NOT the same as the example below; a C caller (and: an ASSEMBLER caller) must do VERY DIFFERENT things to call the SUB here and the SUB in the previous example. From

Re: ASM call by value

2023-03-27 Thread Bernd Oppolzer
   DCL X BIN FIXED (31);    CALL SUB ((X)); SUB: PROC (P);    DCL P BIN FIXED (31);    END SUB; The statement CALL SUB ((X)); creates a dummy argument for X (that is, a copy of variable X). The CALL statement passes THE ADDRESS of that copy to the SUB subroutine. This is NOT call by value.

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Bill Johnson
+1 About a year or so ago I posted about the number of lines of COBOL code in use worldwide and stated COBOL was going to be the language of choice for many decades to come. Estimates say 800 billion lines (and growing) in use today. As usual, I was attacked for my fact based opinion. 

Re: ASM call by value

2023-03-27 Thread Seymour J Metz
Why is it important to you that an address not be passed and why do you believe that a PL/I dummy variable means that the argument was not passed by value? Languages specify black box behavior, not how you enforce that behavior. From: IBM Mainframe

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Seymour J Metz
I believe that the problems are: 1. Some people conflate the language and those who use it. 2. Some people believe that those who use the language are interchangeable. 3. Some people think of COBOL as not having changed since CODASYL.

Re: ASM call by value

2023-03-27 Thread Bernd Oppolzer
What is important to me at least: a parameter passing mechanism where addresses are passed and the value on the caller's side cannot be altered (because it has been copied before, like in the DUMMY argument mechanism of PL/1, for example) it NOT call by value. You cannot call a true BYVALUE

Re: SMPe securing zones

2023-03-27 Thread Mark Jacobs
If you have those zones in their own CSI datasets, you can use your security system just to allow READ access. Mark Jacobs Sent from ProtonMail, Swiss-based encrypted email. GPG Public Key - https://api.protonmail.ch/pks/lookup?op=get=markjac...@protonmail.com --- Original Message

Re: SMPe securing zones

2023-03-27 Thread Seymour J Metz
Why not give them read-only access? From: IBM Mainframe Discussion List on behalf of Bill Giannelli Sent: Monday, March 27, 2023 9:46 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: SMPe securing zones I want to create another TARGET and DLIB zone for another

SMPe securing zones

2023-03-27 Thread Bill Giannelli
I want to create another TARGET and DLIB zone for another level of maintenance. I am currently, showing "newbie" offshore folks our SMPe environment. Is there a way to "secure" the newly created TARGET and DLIB zones so they are not inadvertently updated? thanks Bill

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Bob Bridges
Peter! I don't think I've heard from you recently; maybe I just wasn't paying attention until I read this one. I myself dislike COBOL for the very simple and personal reason that it's so WORDY. But even when I had to use it a lot (I was a COBOL developer for about 15 years), I was aware that

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Steve Thompson
+1 for me as well In fact, I have written code to read catalog records, in COBOL, because I needed to solve a problem back in z/OS 1.4 days and I didn't have time to write the code in ALC/HLASM, and management would not purchase tools since they were migrating off mainframes Steve

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread esst...@juno.com
+2 -- Original Message -- From: Tom Brennan To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Stop the ragging on COBOL please [was: RE: ASM call by value] Date: Sun, 26 Mar 2023 23:22:03 -0700 +1 On 3/26/2023 10:55 PM, Farley, Peter wrote: > I am getting increasingly tired of snide or

Re: ASM call by value

2023-03-27 Thread Seymour J Metz
There's more than one implementation; they all enforce the semantics. Again, what call by value is all about is that the caller's variable in not altered, regardless of how the compiler enforces that. The whole shtick with R1 and DSA is not part of the semantics.

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Seymour J Metz
Has anybody used a version older than SNOBOL 4? From: IBM Mainframe Discussion List on behalf of Cameron Conacher <03cfc59146bb-dmarc-requ...@listserv.ua.edu> Sent: Monday, March 27, 2023 8:05 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Stop the

Re: setfacl question

2023-03-27 Thread Mark Jacobs
I want a directory that anyone can write to/read from and for any files or directories created under it also to be world readable/writable by default. Mark Jacobs Sent from ProtonMail, Swiss-based encrypted email. GPG Public Key -

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Cameron Conacher
Good morning Peter, SNOBOL?? Geeze that takes me way back. I had a smile and had to call some old colleagues. Thank you! …….Cameron OOO – March 28, 29, 30 and 31. -Original Message- From: IBM Mainframe Discussion List On Behalf Of Farley, Peter Sent: Monday, March 27, 2023 1:56 AM

Re: setfacl question

2023-03-27 Thread Rick Troth
I started a longer reply, but got stuck in the weeds. Can you describe what you're trying to do? -- R; <>< On 3/27/23 07:10, Mark Jacobs wrote: I’ve never been able to get the setfacl command to do what I’m trying to do. Any assistance would be appreciated. I’m trying to set the default ACL

Re: ASM call by value

2023-03-27 Thread Bernd Oppolzer
Take as an easy example a C function which gets two double parms and builts the sum: double sum (double x, double y) {     return x + y; } there you have register 1 pointing at an address list (which should be called parameter list in this case); the first double is at 0(r1), and the second

setfacl question

2023-03-27 Thread Mark Jacobs
I’ve never been able to get the setfacl command to do what I’m trying to do. Any assistance would be appreciated. I’m trying to set the default ACL for any new files or directories created in /foo/bar to be world readable/writable, in short I’m looking for the permissions set to 666 for those

Re: ASM call by value

2023-03-27 Thread Bernd Oppolzer
Implementation enforces semantics in this case ... The C implementation (on z/OS at least, but IMO on other platforms as well) builts a reg1 parameter list and puts the "value parms" there. With C on z/OS, the reg1 parameter list resides on the "stack", which is addressed by reg 13 in the

Re: ASM call by value

2023-03-27 Thread Seymour J Metz
No. Don't confuse semantics with implementation. Call by value means that the called routine can't change the parameter. Whether the compiler passes the address or not, it will not allow assignments to a call by value parameter. Just be glad that you don't have to deal with call by name.

Re: ASM call by value

2023-03-27 Thread Binyamin Dissen
On Sun, 26 Mar 2023 21:35:13 + Frank Swarbrick wrote: :>Can the MVS CALL macro be used to call a C function with "value" parameters (rather than reference parameters)? What does "call by value" look like? Does the subroutine definition indicate that the parameters are by value? If not,

Re: What time is it in Lebanon?

2023-03-27 Thread Gadi Ben-Avi
Actually, there was no need to change the TZ variable. What we did is issue the command SET TIMEZONE=E.03.00 at 2 am on March 24th. On Sunday (our next regular work day), I changed the CLOCKxx member to reflect the change, in case we decide to IPL at some time in the future. Gadi -Original

Re: What time is it in Lebanon?

2023-03-27 Thread Paul Gilmartin
On Mon, 27 Mar 2023 06:48:49 +, Gadi Ben-Avi wrote: >We changed the time on Friday March 24th at 2 am. > Do you mean you changed the TZ variable on March 24? >-Original Message- >On Mon, 27 Mar 2023 04:49:32 +, Gadi Ben-Avi wrote: > >>When I install a new version of z/OS in

Re: What time is it in Lebanon?

2023-03-27 Thread ITschak Mugzach
Lebanon Time is not a joke. `christians and muslims can't agree on anything, including what time is now. ITschak Mugzach *|** IronSphere Platform* *|* *Information Security Continuous Monitoring for z/OS, x/Linux & IBM I **| z/VM coming soon * On Mon, Mar 27, 2023 at 9:49 AM Gadi Ben-Avi

Re: ASM call by value

2023-03-27 Thread Bernd Oppolzer
I would like to add: if you pass the address of a constant field to the called prog using the CALL macro, this looks like call by value, but in fact you have call by reference again, because you pass an address in the reg1 list. This is what PL/1 for example does, if it builds and passes a

Re: ASM call by value

2023-03-27 Thread Bernd Oppolzer
Sorry ... in some places: replace "caller" by "called prog" ... Am 27.03.2023 um 08:49 schrieb Bernd Oppolzer: Sorry that I post to the original question; that's because most of the answers so far missed the point. Call by value means that a value is passed to the caller; call by reference

Re: ASM call by value

2023-03-27 Thread Bernd Oppolzer
Sorry that I post to the original question; that's because most of the answers so far missed the point. Call by value means that a value is passed to the caller; call by reference means that a reference (technically: an address) is passed to the caller. In ASSEMBLER:    CALL

Re: What time is it in Lebanon?

2023-03-27 Thread Gadi Ben-Avi
We changed the time on Friday March 24th at 2 am. -Original Message- From: IBM Mainframe Discussion List On Behalf Of Paul Gilmartin Sent: יום ב 27 מרץ 2023 09:44 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: What time is it in Lebanon? On Mon, 27 Mar 2023 04:49:32 +, Gadi Ben-Avi

Re: What time is it in Lebanon?

2023-03-27 Thread Paul Gilmartin
On Mon, 27 Mar 2023 04:49:32 +, Gadi Ben-Avi wrote: >When I install a new version of z/OS in Israel I set the time zone in >SYS1.PARMLIB(CLOCKxx) and in /etc/profile. I set TZ to IST-2IDT. > On what date this year does that change the offset from IST to IDT? By experiment on MacOS, I see

Re: Stop the ragging on COBOL please [was: RE: ASM call by value]

2023-03-27 Thread Tom Brennan
+1 On 3/26/2023 10:55 PM, Farley, Peter wrote: I am getting increasingly tired of snide or outright dismissive references to COBOL and by extension to COBOL programmers. Programmers like me. Yes, I am also well versed in HLASM, Rexx, awk and gawk, somewhat facile in SORT (at least as far as

  1   2   >