Discussion:
Rexx SORT (was: ... Job Scheduler ... )
Add Reply
Paul Gilmartin
2017-06-07 03:41:02 UTC
Reply
Permalink
Raw Message
Address SORT
is more what I was thinking. It is just such a commonly needed thing for
simple sorts i.e.
SORT 1 8 a
I'm guessing the arguments are a column range and Ascending?
Guess I am just lazy/annoyed when it comes to things that I think should be
provided.
This is too specialized for my taste. I could envision making every command
in the Utilities Ref. a command environment. I'd like something more general.
(But I'm inconsistent. I enthusiastically approve ADDRESS ISREDIT and
ADDRESS SDSF. But those environments are quasi-interactive: each subcommand
returns a status. DFSORT isn't like that.)

With Regina I can:
555 $ cat showsort.rex
#! /usr/bin/rexx
signal on novalue

F1.1 = 'Larry'
F1.2 = 'Moe'
F1.3 = 'Curly'
F1.0 = 3

address SYSTEM 'sort' '-k1.1,1.8' with , /* Issue the 'sort' command. */
input stem F1. ,
output stem F2.

do I = 1 to F2.0
say I F2.I; end I

... and get output:
556 $ rexx showsort
1 Curly
2 Larry
3 Moe

ADDRESS WITH redirection seems to be an ANSI Rexx construct that IBM
has chosen not to implement:
http://www.rexxla.org/rexxlang/standards/j18pub.pdf

I could envision adapting it in TSO Rexx something like:
address LINKMVS 'ICEMAN' with ,
DD:SORTIN stem F1. ,
DD:SORTOUT stem F2.

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
B***@T-ONLINE.DE
2017-06-07 06:11:51 UTC
Reply
Permalink
Raw Message
http://bernd-oppolzer.de/blog_20150115_151000.htm
<http://bernd-oppolzer.de/blog_20150115_151000.htm> .

this Contains a REXX Procedure
to sort a stem variable.
See quicksort_nonrec

hth

Kind regards

Bernd




--- Original-Nachricht ---
Von: Paul Gilmartin
Betreff: Rexx SORT (was: ... Job Scheduler ... )
Datum: 07.06.2017, 5:42 Uhr
Address SORT
is more what I was thinking. It is just such a commonly needed thing for
simple sorts i.e.
SORT 1 8 a
I'm guessing the arguments are a column range and Ascending?
Guess I am just lazy/annoyed when it comes to things that I think should be
provided.
This is too specialized for my taste. I could envision making every command
in the Utilities Ref. a command environment. I'd like something more
general.
(But I'm inconsistent. I enthusiastically approve ADDRESS ISREDIT and
ADDRESS SDSF. But those environments are quasi-interactive: each subcommand
returns a status. DFSORT isn't like that.)

With Regina I can:
555 $ cat showsort.rex <http://showsort.rex>
#! /usr/bin/rexx
signal on novalue

F1.1 = 'Larry'
F1.2 = 'Moe'
F1.3 = 'Curly'
F1.0 = 3

address SYSTEM 'sort' '-k1.1,1.8' with , /* Issue the 'sort' command. */
input stem F1. ,
output stem F2.

do I = 1 to F2.0
say I F2.I; end I

... and get output:
556 $ rexx showsort
1 Curly
2 Larry
3 Moe

ADDRESS WITH redirection seems to be an ANSI Rexx construct that IBM
has chosen not to implement:
http://www.rexxla.org/rexxlang/standards/j18pub.pdf
<http://www.rexxla.org/rexxlang/standards/j18pub.pdf>

I could envision adapting it in TSO Rexx something like:
address LINKMVS 'ICEMAN' with ,
DD:SORTIN stem F1. ,
DD:SORTOUT stem F2.

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu <http://listserv.ua.edu> with the
message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Paul Gilmartin
2017-06-07 17:56:24 UTC
Reply
Permalink
Raw Message
Please see this RFE: https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe&CR_ID=47699
That gives me:

Oops, that's not right!

Sorry, the page you're looking for cannot be displayed

Please try again later.

500 Internal Server Error

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Phil Smith
2017-06-08 00:08:15 UTC
Reply
Permalink
Raw Message
If I recall the CMS/TSO Pipes is effectively the same code that is reassembled for z/VM or z/OS. Sadly it is a product that is charged for on z/OS but is included in z/VM at no charge. It should, imho, be included in z/OS as a no charge feature and really give the REXX users a tool to be more productive and thus make z/OS more usable.
More than "effectively": IIRC, the same load module works in either OS. It can tell where it is and reacts accordingly.

And yes, IBM should include it in the product; it could only help! The resistance to making z/OS more usable is going to be its downfall, I fear.

And no, the web-based stuff isn't the answer-that makes it easier to administer, but doesn't help you get real work done.

...phsiii

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Edward Gould
2017-06-08 13:01:57 UTC
Reply
Permalink
Raw Message
Post by Phil Smith
If I recall the CMS/TSO Pipes is effectively the same code that is reassembled for z/VM or z/OS. Sadly it is a product that is charged for on z/OS but is included in z/VM at no charge. It should, imho, be included in z/OS as a no charge feature and really give the REXX users a tool to be more productive and thus make z/OS more usable.
More than "effectively": IIRC, the same load module works in either OS. It can tell where it is and reacts accordingly.
And yes, IBM should include it in the product; it could only help! The resistance to making z/OS more usable is going to be its downfall, I fear.
And no, the web-based stuff isn't the answer-that makes it easier to administer, but doesn't help you get real work done.
Phil:

TSO is dead, IBM wouldn’t offer a new product because it used TSO.

Ed
Post by Phil Smith
...phsiii
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Clark Morris
2017-06-08 20:18:16 UTC
Reply
Permalink
Raw Message
[Default] On 8 Jun 2017 06:01:57 -0700, in bit.listserv.ibm-main
Post by Phil Smith
If I recall the CMS/TSO Pipes is effectively the same code that is reassembled for z/VM or z/OS. Sadly it is a product that is charged for on z/OS but is included in z/VM at no charge. It should, imho, be included in z/OS as a no charge feature and really give the REXX users a tool to be more productive and thus make z/OS more usable.
More than "effectively": IIRC, the same load module works in either OS. It can tell where it is and reacts accordingly.
And yes, IBM should include it in the product; it could only help! The resistance to making z/OS more usable is going to be its downfall, I fear.
And no, the web-based stuff isn't the answer-that makes it easier to administer, but doesn't help you get real work done.
TSO is dead, IBM wouldn’t offer a new product because it used TSO.
What is the IBM replacement and what is the migration path? I have no
problem with terminating TSO but the functions it provides are still
needed.

Clark Morris
Ed
Post by Phil Smith
...phsiii
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Edward Gould
2017-06-09 05:39:26 UTC
Reply
Permalink
Raw Message
Post by Clark Morris
[Default] On 8 Jun 2017 06:01:57 -0700, in bit.listserv.ibm-main
Post by Phil Smith
If I recall the CMS/TSO Pipes is effectively the same code that is reassembled for z/VM or z/OS. Sadly it is a product that is charged for on z/OS but is included in z/VM at no charge. It should, imho, be included in z/OS as a no charge feature and really give the REXX users a tool to be more productive and thus make z/OS more usable.
More than "effectively": IIRC, the same load module works in either OS. It can tell where it is and reacts accordingly.
And yes, IBM should include it in the product; it could only help! The resistance to making z/OS more usable is going to be its downfall, I fear.
And no, the web-based stuff isn't the answer-that makes it easier to administer, but doesn't help you get real work done.
TSO is dead, IBM wouldn’t offer a new product because it used TSO.
What is the IBM replacement and what is the migration path? I have no
problem with terminating TSO but the functions it provides are still
needed.
Clark Morris
————————SNIP————————————

Good question. One that has been asked many times. I have the impression IBM is being mysterious here. We are pretty sure that there is no development going on for current TSO and IBM is tight lipped on any possible successor (if any).
About 25 years ago an IBMer at Guide we were talking at a restaurant and with a few drinks I got out of him that IBM has basically lost track of the innards of TSO and really have no idea on how to fix it. He hinted that there maybe a replacement on the horizon but wouldn’t say much more than that. I did not have the expense account that would buy unlimited booze and I thought it would certainly happen soon. I was wrong. Not a peep from IBM of course I stopped going all the often to SHARE and with the personnel trimming at IBM, I would venture a guess that it is low on IBM’s list of thing to do.

Ed
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
John McKown
2017-06-09 12:53:46 UTC
Reply
Permalink
Raw Message
​<snip>
Good question. One that has been asked many times. I have the impression
IBM is being mysterious here. We are pretty sure that there is no
development going on for current TSO and IBM is tight lipped on any
possible successor (if any).
About 25 years ago an IBMer at Guide we were talking at a restaurant and
with a few drinks I got out of him that IBM has basically lost track of the
innards of TSO and really have no idea on how to fix it. He hinted that
there maybe a replacement on the horizon but wouldn’t say much more than
that. I did not have the expense account that would buy unlimited booze and
I thought it would certainly happen soon. I was wrong. Not a peep from IBM
of course I stopped going all the often to SHARE and with the personnel
trimming at IBM, I would venture a guess that it is low on IBM’s list of
thing to do.
Ed
​If the ISPF people would port their code to be usable from an UNIX shell
prompt, I'd have _no_ use for TSO again. What I vaguely envision is having
ISPF use "curses" for a character user interface. The second phase would be
to extend ISPF to use X in addition to "curses". ISPF could then be the Qt
or GTK+ of z/OS UNIX.​
--
Veni, Vidi, VISA: I came, I saw, I did a little shopping.

Maranatha! <><
John McKown

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Paul Gilmartin
2017-06-08 00:21:28 UTC
Reply
Permalink
Raw Message
Post by Phil Smith
If I recall the CMS/TSO Pipes is effectively the same code that is reassembled for z/VM or z/OS. Sadly it is a product that is charged for on z/OS but is included in z/VM at no charge. It should, imho, be included in z/OS as a no charge feature and really give the REXX users a tool to be more productive and thus make z/OS more usable.
More than "effectively": IIRC, the same load module works in either OS. It can tell where it is and reacts accordingly.
Is that true for even the newest release? They're still testing it?

How does one transfer PIPE MODULE S from CMS to z/OS and get a usable
program object? Re-link it?

Is it legal?
Post by Phil Smith
And yes, IBM should include it in the product; it could only help! The resistance to making z/OS more usable is going to be its downfall, I fear.
And no, the web-based stuff isn't the answer-that makes it easier to administer, but doesn't help you get real work done.
Which "web-based stuff"?

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Phil Smith
2017-06-08 01:46:25 UTC
Reply
Permalink
Raw Message
Post by Paul Gilmartin
Is that true for even the newest release? They're still testing it?
John Hartmann may be retired but he ain't dead.
Post by Paul Gilmartin
How does one transfer PIPE MODULE S from CMS to z/OS and get a usable
program object? Re-link it?
I believe so.
Post by Paul Gilmartin
Is it legal?
Not sure. But check out the distro:
http://vm.marist.edu/~pipeline/

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Tom Marchant
2017-06-09 13:22:48 UTC
Reply
Permalink
Raw Message
Post by Edward Gould
TSO is dead
TSO is dead, Long live TSO!
--
Tom Marchant

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Loading...