IBM Mainframe Forum

Hello,
I was wondering whether the following could be accomplished by using DFSORT instead of writing a program.
Thanks in advance.

Input information (ordered by product)

Product Quantity Price Gross
----------------------------------------------------
PRO1 180 7.62 1371.60
PRO1 12 7.62 91.44
PRO1 110 7.61 837.10
PRO1 220 7.65 1683.00

Format of expected input information:



Output information:
Product Quantity Avg.Price Gross
---------------------------------------------------------
PRO1 522 7.63 3983.14

Desired format of output information:



That is, for each given product (in the example only PRO1), obtain the total quantity, and also the total gross (with its corresponding price), and the average price.

There is an excellent example of trailer1 processing averages and totals in 3.13.2.4 Example 4 in the dfsort manual......

I'll have a look.
Thanks a lot.

CICS Guy wrote:There is an excellent example of trailer1 processing averages and totals in 3.13.2.4 Example 4 in the dfsort manual......

Hi CICS-Guy,

Thanks for your quick reply, but I think you misunderstood me. I'm not interested in the formatting/editing features of DFSORT. Instead, the calculations themselves. But as you can see, the output records include the calculations (the total sum of quantity, average price per product, and the gross, taking into accout the specific rpice of each input line).

I think this is difficult to explain, but I wouldn't like to write a program to just calculate totals per product.

zost,

You can use a DFSORT job like this to do what you asked for:



SORTOUT would have:



Note that the average here is 762, not 763. The AVG function gives TOT/COUNT rounded down to the nearest integer, so 3050/4 = 762.5 is rounded down to 762.

If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access it online, along with all of the other DFSORT books, from:

http://www.ibm.com/servers/storage/supp ... tmpub.html