Diplay the output

Question

hi all,
      i got the sale and cost of sale in two different internal tables.like this
it_sales
key    rprctr    hsl
01     6003      7654.34
01     6003      654.67
it_cost
key     rprctr      csale
01      6003        45678.98
01      6003         89765.87
01      6003         65438.70
i need to display the out put like this
key     rprctr        hsl      csale
in table it_sale got only 2 records but it_cost got 3 records, if i display in one out put 3 record in the output hsl must be 0.
if it_sales is greater than it_cost in the output cost of sales must be 0.
for this how can i write the code if any body know please help me.
answer will be rewarded.
regards
srinivas.

Answer 1

Hi,
   data lv_lines type i
        lv_lines type i.
        describe table it_sale lines lv_line
        describe table it_cost lines lv_line1.
         if lv_line > it_line1.
          loop at it_cost.
           it_cost-csale = 0.
           modify it_cost transporting csale.  
           endloop.
         else.
        loop at it_sale.
           it_sale-hsl = 0.
           modify it_sale transporting hsl.  
           endloop.
          endif.
        endloop.
       endif.
     loop at it_sale.
       read table it_cost with key key = it_sale-key
                  rprctr = it_sale- repctr
                  binary search.
      if sy-subrc eq 0.
        write:/it_sale-key,it_sale-rprctr,
              it_sale-hsl,it_cost-csale.
       endif.
      endloop. 
Regards
amole