How to calculate Amount of goods received bill not received

Question

Hi Gurus,
In my vendor aging report client require one filed which is amount of goods received bill not received (Goods received amount- Invoice amount)
can u please tell me what should i do?
Thanks in Advance
Kavita

Answer 1

Hi,
Actually i written a code in CMOD and enhanced the data source but the value is not proper......
something is missing ...can anyone explain
here is my code
when '0FI_AP_4'.
  data  wa_DTFIAP_3 type  DTFIAP_3.
    loop at c_t_data into wa_dtfiap_3.
     select single ebeln lifnr from ekko into  (it_ap03-ebeln,it_ap03-lifnr)
        where lifnr = wa_dtfiap_3-lifnr.
       it_ap03-budat = wa_dtfiap_3-budat.
       it_ap03-budat = wa_dtfiap_3-belnr.
      if sy-subrc = 0.
        append it_ap03.
       endif.
    endloop.
  loop at it_ap03.
   select SINGLE mblnr from mkpf into mkpf-mblnr WHERE budat =  it_ap03-budat and blart = 'WE' AND
     VGART = 'WE' .
     IF SY-subrc = 0.
     SELECT SUM( dmbtr ) from mseg into   it_ap03-dmbtr where mblnr = mkpf-mblnr and xauto = '' and
       bwart in ('101','102') and lifnr = it_ap03-lifnr .
   SELECT SINGLE ebeln matnr from mseg into (mseg-ebeln,mseg-matnr) where mblnr = mkpf-mblnr.
     select sum( dmbtr ) from ekbe into it_ap03-dmbtr1
     where ebeln = mseg-EBELN  and vgabe = 2  and matnr = mseg-matnr  and budat = it_ap03-budat.
     it_ap03-tamt = it_ap03-dmbtr - it_ap03-dmbtr1.
    ENDIF.
select sum( wrbtr ) from ekbe into it_ap03-dmbtr
where ebeln = it_ap03-EBELN  and bewtp = 'E' and budat = it_ap03-budat.
  select sum( wrbtr ) from ekbe into it_ap03-dmbtr1
where ebeln = it_ap03-EBELN  and bewtp = 'Q'  and budat = it_ap03-budat .
  modify it_ap03.
  clear it_ap03.
  endloop.
loop at c_t_data into wa_dtfiap_3.
read table it_ap03 with key lifnr = wa_dtfiap_3-lifnr belnr = wa_dtfiap_3-belnr.
wa_dtfiap_3-zzbillamt = it_ap03-tamt.
modify c_t_data from wa_dtfiap_3.
endloop.
endcase.
Edited by: kavita on Sep 11, 2010 8:48 AM