RFUMSV40 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for You can use this program to generate an advance report for tax on sales and purchases required by C...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.
If you would like to execute this report or see the full code listing simply enter RFUMSV40 into the relevant SAP transactions such as SE38 or SE80
This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.
Selection Text: ABWKTO1 = Alternative Account
Selection Text: ABWKTO2 = Alternative Account
Selection Text: ALTKPL = Use Alternative Accounts
Selection Text: BUCHDAT = Posting date for session
Selection Text: BUCHDAT2 = Posting date for session
Selection Text: CDMBTR = Calcn without ex.rate differ.
Selection Text: DEKLAR = Print tax declaration
Selection Text: DKONTO = Customer
Selection Text: EINBLART = Document type for invoices
Selection Text: EINKAU = Print purchase ledger
Selection Text: EINZEL = Line items for delivered goods
Selection Text: EINZEL2 = Line items for goods paid
Selection Text: EXCLGSM = Account key for GSM
Selection Text: EXSTORN = Exclude reversal
Selection Text: IMPBAS = Import tax posted with base
Selection Text: INSPEK = Tax authority
Selection Text: ISPOLN = Processor
Selection Text: KKONTO = Vendor
Selection Text: KURSBEW1 = Exchange rate valuation
Selection Text: KURSBEW2 = Exchange rate valuation
Selection Text: MAPBLAR2 = Document type for session
Selection Text: ZUSATZ2 = Additional data
Selection Text: ZUSATZ = Additional data
Selection Text: ZAHLMT = Payment method
Selection Text: WAERG = Currency
Selection Text: VKASSE = Sales without invoice
Selection Text: VERKAU = Print sales ledger
Selection Text: VERBLART = Docmnt type invoice/down pmnt
Selection Text: SORT2 = Sorting
Selection Text: SORT1 = Sorting
Selection Text: SLMKZ = Tax on sales/purchases code
Selection Text: SLANZ = Spec.G/L ind. for down pymnts
Selection Text: ROUNDC = Adjust roundings
Selection Text: PERKONTO = Per tax account
Selection Text: MWSATZ2 = 2nd tax rate
Selection Text: MWSATZ1 = 1st tax rate
Selection Text: MONAT = Fiscal Period
Selection Text: MAPPE2 = Create batch input session
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
POPUP_TO_DECIDE CALL FUNCTION 'POPUP_TO_DECIDE' EXPORTING DEFAULTOPTION = '2' textline1 = 'Report RFUMSV40 ist veraltet'(700) TEXTLINE2 = text-701 text_option1 = 'Programmausführung'(702) text_option2 = 'SAP Hinweise'(703) * ICON_TEXT_OPTION1 = 'ICON_OKAY' ICON_TEXT_OPTION2 = 'ICON_DISPLAY' titel = 'Report RFUMSV40 ist veraltet'(700) IMPORTING ANSWER = answ.
CALL_BROWSER CALL FUNCTION 'CALL_BROWSER' EXPORTING url = lv_url.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SELECTION ADDRESS_GROUP = 'CA01' IMPORTING * SADR = SADR ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4.
FI_VENDOR_DATA CALL FUNCTION 'FI_VENDOR_DATA' EXPORTING I_BUKRS = BR_BUKRS-LOW I_LIFNR = INSPEK IMPORTING E_KRED = INSPECTION.
SUSR_USER_ADDRESS_READ CALL FUNCTION 'SUSR_USER_ADDRESS_READ' "ab 4.0
PERIOD_DAY_DETERMINE CALL FUNCTION 'PERIOD_DAY_DETERMINE' EXPORTING I_GJAHR = BR_GJAHR-LOW I_MONAT = PERIOD_BEGIN I_PERIV = T001-PERIV IMPORTING E_FDAY = DATEFROM.
PERIOD_DAY_DETERMINE CALL FUNCTION 'PERIOD_DAY_DETERMINE' EXPORTING I_GJAHR = BR_GJAHR-LOW I_MONAT = PERIOD_END I_PERIV = T001-PERIV IMPORTING E_LDAY = DATETO.
PERIOD_DAY_DETERMINE * call function 'PERIOD_DAY_DETERMINE' "N786 * exporting "N786 * i_gjahr = br_gjahr-low "N786 * i_monat = period_begin "N786 * i_periv = t001-periv "N786 * importing "N786 * e_lday = datem1. "N786
PERIOD_DAY_DETERMINE * call function 'PERIOD_DAY_DETERMINE' "N786 * exporting "N786 * i_gjahr = br_gjahr-low "N786 * i_monat = period_end "N786 * i_periv = t001-periv "N786 * importing "N786 * e_fday = datem2. "N786
MONTH_NAMES_GET CALL FUNCTION 'MONTH_NAMES_GET' EXPORTING LANGUAGE = SY-LANGU TABLES MONTH_NAMES = I247 EXCEPTIONS MONTH_NAMES_NOT_FOUND = 01.
GET_TAX_PERCENTAGE * call function 'GET_TAX_PERCENTAGE' * exporting * aland = t001-land1 * datab = datumab * mwskz = t007a-mwskz * txjcd = space * tables * t_ftaxp = tab1 * exceptions * others = 1.
CALCULATE_TAX_FROM_NET_AMOUNT CALL FUNCTION 'CALCULATE_TAX_FROM_NET_AMOUNT' EXPORTING I_BUKRS = T001-BUKRS I_MWSKZ = T007A-MWSKZ I_WAERS = T001-WAERS I_WRBTR = HLP_HWNET TABLES T_MWDAT = TAB_RTAX1U15 EXCEPTIONS OTHERS = 8.
POSTING_INTERFACE_START CALL FUNCTION 'POSTING_INTERFACE_START' EXPORTING I_CLIENT = SY-MANDT I_FUNCTION = 'B' I_GROUP = MAPNAM I_USER = USRNAME EXCEPTIONS GROUP_NAME_MISSING = 03.
POSTING_INTERFACE_DOCUMENT CALL FUNCTION 'POSTING_INTERFACE_DOCUMENT' EXPORTING I_TCODE = 'FB41' TABLES T_FTPOST = TAB_ZLBU T_BLNTAB = TAB_BLN T_FTTAX = TAB_FTTAX EXCEPTIONS ACCOUNT_MISSING = 01 COMPANY_CODE_MISSING = 02 POSTING_KEY_INVALID = 03 POSTING_KEY_MISSING = 04 RECORD_TYPE_INVALID = 05 TRANSACTION_CODE_INVALID = 06.
POSTING_INTERFACE_END CALL FUNCTION 'POSTING_INTERFACE_END' EXCEPTIONS SESSION_NOT_PROCESSABLE = 1.
POSTING_INTERFACE_START CALL FUNCTION 'POSTING_INTERFACE_START' EXPORTING I_CLIENT = SY-MANDT I_FUNCTION = 'B' I_GROUP = MAPNAM2 I_USER = USRNAME EXCEPTIONS GROUP_NAME_MISSING = 03.
POSTING_INTERFACE_DOCUMENT CALL FUNCTION 'POSTING_INTERFACE_DOCUMENT' EXPORTING I_TCODE = 'FB41' TABLES T_FTPOST = TAB_ZLBU T_BLNTAB = TAB_BLN T_FTTAX = TAB_FTTAX EXCEPTIONS ACCOUNT_MISSING = 01 COMPANY_CODE_MISSING = 02 POSTING_KEY_INVALID = 03 POSTING_KEY_MISSING = 04 RECORD_TYPE_INVALID = 05 TRANSACTION_CODE_INVALID = 06.
POSTING_INTERFACE_END CALL FUNCTION 'POSTING_INTERFACE_END' EXCEPTIONS SESSION_NOT_PROCESSABLE = 1.
CALCULATE_EXCHANGE_RATE CALL FUNCTION 'CALCULATE_EXCHANGE_RATE' EXPORTING DATE = SY-DATUM FOREIGN_AMOUNT = IBSEG-WRBTR FOREIGN_CURRENCY = BKPF-WAERS LOCAL_AMOUNT = IBSEG-DMBTR LOCAL_CURRENCY = T001-WAERS IMPORTING EXCHANGE_RATE = ZAHL1-KURSF EXCEPTIONS NO_RATE_COMPUTABLE = 1 NO_RATE_FOUND = 2 RATE_TOO_BIG = 3 NO_FACTORS_FOUND = 4 NO_SPREAD_FOUND = 5.
CALCULATE_EXCHANGE_RATE CALL FUNCTION 'CALCULATE_EXCHANGE_RATE' EXPORTING DATE = SY-DATUM FOREIGN_AMOUNT = IBSEG-WRBTR FOREIGN_CURRENCY = BKPF-WAERS LOCAL_AMOUNT = IBSEG-DMBTR LOCAL_CURRENCY = T001-WAERS IMPORTING EXCHANGE_RATE = ZAHL2-KURSF EXCEPTIONS NO_RATE_COMPUTABLE = 1 NO_RATE_FOUND = 2 RATE_TOO_BIG = 3 NO_FACTORS_FOUND = 4 NO_SPREAD_FOUND = 5.
CALCULATE_EXCHANGE_RATE CALL FUNCTION 'CALCULATE_EXCHANGE_RATE' EXPORTING DATE = SY-DATUM FOREIGN_AMOUNT = PAY-WRBTR FOREIGN_CURRENCY = PAY-WAERS LOCAL_AMOUNT = PAY-DMBTR LOCAL_CURRENCY = T001-WAERS IMPORTING EXCHANGE_RATE = PAY-KURSF EXCEPTIONS NO_RATE_COMPUTABLE = 1 NO_RATE_FOUND = 2 RATE_TOO_BIG = 3 NO_FACTORS_FOUND = 4 NO_SPREAD_FOUND = 5.
CONVERT_TO_LOCAL_CURRENCY * call function 'CONVERT_TO_LOCAL_CURRENCY' * exporting * local_currency = bkpf-waers * foreign_currency = pay-waers * foreign_amount = pay-wrbtr * date = bkpf-budat * rate = bkpf-kursf * importing * local_amount = pay-wrbtr.
CONVERT_TO_LOCAL_CURRENCY * call function 'CONVERT_TO_LOCAL_CURRENCY' * exporting * local_currency = bkpf-waers * foreign_currency = inv-waers * foreign_amount = inv-wrbtr * date = bkpf-budat * rate = bkpf-kursf * importing * local_amount = inv-wrbtr.
CALCULATE_EXCHANGE_RATE CALL FUNCTION 'CALCULATE_EXCHANGE_RATE' EXPORTING DATE = SY-DATUM FOREIGN_AMOUNT = PAY-WRBTR FOREIGN_CURRENCY = PAY-WAERS LOCAL_AMOUNT = PAY-DMBTR LOCAL_CURRENCY = T001-WAERS IMPORTING EXCHANGE_RATE = PAY-KURSF EXCEPTIONS NO_RATE_COMPUTABLE = 1 NO_RATE_FOUND = 2 RATE_TOO_BIG = 3 NO_FACTORS_FOUND = 4 NO_SPREAD_FOUND = 5.
CONVERT_TO_LOCAL_CURRENCY * call function 'CONVERT_TO_LOCAL_CURRENCY' * exporting * local_currency = bkpf-waers * foreign_currency = pay-waers * foreign_amount = pay-wrbtr * date = bkpf-budat * rate = bkpf-kursf * importing * local_amount = pay-wrbtr.
CONVERT_TO_LOCAL_CURRENCY * call function 'CONVERT_TO_LOCAL_CURRENCY' * exporting * local_currency = bkpf-waers * foreign_currency = inv-waers * foreign_amount = inv-wrbtr * date = bkpf-budat * rate = bkpf-kursf * importing * local_amount = inv-wrbtr.
CALCULATE_EXCHANGE_RATE CALL FUNCTION 'CALCULATE_EXCHANGE_RATE' EXPORTING DATE = SY-DATUM FOREIGN_AMOUNT = OPO-WRBTR FOREIGN_CURRENCY = BKPF-WAERS LOCAL_AMOUNT = OPO-DMBTR LOCAL_CURRENCY = T001-WAERS IMPORTING EXCHANGE_RATE = OPO-KURSF EXCEPTIONS NO_RATE_COMPUTABLE = 1 NO_RATE_FOUND = 2 RATE_TOO_BIG = 3 NO_FACTORS_FOUND = 4 NO_SPREAD_FOUND = 5.
CALCULATE_EXCHANGE_RATE CALL FUNCTION 'CALCULATE_EXCHANGE_RATE' EXPORTING DATE = SY-DATUM FOREIGN_AMOUNT = IBSEG-WRBTR FOREIGN_CURRENCY = BKPF-WAERS LOCAL_AMOUNT = IBSEG-DMBTR LOCAL_CURRENCY = T001-WAERS IMPORTING EXCHANGE_RATE = KURS1 EXCEPTIONS NO_RATE_COMPUTABLE = 1 NO_RATE_FOUND = 2 RATE_TOO_BIG = 3 NO_FACTORS_FOUND = 4 NO_SPREAD_FOUND = 5.
CALCULATE_EXCHANGE_RATE CALL FUNCTION 'CALCULATE_EXCHANGE_RATE' EXPORTING DATE = SY-DATUM FOREIGN_AMOUNT = IRECH-WRBTR FOREIGN_CURRENCY = *BKPF-WAERS LOCAL_AMOUNT = IRECH-DMBTR LOCAL_CURRENCY = T001-WAERS IMPORTING EXCHANGE_RATE = KURS1 EXCEPTIONS NO_RATE_COMPUTABLE = 1 NO_RATE_FOUND = 2 RATE_TOO_BIG = 3 NO_FACTORS_FOUND = 4 NO_SPREAD_FOUND = 5.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING LOCAL_CURRENCY = T001-WAERS FOREIGN_CURRENCY = ZAHL1-WAERS FOREIGN_AMOUNT = ZAHL1-WRBTR DATE = BKPF-BUDAT "#EC DOM_EQUAL * rate = bkpf-kursf "Ausgleichskurs RATE = ZAHL1-KURSF "Siemens IMPORTING LOCAL_AMOUNT = ZAHL1-ZBETR EXCEPTIONS NO_RATE_FOUND = 1 OVERFLOW = 2 NO_FACTORS_FOUND = 3 NO_SPREAD_FOUND = 4.
CALCULATE_EXCHANGE_RATE CALL FUNCTION 'CALCULATE_EXCHANGE_RATE' EXPORTING DATE = SY-DATUM FOREIGN_AMOUNT = IRECH-WRBTR FOREIGN_CURRENCY = *BKPF-WAERS LOCAL_AMOUNT = IRECH-DMBTR LOCAL_CURRENCY = T001-WAERS IMPORTING EXCHANGE_RATE = KURS1 EXCEPTIONS NO_RATE_COMPUTABLE = 1 NO_RATE_FOUND = 2 RATE_TOO_BIG = 3 NO_FACTORS_FOUND = 4 NO_SPREAD_FOUND = 5.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING LOCAL_CURRENCY = T001-WAERS FOREIGN_CURRENCY = ZAHL2-WAERS FOREIGN_AMOUNT = ZAHL2-WRBTR DATE = BKPF-BUDAT "#EC DOM_EQUAL * rate = bkpf-kursf "Ausgleichskurs RATE = ZAHL2-KURSF "Siemens IMPORTING LOCAL_AMOUNT = ZAHL2-ZBETR EXCEPTIONS NO_RATE_FOUND = 1 OVERFLOW = 2 NO_FACTORS_FOUND = 3 NO_SPREAD_FOUND = 4.
CALCULATE_EXCHANGE_RATE CALL FUNCTION 'CALCULATE_EXCHANGE_RATE' EXPORTING DATE = SY-DATUM FOREIGN_AMOUNT = IRECH-WRBTR FOREIGN_CURRENCY = *BKPF-WAERS LOCAL_AMOUNT = IRECH-DMBTR LOCAL_CURRENCY = T001-WAERS IMPORTING EXCHANGE_RATE = KURS1 EXCEPTIONS NO_RATE_COMPUTABLE = 1 NO_RATE_FOUND = 2 RATE_TOO_BIG = 3 NO_FACTORS_FOUND = 4 NO_SPREAD_FOUND = 5.
CALCULATE_TAX_FROM_GROSSAMOUNT CALL FUNCTION 'CALCULATE_TAX_FROM_GROSSAMOUNT' EXPORTING I_BUKRS = ZAHL1-BUKRS I_MWSKZ = IRECH-MWSKZ I_WAERS = ZAHL1-WAERS I_WRBTR = IRECH-WRBTR TABLES T_MWDAT = TAB_RTAX1U15 EXCEPTIONS BUKRS_NOT_FOUND = 1 COUNTRY_NOT_FOUND = 2 MWSKZ_NOT_DEFINED = 3 MWSKZ_NOT_VALID = 4.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING LOCAL_CURRENCY = T001-WAERS FOREIGN_CURRENCY = *BKPF-WAERS FOREIGN_AMOUNT = TAB_RTAX1U15-WMWST DATE = *BKPF-BUDAT "#EC DOM_EQUAL RATE = KURS1 "Rechnungskurs IMPORTING LOCAL_AMOUNT = TAB_RTAX1U15-WMWST.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING LOCAL_CURRENCY = T001-WAERS FOREIGN_CURRENCY = *BKPF-WAERS FOREIGN_AMOUNT = TAB_RTAX1U15-KAWRT DATE = *BKPF-BUDAT "#EC DOM_EQUAL RATE = KURS1 "Rechnungskurs IMPORTING LOCAL_AMOUNT = TAB_RTAX1U15-KAWRT.
CALCULATE_TAX_FROM_GROSSAMOUNT CALL FUNCTION 'CALCULATE_TAX_FROM_GROSSAMOUNT' EXPORTING I_BUKRS = ZAHL2-BUKRS I_MWSKZ = IRECH-MWSKZ I_WAERS = ZAHL2-WAERS I_WRBTR = IRECH-WRBTR TABLES T_MWDAT = TAB_RTAX1U15 EXCEPTIONS BUKRS_NOT_FOUND = 1 COUNTRY_NOT_FOUND = 2 MWSKZ_NOT_DEFINED = 3 MWSKZ_NOT_VALID = 4.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING LOCAL_CURRENCY = T001-WAERS FOREIGN_CURRENCY = *BKPF-WAERS FOREIGN_AMOUNT = TAB_RTAX1U15-WMWST DATE = *BKPF-BUDAT "#EC DOM_EQUAL RATE = KURS1 "Rechnungskurs IMPORTING LOCAL_AMOUNT = TAB_RTAX1U15-WMWST.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING LOCAL_CURRENCY = T001-WAERS FOREIGN_CURRENCY = *BKPF-WAERS FOREIGN_AMOUNT = TAB_RTAX1U15-KAWRT DATE = *BKPF-BUDAT "#EC DOM_EQUAL RATE = KURS1 "Rechnungskurs IMPORTING LOCAL_AMOUNT = TAB_RTAX1U15-KAWRT.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.
The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.
This will then be available for everyone to easily find by simply searching on the report name RFUMSV40 or its description.