IBM Mainframe Forum

Hi All,

My requirement is that I need to append one record in the output file in which the first five characters is "total" word and in other fields the sum of two fields from the input file.

EG:-
THIS IS MY INPUT FILE


AND I NEED OUTPUT FILE LIKE THIS

have You searched the forum ?
the issue has been discussed gazillions of times.

Hello,

Look for OUTFIL --> TRAILER1 --> TOT

enrico-sorichetti wrote:have You searched the forum ?
the issue has been discussed gazillions of times.

hi enrico

I searched in forum..but not getting the correct post
dfsort-icetool-icegener/sum-fields-t120.html#p471
this I see but still not able to get.

Aki88 wrote:Hello,

Look for OUTFIL --> TRAILER1 --> TOT

while using trailer and outfil I an getting max cc 16
but I used with outrec and overlay


but getting output as single record only

I do not see OUTFIL or TRAILER in that last post. Did you consult the manual or just copy an example and changed it with your own syntax?

Hello,

arya_starc wrote:...but getting output as single record only

'SUM FIELDS' does precisely that (and more) - it sums the fields and produces unique records basis the SORT key specified in 'SORT FIELDS' statement.

A quote from the DFSORT programming guide; have highlighted the relevant portion:

The SUM control statement specifies that, whenever two records are found with
equal sort or merge control fields, the contents of their summary fields are to be
added, the sum is to be placed in one of the records, and the other record is to be
deleted.

Since you have not shown what you had tried for OUTFIL/TRAILER1, it is difficult to recommend a correction for the RC- 16.

A hint:
a. Code a SORT FIELDS=COPY --> since you do not want records to be sorted, instead you just want a new summation record added
b. Use a simple OUTFIL REMOVECC, BUILD --> OUTFIL, to process output records prior getting written to outpit DS; REMOVECC, to remove carriage control character which will be inserted while using TRAILER1 reporting feature; BUILD to build the actual output
c. Couple this with TRAILER1 operator of OUTFIL, and TOTAL or TOT sub-operator of TRAILER1

Have a look at DFSORT Application Programming Guide for detailed description of these operators.
If you're looking for a quick code snippet, search the aforementioned operators, there are hundreds of working examples for this.

hi aki88,

I used below syntax

                             

but it reporting this error

NicC wrote:I do not see OUTFIL or TRAILER in that last post. Did you consult the manual or just copy an example and changed it with your own syntax?

but getting max cc 16 for that

perhaps because 20:TOT( overlaps 10:TOT=