I have (though not recently) written both Help dialogues in ISPF and TSO Help
files, for some of the utilities I created for my employers over the years.
Not sure anyone but me ever used them, though.
---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
/* Most people who have been to
Oh no, please don't! It's our history.
On 1/18/2023 10:10 AM, Willy Jensen wrote:
Yeah I know, I really should strip that from the web text.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
Yeah I know, I really should strip that from the web text.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
indeed, ever since Quick-ref provided TSO help also, I rarely use TSO
HELP - I have created some user based help for site commands.
Carmen
On 1/18/2023 9:58 AM, Tom Brennan wrote:
This brings back old memories. I clicked on the "text" link on your
page and it comes up with what looks like a
This brings back old memories. I clicked on the "text" link on your
page and it comes up with what looks like a file formatted for the tso
HELP command. I barely remember the )F and other marks.
)F Function to check access to RACF resource
I don't think I've typed up a HELP member in 30
Classification: Confidential
Dee the RACROUTE macro. IIRC, the parameter is TEST(AUTH)?
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Farley, Peter
Sent: Tuesday, January 17, 2023 3:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX Question
[CAUTION
For asking RACF from a REXX, check RXSAFCHK at http://harders-jensen.com.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
I was pleased with the original email so I stashed it in a folder where I
keep useful explanations (sometimes mine, sometimes others'). It says here
I sent it 2013-02-23, it was to the TSO-REXX listserv and the subject line
was "sysdsn - dataset protected". It was strictly about RACF; I'll give
List On Behalf
> Of Bob Bridges
> Sent: Tuesday, January 17, 2023 4:35 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: REXX Question
>
> EXTERNAL EMAIL
>
> If it works, great. But since I was all primed to offer another kind of
> solution, I'm remembering an explana
4:35 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX Question
EXTERNAL EMAIL
If it works, great. But since I was all primed to offer another kind of
solution, I'm remembering an explanation I sent once about how to ask RACF (and
I take it from your symptoms that you are running RACF) whether y
, January 17, 2023 4:35 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: REXX Question
If it works, great. But since I was all primed to offer another kind of
solution, I'm remembering an explanation I sent once about how to ask RACF (and
I take it from your symptoms that you are running RACF
If it works, great. But since I was all primed to offer another kind of
solution, I'm remembering an explanation I sent once about how to ask RACF
(and I take it from your symptoms that you are running RACF) whether you
have READ access to a particular dataset. It seems to me it can be adapted
UA.EDU
Subject: Re: REXX Question
Isn't CONTROL only valid in a CLIST script, not Rexx? Or are you suggesting he
wrap a call to his Rexx inside a CLIST with that CONTROL setting and report the
security error from the CLIST?
-Original Message-
From: IBM Mainframe Discussion List On
: Tuesday, January 17, 2023 3:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX Question
Did you try CONTROL ERRORS RETURN?
From: IBM Mainframe Discussion List on behalf of
Cameron Conacher <03cfc59146bb-dmarc-requ...@listserv.ua.edu>
Sent: T
Thank you.
This looks like just what I needed.
Appreciate the assistance.
Thanks
...Cameron
From: IBM Mainframe Discussion List On Behalf Of
Seymour J Metz
Sent: Tuesday, January 17, 2023 3:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: REXX Question
Did you try CONTROL
Did you try CONTROL ERRORS RETURN?
From: IBM Mainframe Discussion List on behalf of
Cameron Conacher <03cfc59146bb-dmarc-requ...@listserv.ua.edu>
Sent: Tuesday, January 17, 2023 2:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: REXX Question
Hello
On Fri, 12 Oct 2018 10:33:54 +0800, David Crayford wrote:
>>
>>> That code looks dodgy! Unless I'm losing my marbles the test
> ((APPID <> 'VI01') | (APPID <> 'VI02')) will always be true.
>
>I've found in REXX it's better to use something like:
>if wordpos(appid, "VI01 VI02") = 0 then ...
>
David,
That’s a much better approach, I think easier and more readable, imho.
Scott
On Thu, Oct 11, 2018 at 10:34 PM David Crayford wrote:
> On 11/10/2018 10:44 PM, Paul Gilmartin wrote:
> > On Thu, 11 Oct 2018 11:54:06 +0800, David Crayford wrote:
> >
> >> That code looks dodgy! Unless I'm
On 11/10/2018 10:44 PM, Paul Gilmartin wrote:
On Thu, 11 Oct 2018 11:54:06 +0800, David Crayford wrote:
That code looks dodgy! Unless I'm losing my marbles the test ((APPID <>
'VI01') | (APPID <> 'VI02')) will always be true.
Vernacular. Some casually say, "if APPID is not V101 or V102",
On Thu, 11 Oct 2018 11:54:06 +0800, David Crayford wrote:
>That code looks dodgy! Unless I'm losing my marbles the test ((APPID <>
>'VI01') | (APPID <> 'VI02')) will always be true.
>
Vernacular. Some casually say, "if APPID is not V101 or V102", then code
incorrectly ((APPID <> 'VI01') |
@LISTSERV.UA.EDU
Subject: Re: REXX question
David Crayford wrote:
>That code looks dodgy!
Indeed! If I can, I would test each or some of these comparision statements and
set up a true/false flag (my own [new] variable) to be used on the final IF or
WHEN statement. Just for easy reading and debugg
David Crayford wrote:
>That code looks dodgy!
Indeed! If I can, I would test each or some of these comparision statements and
set up a true/false flag (my own [new] variable) to be used on the final IF or
WHEN statement. Just for easy reading and debugging.
>Unless I'm losing my marbles
That code looks dodgy! Unless I'm losing my marbles the test ((APPID <>
'VI01') | (APPID <> 'VI02')) will always be true.
On 11/10/2018 3:06 AM, Lopez, Sharon wrote:
This is some of the code; I did not write it and I do not know how to code in
REXX.
WHEN (SUBSYS = 'A') & ((APPID <> 'VI01')
Subject: Re: REXX question
So the first think is to run a trace.
I like the command
Trace I
That will show what things look like before and after.
Then if that does not help, and you have Serena Contract, I might contact them
for assistance.
With Chgman, you need to know REXX/CLIST/ISPF
From: IBM Mainframe Discussion List on behalf of
Lizette Koehler
Sent: Wednesday, October 10, 2018 5:44 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: REXX question
So the first think is to run a trace.
I like the command
Trace I
That will show what things
To: IBM-MAIN@listserv.ua.edu
Subject: Re: REXX question
So the first think is to run a trace.
I like the command
Trace I
That will show what things look like before and after.
Then if that does not help, and you have Serena Contract, I might contact them
for assistance.
With Chgman, you need
From: IBM Mainframe Discussion List on behalf of
Lizette Koehler
Sent: Wednesday, October 10, 2018 5:44 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: REXX question
So the first think is to run a trace.
I like the command
Trace I
That will show what things look like before
Behalf Of
> Lopez, Sharon
> Sent: Wednesday, October 10, 2018 12:06 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: REXX question
>
> This is some of the code; I did not write it and I do not know how to code in
> REXX.
>
> WHEN (SUBSYS = 'A') & ((APPID <>
;
END
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Paul Gilmartin
Sent: Wednesday, October 10, 2018 2:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX question
On Wed, 10 Oct 2018 18:26:51 +, Lopez, Sharon wrote:
>We
On Wed, 10 Oct 2018 18:26:51 +, Lopez, Sharon wrote:
>We have a CHANGEMAN REXX exec that issues this:
>
>+CMNNEWCO F PRODAORB,CEMT SET PROG(DPLDB2IR) PH
>
>but now it is appending the userid to the end:
>
>+CMNNEWCO F PRODAORB,CEMT SET PROG(DPLDB2IR) PH CMNBATCH
>
>Has anyone seen anything
Many thanks, Alan,
For sure I will tray your hints, when I am back in office ( I am not in
office now because of sickness, but I can check my mails).
br Leopold
On 22.11.2015 21:06, Alan Young wrote:
Leopold Strauss wrote:
Hi, all
I simply wanted to automize the receiving of a lot of
Thx, Bill.
But prompt is not a valid order im uxic-rexx.
On 19.11.2015 15:11, Bill Godfrey wrote:
On Thu, 19 Nov 2015 12:47:40 +0100, Leopold Strauss wrote:
Hi, all
I simply wanted to automize the receiving of a lot of XMIT-files in
zOS-unix-shell ( not TSO)
Last but not least my problem
Quite simple.
In unix-shell there ar prowerfull tools for going through a list,
creating the apprpriate commands etc.
In TSO there are not.
And because I am very experienced in Unix ( althouigh lot of
zOS-knowledge), I prefer Unix-shell and -tools
On 19.11.2015 16:48, Peter Hunkeler
Leopold Strauss wrote:
Hi, all
I simply wanted to automize the receiving of a lot of XMIT-files in
zOS-unix-shell ( not TSO)
Last but not least my problem could be broken down to following
terminal-input-problem with the RECEIVE-command:
rexx-script:
parse arg indsn outdsn
address tso
In <5651dced.2030...@isis-papyrus.com>, on 11/22/2015
at 04:19 PM, Leopold Strauss
said:
>In unix-shell there ar prowerfull tools for going through a list,
>creating the apprpriate commands etc.
FSVO powerful.
>In TSO there are not.
In what universe? The
Hardee, Chuck wrote:
>Try adding: queue "RESTORE"
>Just before the queue of the "END" command.
While I have NOT tested out that REXX program, I believe it should work.
I think Leopold should also add TRACE A to his REXX program for better
debugging.
Groete / Greetings
Elardus Engelbrecht
Leopold,
This is purely a guess, but the last line of the prompt states:
INMR909A You may enter DSNAME, SPACE, UNIT, VOL, OLD/NEW, or
RESTORE/COPY/DELETE/END
You supplied a DATASET() parameter, but I don't see a RESTORE, COPY or DELETE
prior to the END.
Try adding:
queue "RESTORE"
Just
Push the TSO RECEIVE commands (ie. END, DA(), etc.) into the tso stack and
then call RECEIVE.
ITschak
ITschak Mugzach
Z/OS, ISV Products and Application Security & Risk Assessments Professional
On Thu, Nov 19, 2015 at 1:47 PM, Leopold Strauss <
leopold.stra...@isis-papyrus.com> wrote:
> Hi,
I'm curious to understand whay you want to run this rexx as a shell script as
oposed to a simple batch tso step.
I don't see the benefit, only drawbacks
--Peter Hunkeler
--
For IBM-MAIN subscribe / signoff / archive access
On Thu, 19 Nov 2015 12:47:40 +0100, Leopold Strauss wrote:
>Hi, all
>
(Waiting for Lizette to suggest fora TSO-REXX and, most relevant, MVS-OE.)
>I simply wanted to automize the receiving of a lot of XMIT-files in
>zOS-unix-shell ( not TSO)
>
>Last but not least my problem could be broken down
On Thu, 19 Nov 2015 12:47:40 +0100, Leopold Strauss wrote:
>Hi, all
>
>I simply wanted to automize the receiving of a lot of XMIT-files in
>zOS-unix-shell ( not TSO)
>
>Last but not least my problem could be broken down to following
>terminal-input-problem with the RECEIVE-command:
>
In 0ca801ceb86a$568c4300$03a4c900$@mindspring.com, on 09/23/2013
at 07:36 AM, Lizette Koehler stars...@mindspring.com said:
In case you were not aware, there is a newsgroup for TSO-REXX
But it's better to join the mailing list. Posts to bit.listserv.* will
generally not be seen on the
In
can3vrrkjntux_ylbhdmfkvwj-mb3fncdd+2nofneckmgttk...@mail.gmail.com,
on 09/23/2013
at 10:31 AM, Rob Schramm rob.schr...@gmail.com said:
and the results were very strange
I suspect that the read was fine and that the error was in the code
that you did not show. Take a look at IN.0 (the
In case you were not aware, there is a newsgroup for TSO-REXX
If you have not done so, you can join here. Just go to the bottom of the
Webpage
http://www2.marist.edu/htbin/wlvindex?TSO-REXX
what are the attributers? Lrecl, blksize, etc...
Did you check the original PDS to see if that member
What in.0 in.1 etc. Holds?
בתאריך 23 בספט 2013 17:38, מאת Lizette Koehler stars...@mindspring.com:
In case you were not aware, there is a newsgroup for TSO-REXX
If you have not done so, you can join here. Just go to the bottom of the
Webpage
http://www2.marist.edu/htbin/wlvindex?TSO-REXX
Suspect you have issue with PDS...although maybe directory is lla frozen,
prior data?
Below code works seq or pds(mem)
/* REXX */
ALLOC SHR FILE(INPUT) DATASET('UKLANRX.JCL.CNTL(SYSGEN)')
EXECIO * DISKR INPUT (STEM INPUT. FINIS)
FREE FILE(INPUT)
CNTR = 1
DO WHILE CNTR = INPUT.0
SAY INPUT.CNTR
Rob:
why do you want to free it ...its not clear why you need to ...
If it was allocated dynamically or a file for temporary usage, 'yes' free it ,
but allocated via a '// DD ' ...odd
Scott J Ford
Software Engineer
http://www.identityforge.com/
Attributes were recfm=FB, lrecl=120 PDS.
There were no I/O errors. I was able to copy the member via 3.3 to the
sequential file without issue. Also, viewed it numerous times.
I will have to allocate my own copy and re-check it.
As for the FREE... no harm no foul. If I had done an ALLOCATE
48 matches
Mail list logo