IBM Mainframe Forum

[naveenkumar sudha]

Hi Team,

I have an FB file as below, consisting of 5 fields - A,B,C,D(YEARMM),E(Amount), delimited by pipe symbol
I need to sum-up amounts and count no of records, for all matching A,B,C,D(YEARMM) and write to a new file having fields- A,B,C,D(YEARMM), accumulated/summarized AMOUNT and no of records having same A,B,C,D.

I/P:

C1AW|1013300 |16L00000 |202201|0001
C1AW|1013300 |16L00000 |202202|0001
C1AW|1013300 |16L00000 |202202|0001
C1AW|1020000 |16L21000 |202112|0001
C1AW|1020000 |16000000 |202103|0001
C1AW|1020000 |16000000 |202103|0002
C1AW|1020000 |16000000 |202106|0001
O/P Expected:
-----------------
C1AW|1013300 |16L00000 |202201|0001|1
C1AW|1013300 |16L00000 |202202|0002|2
C1AW|1020000 |16L21000 |202112|0001|1
C1AW|1020000 |16000000 |202103|0003|2
C1AW|1020000 |16000000 |202106|0001| 1

I can sum-up amounts based on column:A,B,C,D using SUM FIELDS=NONE and use M10 function to count records, having individual steps. But again, i need to merge these individual steps which is inefficient.
Hence i would need your help, can this be done in single step - both summing up and writing count of records based on matched key.

Kindly help.

Thanks a lot,
Naveen S

[sergeyken]

0. Please, learn how to use the Code button to format your code properly

1. In case you are using DFSORT utility, please read SECTIONS part of the manual (Page 339). No plans do exist to copy parts of the manual to the forum; it can be read from its original location.

2. After reading the manual, try to create a working code, and present it to the forum with your technical questions.

3. Do not create clones of the same topic; ask administrators to move it to the correct forum section.

[ssbylzh]

Try to use below：

Select all

INREC BUILD=(1,35,C'|1')
SORT FIELDS=(1,31,CH,A)
SUM FIELDS=(32,4,ZD,37,1,ZD)