FIMAAF01 SAP ABAP INCLUDE - documentation and ABAP source code
FIMAAF01 is a standard ABAP INCLUDE 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 FIMAAF01 into the relevant SAP transactions such as SE38 or SE80
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 FIMAAF01. "Basic submit
SUBMIT FIMAAF01 AND RETURN. "Return to original report after report execution complete
SUBMIT FIMAAF01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
INCLUDES used within this REPORT FIMAAF01
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:
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = t_vab-dguel_ab foreign_amount = t_vab-barwbav foreign_currency = t_vab-sawhr local_currency = t001-waers * RATE = 0 * TYPE_OF_RATE = 'M' IMPORTING * EXCHANGE_RATE = * FOREIGN_FACTOR = local_amount = t_vab-barwbav.
TRANSACTION_LOAN_LOAD * call function 'TRANSACTION_LOAN_LOAD' * exporting * bukrs = vdarl-bukrs * p_i_type = ' ' "Plan und Ist * ranl = vdarl-ranl * sanlf = vdarl-sanlf * tables * yvdbeki = l_vdbeki * yvdbepi = l_vdbepi * yvdbepp = l_vdbepp * exceptions * others = 01.
TRANSACTION_LOAN_FILL * call function 'TRANSACTION_LOAN_FILL' * exporting * p_i_type = ' ' "Plan und Ist * i_storno = 'X' "Stornos mitberücksichtigen * tables * yvdbeki = l_vdbeki * yvdbepi = l_vdbepi * yvdbepp = l_vdbepp * zitibepp = xvzzbepp.
LOAN_FLOWS_SUPPLY CALL FUNCTION 'LOAN_FLOWS_SUPPLY' EXPORTING i_bukrs = vdarl-bukrs i_ranl = vdarl-ranl * I_WRK_VDARL = read_scheduled_records = 'X' read_posted_records = 'X' no_storno = ' ' * READ_TRDC_REC = ' ' * I_TECH_RECORDS_CREATE = 'X' * I_DVALUT_UNTIL = '99991231' TABLES * O_VDBEKI = * O_VDBEPI = * O_ARC_DOC_REC = * O_VDBEPP = o_vzzbepp = xvzzbepp * O_TRDC_REC = * CHANGING * O_TRDC_ADM = * O_ARC_DOC_ADM = * O_D_ARC = * O_DVARC = * O_DPARC = * O_DFARC = * O_DDARC = EXCEPTIONS ranl_not_found = 1 i_dvalut_until_too_early = 2 OTHERS = 3.
ACCUMULATION_INIT CALL FUNCTION 'ACCUMULATION_INIT' EXPORTING foreign_currency = vdarl-santwhr "Bestandswährung local_currency = t001-waers "Hauswährung rantyp = '1' "Darlehen soll_ist_reval = 'I' s_reval = '2' s_rloam = '1' s_rprof = '1' * x_storno_verarbeiten = ' '. "für Zu/Abgangslisten"H-216985
ACCUMULATION_ADD CALL FUNCTION 'ACCUMULATION_ADD' "summieren EXPORTING "zum Buchwert rldepo = vzbavv-vvkey+4(10) "Depot ?!? vbepp = xvzzbepp.
ACCUMULATION_RESULT CALL FUNCTION 'ACCUMULATION_RESULT' "Buchwert bereitstellen IMPORTING reval = xreval rloam = xrloam.
ACCUMULATION_ADD CALL FUNCTION 'ACCUMULATION_ADD' "summieren EXPORTING "zum Buchwert rldepo = t_vab-vvkey+4(10) "Depot ?!? vbepp = xvzzbepp.
ACCUMULATION_RESULT CALL FUNCTION 'ACCUMULATION_RESULT'"Buchwert bereitstellen IMPORTING reval = xreval rloam = xrloam.
TRANSACTIONS_SEC_LOAD_I_VIEW CALL FUNCTION 'TRANSACTIONS_SEC_LOAD_I_VIEW' EXPORTING bukrs = t_vab-vvkey+00(04) flag_plan = 'X' ranl = t_vab-vvkey+14(13) rldepo = t_vab-vvkey+04(10) type_of_selection = ' ' TABLES tvwbevi = xvwbevi EXCEPTIONS table_tvwbevi_not_empty = 01.
ACCUMULATION_INIT CALL FUNCTION 'ACCUMULATION_INIT' EXPORTING foreign_currency = vwpanla-rewhr "Emissions-Währung local_currency = t001-waers "Hauswährung rantyp = '2' "Wertpapiere soll_ist_reval = 'S' s_reval = '2' s_rloam = '1' s_rprof = '1' x_storno_verarbeiten = ' '.
ACCUMULATION_ADD CALL FUNCTION 'ACCUMULATION_ADD' "summieren EXPORTING "zum Buchwert rldepo = xvwbevi-rldepo "Depot vbepp = xvzzbepp.
ACCUMULATION_RESULT CALL FUNCTION 'ACCUMULATION_RESULT' "Buchwert bereitstellen IMPORTING reval = xreval rloam = xrloam.
ACCUMULATION_RESULT CALL FUNCTION 'ACCUMULATION_RESULT' "Buchwert bereitstellen IMPORTING reval = xreval rloam = xrloam.
ACCUMULATION_ADD CALL FUNCTION 'ACCUMULATION_ADD' "summieren EXPORTING "zum Buchwert rldepo = xvwbevi-rldepo "Depot vbepp = xvzzbepp.
ACCUMULATION_RESULT CALL FUNCTION 'ACCUMULATION_RESULT' "Buchwert bereitstellen IMPORTING reval = xreval rloam = xrloam.
ACCUMULATION_INIT CALL FUNCTION 'ACCUMULATION_INIT' "H-525513 EXPORTING "H-525513 foreign_currency = vwpanla-rewhr "Emissions-Whr "H-525513 local_currency = t001-waers "Hauswährung "H-525513 rantyp = '2' "Wertpapiere "H-525513 soll_ist_reval = 'S' "H-525513 s_reval = '2' "H-525513 s_rloam = '1' "H-525513 s_rprof = '1' "H-525513 x_storno_verarbeiten = ' '. "H-525513
ACCUMULATION_ADD CALL FUNCTION 'ACCUMULATION_ADD' "summieren "H-525513 EXPORTING "zum Buchwert "H-525513 rldepo = yvwbevi-rldepo "Depot "H-525513 vbepp = yvzzbepp. "H-525513
CALL FUNCTION 'ACCUMULATION_RESULT' "Buchwert bereitst. "H-525513
ACCUMULATION_RESULT CALL FUNCTION 'ACCUMULATION_RESULT' "Buchwert berechn."H-525513
ACCUMULATION_ADD CALL FUNCTION 'ACCUMULATION_ADD' "summieren "H-525513 EXPORTING "zum Buchwert "H-525513 rldepo = yvwbevi-rldepo "Depot "H-525513 vbepp = yvzzbepp. "H-525513
ACCUMULATION_RESULT CALL FUNCTION 'ACCUMULATION_RESULT' "Buchwert bereitst. "H-525513
TM_ACTIVITY_CHAIN_GET_IDS CALL FUNCTION 'TM_ACTIVITY_CHAIN_GET_IDS' "Zugriff auf Vorgangsnummern EXPORTING "gemäß Verkettung bukrs = vtbfha-bukrs rfha = vtbfha-rfha rfhazul = vtbfha-rfhazul TABLES t_rfhazu = l_hazu EXCEPTIONS activity = 1 deal = 2 OTHERS = 3.
TB_EVALUATION_CURRENCYPOSITION CALL FUNCTION 'TB_EVALUATION_CURRENCYPOSITION' "Bewertung EXPORTING "Währungsbestand deal = vtbfha stichtag = p_bisdt * KURSTYP = * BARWERTART = * POPUP_VTVBAR = 'X' * TITLEVAL = * FLG_FAS = * IMPORTING * ANSCHAFFUNGSWERT_HW = * ANSCHAFFUNGSWERT_FW = * BESTAND_FW = * BEWERTUNGSKURS = * BUCHWERT_HW = * BUCHWERT_FW = * ERFOLG_AKTUELL = * ERFOLG_GEBUCHT = * FREMDWAEHRUNG = * HAUSWAEHRUNG = * STICHTAGSWERT_HW = * STICHTAGSWERT_FW = TABLES bestehende_bewegungen = xvtbfhapo erzeugte_bewegungen = l_stbe_bew * VERARBEITETE_BEWEGUNGEN = EXCEPTIONS error_deal = 1 more_than_one_deal = 2 wrong_key_date = 3 more_than_one_currency = 4 no_flowtype = 5 error_fas = 6 OTHERS = 7.
TM_AMOUNTS_DETERMINE CALL FUNCTION 'TM_AMOUNTS_DETERMINE' "Beträge zum Stichtag ermitteln EXPORTING cut_off_date = dat IMPORTING amounts = l_vtbakku TABLES transactions = xvtbfhapo EXCEPTIONS OTHERS = 1.
TB_CURRENCY_AMOUNTS_CONVERT * CALL FUNCTION 'TB_CURRENCY_AMOUNTS_CONVERT' "H-198268 * EXPORTING "H-198268 * I_DATE = L_KURSDAT "H-198268 * I_FOREIGN_AMOUNT = L_WERTBW "H-198268 * I_FOREIGN_CURRENCY = L_WAERBW "H-198268 * I_LOCAL_AMOUNT = L_WERTHW "H-198268 * I_LOCAL_CURRENCY = T001-WAERS "H-198268 * I_RATE = 0 "H-198268 * I_SFIX = ' ' "gemäß Kurstabelle "H-198268 * IMPORTING "H-198268 * E_LOCAL_AMOUNT = L_WERTHW "H-198268 ** E_RATE = L_VTBFHAPO-KHWKURS "H-198268 * EXCEPTIONS "H-198268 * AMOUNT_CALCULATION = 1 "H-198268 * AMOUNT_MISSING = 2 "H-198268 * RATE_CALCULATION = 3 "H-198268 * RATE_INCONSISTENT = 4 "H-198268 * RATE_MISSING = 5 "H-198268 * OTHERS = 6. "H-198268
EXCHANGE_RATE_SERVICE CALL FUNCTION 'EXCHANGE_RATE_SERVICE' "H-198268 EXPORTING "H-198268 i_betrag = l_wertbw "H-198268 i_gdatu = l_kursdat "H-198268 * I_KURS = "H-198268 * I_KURSBER = "H-198268 i_bukrs = t001-bukrs "H-198268 i_waehrung_nach = t001-waers "H-198268 i_waehrung_von = l_waerbw "H-198268 IMPORTING "H-198268 o_betrag = l_werthw "H-198268 * O_CURRDEC = "H-198268 * O_DATUM_GUELTIG_AB = "H-198268 * O_FAKTOR_NACH = "H-198268 * O_FAKTOR_VON = "H-198268 * O_KURS = "H-198268 * O_DERIVED_RATE_TYPE = "H-198268 * O_FIXED_RATE = "H-198268 EXCEPTIONS "H-198268 no_rate_found = 1 "H-198268 no_factors_found = 2 "H-198268 no_spread_found = 3 "H-198268 overflow = 4 "H-198268 no_kurstyp_found = 5 "H-198268 no_kursber_found = 6 "H-198268 derived_2_times = 7 "H-198268 OTHERS = 8. "H-198268
TM_AMOUNTS_DETERMINE CALL FUNCTION 'TM_AMOUNTS_DETERMINE' "Beträge zum Stichtag ermitteln * EXPORTING cut_off_date = l_hapo-dbuchung "H-407829 EXPORTING cut_off_date = l_hapo-dzterm "H-407829 IMPORTING amounts = l_vtbakku TABLES transactions = l_hapo EXCEPTIONS OTHERS = 1.
TB_CURRENCY_AMOUNTS_CONVERT * CALL FUNCTION 'TB_CURRENCY_AMOUNTS_CONVERT' "H-198268 * EXPORTING "H-198268 * I_DATE = L_KURSDAT "H-198268 * I_FOREIGN_AMOUNT = L_WERTBW "H-198268 * I_FOREIGN_CURRENCY = L_WAERBW "H-198268 * I_LOCAL_AMOUNT = L_WERTHW "H-198268 * I_LOCAL_CURRENCY = T001-WAERS "H-198268 * I_RATE = 0 "H-198268 * I_SFIX = ' ' "gemäß Kurstabelle "H-198268 * IMPORTING "H-198268 * E_LOCAL_AMOUNT = L_WERTHW "H-198268 ** E_RATE = L_VTBFHAPO-KHWKURS "H-198268 * EXCEPTIONS "H-198268 * AMOUNT_CALCULATION = 1 "H-198268 * AMOUNT_MISSING = 2 "H-198268 * RATE_CALCULATION = 3 "H-198268 * RATE_INCONSISTENT = 4 "H-198268 * RATE_MISSING = 5 "H-198268 * OTHERS = 6. "H-198268
EXCHANGE_RATE_SERVICE CALL FUNCTION 'EXCHANGE_RATE_SERVICE' "H-198268 EXPORTING "H-198268 i_betrag = l_wertbw "H-198268 i_gdatu = l_kursdat "H-198268 * I_KURS = "H-198268 * I_KURSBER = "H-198268 i_bukrs = t001-bukrs "H-198268 i_waehrung_nach = t001-waers "H-198268 i_waehrung_von = l_waerbw "H-198268 IMPORTING "H-198268 o_betrag = l_werthw "H-198268 * O_CURRDEC = "H-198268 * O_DATUM_GUELTIG_AB = "H-198268 * O_FAKTOR_NACH = "H-198268 * O_FAKTOR_VON = "H-198268 * O_KURS = "H-198268 * O_DERIVED_RATE_TYPE = "H-198268 * O_FIXED_RATE = "H-198268 EXCEPTIONS "H-198268 no_rate_found = 1 "H-198268 no_factors_found = 2 "H-198268 no_spread_found = 3 "H-198268 overflow = 4 "H-198268 no_kurstyp_found = 5 "H-198268 no_kursber_found = 6 "H-198268 derived_2_times = 7 "H-198268 OTHERS = 8. "H-198268
FILE_VALIDATE_NAME call function 'FILE_VALIDATE_NAME' exporting logical_filename = gc_fname changing physical_filename = p_filet exceptions others = 1.
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 FIMAAF01 or its description.