Sankaranarayanan, Vignesh wrote:
Hello,
I need help sorting some 5000 lines based on the first entry in a CSV - IP
address. When sorting, I need the whole record to be involved in the sort, not
just the IP's.
Sample data:
IP,MAC,Make-Model,SEPINFO,Type,Ping,Status,Printer,GRPNAME Warehouse
#,Warehouse Name,Warehouse Terminal,Warehouse Code, Warehouse CICS
xx.yyy.zz.aaa,Unknown,Unknown,OKI,Report,NOT Ok,Unknown,abcd,Not Defined
xx.yyy.zzz.a,Unknown,Unknown,Not Defined,Report,NOT Ok,Unknown,efgh,Not Defined
xx.yy.zzz.aaa,bb:cc:dd:ee:ff:gg,ZTC GK420d,Not Defined,Report,Ok,Online,qwer,WHW
Xx doesn't mean the same digit; just clearing out data. I require the sort to
work for any IP address, be it 1 or 2 or 3 characters per octet.
I'm working with this, and I haven't a clue on each of these keywords. If you
guys were so kind as to help me with the SYSIN, I could save an hour or two of
reading syntax rules.
INREC IFTHEN=(WHEN=INIT,
PARSE=(%01=(ENDBEFR=C'.',FIXLEN=3),
%02=(ENDBEFR=C'.',FIXLEN=3),
%03=(ENDBEFR=C'.',FIXLEN=3),
%04=(FIXLEN=3)),
OVERLAY=(81:%01,%02,%03,%04))
SORT FORMAT=UFF,FIELDS=(81,3,A,84,3,A,87,3,A,90,3,A)
OUTREC BUILD=(1,133)
Thanks in advance.
- Vignesh
Mainframe Admin
Hello,
I think this might do what you need. It was run with Syncsort 1.4.10R. I
think there is nothing special that should prevent it from running under
a recent DFSORT, but I don't have it available to test with.
INREC IFTHEN=(WHEN=INIT,
PARSE=(%01=(ENDBEFR=C'.',FIXLEN=3),
%02=(ENDBEFR=C'.',FIXLEN=3),
%03=(ENDBEFR=C'.',FIXLEN=3),
%04=(ENDBEFR=C',',FIXLEN=3)),
OVERLAY=(81:%01,SQZ=(SHIFT=RIGHT,LENGTH=3),
%02,SQZ=(SHIFT=RIGHT,LENGTH=3),
%03,SQZ=(SHIFT=RIGHT,LENGTH=3),
%04,SQZ=(SHIFT=RIGHT,LENGTH=3))),
IFTHEN=(WHEN=INIT,
FINDREP=(IN=C' ',OUT=C'0',STARTPOS=81,ENDPOS=93))
*
SORT FORMAT=CH,FIELDS=(81,3,A,84,3,A,87,3,A,90,3,A)
*
* You may be able to change the sort to the following
*
* SORT FORMAT=CH,FIELDS=(81,12,A)
Alan
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
