■ 重複キーを排除する方法/フィールドの合計方法(サマリーSORT)
//SORT1 EXEC SORT //SORTIN DD DSN=INFILE,DISP=SHR //SORTOUT DD DSN=OUTFILE,DISP=(,KEEP),… //SYSIN DD * SORT FIELDS=… SUM FIELDS=NONE /* ↑ これです
NONEを指定することによりSORTキーで重複する2件目以降のレコードは排除されます
また、フィールドをサマリー(加算)することもできます。
SUM FIELDS=(10,3,PD,13,3,PD)
とすると、10バイト目から3バイトと13バイト目から3バイトが加算されます。
(同じソートキーのレコードは1件になる)
但し、サマリーした結果が桁あふれする場合は、合計もされずレコードも削除されません。