I have a flat file of FB 436 bytes out of which the amount field starts from 422nd byte and is stored as character format (15bytes).
I want to sum the amount based on Policy number (6 bytes char starting from 19th byte) and Effective date (10 bytes char starting from 39th byte).
I tried to make use of below mentioned SORT card but is abending because amount field is not numeric.
Input (putting the amount field alone from 422nd byte - 436th byte)
Thanks Frank for the code
I have run the SOrt card and got the below mentioned error.
SORT FIELDS=(19,6,CH,A,39,10,CH,A) 00150
OUTFIL REMOVECC,NODETAIL, 00180
WER903I SYNCSORT 22.214.171.124 IS NOT LICENSED FOR SERIAL 6D972, TYPE 2097 711, LP
WER903I PRODUCT WILL STOP WORKING IN 26 DAYS UNLESS A VALID KEY IS INSTALLE
WER271A OUTFIL STATEMENT : NUMERIC FIELD ERROR
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
The job works fine with DFSORT. However, the WER messages indicate you're using Syncsort, not DFSORT. I'm a DFSORT developer. DFSORT and Syncsort are competitive products. I'm happy to answer questions on DFSORT and DFSORT's ICETOOL, but I don't answer questions on Syncsort.
Please post questions on Syncsort in the JCL Forum, not in the DFSORT Forum.
Vinu - you have been told that you are using SYNCSORT so why do you keep posting in the DFSORT section? SYNCSORT nd DFSORT are NOT the same product and their control cards are not necessarily 100% compatible.
Joined: 22 Apr 2006 Posts: 6258 Location: Mumbai, India
I have tried using ICETOOL but not getting an answer.
Did you mean - in the above Job, you've used PGM=ICETOOL instead of PGM=SORT?
You get, WER271A, NUMERIC FIELD ERROR, which means a numeric field has been improperly specified on the indicated SyncSort control statement. See, if the position you 've used in Trailer3 actually have the numeric fields in those positions...