How to retrive rate field in taxinvoice

Question

hi Guru ,
i Write following code  but rate field not retrive.
select kbetr kwert kschl from konv INTO CORRESPONDING FIELDS OF table it_konv
FOR ALL ENTRIES IN  IT_VBRk where KNUMV = IT_VBrK-KNUMV  and kschl = 'ZRPR'.
loop at it_konv.
endloop.
select kbetr kwert kschl from konv INTO CORRESPONDING FIELDS OF table it1_konv
for all entries in IT_VBRk where KNUMV = IT_VBRK-KNUMV and kschl eq 'ZFAB'.
loop at it1_konv.
endloop.
select kbetr kwert kschl from konv INTO CORRESPONDING FIELDS OF table it2_konv
for all entries in IT_VBRk where KNUMV = IT_VBRK-KNUMV and kschl eq 'ZRLB'.
loop at it2_konv .
endloop.
loop at it_vbrp.
  read table it_konv with key knumv = it_vbrk-knumv .
read table it1_konv with key knumv = it_vbrk-knumv.
read table it2_konv with key knumv = it_vbrk-knumv.
itabfinal-amount1 = it_konv-kbetr + it1_konv-kbetr + it2_konv-kbetr .
itabfinal-value = it_konv-KWERT + it1_konv-KWERT + it2_konv-KWERT .
append itabfinal.
refresh itabfinal.
endloop.
this code get same rate in different material.
please help.

Answer 1

Hi,
Why you r writing so many times a select query on KONV.
I think you can write the logic as follows
select kbetr kwert kschl from konv INTO CORRESPONDING FIELDS OF table it_konv
for all entries in IT_VBRK
where KNUMV = IT_VBRK-KNUMV
and ( kschl eq 'ZRPR'
or kschl eq 'ZFAB'
or kschl eq 'ZRLB' ) .
loop at IT_VBRP.
read table IT_VBRK with key ebeln = IT_VBRP-VBELN.
if sy-subrc = 0.
loop at IT_KONV where knumv = IT_VBRK-KNUMV
sum the condition values as required.
endloop.
endloop.
With Regards,
Dwarakanath.S