Jol has a builtin sort. The following code can be executed in Batch or
directly under TSO.
DCL DSID1 DS PAYROLL.TRANS.FILE;
DCL DSID2 DS PAYROLL.SORTED.TRANS
VB 300, 8000
10 CYLS DISK;
SORT DSID1 TO DSID2
FIELDS=(
10,2,CH,A, /* COMPANY CODE */
25,5,FI,A); /* STATE CODE */
The data set referred to by DSID1 is to be sorted and placed in the data
set referred to by DSID2. The parameters for the SORT are specified
using the FIELDS parameter.
Of course, you could code it as
SORT PAYROLL.TRANS.FILE TO PAYROLL.SORTED.TRANS
FIELDS=(
10,2,CH,A, /* COMPANY CODE */
25,5,FI,A); /* STATE CODE */
Clem Clarke
======
Rob Schramm wrote:
That is one surprising thing about Rexx and sort.. that Rexx doesn't have
built in support to call sort without a rigamarole.
Rob
On Tue, Jun 6, 2017, 1:29 PM John McKown <john.archie.mck...@gmail.com>
wrote:
On Tue, Jun 6, 2017 at 11:55 AM, Paul Gilmartin <
0000000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
On Tue, 6 Jun 2017 06:44:25 -0400, John Eells wrote:
... I expect to be informed of deficiencies of crontab, but at least
it's there.
<snip>
Why do you think crontab is "not there" in z/OS?
I'm aware that it's there, although only recently (from my perspective).
I don't know that it meets all the requirements of a job scheduler.
And some readers of this list still prefer not to deal with UNIX. But
I guess that's a personal problem.
(E.g coding dozens of lines of DFSORT commands where a single
"grep" would suffice.)
One could argue that DFSORT is superior due to it's extreme efficiency.
Especially compared to "grep". But that only applies when one is running it
in "heavy demand" situation. IMO, a slightly better case would be writing
something in "awk" versus REXX. IMO, for an "ad hoc", awk might possibly
beat REXX, if the programmer knows both. But only if the Co:Z hybrid batch
product (free from Dovetailed Technologies!) is installed. I wish that IBM
would license & bundle Co:Z with z/OS. That would increase it's legitimacy
to staid I.T. managers.
--gil
--
Prof: So the American government went to IBM to come up with a data
encryption standard and they came up with ...
Student: EBCDIC!
Maranatha! <><
John McKown
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
