I have a SORTHEX XEDIT (from an unknown source - very old). Looks like:
/* SORTHEX XEDIT */
PARSE UPPER ARG target colrange
"ZONE" colrange
"MSGMODE OFF"
"MACRO ALTER F0 10 * *"
<snip>
"MACRO ALTER F9 19 * *"
"MSGMODE ON"
"SORT" target colrange
"MSGMODE OFF"
"MACRO ALTER 10 F0 * *"
<snip>
"MACRO ALTER 19 F9 * *"
"MSGMODE ON"
"ZONE 1 *"
Mark Wheeler
UnitedHealth Group
> Date: Thu, 16 Dec 2010 12:57:43 -0500
> From: jab...@cornell.edu
> Subject: Re: I saw a pipe here, now I can't find it.
> To: IBMVM@LISTSERV.UARK.EDU
>
> I've got a HEXSORT XEDIT and HELPXEDI that I thought came from the IBM
> Download page but I can't find it there. Not sure where I got it. I
> don't think it's a leftover from an IBM internal site. Here's the
> comments at the beginning of it.
>
> /* HEXSORT XEDIT:
> Same as XEDIT SORT, but sorts hexadecimal data correctly.
>
> LIMITATION: Unlike XEDIT SORT, there is a limit of 10 fields.
>
> MODIFICATION HISTORY:
> 09/02/97 - Roger Deschner - Pad to LRECL when RECFM F
> 07/29/97 - Roger Deschner - Accommodate backwards targets
> 07/26/97 - Roger Deschner - Original version.
> This technique is from PIPE AHELP SORT, by John Hartman, reprinted in
> "Plunging Into Pipes" by Melinda Varian.
> */
>
> Jim
>
> On 12/16/2010 11:10 AM, Frank M. Ramaekers wrote:
> > I simply do:
> >
> > PIPE | LITERAL D12B 127B B729 1111 | SPLIT | SPEC 1.4 X2C 2 1.4 3 | SORT
> > | SPEC 3-* 1 | CONSOLE
> > 1111
> >
> > 127B
> >
> > B729
> >
> > D12B
> >
> > Ready;
> >
> > =20
> > Frank M. Ramaekers Jr.
>
> --
> James Bohnsack
> (972) 596-6377 home/office
> (972) 342-5823 cell
