UA.EDU
Subject: Re: list Unix domain sockets
zlsof
https://www.ibm.com/docs/en/zos/2.4.0?topic=scd-zlsof-display-information-about-open-files-sockets-pipes
> On 17 Apr 2024, at 06:42, Frank Swarbrick wrote:
>
> Is it possible to list Unix domain sockets? I don't see any netstat opt
16, 2024 at 10:42:01PM +, Frank Swarbrick wrote:
> Is it possible to list Unix domain sockets? I don't see any netstat
> option to do so.
$ find / -type s
-Alex
--
For IBM-MAIN subscribe / signoff / archive
Is it possible to list Unix domain sockets? I don't see any netstat option to
do so.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
https://www.ibm.com/docs/en/zos/3.1.0?topic=errnojrs-description-location-information
https://www.ibm.com/docs/en/zos/3.1.0?topic=errnojrs-zos-unix-reason-codes
For this one, the part means JrOK, see return code (no additional
information).
You can also use the bpxmtext program, which is
I have a curious question about MFA on z/OS. Does each login require a
different token? Meaning, if I log on to TSO and to CICS, can I use the same
token? I ask because I log on and off to various CICS regions throughout the
day, and I'd hate to have to get a new token for each login. (We
he XL/C compiler is included in the z/OS license. XL/C++ I am not
sure about.
Your shop may never have used it, but I believe it is there. Check with your
z/OS sysprog.
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Frank Swarbrick
Sent: Wednesday, February 21, 2024 8:04
And if you had z/OS XL C, how would you bind this? I mean, is this one of those
things where you're binding against a path on the OEMVS side?
-Original Message-
From: IBM Mainframe Discussion List
mailto:IBM-MAIN@LISTSERV.UA.EDU>> On Behalf Of Frank
Swarbrick
Sent: Tuesday, F
a path on the OEMVS side?
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Frank Swarbrick
Sent: Tuesday, February 20, 2024 12:01 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Nanosecond resolution timestamps for HLL's?
Try this.
process pgmname(longmixed) nodynam
B library is needed to get those C runtime stubs linked
into a COBOL calling program? CEE.SCEELKED or others? Do we need to use one of
those crazy-looking “side deck” thingamabobs?
Peter
From: IBM Mainframe Discussion List On Behalf Of
Frank Swarbrick
Sent: Tuesday, February 20, 2024 12:55
Peter
From: IBM Mainframe Discussion List On Behalf Of
Frank Swarbrick
Sent: Tuesday, February 20, 2024 1:01 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Nanosecond resolution timestamps for HLL's?
Try this.
process pgmname(longmixed) nodynam
id division.
Try this.
process pgmname(longmixed) nodynam
id division.
program-id. 'cgettime_test'.
data division.
working-storage section.
01 errno-ref pointer.
01 strerror-refpointer.
01 len
and stick with the standards. Avoid shiny things and
feechers which cause konfoozhun.
-- R; <><
On 2/16/24 15:48, Michael Babcock wrote:
> According to the man page for netstat, it’s a synonym for onetstat.
> Issuing netstat in bash 5.2 says command not found. It may be a moot
>
Friday, February 16, 2024 1:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: zsh for z/OS
I can also cd into the bin directory and issue ./netstat and it works.
On Fri, Feb 16, 2024 at 2:33 PM Frank Swarbrick
wrote:
> Here's a bit of an off the wall question/request.
>
> Do both 'netstat
behalf of Ed
Jaffe <05acc3c79bf7-dmarc-requ...@listserv.ua.edu>
Sent: Friday, February 16, 2024 12:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: zsh for z/OS
On 2/16/2024 11:33 AM, Frank Swarbrick wrote:
> z/OS 3.1 added the Z Shell, zsh. Is anyone using it? How do you li
z/OS 3.1 added the Z Shell, zsh. Is anyone using it? How do you like it.
What interesting features does it have over bash?
I'm only at 2.5, so can't use it.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
I have git installed, but we don't make any real use of it at this point.
I don't have access to github because our mainframe has no internet access. Do
other shops mainframes have internet access?
From: IBM Mainframe Discussion List on behalf of
Lionel B. Dyck
gt; “Worry more about your character than your reputation. Character is
> > what you are, reputation merely what others think you are.” - - -
> > John Wooden
> >
> > -Original Message-
> > From: IBM Mainframe Discussion listibm-m...@listserv.ua.edu On
> > Behal
So here's a curious question. Are IBM Open Enterprise SDK for Python and the
Python from Rocket Software basically the same, or no?
Frank
From: IBM Mainframe Discussion List on behalf of
Peter Sylvester
Sent: Tuesday, February 6, 2024 11:15 PM
To:
gt;
> PP 5655-EC6 IBM Enterprise COBOL for z/OS 6.4.0 P230615
>
> I will wait for the latest level to be applied and try again then.
>
> Do you happen to have a link to the APAR description? I presume there is a
> coordinated documentation update as well.
>
> Peter
If only I had superuser access!
Frank
From: IBM Mainframe Discussion List on behalf of
Lionel B. Dyck
Sent: Friday, February 2, 2024 1:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SDSF PS Command column
You will need to issue the `ps -ef` command while
I tried D OMVS,A=ALL and it (CMD) is also truncated at 40.
oh well!
From: IBM Mainframe Discussion List on behalf of Jon
Perryman
Sent: Friday, February 2, 2024 1:53 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SDSF PS Command column
On Fri, 2 Feb 2024
iscord.gg/system-z-enthusiasts-880322471608344597
“Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are.” - - - John Wooden
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Frank Swarbrick
Sen
iday, February 2, 2024 12:34 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SDSF PS Command column
Hi,
If you type "/", a panel will pop up with more space to type commands
Best Regards
Ituriel do Nascimento Neto
z/OS System Programmer
Em sexta-feira, 2 de fevereiro de 2024 às 16:
What fix level are you at? October 2023's PTF closes APAR PH57397, which adds
"function prototypes". I think you would have the appropraite prototype
defined before the program/function where it is used. Best done with a COPY
statement.
Prior to this fix level I think your results are
I tried this once for a single class in our dev region and it screwed up some
jobs that depend on DELAY for sequencing.
Of course something could be done about that, but I didn't feel like dealing
with it at the time.
From: IBM Mainframe Discussion List on
Is there any way to get more than the first 40 characters of the associated
command line for a job in the PS screen?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with
Yeah, I need a ssh-proxyh, I think!
From: IBM Mainframe Discussion List on behalf of
Grant Taylor <023065957af1-dmarc-requ...@listserv.ua.edu>
Sent: Friday, January 12, 2024 9:42 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: netcat for z/OS?
On 1/12/24 10:02
Is there a netcat or netcat-like tool for z/OS? Something that can connect to
an HTTP proxy?
The goal is to tunnel an SSH session through an HTTPS proxy. For example, this
works on Linux:
ssh -o "ProxyCommand nc -X connect -x myproxy:3128 %h %p" g...@ssh.github.com
-p 443
I need nc or
We're looking at using an SSH tunnel (or reverse tunnel) to encrypt a
connection where the application on the other end does not support TLS. The
POC looks to be working. I am now pondering on the steps required to make
setting up the tunnel an automated process. It seems to me that we'd
15 Pro
Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are." - John Wooden
> On Dec 22, 2023, at 5:37 PM, Frank Swarbrick
> wrote:
>
> Has anyone made use of DSFS yet? How do you like it? A
ter is what you
are, reputation merely what others think you are." - John Wooden
> On Dec 22, 2023, at 5:37 PM, Frank Swarbrick
> wrote:
>
> Has anyone made use of DSFS yet? How do you like it? Are there any caveats
> or o
Has anyone made use of DSFS yet? How do you like it? Are there any caveats or
other weirdness?
Frank
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message:
@LISTSERV.UA.EDU
Subject: Re: VSAM GDG
GDG's are for sequential files. You can make a backup of a VSAM to a sequential
GDG though.
To create a new gen you should be using PROD.CVSC.AHI.BKP(+1)
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Frank Swarbrick
Sent: Tuesday
Are VSAM GDGs supported? I created the GDG base using the JCL below and was
able to create the first generation, but when I run that job again it tries to
create generation 1 again, giving me a JCL error because the GDS already exists.
//DEFGDG JOB ,'DEFINE AHI GDG
//DEFINE EXEC
3:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Unix file system ownership
On Wed, 14 Jun 2023 20:12:45 +, Frank Swarbrick wrote:
>Well this was easy. My security admin gave my production user the same UID
>value as in test/dev and everything fell in to place.
>
Are the TSO IDs
rtant" is going to be done with this file system, so I'm comfortable with
what I have, even if it isn't 100% kosher.
From: IBM Mainframe Discussion List on behalf of
Frank Swarbrick
Sent: Wednesday, June 14, 2023 12:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject:
I'm guessing this is hopeless, but figured I'd ask anyway.
For "some reason" we have separate RACF databases for each of our environments
(dev/test vs production). Because of this (I think it's the reason!) my Unix
UID is different in production than in dev/test. This means that even though
0
Facebook <https://facebook.com/matt.hogstrom> LinkedIn
<https://linkedin/in/mhogstrom> Twitter <https://twitter.com/hogstrom>
“It may be cognitive, but, it ain’t intuitive."
— Hogstrom
> On Jun 6, 2023, at 4:00 PM, Frank Swarbrick
> wrote:
>
> Does anyon
Does anyone publish messages to Kafka from z/OS? If so, what technology do you
use?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
I'm going to go out on a limb and say it's a compiler bug. I recreated the
issue (with this program) with both V6.3 and V6.4.
I also "solved" the issue by using BYTE-LENGTH instead of LENGTH. But that's
just a work-around, of course. So you need to open a CASE with IBM to get it
fixed.
.
x Note: For DBCS data items, each character occupies 2 bytes of
x storage.
... and more
Charles
On Sun, 21 May 2023 00:51:33 +, Frank Swarbrick
wrote:
>At least VS COBOL II, as far as I can remember. This is when CICS added the
>COBOL2 translate option to allow the
At least VS COBOL II, as far as I can remember. This is when CICS added the
COBOL2 translate option to allow the LENGTH argument to be omitted, since it
used LENGTH OF under the covers.
Also, it's called a "special register" rather than built-in function; though
now there is also an intrinsic
Yes, the ISPF COBOL highlight is not up to date at the moment. They got up to
date a few releases back, but at least on my system they are not up to date
with COBOL 6.3 and 6.4 at the least.
Not sure you need BYTE-LENGTH for this, though. FUNCTION LENGTH() or LENGTH OF
works just fine for
:25 am, Frank Swarbrick
> wrote:
>
> Has anyone here ever used X11 under z/OS?
Yes, it sucks! I don’t see the point of in in 2023 where almost all GUI
applications are browser based progressive web applications. Even IDE’s like VS
Code are HTML/TypeScript and built with Electr
Has anyone here ever used X11 under z/OS?
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Seymour J Metz
Sent: Wednesday, May 10, 2023 12:36 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: XLC version? [was: RE: XLC - Weak symbols]
Current versions of, e.g., bash, go,
@LISTSERV.UA.EDU
Subject: Re: REXX parse parens
> On 2 May 2023, at 7:30 am, Frank Swarbrick
> wrote:
>
> Parse Var option varOpt '(' valueOpt ‘)’
Adding an extra space after the closing parenthesis can help as a workaround.
Parse Var option varOpt '(' valueOpt ‘) ‘
P
"
If pos(" (", opt) >0 then
Parse value opt with opt" ("member")"
Do
End
Regards
Jack
On Tue, May 2, 2023, 00:31 Frank Swarbrick
wrote:
> The following is a simplified version of some code from IBM's
> CEEBLDTX, placed in to an EXEC I've named P
The following is a simplified version of some code from IBM's CEEBLDTX, placed
in to an EXEC I've named PARENS:
Parse Arg option
Parse Var option varOpt '(' valueOpt ')'
Say varOpt
Say valueOpt
This handles a simple dataset name, e.g.:
Test1: PARENS COBOL(TEST):
Results1:
COBOL
TEST
But it
The example has two bugs in it (a typo and a repeated line), but fixing those
it does appear to work. A better test would have been to compress something
other than just binary zeroes, and also to re-init the "input" (now output)
area so you can actually "see" it work (in the debugger).
I've been working with the CV Systems card system (as a client) for over 20
years, if you have any questions.
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
rpinion865
Sent: Tuesday, April 25, 2023 6:01 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Card processing
t it *used to be* that you couldn't have a program-id starting
with @. I don't know at what point that restriction was lifted. Maybe with IBM
COBOL?
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Frank Swarbrick
Sent: Monday, April 10, 2023 12:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
S
with these custom messages, but have you tried a trailing "."
i.e. ":newline."? Only a hunch, mind you...
Rexx
On Mon, 10 Apr 2023, 17:46 Frank Swarbrick,
wrote:
> At
> https://www.ibm.com/docs/en/zos/2.5.0?topic=cm-creating-message-source
> -file is documented creat
ssion List On Behalf Of
Frank Swarbrick
Sent: Monday, April 10, 2023 10:47 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Language Environment custom messages
At https://www.ibm.com/docs/en/zos/2.5.0?topic=cm-creating-message-source-file
is documented creating of a "message source file" fo
ssage-
From: IBM Mainframe Discussion List On Behalf Of
Frank Swarbrick
Sent: Saturday, April 8, 2023 1:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Cobol calling module with non alphanumeric no longer allowed???
I am indeed using DYNAM.
I have no great need for this to work. J
hen you are
> using nested subroutine programs in the same source file as the calling
> program.
>
> Peter
>
> -Original Message-
> From: IBM Mainframe Discussion List On
> Behalf Of Frank Swarbrick
> Sent: Friday, April 7, 2023 6:07 PM
> To: IBM-MAIN@LISTSER
At https://www.ibm.com/docs/en/zos/2.5.0?topic=cm-creating-message-source-file
is documented creating of a "message source file" for custom LE messages. Is
anyone besides me using this? I am having an issue with the ":newline" not
seeming to do anything at all, and definitely not what it
by value, final
On Sat, 8 Apr 2023 at 00:27, Frank Swarbrick
wrote:
>
> For those interested, the following calls C function "@@GETCB" ( int
> __getcb(int); ) passing the fullword 3 by value. There are several
> alternatives, as discussed earlier, but t
to "CALL variable" and you are done.
The only legitimate case I have seen for using literal CALL's is when you are
using nested subroutine programs in the same source file as the calling program.
Peter
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Frank
For those interested, the following calls C function "@@GETCB" ( int
__getcb(int); ) passing the fullword 3 by value. There are several
alternatives, as discussed earlier, but this is what I am going with.
***
* see if we're
The first one is iffy, but the second one can be absolutely true. It's best to
at least know when one doesn't know something.
From: IBM Mainframe Discussion List on behalf of
Matt Hogstrom
Sent: Friday, April 7, 2023 7:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Is it the case that the parameter in the SQL parameter ATTACH option (TSO, CAF,
etc.) does not matter as long as the DSNULI stub is included in the program
bind? This appears to me to be the case, but I want someone to specifically
state it for me in case I am misunderstanding.
Also, how do I
???
Are you doing a call literal or call dataname?
On Friday, April 7, 2023, Frank Swarbrick
wrote:
> I've tried calling modules (that exist!) with both '@' and '#' signs in
> them and Enterprise COBOL 5+ does not allow this. COBOL 4 allowed this.
> Is there any good reason why this is
Are you also modest, or are you vain?
From: IBM Mainframe Discussion List on behalf of
Bill Johnson <0047540adefe-dmarc-requ...@listserv.ua.edu>
Sent: Friday, April 7, 2023 4:00 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Not aging well (know-it-alls)
I
I've never had issues with inlined code when using IBM Debugger. I've never
explicitly checked its behavior, but I've never run in to an issue. We use
OPT(1) [for some probably bad reason not OPT(2)].
The only times I've seen the issue Tom is referring to are:
1. We backed out the latest
I agree that it's likely a subscript range overflow. I believe I had this same
symptom for a program, and the cause was trying to write beyond my
working-storage (because of attempting to subscript beyond the length of a
table.) It wiped out some file area control blocks and caused this
While this is true, in that you can't look at, say, Fault Analyzer if it's dump
is for a previous version, even having a separate debug file won't generally
save you from that. Because you'd usually put the new version there as well.
From: IBM Mainframe
No one knows as little as one who think's he knows it all.
From: IBM Mainframe Discussion List on behalf of
Doug
Sent: Friday, April 7, 2023 12:14 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Stop the ragging on COBOL please [was: RE: ASM call by value]
z/OS for UNIX files holds program objects, just like PDSE as far as I know.
Now all we need is
//RUN EXEC PGM='/u/myname/myexefile'
And, of course, allowing UNIX files in JOBLIB/STEPLIB.
From: IBM Mainframe Discussion List on behalf of
Paul Gilmartin
I've tried calling modules (that exist!) with both '@' and '#' signs in them
and Enterprise COBOL 5+ does not allow this. COBOL 4 allowed this. Is there
any good reason why this is the case?
--
For IBM-MAIN subscribe /
step.
Does anybody remember SQUOZE <https://en.wikipedia.org/wiki/SQUOZE>?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Frank Swarbrick [frank.swarbr...@outlo
ng conflicts with very old pre-LE runtimes, while SCEERUN
> modules did not.
>
> On Thu, Apr 6, 2023 at 7:59 AM Frank Swarbrick
> wrote:
>
>> What is the major difference between the SCEERUN and SCEERUN2 libraries?
>> Is RUN2 for XPLINK and RUN for non-XPLINK?
>>
---
for PL/I and Fortran only SCEERUN is needed; Cobol and
C/C++ needs SCEERUN2 as well as SCEERUN. Finally some of the SCEERUN2
modules had naming conflicts with very old pre-LE runtimes, while SCEERUN
modules did not.
On Thu, Apr 6, 2023 at 7:59 AM Frank Swarbrick
wrote:
> What is the ma
What is the major difference between the SCEERUN and SCEERUN2 libraries? Is
RUN2 for XPLINK and RUN for non-XPLINK?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with
How do you set R0 in C?
From: IBM Mainframe Discussion List on behalf of
Steve Thompson
Sent: Tuesday, April 4, 2023 12:06 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Unzip on z/OS ?
A similar issue happened with BPXWDYN. COBOL can't set R0. So a
new entry
on behalf of
Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Sent: Monday, April 3, 2023 9:27 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ASM call by value
On Mon, 3 Apr 2023 04:57:02 +, Frank Swarbrick wrote:
>
>(reply) Call by content is enforced by the caller. Call
IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ASM call by value
On Sun, 2 Apr 2023 22:37:53 +0000, Frank Swarbrick wrote:
>I'm just going to put this out there... Dingus has an online test C compiler,
>which outputs the generated assembler. You can find it at
>http://www.dignus.com/dcc/compil
. Pass by content is "pass address of a copy of
the field". So a copy is done, as with fun2, but the parameter list pointed to
by R1 is not the address of the copied fields but rather the address of a
parmeter list that contains the addresses of both copied fields.
I can't explain it any bet
COBOL:
EVALUATE A = 1
WHEN TRUE [...]
WHEN FALSE [...]
END-EVALUATE
(WHEN FALSE could be WHEN OTHER in this case.)
Not many people would use this over IF ELSE, but it's available.
There's also "EVALUATE TRUE" where each WHEN is a full evaluation, eliminating
any need for IF ELSE/IF ELSE/IF
Take a closer look. "@PRINTF4", rather than "printf", is being called by the
CALLPRTF assembler module. ("Figure 2. Calling an intermediate C function from
Assembler OS linkage")
@PRINTF4 (actual name _printf4) is defined later on that page:
/* this example demonstrates C/Assembler ILC */
/*
I just want to confirm that your understanding below is also my understanding.
I'm not sure what others think call by value is, but I don't believe it matches
with what C means when the term "call by value" is used. Or COBOL or PL/I, for
that matter.
From: IBM
assembler programmers. That's often
not a good thing, but often is not always.
sas
On Wed, Mar 29, 2023 at 7:53 PM Frank Swarbrick
wrote:
> OK, the following three examples all seem to work. I dare say you are
> correct about example 1 being unexpected usage of the execute mode. I only
>
023 at 5:02 PM Frank Swarbrick
wrote:
> So here is my attempt at specifying just a register
>
>
> LHI 2,3
> CALL @@GETCB,((2)),MF=(E,CALL1)
> + DS0H
> 01-CALL
> + LA1,CALL1 LOAD PARAMETER REG 1
> 03
hex string?
sas
On Tue, Mar 28, 2023 at 3:17 PM Frank Swarbrick
wrote:
> Another typo, of course.
> =X'000100030003' should be =X'000100020003'
>
> From: IBM Mainframe Discussion List on behalf
> of Frank Swarbrick
> Sent
Since COBOL 1985 (implemented with an early release of VS COBOL II) you can
uses nested programs, which (can) have their own "local variables".
That being said, it's quite a paradigm shift for some COBOL programmers, and
I've had pushback from them each time I've used it. It is also just as
Another typo, of course.
=X'000100030003' should be =X'000100020003'
From: IBM Mainframe Discussion List on behalf of
Frank Swarbrick
Sent: Tuesday, March 28, 2023 12:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ASM call by value
So
Mainframe Discussion List on behalf of
Frank Swarbrick
Sent: Monday, March 27, 2023 11:49 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ASM call by value
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
o
COBOL now has:
PERFORM UNTIL EXIT
[...]
END-PERFORM
And it has finally been implemented in Enterprise COBOL (v6.4; backported to
v6.3 on my request!).
From: IBM Mainframe Discussion List on behalf of
Andrew Rowley
Sent: Tuesday, March 28, 2023 5:02 AM
On Behalf Of
Frank Swarbrick
Sent: Monday, March 27, 2023 1:33 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: A question or two on zOS issues
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
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
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
t;,
it copies them in the
reg1 parameter list. This CANNOT BE DONE using the CALL macro. And this
would be
the correct answer to the original question.
HTH,
kind regards
Bernd
Am 26.03.2023 um 23:35 schrieb Frank Swarbrick:
> Can the MVS CALL macro be used to call a C function with "value
PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ASM call by value
On Sun, 26 Mar 2023 23:18:49 +, Frank Swarbrick wrote:
>In COBOL, for example, the following end up doing the same thing.
>
Do not use CO BOL as an exemplar of programming discipline. Cobol rots the
brain.
--
This messa
er/address-of syntax. The idea for
the 3rd argument was to show one "passed by reference"; in any case
modifiable by the subroutine.
But where did x and y come from?
sas
On Sun, Mar 26, 2023 at 7:53 PM Frank Swarbrick
wrote:
> Also, "*k = x + y".
>
n <042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Sent: Sunday, March 26, 2023 6:14 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ASM call by value
On Sun, 26 Mar 2023 23:18:49 +, Frank Swarbrick wrote:
>True, but "passing by reference" and "passing a 'reference' (pointer/a
Also, "*k = x + y".
From: IBM Mainframe Discussion List on behalf of
Frank Swarbrick
Sent: Sunday, March 26, 2023 5:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ASM call by value
I'm guessing he meant "int *k&q
I'm guessing he meant "int *k" rather than " k".
From: IBM Mainframe Discussion List on behalf of
Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Sent: Sunday, March 26, 2023 5:49 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ASM call by value
wrote:
> No. You will need to create a proper C-style parm list, load it's
> address into R1, and branch to the C routine address without using the
> CALL macro.
>
> Tony Thigpen
>
> Frank Swarbrick wrote on 3/26/23 17:35:
> > Can the MVS CALL macro be used to ca
ue
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)?
>
Aren't all parameters in C passed by value? C has no
Can the MVS CALL macro be used to call a C function with "value" parameters
(rather than reference parameters)?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the
: Crypto Express question
Frank Swarbrick wrote:
> I do think that having an internal crypto card is quite a benefit,
>and CCA/ICSF is generally quite nice to work with. That being
>said, not having to work with any crypto processing at all is even
>nicer.
"Not having to wor
1 - 100 of 851 matches
Mail list logo