Can anybody tell me a Po field

Question

Hello ,
Can anybody tell me there is a field called KOMP-MWSBP
What is the exact field from where i can pick the data actually KOMP is a structure .
Komp-mwsbp is a tax field.
Regards
Mave

Answer 1

Ok here is report on how to get the tax value.
Run it with PO num and item no. and you will get the output. You can replicate it in your code.
report ztest.
tables : taxcom , ekko , ekpo, t001.
data hwert  LIKE ekpo-netwr.
parameters pebeln like ekko-ebeln.
parameters pebelp like ekpo-ebelp.
select single * from ekko where ebeln eq pebeln.
select single * from ekpo where ebeln eq pebeln
   and ebelp eq pebelp.
select single * from T001 where bukrs eq ekko-bukrs.
   CLEAR taxcom.
    taxcom-bukrs = ekpo-bukrs.
    taxcom-budat = ekko-bedat.
    taxcom-waers = ekko-waers.
    taxcom-kposn = ekpo-ebelp.
    taxcom-mwskz = ekpo-mwskz.
    taxcom-txjcd = ekpo-txjcd.
    taxcom-shkzg = 'H'.
    taxcom-xmwst = 'X'.
    IF ekko-bstyp EQ 'F'.
      taxcom-wrbtr = ekpo-netwr.
    ELSE.
      taxcom-wrbtr = ekpo-zwert.
    ENDIF.
    taxcom-lifnr = ekko-lifnr.
    taxcom-land1 = ekko-lands.                              "WIA
    taxcom-ekorg = ekko-ekorg.
    taxcom-hwaer = t001-waers.
    taxcom-llief = ekko-llief.
    taxcom-bldat = ekko-bedat.
    taxcom-matnr = ekpo-matnr.         "HTN-Abwicklung
    taxcom-werks = ekpo-werks.
    taxcom-bwtar = ekpo-bwtar.
    taxcom-matkl = ekpo-matkl.
    taxcom-meins = ekpo-meins.
    IF ekko-bstyp EQ 'F'.
      taxcom-mglme = ekpo-menge.
    ELSE.
      IF ekko-bstyp EQ 'K' AND ekpo-abmng GT 0.
        taxcom-mglme = ekpo-abmng.
      ELSE.
        taxcom-mglme = ekpo-ktmng.
      ENDIF.
    ENDIF.
    IF taxcom-mglme EQ 0.
      taxcom-mglme = 1000.
    ENDIF.
    taxcom-mtart = ekpo-mtart.
    CALL FUNCTION 'CALCULATE_TAX_ITEM'
      EXPORTING
        i_taxcom     = taxcom
        display_only = ' '
        dialog       = ' '
      IMPORTING
        e_taxcom     = taxcom
        nav_anteil   = hwert
      EXCEPTIONS
        OTHERS       = 01.
if sy-subrc eq 0.
write :/ taxcom-WMWST.
endif.
Don't forget to reward points if answers helped.
Cheers