Addition of Amounts Based on Currency's

Question

Hi all,
I have in an internal table 1) Amounts,
                                     2) Currency,
                                     3) Debit(s)/Credit(h)   indicator as three fields.
According to my requirement, i have to add up all the amounts which are credit of a perticular Currency also add up debit amounts of that currency.
For example if i have dollars,pounds and Rupees as entries
            Amount             Currency               debit/credit
            400                    USD                        s
            100                    USD                        s
              30                    GBP                        s
            200                    USD                        h
              10                    GBP                        s
            3000                   INR                         s
              20                    GBP                        h
             2000                   INR                        s
            1500                   INR                        h
my result should be---->  USD  = (400+100) - 200 -
> 300 USD.
                                     GBP = (30+10) - 20 -
> 20 GBP.
                                     INR   =  (3000+2000)-1500 -
>3500 INR.
     Basically we are adding up all the 's' types induvisually & 'd' types induvisually for each curency and
        final out put is [total of s types] - [total of d types] for each currency.           
Plz Suggest me a sloution and if posible plz send in a pseudocode.
THANKS IN ADVANCE.
Reddy.

Answer 1

Hi Pami,
Pseudocode
Loop at itab into wa.
if indicator= h
multiply amount by -1.
endif.
endloop.
sort itab by currency.
loop at itab into wa.
case wa-currency.
when'USD'
usd_tot = usd_tot + wa-amount.
when 'GBP'
gbp_tot = gbp_tot + wa-amount.
similarily for all currencies.
endcase
endloop.
<b>Reward points, if helpful.</b>
Regards,
Atin