SAP Reports / Programs | Materials Management | Invoice Verification(MM-IV) SAP MM

RMMR1MRB SAP ABAP Report - Revaluation with Logistics Invoice Verification







RMMR1MRB is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.

If you would like to execute this report or see the full code listing simply enter RMMR1MRB into the relevant SAP transactions such as SE38 or SE80


Transaction Code(s):

Below is a list of transaction codes which are relevant to this SAP report

MRNB - Revaluation


ABAP code to call this SAP report using the submit statement

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.






SUBMIT RMMR1MRB. "Basic submit
SUBMIT RMMR1MRB AND RETURN. "Return to original report after report execution complete
SUBMIT RMMR1MRB VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Selection Text: PA_LPN = Smart Number
Selection Text: PA_VARIA = Variant
Selection Text: PA_XDIFF = Value Difference Check Active
Selection Text: PA_BLDAT = D .
Selection Text: PA_BUDAT = D .
Selection Text: PA_CPUDT = D .
Selection Text: PA_EBELN = D .
Selection Text: PA_EBELP = D .
Selection Text: PA_GUZTE = D .
Selection Text: PA_MINWR = D .
Selection Text: PA_MODUS = D .
Selection Text: PA_NBWDT = D .
Selection Text: PA_XTEST = D .
Selection Text: PA_ZFBDT = D .
Selection Text: PA_ZTERM = D .
Selection Text: SO_WEDAT = D .
Title: Revaluation with Logistics Invoice Verification
Text Symbol: 035 = Do you want to carry out revaluation?
Text Symbol: 034 = Carry out revaluation?
Text Symbol: 033 = Delivery Note Date
Text Symbol: 032 = Entry Date
Text Symbol: 031 = Posting Date
Text Symbol: 025 = Copy from Creditor
Text Symbol: 024 = Date for GR Selection/Price Determination
Text Symbol: 001 = Revaluation Log
Text Symbol: 002 = Revaluation Results in Test Mode
Text Symbol: 003 = PO Number/Item:
Text Symbol: 004 = Material/Short Text:
Text Symbol: 005 = Plant:
Text Symbol: 006 = Company Code:
Text Symbol: 007 = Purchasing Org.:
Text Symbol: 008 = Past Period:
Text Symbol: 009 = Reference Date:
Text Symbol: 010 = Terms of Payment:
Text Symbol: 011 = Settlement Currency:
Text Symbol: 012 = Execution Time:
Text Symbol: 013 = User:
Text Symbol: 014 = Without Terms of Payment





Text Symbol: 015 = Vendor:
Text Symbol: 016 = Processing Mode:
Text Symbol: 017 = ToP Credit Memo:
Text Symbol: 018 = Accounting Doc.
Text Symbol: 019 = FI Doc.
Text Symbol: 020 = Display Purchasing Doc.
Text Symbol: 021 = Purchasing Document Selection
Text Symbol: 022 = Processing Options
Text Symbol: 023 = Display Options


INCLUDES used within this REPORT RMMR1MRB

INCLUDE MRM_TYPES_NAST.
INCLUDE: MRM_CONST_MRM,
MRM_CONST_NAST,
MRM_CONST_ME,
MRM_CONST_COMMON.


TABLES used within REPORT and the associated SELECT statement:

No SAP DATABASE tables are accessed within this REPORT code!


Function Modules used within report and the associated call statement:

ME_EKKO_SINGLE_READ CALL FUNCTION 'ME_EKKO_SINGLE_READ'" ==> read it! EXPORTING pi_ebeln = pa_ebeln * PI_BYPASSING_BUFFER = * PI_REFRESH_BUFFER = IMPORTING po_ekko = ekko EXCEPTIONS no_records_found = 1 OTHERS = 2.

CURRENCY_EXPIRATION_CHECK CALL FUNCTION 'CURRENCY_EXPIRATION_CHECK' EXPORTING currency = ekko-waers date = sy-datlo object = f_object IMPORTING currency_new = f_waers EXCEPTIONS error_message = 4.

ME_READ_HISTORY CALL FUNCTION 'ME_READ_HISTORY' EXPORTING ebeln = ekko-ebeln ebelp = ekpo-ebelp webre = 'X' vrtkz = ekpo-vrtkz TABLES xekbe = ct_ekbe "Bestellentwicklungssätze xekbes = lt_ekbes "Bestellentwicklungssummen xekbez = ct_ekbez "Bestellentwicklungs- "summen nach WE-Belege xekbnk = lt_ekbnk "Bezugsnebenkostensummen xekbz = lt_ekbz. "Bezugsnebenkostensätze

ME_SET_XDINV CALL FUNCTION 'ME_SET_XDINV' EXPORTING iv_item_diff_inv = ekpo-diff_invoice IMPORTING ev_xdinv = lv_xdinv.

ME_TKOMV_PREPARE_BATCH_CONV_F CALL FUNCTION 'ME_TKOMV_PREPARE_BATCH_CONV_F' EXPORTING iv_matnr = ekpo-matnr iv_werks = ekpo-werks "N1656303 iv_charg = ls_meprwe-charg CHANGING ct_komv = gt_tkomv.

ME_PRICING_REFRESH CALL FUNCTION 'ME_PRICING_REFRESH'.

ME_PRICING_POSITION CALL FUNCTION 'ME_PRICING_POSITION' EXPORTING kopf = ekko lieferant_a = lfa1 * LIEFERANT_M = ' ' * MATERIAL = ' ' position = ekpo * preisfindungsart = 'C' " Erhalt der manuellen Konditionen preisfindungsart = lf_prfart preisfindungsmenge = lf_remng "changed MB663544, 884394 wedaten = ls_meprwe IMPORTING * NAVNW = netwr = cf_wertn " in Bestellwährung * VKWRT = * VKWRA = * VKWRT_WAERS = * VKWRA_WAERS = * E_MSGID = * E_MSGNO = * E_ERROR = * E_BPUMZ = * E_BPUMN = * E_KOMK = * E_KOMP = TABLES i_tkomv = gt_tkomv.

RV_KONV_SELECT CALL FUNCTION 'RV_KONV_SELECT' "mit append EXPORTING comm_head_i = komk general_read = if_general_read TABLES tkomv = gt_gkomv.

T001_SINGLE_READ CALL FUNCTION 'T001_SINGLE_READ' EXPORTING bukrs = ekko-bukrs IMPORTING wt001 = ls_t001 EXCEPTIONS not_found = 1 wrong_call = 2 OTHERS = 3.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = "EC DOM_EQUAL foreign_amount = ct_segtab-werta foreign_currency = ls_t001-waers local_currency = ekko-waers * RATE = 0 * TYPE_OF_RATE = 'M' * READ_TCURR = 'X' IMPORTING * EXCHANGE_RATE = * FOREIGN_FACTOR = local_amount = ct_segtab-werta * LOCAL_FACTOR = * EXCHANGE_RATEX = * FIXED_RATE = * DERIVED_RATE_TYPE = EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

MRM_HEAD_MESSAGE_CREATE CALL FUNCTION 'MRM_HEAD_MESSAGE_CREATE' EXPORTING if_kappl = c_kappl_mr if_kalsm = c_kalsm_0005 is_rbkpv = ls_rbkpv is_komkbmr = ls_komkbmr if_update = lf_update if_protocol = lf_protocol EXCEPTIONS error_message = 2 OTHERS = 3.

FI_DOCUMENT_NUMBER_GET





CALL FUNCTION 'FI_DOCUMENT_NUMBER_GET' TABLES t_accdn = t_accdn t_logdn = t_logdn.

RPY_MESSAGE_COMPOSE CALL FUNCTION 'RPY_MESSAGE_COMPOSE' EXPORTING message_id = px_mesg-arbgb message_number = h_msgno message_var1 = px_mesg-msgv1 message_var2 = px_mesg-msgv2 message_var3 = px_mesg-msgv3 message_var4 = px_mesg-msgv4 IMPORTING message_text = h_mtext EXCEPTIONS message_not_found = 1 OTHERS = 2.

MRM_INVOICE_CREATE CALL FUNCTION 'MRM_INVOICE_CREATE' EXPORTING i_rbkpv = cs_rbkpv i_simulation = pa_xtest i_stgrd = space i_fix_payment_terms = c_signx i_fix_quantity_amount = c_signx i_no_blocking_reasons = space i_transfer_price = space i_edi_korrkz = space IMPORTING * E_BELNR = * E_GJAHR = e_rbkpv = cs_rbkpv TABLES t_frseg = lt_frseg EXCEPTIONS error_message = 01 OTHERS = 02.

MRM_PAYMENT_TERMS_GET CALL FUNCTION 'MRM_PAYMENT_TERMS_GET' EXPORTING if_zterm = cs_rbkpv-zterm if_bldat = lf_bldat if_budat = lf_budat if_zfbdt = pa_zfbdt IMPORTING ef_zfbdt = cs_rbkpv-zfbdt ef_zbd1t = cs_rbkpv-zbd1t ef_zbd1p = cs_rbkpv-zbd1p ef_zbd2t = cs_rbkpv-zbd2t ef_zbd2p = cs_rbkpv-zbd2p ef_zbd3t = cs_rbkpv-zbd3t ef_zlsch = cs_rbkpv-zlsch ef_zlspr = cs_rbkpv-zlspr.

FI_VENDOR_DATA CALL FUNCTION 'FI_VENDOR_DATA' "buffers 2 entries EXPORTING i_lifnr = cs_rbkpv-lifnr i_bukrs = cs_rbkpv-bukrs IMPORTING e_kred = ls_kred EXCEPTIONS OTHERS = 1.

MR_PERIOD_DETERMINE CALL FUNCTION 'MR_PERIOD_DETERMINE' EXPORTING i_bukrs = ekko-bukrs i_budat = if_nbwdt EXCEPTIONS invalid_posting_period = 1 marv_no_entry = 2 OTHERS = 3.

FI_CHECK_ZTERM CALL FUNCTION 'FI_CHECK_ZTERM' EXPORTING * I_KOART = ' ' i_zterm = if_zterm * IMPORTING * E_T052 = EXCEPTIONS invalid_zterm = 1 OTHERS = 2.

MRM_DBTAB_T169F_READ CALL FUNCTION 'MRM_DBTAB_T169F_READ' EXPORTING i_tcode = tcode_mrnb * I_BUFFER_ON = 'X' IMPORTING e_t169f = t169f EXCEPTIONS entry_not_found = 1 OTHERS = 2.

ME_EKPO_SINGLE_READ CALL FUNCTION 'ME_EKPO_SINGLE_READ' EXPORTING pi_ebeln = if_ebeln pi_ebelp = if_ebelp * PI_BYPASSING_BUFFER = * PI_REFRESH_BUFFER = IMPORTING po_ekpo = ekpo EXCEPTIONS no_records_found = 1 OTHERS = 2.

ME_EKKO_SINGLE_READ CALL FUNCTION 'ME_EKKO_SINGLE_READ' EXPORTING pi_ebeln = if_ebeln * PI_BYPASSING_BUFFER = * PI_REFRESH_BUFFER = IMPORTING po_ekko = ekko EXCEPTIONS no_records_found = 1 OTHERS = 2.

CURRENCY_EXPIRATION_CHECK CALL FUNCTION 'CURRENCY_EXPIRATION_CHECK' EXPORTING currency = ekko-waers date = sy-datlo object = f_object IMPORTING currency_new = f_waers EXCEPTIONS error_message = 4.

FI_VENDOR_DATA CALL FUNCTION 'FI_VENDOR_DATA' "buffers 2 entries EXPORTING i_lifnr = ekko-lifre i_bukrs = ekko-bukrs IMPORTING e_kred = ls_kred EXCEPTIONS OTHERS = 1.

VENDOR_MASTER_DATA_SELECT_13 CALL FUNCTION 'VENDOR_MASTER_DATA_SELECT_13' EXPORTING pi_lifnr = ekko-lifnr pi_ekorg = ekko-ekorg * PI_LTSNR = pi_werks = ekpo-werks IMPORTING pe_lfm2 = lfm2 * PE_EKORZ = EXCEPTIONS no_entry_found = 1 parameter_missing = 2 OTHERS = 3.

VENDOR_MASTER_DATA_SELECT_12 CALL FUNCTION 'VENDOR_MASTER_DATA_SELECT_12' EXPORTING pi_lifnr = ekko-lifnr pi_ekorg = ekko-ekorg IMPORTING pe_lfm1 = lfm1 * PE_EKORZ = EXCEPTIONS no_entry_found = 1 OTHERS = 2.

FI_F4_ZTERM CALL FUNCTION 'FI_F4_ZTERM' EXPORTING i_koart = 'K' i_zterm = cf_zterm * I_XSHOW = ' ' * I_ZTYPE = ' ' IMPORTING e_zterm = cf_zterm EXCEPTIONS nothing_found = 1 OTHERS = 2.

REUSE_ALV_VARIANT_DEFAULT_GET CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET' EXPORTING i_save = c_save CHANGING cs_variant = gs_variant EXCEPTIONS wrong_input = 1 not_found = 2 program_error = 3 OTHERS = 4.

REUSE_ALV_VARIANT_F4 CALL FUNCTION 'REUSE_ALV_VARIANT_F4' EXPORTING is_variant = gs_variant i_save = c_save * it_default_fieldcat = IMPORTING e_exit = gf_exit es_variant = gs_variant EXCEPTIONS not_found = 2.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_structure_name = 'RAP_DATA' CHANGING ct_fieldcat = ct_fieldcat EXCEPTIONS OTHERS = 1.

REUSE_ALV_EVENTS_GET CALL FUNCTION 'REUSE_ALV_EVENTS_GET' EXPORTING i_list_type = 0 IMPORTING et_events = ct_events.

REUSE_ALV_COMMENTARY_WRITE CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' EXPORTING it_list_commentary = gt_list_top_of_page.




FI_COMPANY_CODE_DATA CALL FUNCTION 'FI_COMPANY_CODE_DATA' EXPORTING i_bukrs = if_bukrs IMPORTING e_t001 = cs_t001 EXCEPTIONS OTHERS = 1.

T001W_SINGLE_READ CALL FUNCTION 'T001W_SINGLE_READ' EXPORTING t001w_werks = if_werks IMPORTING wt001w = cs_t001w EXCEPTIONS not_found = 1 OTHERS = 2.

T024E_SINGLE_READ CALL FUNCTION 'T024E_SINGLE_READ' EXPORTING t024e_ekorg = if_ekorg IMPORTING wt024e = cs_t024e EXCEPTIONS not_found = 1 OTHERS = 2.

REUSE_ALV_LIST_DISPLAY

REUSE_ALV_GRID_DISPLAY * CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING i_interface_check = ' ' i_buffer_active = c_signx i_callback_program = gf_repid i_callback_pf_status_set = 'STATUS_SET' i_callback_user_command = 'FUNCTION_EXECUTE' * i_structure_name = 'RAP_DATA' is_layout = ls_layout it_fieldcat = gt_fieldcat[] * IT_EXCLUDING = * it_special_groups = gt_sp_group[] it_sort = gt_sort[] * IT_FILTER = * IS_SEL_HIDE = * I_DEFAULT = 'X' i_save = c_save is_variant = gs_variant it_events = gt_events[] it_event_exit = gt_event_exit[] * IS_PRINT = * IS_REPREP_ID = * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = TABLES t_outtab = it_segtab EXCEPTIONS program_error = 1 OTHERS = 2.

ME_DISPLAY_PURCHASE_DOCUMENT CALL FUNCTION 'ME_DISPLAY_PURCHASE_DOCUMENT' EXPORTING i_ebeln = pa_ebeln i_ebelp = pa_ebelp * IMPORTING * E_EKKO = EXCEPTIONS not_found = 1 OTHERS = 2.

MRM_HEAD_MESSAGE_CREATE CALL FUNCTION 'MRM_HEAD_MESSAGE_CREATE' EXPORTING if_kappl = c_kappl_mr if_kalsm = c_kalsm_0005 is_rbkpv = ls_rbkpv is_komkbmr = ls_komkbmr if_update = space if_protocol = lf_protocol EXCEPTIONS error_message = 2 OTHERS = 3.

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' "#EC FB_OLDED EXPORTING titel = text-034 textline1 = ' ' textline2 = text-035 cancel_display = space IMPORTING answer = lf_answer.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING domname = 'MR_RAP_MODUS' domvalue = lf_value langu = sy-langu IMPORTING txt = lf_text EXCEPTIONS not_found = 1 OTHERS = 2.

F4IF_FIELD_VALUE_REQUEST CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST' EXPORTING tabname = 'RAP_PARA' fieldname = 'MODUS' * SEARCHHELP = ' ' * SHLPPARAM = dynpprog = lf_dyname dynpnr = lf_dynumb dynprofield = 'PA_MODUS' stepl = 0 * value = lf_value * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' callback_program = lf_dyname callback_form = 'F4CALLBACK_MODUS' TABLES return_tab = lt_value EXCEPTIONS field_not_found = 1 no_help_for_field = 2 inconsistent_help = 3 no_values_found = 4 OTHERS = 5.

FI_VENDOR_DATA CALL FUNCTION 'FI_VENDOR_DATA' EXPORTING i_bukrs = p_bukrs i_lifnr = p_vf_kred-lnrze IMPORTING e_kred = p_vf_kred.

ME_SET_XDINV CALL FUNCTION 'ME_SET_XDINV' EXPORTING iv_item_diff_inv = is_ekpo-diff_invoice IMPORTING ev_xdinv = lv_xdinv.



Contribute (Add Comments)

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 RMMR1MRB or its description.