Re: is there a better way...

["Booth Martin" <booth@xxxxxxxxxxxx>]

why would you need a MODS? A simple alternating array will fill your needs
nicely.  The routine would be: Is the description in the array already?  If
not, add the description to the array. 

Then just add the amount to the corresponding alternate array 
 
---------------------------------
Booth Martin
http://www.martinvt.com
---------------------------------
-------Original Message-------
 
From: Midrange Systems Technical Discussion
Date: 03/09/04 14:03:23
To: 'Midrange Systems Technical Discussion'
Subject: is there a better way...
 
I'm reading a PO, and there are various charges through each line of
detail... And I was asked to group the charges at the bottom of the page...
 
line 1
     tax 8.96
     frt 12.45
     delivery 45.67
line 2
     tax 9.12
line3
     frt 9.23
 
 
and at the bottom of the page, i need
     tax xx.xx
     frt xx.xx
     delivery xx.xx
 
so I was was thinking about using a mods to do this... With a simple add,
find, update procedure...  But I was wondering, if there were better arrary
handling features in the latest  versions of rpg, to handle this...
d chargegroup     ds                  occurs(999) inz
d  chargedesc                   30
d  chargetotal                  17  2
 
but, i'm not allowed to use embedded sql grouping / sum features... It has
to be all old fashioned rpg code...
 
I can't hard code these charge types, they can change anytime accounting
feels like it...
 
Thanks, tim
 
This e-mail message, including any attachments, is for the sole use of the
intended recipient(s) and may contain confidential or privileged
information.  Any unauthorized review, use, disclosure or distribution is
prohibited.  If you are not the intended recipient, please contact the
sender by reply e-mail and destroy the message.
_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.