RFVDREV0 SAP ABAP Report - Balance Sheet Valuation of Foreign Currency Loans
RFVDREV0 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for You use this report program to determine the book values for your foreign currency loans...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 RFVDREV0 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
FNSA - Foreign currency valuation
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 RFVDREV0. "Basic submit
SUBMIT RFVDREV0 AND RETURN. "Return to original report after report execution complete
SUBMIT RFVDREV0 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: KURSBER = D .
Selection Text: PA_RUECK = Posting date of reset
Selection Text: PA_R_BL = Document date of reset
Selection Text: PA_STORN = Only sel. revs up to key dte
Selection Text: PRINZIP = Valuation Principle
Selection Text: P_BDAR = Only Valued Loans
Selection Text: P_DETAIL = Detailed Log
Selection Text: P_DIFF = Take Off Euro Rounding Diff.
Selection Text: P_NOFIX = No Fixed Rate Check
Selection Text: P_SUM = Only Totals Log
Selection Text: REVBCK = Reset Valuation
Selection Text: SIMULA = D .
Selection Text: SO_BUKRS = D .
Selection Text: SO_GSART = D .
Selection Text: SO_RANL = D .
Selection Text: SO_RBEAR = Created by
Selection Text: SO_REFKO = Account Assignment Reference
Selection Text: SO_STITE = Loan Type
Selection Text: SO_WAERS = Contract Currency
Selection Text: STICHTAG = Key Date
Title: Balance Sheet Valuation of Foreign Currency Loans
Text Symbol: 901 = *** Error: Inconsistent dataset results in division by zero ***
Text Symbol: B01 = Posting Log for Valuation
Text Symbol: BL1 = Selections
Text Symbol: BL2 = Parameters for Foreign Curr. Valuation
Text Symbol: BL3 = Log Parameters
Text Symbol: T01 = Valuation
Text Symbol: T02 = Reset Valuation
Text Symbol: T03 = Company Code
Text Symbol: T04 = Contract
Text Symbol: T_H = Historical Evaluation
Text Symbol: T_S = Simulation Run
Text Symbol: T_T = Test Run Incl. Simulation Run Transfer to FI
Text Symbol: 900 = Valuation principle does not exist
Text Symbol: 001 = Balance Sheet Valuation of Foreign Currency Loans on Key Date
Text Symbol: 002 = Currency Depr./Appr. Totals
Text Symbol: 003 = Loans Given
Text Symbol: 004 = Loans Taken
Text Symbol: 005 = Totals for Valuation Gains
Text Symbol: 006 = Totals for Valuation Losses
Text Symbol: 007 = Company Code:
Text Symbol: 008 = Product Type
Text Symbol: 009 = Loan Curr.
Text Symbol: 010 = Balance Sheet Valuation of Foreign Currency Loans on
Text Symbol: 015 = Valuation Results
Text Symbol: 016 = Loc. Crcy
Text Symbol: 020 = Total for All Company Codes
Text Symbol: 030 = Errors:
Text Symbol: 050 = CoCd Loan Number
Text Symbol: 051 = CoCd Loan Number Acct Assgt Ref. Account Bal. Sheet Transfer
Text Symbol: 061 = Currency Remain.Cap. Acquisition Val. Acquis.Rate Specially Secured
Text Symbol: 062 = Rate Date Curr.Val. Current Rate
Text Symbol: 063 = Old Book Val. Old Book Rate
Text Symbol: 064 = Valuation Gain/Loss New Book Val. New Book Rate Flow Special. Secured
Text Symbol: 100 = *** Warning: Valuation after key date exists. No valuation possible ***
Text Symbol: 101 = *** Warning: Contract was already valued on key date - No revaluation ***
Text Symbol: 102 = *** Error: Posting not possible, since planned records still exist before key date ***
Text Symbol: 103 = *** Info: Actual records after key date --> Dynamic roll-up ***
Text Symbol: 104 = *** Repeated: No valuation exists yet
Text Symbol: 105 = *** Warning: Reversal not possible, since planned records still exist before key date ***
Text Symbol: 106 = *** Info: Actual records after key date --> Dynamic roll-up ***
Text Symbol: 107 = *** Info: No valuation rate for key date, previous rate was used ***
Text Symbol: 203 = *** Error: Actual records after key date ***
Text Symbol: 210 = Error When Reading Flows
Text Symbol: 301 = Loan $1 in company code $2 is blocked by user $3
Text Symbol: 302 = Error in management of locking objects
Text Symbol: 800 = Take off books: Euro rounding diff. without reset only
INCLUDES used within this REPORT RFVDREV0
No INCLUDES are used within this REPORT code!
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:
TB_PROGRESS_INDICATOR CALL FUNCTION 'TB_PROGRESS_INDICATOR' EXPORTING PERCENTAGE = 0 ID = 'SELECTION'.
EMUL_READ_INCURRENCY CALL FUNCTION 'EMUL_READ_INCURRENCY' EXPORTING DATE = SY-DATUM I_FLG_NO_FIX_CHECK = p_nofix "N1165806 IMPORTING EURO_CURRENCY = EURO_WAERS EXCEPTIONS NO_EURO_CURRENCY_FOUND = 1 TWO_OR_MORE_EURO_CURR_FOUND = 2 NO_INCURRENCY_FOUND = 3 OTHERS = 4.
FVD_TRLE_DISTRIBUTOR_IF CALL FUNCTION 'FVD_TRLE_DISTRIBUTOR_IF' EXPORTING i_flg_log = '3' " collect posting protocol EXCEPTIONS OTHERS = 2.
CALL FUNCTION 'TB_PROGRESS_INDICATOR' EXPORTING PERCENTAGE = 0 ID = 'WORK'.
TB_PROGRESS_INDICATOR CALL FUNCTION 'TB_PROGRESS_INDICATOR' EXPORTING PERCENTAGE = G_PERCENTAGE ID = 'WORK'.
FVD_DB_VDARL_GET_SNG CALL FUNCTION 'FVD_DB_VDARL_GET_SNG' EXPORTING i_bukrs = G_WRK_VDARLKEY-BUKRS i_sarchiv = G_WRK_VDARLKEY-SARCHIV i_ranl = G_WRK_VDARLKEY-RANL IMPORTING E_STR_VDARL = SDARL EXCEPTIONS CONTRACT_NOT_FOUND = 1 OTHERS = 2 .
LOAN_FLOWS_SUPPLY CALL FUNCTION 'LOAN_FLOWS_SUPPLY' EXPORTING I_BUKRS = SDARL-BUKRS I_RANL = SDARL-RANL READ_SCHEDULED_RECORDS = ' ' READ_POSTED_RECORDS = 'X' NO_STORNO = G_FLG_STORNO READ_TRDC_REC = ' ' "Verdichtungssätze I_DVALUT_UNTIL = '99991231' TABLES O_VZZBEPP = ZBEVI EXCEPTIONS RANL_NOT_FOUND = 1 I_DVALUT_UNTIL_TOO_EARLY = 2 OTHERS = 3.
LOAN_FLOW_TYPE_REFERENCE_2 CALL FUNCTION 'LOAN_FLOW_TYPE_REFERENCE_2' EXPORTING I_VDARL = SDARL TABLES IO_VZZBEPP = ZBEVI.
ACCOUNT_REPORT CALL FUNCTION 'ACCOUNT_REPORT' EXPORTING BATCH_KZ = 'X' FLG_ERROR_ACCOUNT = 'X' HEADER_TEXT = TEXT-T01 NAME = 'RFVDREV0' RANTYP = '1' SVERRKZ = SPACE SWITCH_WAER = 'X' TABLES PARAMETER = PARAMETER TBKPF = TBKPF TBSEG = TBSEG.
FVD_TRLE_DISTRIBUTOR_IF CALL FUNCTION 'FVD_TRLE_DISTRIBUTOR_IF' EXPORTING i_flg_no_batch_heading = 'X' i_flg_log = '5' " posting protocol to spool EXCEPTIONS OTHERS = 2.
ACCUMULATION_INIT CALL FUNCTION 'ACCUMULATION_INIT' EXPORTING FOREIGN_CURRENCY = SDARL-SANTWHR LOCAL_CURRENCY = T001-WAERS RANTYP = '1' *** wg. Problemen mit ACCU wurde dies ausgesternt
ACCUMULATION_ADD CALL FUNCTION 'ACCUMULATION_ADD' EXPORTING RLDEPO = MEM_HIST VBEPP = VZZBEPP X_SSD = TZPA-SREVAL.
ACCUMULATION_ADD CALL FUNCTION 'ACCUMULATION_ADD' EXPORTING RLDEPO = MEM_ACT VBEPP = VZZBEPP X_SSD = TZPA-SREVAL.
ACCUMULATION_RESULT_SINGLE CALL FUNCTION 'ACCUMULATION_RESULT_SINGLE' EXPORTING RLDEPO = MEM_ACT IMPORTING REVAL = GES.
ACCUMULATION_RESULT_SINGLE CALL FUNCTION 'ACCUMULATION_RESULT_SINGLE' EXPORTING RLDEPO = MEM_HIST IMPORTING REVAL = HIS.
CONVERSION_GIVING_RATE_F CALL FUNCTION 'CONVERSION_GIVING_RATE_F' EXPORTING FOREIGN_AMOUNT = GES-BBUCHWR FOREIGN_CURRENCY = DEPOWAERS LOCAL_AMOUNT = GES-BBUCHHW LOCAL_CURRENCY = HW RKURSBER = S_RKURSBER IMPORTING RATE_F = WRK_ALT_F.
CONVERSION_GIVING_RATE_F CALL FUNCTION 'CONVERSION_GIVING_RATE_F' EXPORTING FOREIGN_AMOUNT = GES-BKAUFWR FOREIGN_CURRENCY = DEPOWAERS LOCAL_AMOUNT = GES-BKAUFHW LOCAL_CURRENCY = HW RKURSBER = S_RKURSBER IMPORTING RATE_F = WRK_KAUF_F.
B_K_BEWERTUNGS_ID CALL FUNCTION 'B_K_BEWERTUNGS_ID' EXPORTING BETRAG_BUCH = INT_BBUCHHW BETRAG_KAUF = INT_BKAUFHW BETRAG_TAG = INT_BTAGHW SABSCHREIBUNG = TZRPR-SABSGS SZUSCHREIBUNG = TZRPR-SZUSGS IMPORTING BEWERTUNGS_ID = BEW_ID.
B_K_BEWERTUNGS_ID CALL FUNCTION 'B_K_BEWERTUNGS_ID' EXPORTING BETRAG_BUCH = INT_BBUCHHW BETRAG_KAUF = INT_BKAUFHW BETRAG_TAG = INT_BTAGHW SABSCHREIBUNG = TZRPR-SABSFW SZUSCHREIBUNG = TZRPR-SZUSFW IMPORTING BEWERTUNGS_ID = BEW_ID.
CONVERSION_GIVING_RATE_F CALL FUNCTION 'CONVERSION_GIVING_RATE_F' EXPORTING FOREIGN_AMOUNT = GES-BBUCHWR FOREIGN_CURRENCY = DEPOWAERS LOCAL_AMOUNT = GES-BBUCHHW LOCAL_CURRENCY = HW RKURSBER = S_RKURSBER IMPORTING RATE_F = WRK_ALT_F.
CONVERSION_GIVING_RATE_F CALL FUNCTION 'CONVERSION_GIVING_RATE_F' EXPORTING FOREIGN_AMOUNT = GES-BKAUFWR FOREIGN_CURRENCY = DEPOWAERS LOCAL_AMOUNT = GES-BKAUFHW LOCAL_CURRENCY = HW RKURSBER = S_RKURSBER IMPORTING RATE_F = WRK_KAUF_F.
CONVERSION_GIVING_RATE_F CALL FUNCTION 'CONVERSION_GIVING_RATE_F' EXPORTING FOREIGN_AMOUNT = GES-BBUCHWR FOREIGN_CURRENCY = DEPOWAERS LOCAL_AMOUNT = BBNEUHW LOCAL_CURRENCY = HW RKURSBER = S_RKURSBER IMPORTING RATE_F = WRK_NEU_F.
EXCHANGE_RATE_SERVICE CALL FUNCTION 'EXCHANGE_RATE_SERVICE' EXPORTING I_BETRAG = CD_WRBETR I_GDATU = CD_DATE I_KURS = CD_RATE I_KURSBER = S_RKURSBER * I_BUKRS = I_WAEHRUNG_NACH = CD_HW I_WAEHRUNG_VON = CD_FW IMPORTING O_BETRAG = CD_HWBETR * O_CURRDEC = * O_DATUM_GUELTIG_AB = * O_FAKTOR_NACH = * O_FAKTOR_VON = O_KURS = CD_RATE * O_DERIVED_RATE_TYPE = * O_FIXED_RATE = EXCEPTIONS NO_RATE_FOUND = 1 NO_FACTORS_FOUND = 2 NO_SPREAD_FOUND = 3 OVERFLOW = 4 NO_KURSTYP_FOUND = 5 NO_KURSBER_FOUND = 6 DERIVED_2_TIMES = 7 OTHERS = 8.
SPEC_COVER_TOTAL_PER_LOAN CALL FUNCTION 'SPEC_COVER_TOTAL_PER_LOAN' EXPORTING BUKRS = SDARL-BUKRS RANL = SDARL-RANL IMPORTING BWRBTR = BES_DECK EXCEPTIONS ERROR_FOUND = 01.
EVALUATION_PARA_DETERMINE_LOAN CALL FUNCTION 'EVALUATION_PARA_DETERMINE_LOAN' EXPORTING BUKRS = SDARL-BUKRS GSART = SDARL-GSART RANL = SDARL-RANL REVALUATION_RANGE = '01' IMPORTING REVALUATION_CLASS = SREVCLS * REVALUATION_GROUP = I02 REVALUATION_PRINCIPLE = SREVPRC REVALUATION_TYPE = SREVTYP.
TRANSACTION_TYPE_SELECT CALL FUNCTION 'TRANSACTION_TYPE_SELECT' EXPORTING I_RANTYP = '1' I_SBEWZITI = SBEWZITI I_SKOGRP = TZPA-SKOGRP IMPORTING E_SBEWART_HABEN = SBEWHABEN E_SBEWART_SOLL = SBEWSOLL EXCEPTIONS OTHERS = 1.
CONVERSION_GIVING_RATE_F CALL FUNCTION 'CONVERSION_GIVING_RATE_F' EXPORTING FOREIGN_AMOUNT = BWR FOREIGN_CURRENCY = DEPOWAERS LOCAL_AMOUNT = BHW LOCAL_CURRENCY = HW RKURSBER = S_RKURSBER IMPORTING RATE_F = KURS_F.
ACCOUNT_REPORT_INIT CALL FUNCTION 'ACCOUNT_REPORT_INIT'.
FVD_ARC_POSTING_DATE_CHECK CALL FUNCTION 'FVD_ARC_POSTING_DATE_CHECK' EXPORTING I_TAB_VDBEPP = CHECK_BEPP IMPORTING E_POSTING_IMPOSSIBLE = L_FLG_OK EXCEPTIONS OTHERS = 4.
LOAN_POST CALL FUNCTION 'LOAN_POST' EXPORTING I_BUDAT = STICHTAG I_BKTXT = TEXT-T01 I_PROTOCOL = '1' I_SIMU = SIMULATION I_PRIMANOTA = SAV_RPNNR I_SUPERPRIMANOTA = SAV_RPNSUP * I_SPECIALPERIOD = (-) I_PROTOCOL_TEXT = TEXT-B01 I_OMIT_CHECKS = ' ' I_DELETE_PLAN = ' ' I_UPDATE_IST = 'X' * I_CLEAR_OP_BUFFER = ' ' * I_ACT_RZEBEL_FROM_INTERNAL_REF = ? I_BLDAT = STICHTAG TABLES XT_VDBEPP = ABEPP XT_ADDBEPP = G_TAB_ADDBEPP * XT_BSID = * XT_BSIS = XT_VDBEKI = XBEKI XT_VDBEPI = XBEPI * XT_LOANREF_A = EXCEPTIONS POSTING_IMPOSSIBLE = 1 OTHERS = 2.
LOAN_POST CALL FUNCTION 'LOAN_POST' EXPORTING * I_BUDAT = STICH_PLUS_1 "N818387 I_BUDAT = pa_rueck I_BKTXT = TEXT-T02 I_PROTOCOL = '1' I_SIMU = SIMULATION I_PRIMANOTA = SAV_RPNNR I_SUPERPRIMANOTA = SAV_RPNSUP * I_SPECIALPERIOD = (-) I_PROTOCOL_TEXT = TEXT-B01 I_OMIT_CHECKS = ' ' I_DELETE_PLAN = ' ' I_UPDATE_IST = 'X' * I_CLEAR_OP_BUFFER = ' ' * I_ACT_RZEBEL_FROM_INTERNAL_REF = ? * I_BLDAT = STICH_PLUS_1 I_BLDAT = pa_r_bl "N1712864 TABLES XT_VDBEPP = ABEPP * XT_ADDBEPP = * XT_BSID = * XT_BSIS = XT_VDBEKI = ZBEKI XT_VDBEPI = ZBEPI * XT_LOANREF_A = EXCEPTIONS POSTING_IMPOSSIBLE = 1 OTHERS = 2.
FVD_TRLE_DISTRIBUTOR_IF CALL FUNCTION 'FVD_TRLE_DISTRIBUTOR_IF' EXPORTING * I_WRK_VDARL = I_FLG_SIMUL = SIMULATION * I_FLG_LOG = I_FLG_DISTRIBUTE = 'X' * I_NO_LOG = * I_FLG_EXPORT_MSG = * I_FLG_NO_ERROR_DISPLAY = * I_FVD_DISTRIBUTOR = I_FLG_NO_AMORT_END_CHECK = 'X' EXCEPTIONS ERROR_FUNC_CREATE = 1 ERROR_FUNC_EXTRACT = 2 WARNING_DELETE_BT = 3 ERROR_EURO_CONVERSION = 4 OTHERS = 5.
ACCOUNT_REPORT CALL FUNCTION 'ACCOUNT_REPORT' EXPORTING BATCH_KZ = 'X' FLG_ERROR_ACCOUNT = 'X' HEADER_TEXT = TEXT-T01 NAME = 'RFVDREV0' RANTYP = '1' SVERRKZ = SPACE SWITCH_WAER = 'X' TABLES PARAMETER = PARAMETER TBKPF = TBKPF TBSEG = TBSEG.
FVD_TRLE_DISTRIBUTOR_IF CALL FUNCTION 'FVD_TRLE_DISTRIBUTOR_IF' EXPORTING i_flg_log = '5' " posting protocol to spool i_flg_no_batch_heading = 'X' EXCEPTIONS OTHERS = 2.
ENQUEUE_EFVDARL * CALL FUNCTION 'ENQUEUE_EFVDARL' * EXPORTING * MODE_VDARL = 'E' * MANDT = SY-MANDT * BUKRS = I_BUKRS * SARCHIV = ' ' * RANL = I_RANL * X_BUKRS = ' ' * X_SARCHIV = ' ' * X_RANL = ' ' * _SCOPE = '2' * EXCEPTIONS * FOREIGN_LOCK = 1 * SYSTEM_FAILURE = 2 * OTHERS = 3.
FVD_ENQUEUE_EFVDARL CALL FUNCTION 'FVD_ENQUEUE_EFVDARL' EXPORTING MODE_VDARL = 'E' MANDT = SY-MANDT BUKRS = I_BUKRS SARCHIV = ' ' RANL = I_RANL X_BUKRS = ' ' X_SARCHIV = ' ' X_RANL = ' ' _SCOPE = '2' _WAIT = ' ' _COLLECT = ' ' EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2 OTHERS = 3.
NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING NR_RANGE_NR = '01' OBJECT = CON_NR_OBJECT SUBOBJECT = P_BUKRS IMPORTING NUMBER = P_SUPERPRIMANOTA EXCEPTIONS INTERVAL_NOT_FOUND = 1 NUMBER_RANGE_NOT_INTERN = 2 OBJECT_NOT_FOUND = 3 QUANTITY_IS_0 = 4 QUANTITY_IS_NOT_1 = 5 INTERVAL_OVERFLOW = 6 OTHERS = 7.
NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING NR_RANGE_NR = '01' OBJECT = CON_NR_OBJECT SUBOBJECT = P_BUKRS IMPORTING NUMBER = P_PRIMANOTA EXCEPTIONS INTERVAL_NOT_FOUND = 1 NUMBER_RANGE_NOT_INTERN = 2 OBJECT_NOT_FOUND = 3 QUANTITY_IS_0 = 4 QUANTITY_IS_NOT_1 = 5 INTERVAL_OVERFLOW = 6 OTHERS = 7.
LOAN_MESSAGES_INITIALIZE CALL FUNCTION 'LOAN_MESSAGES_INITIALIZE' EXPORTING I_COLLECT_AND_SEND = ' ' I_RESET = 'X'.
LOAN_MESSAGES_STOP CALL FUNCTION 'LOAN_MESSAGES_STOP' EXCEPTIONS A_MESSAGE = 1 E_MESSAGE = 2 I_MESSAGE = 3 S_MESSAGE = 4 W_MESSAGE = 5 OTHERS = 6.
LOAN_MESSAGES_GIVE CALL FUNCTION 'LOAN_MESSAGES_GIVE' TABLES ET_MESG = LT_MESSAGES.
LOAN_MESSAGES_SHOW CALL FUNCTION 'LOAN_MESSAGES_SHOW' EXPORTING I_ANWND = '0101' EXCEPTIONS INCONSISTENT_RANGE = 1 NO_MESSAGES = 2 OTHERS = 3.
FVD_ARC_GLOBAL_POST_DATE_CHECK CALL FUNCTION 'FVD_ARC_GLOBAL_POST_DATE_CHECK' EXPORTING I_BUKRS = T001-BUKRS I_TAB_VDARL_KEY = L_TAB_VDARLKEY[] I_KEY_DATE = STICHTAG EXCEPTIONS I_KEY_DATE_IN_ARCHIVED_PERIOD = 1 OTHERS = 2.
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 RFVDREV0 or its description.
RFVDREV0 - Balance Sheet Valuation of Foreign Currency Loans RFVDREV0 - Balance Sheet Valuation of Foreign Currency Loans RFVDREPAY_API_TEST_TOP - RFVDREPAYAPITESTTOP RFVDREPAY_API_TEST_PBO - RFVDREPAYAPITESTPBO RFVDREPAY_API_TEST_PAI - RFVDREPAYAPITESTPAI RFVDREPAY_API_TEST_FORMS - RFVDREPAYAPITESTFORMS