EDU
Subject: Re: How can a REXX data stack pass information from a program?
I'm coming late to this thread, and this solution (if it even works) is
really going around your elbow to get to your thumb, but:
1) You said the REXX exec is running in batch, right?
2) Call the COBOL program
3) The COBOL p
you can't call, because of the original problem. The only way to call
something is TSO CALL, which is one-way.
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Steve Thompson
Sent: Tuesday, August 15, 2023 3:45 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can
-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
I'm coming late to this thread, and this solution (if it even works) is
really going around your elbow to get to your thumb, but:
1) You said the REXX exec is running in batch, right?
2) Call the COBOL
I'm coming late to this thread, and this solution (if it even works) is
really going around your elbow to get to your thumb, but:
1) You said the REXX exec is running in batch, right?
2) Call the COBOL program
3) The COBOL program displays the value to any DD
4) The exec invokes the SDSF
Then how about the calling program passing the communications
file name [DSN or whatever] and then have the COBOL program
allocate, and open that for output, then CLOSE and "free" it.
The caller, upon return of the COBOL program should now have
access to the string. I recall doing things like
@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
Ok, what I said won't work.
Whose COBOL is in use? Is it MF COBOL? Does it support dynamic
"DD" changes via the ASSIGN? If that is the case, then passing
the DD name to the COBOL program would allow i
Ok, what I said won't work.
Whose COBOL is in use? Is it MF COBOL? Does it support dynamic
"DD" changes via the ASSIGN? If that is the case, then passing
the DD name to the COBOL program would allow it to write to that
DD the data the caller is asking for.
Steve Thompson
On 8/15/2023 3:54
Micro Focus ESMVS/TSO Version 7.0.000
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Seymour J Metz
Sent: Tuesday, August 15, 2023 2:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
In what environment
3:36 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
Errors with "Routine not found"
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Seymour J Metz
Sent: Tuesday, August 15, 2023 2:22 PM
To
On Tue, 15 Aug 2023 19:30:32 +, Schmitt, Michael wrote:
>In a universe that is running an emulation of TSO/E but not actual TSO/E.
>Which is why ADDRESS SH isn't available either.
>
I believe that LINKPGM, etc. pass a copy of the argument string, but copy any
modified value back to the REXX
-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
I believe that he is referring to the command CALL in the TSO environment.
address tso
'call' '...'
From: IBM Mainframe Discussion List on behalf of
Paul Gilmartin
Errors with "Routine not found"
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Seymour J Metz
Sent: Tuesday, August 15, 2023 2:22 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
What did syscalls('O
:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
On Tue, 15 Aug 2023 19:08:07 +, Schmitt, Michael wrote:
>I believe that the TSO CALL is passing a string that is a copy of the
>variable(s) used to build it.
>
Can you omit the
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
On Tue, 15 Aug 2023 19:08:07 +, Schmitt, Michael wrote:
>I believe that the TSO CALL is passing a string that is a copy of the
>variable(s) used to build it.
>
Can you omit the "
On Tue, 15 Aug 2023 19:08:07 +, Schmitt, Michael wrote:
>I believe that the TSO CALL is passing a string that is a copy of the
>variable(s) used to build it.
>
Can you omit the "TSO"?
>COBOL won't give e access to R1. But even so, as mentioned above, I don't
>think that would help.
>
It has been a long many years since I wrote my last cobol program. I was
wondering if it would be possible to use a card punch to write to the stack.
Best wishes
Jack
On Tue, Aug 15, 2023, 20:13 Paul Gilmartin <
042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
> On Tue, 15 Aug 2023
What did syscalls('ON') return?
From: IBM Mainframe Discussion List on behalf of
Schmitt, Michael
Sent: Tuesday, August 15, 2023 3:16 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
Unfortunately
Discussion List On Behalf Of
Jack Zukt
Sent: Tuesday, August 15, 2023 1:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
If you assign a card punch on your Cobol program, where will it write to?
Best wishes
Jack
On Tue, Aug 15, 2023, 19:15
On Tue, 15 Aug 2023 19:01:07 +, Schmitt, Michael wrote:
>If I DISPLAY something UPON SYSPUNCH it goes to the SYSPUNCH DD. Is that what
>you mean?
>
He may have been sarcastic. Or an antiques dealer.
>Meanwhile, I thought of passing through an environment variable. But as far as
>I can
On Behalf Of
Jack Zukt
Sent: Tuesday, August 15, 2023 1:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
If you assign a card punch on your Cobol program, where will it write to?
Best wishes
Jack
On Tue, Aug 15, 2023, 19:15 Schmitt, Michael
al Message-
From: IBM Mainframe Discussion List On Behalf Of
Paul Gilmartin
Sent: Tuesday, August 15, 2023 1:38 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
On Tue, 15 Aug 2023 17:48:39 +, Schmitt, Michael wrote:
>...
>Wha
Of
Jack Zukt
Sent: Tuesday, August 15, 2023 1:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
If you assign a card punch on your Cobol program, where will it write to?
Best wishes
Jack
On Tue, Aug 15, 2023, 19:15 Schmitt, Michael
wrote
On Tue, 15 Aug 2023 17:48:39 +, Schmitt, Michael wrote:
>...
>Please don't say, run using ISPF, it's easy! Or, call program with LINKMVS,
>it's easy! Or, use the IRXECOM variable access routine, it is easy! I know it
>is, but it can't be used in this case. It has to be the way I
On Tue, 15 Aug 2023 17:48:39 +, Schmitt, Michael wrote:
>...
>What I'm trying to do is pass an 8 character field from a COBOL program to a
>calling exec. The constraints are:
>...
I.e. almost anything that's likely to work. Why?
>...
>..., so the parm is one-way, and would
dering what
> that actually means. Is it just that a program could write something to
> SYSTSIN?
>
>
>
> -Original Message-
> From: IBM Mainframe Discussion List On Behalf
> Of Jack Zukt
> Sent: Tuesday, August 15, 2023 1:05 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
>
On Behalf Of
Jack Zukt
Sent: Tuesday, August 15, 2023 1:05 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How can a REXX data stack pass information from a program?
You need to pass eight bytes from a Cobol program to the invoking REXX. Why
not use a disk file with a DD name? You can allocate
You need to pass eight bytes from a Cobol program to the invoking REXX. Why
not use a disk file with a DD name? You can allocate it in the REXX, call
the Cobol program, this can write it to the disk file, and you can read it
in the calling REXX. Why does it have to be through the stack?
Best
GETLINE and PUTGET let you read from the stack, if you're comfortable writing
in assembly language.
From: IBM Mainframe Discussion List on behalf of
Schmitt, Michael
Sent: Tuesday, August 15, 2023 1:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: How can a
28 matches
Mail list logo