Help for SORTing data in a JCL

santhoshm · New User Joined: 13 Jun 2007 Posts: 32 Location: chennai

Hi,
I have an input file with data as below

abc AA GROSS
abc 16 GROSS
abc BH GROSS
abc 72 GROSS
abc 68 GROSS
abc 24 NET

I will need output like below
abc 16 GROSS
abc 68 GROSS
abc 72 GROSS
abc AA GROSS
abc BH GROSS
abc 24 NET

I have used SORT FIELDS=(8,5,CH,A,5,2,CH,A) but I got result like below.
abc AA GROSS
abc BH GROSS
abc 16 GROSS
abc 68 GROSS
abc 72 GROSS
abc 24 NET

Is there anyway we can get the desired results using SORT fiels ?

Bill Woodger · Posted: Wed Oct 17, 2012 4:10 pm

Perhaps if you explain clearly the order that you want. You want to Sort on GROSS/NET, then numbers followed by alphas?

santhoshm · New User Joined: 13 Jun 2007 Posts: 32 Location: chennai

Yes. The order is first it should sort by GROSS/NET and then field at 4th position of 2 characters.

santhoshm · New User Joined: 13 Jun 2007 Posts: 32 Location: chennai

Sorry 2nd order position starts at 5th with 2 bytes.

enrico-sorichetti · Posted: Wed Oct 17, 2012 4:27 pm

look at the sort manuals on how to define an alternate character sequence

Garry Carroll · Posted: Wed Oct 17, 2012 4:28 pm

It looks like you are expecting SORT to be based on ASCII rather than EBCDIC, so I'd suggest you look at ALTSEQ processing.

Garry.

Bill Woodger · Posted: Wed Oct 17, 2012 4:30 pm

Consult your documentation. Look in the index for "collating sequence". In DFSORT ALTSEQ is your answer. With that you could change all the numbers, for the purpose of the sequencing only (not changing the data itself) to hex-values "lower" than "A".

EDIT: It seems we all agree :-)

santhoshm · New User Joined: 13 Jun 2007 Posts: 32 Location: chennai

Thank you all very much for your idea..

It worked with follwoing SORT card:

SORT FIELDS=(8,3,CH,A,5,2,AQ,A)
ALTSEQ CODE=(F0A0,F1A1,F2A2,F3A3,F4A4,F5A5,F6A6,F7A7,F8A8,F9A9)
SUM FIELDS=NONE

Bill Woodger · Posted: Wed Oct 17, 2012 5:42 pm

Thanks for letting us know. Now you've done your research and tested it, it is probably best to go with what Garry suggested if EBCDIC to ASCII is available (in ASCII the numbers come before the letters, and they even "mess around" with lower-case :-) ).

enrico-sorichetti · Posted: Wed Oct 17, 2012 5:53 pm

why not try with the AC format , the ASCII sequence ?
special chars
numbers
lower case
upper case