RFAGDFRM SAP ABAP INCLUDE - Loan accrual/deferral form routines
RFAGDFRM 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 RFAGDFRM 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 RFAGDFRM. "Basic submit
SUBMIT RFAGDFRM AND RETURN. "Return to original report after report execution complete
SUBMIT RFAGDFRM VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Loan accrual/deferral form routines
INCLUDES used within this REPORT RFAGDFRM
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:
FVZR_LOAD_KOKOS CALL FUNCTION 'FVZR_LOAD_KOKOS' EXPORTING i_bukrs = u_vdarl-bukrs i_rkey1 = u_vdarl-ranl i_sanlf = u_vdarl-sanlf i_skokoart = l_kokoart TABLES xvzzkoko = l_tab_vzzkoko EXCEPTIONS not_found = 01.
FVZK_LOAD_VZZKOPO_BATCH CALL FUNCTION 'FVZK_LOAD_VZZKOPO_BATCH' EXPORTING gsart = u_vdarl-gsart koko_key = l_wrk_kokokey TABLES ivzzkopo = c_tab_vzzkopo.
LOAN_GET_ACCRUALS CALL FUNCTION 'LOAN_GET_ACCRUALS' EXPORTING i_vdarl = u_vdarl IMPORTING e_sabgrenz = l_sabgrenz TABLES io_vzzbepp = c_tab_vzzbepp.
CASH_FLOW_CONSTRUCT_LOAN CALL FUNCTION 'CASH_FLOW_CONSTRUCT_LOAN' EXPORTING i_koko = c_wrk_vzzkoko i_ssolist = u_vdarl-ssolist i_vdarl = u_vdarl TABLES i_bepp = c_tab_vzzbepp i_kopo = c_tab_vzzkopo EXCEPTIONS keine_tilgungskonditionen = 01 laufzeitende_fehlt = 02 laufzeitende_nicht_ermittelbar = 03 laufzeit_oder_rate_fehlt = 04 negative_tilgung_aufgetreten = 05.
DEQUEUE_EFVDARL CALL FUNCTION 'DEQUEUE_EFVDARL' EXPORTING bukrs = s_bukrs sarchiv = space ranl = s_ranl.
FVD_ENQUEUE_EFVDARL CALL FUNCTION 'FVD_ENQUEUE_EFVDARL' EXPORTING mode_vdarl = 'E' mandt = sy-mandt bukrs = u_bukrs sarchiv = space ranl = u_ranl EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
TB_MESSAGE_SHOW_HELPSCREEN CALL FUNCTION 'TB_MESSAGE_SHOW_HELPSCREEN' EXPORTING langu = sy-langu msgid = hide_data-msgid msgno = hide_data-msgno msgv1 = hide_data-msgv1 msgv2 = hide_data-msgv2 msgv3 = hide_data-msgv3 msgv4 = hide_data-msgv4 text = hide_data-text title = text-t21.
LOGFILE_TOP_OF_PAGE CALL FUNCTION 'LOGFILE_TOP_OF_PAGE' EXPORTING ixdate = text-c01 ixtime = text-c02 ixappl = text-c03 ixfunc = text-c05 ixsect = text-c04.
LOGFILE_PRINT CALL FUNCTION 'LOGFILE_PRINT' "Protokoll drucken EXPORTING ilevel = nprot "Protokollebene time = on. "Zeit nicht ausgeben
REUSE_ALV_COMMENTARY_WRITE CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' EXPORTING it_list_commentary = it_header.
REUSE_ALV_COMMENTARY_WRITE CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' EXPORTING it_list_commentary = it_header.
ACCOUNT_REPORT CALL FUNCTION 'ACCOUNT_REPORT' EXPORTING batch_kz = 'X' * header_text = text-b01 " Buchungsprot. Abgr. "N922662
ERROR_RULE_ACCOUNT CALL FUNCTION 'ERROR_RULE_ACCOUNT' EXPORTING batch_kz = 'X' "hier immer 'X' channel = '0' "O-Bildschirm name = text-p01.
GET_PRINT_PARAMETERS CALL FUNCTION 'GET_PRINT_PARAMETERS' EXPORTING mode = 'CURRENT' no_dialog = 'X' list_text = u_prtxt new_list_id = space * immediately = space IMPORTING out_parameters = params.
GET_PRINT_PARAMETERS * CALL FUNCTION 'GET_PRINT_PARAMETERS' * EXPORTING * mode = 'CURRENT' * no_dialog = 'X' * list_text = u_prtxt * new_list_id = space * immediately = space * IMPORTING * out_parameters = params.
ACCOUNT_REPORT_DIALOG CALL FUNCTION 'ACCOUNT_REPORT_DIALOG' EXPORTING flg_error_account = ' ' name = l_buprot prot_text = l_buprot.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'J' textline1 = text-h22 textline2 = text-h23 titel = text-h21 IMPORTING answer = antwort_1.
FVD_SEL_LOAN_READ CALL FUNCTION 'FVD_SEL_LOAN_READ' EXPORTING i_bukrs = p_i_abgr_bukrs i_ranl = p_i_abgr_ranl i_flg_vdarl = 'X' i_flg_vzzkoko = 'X' i_flg_vvzzkopo = 'X' i_flg_vdbeki_vdbepi = 'X' i_flg_no_storno = 'X' i_flg_vdbepp = 'X' i_flg_vzzbepp = 'X' IMPORTING e_wrk_vdarl = myvdarl e_wrk_vzzkoko = myvzzkoko e_tab_vvzzkopo = myvvzzkopo[] e_tab_vzzbepp = myvzzbepp[] EXCEPTIONS OTHERS = 1.
CALL FUNCTION 'CASH_FLOW_CONSTRUCT_LOAN' EXPORTING i_koko = myvzzkoko * I_SAKTPAS = ' ' i_ssolist = myvdarl-ssolist i_vdarl = myvdarl i_flg_loancharac = space TABLES i_bepp = myvzzbepp[] i_kopo = myvvzzkopo[] EXCEPTIONS OTHERS = 1.
FVD_ALV_CASHFLOW_DISPLAY CALL FUNCTION 'FVD_ALV_CASHFLOW_DISPLAY' EXPORTING si_is_vdarl = myvdarl si_is_vzzkoko = myvzzkoko TABLES sc_it_vzzbepp = myvzzbepp si_it_vvzzkopo = myvvzzkopo.
FVD_ARC_KEYDATES_CHECK CALL FUNCTION 'FVD_ARC_KEYDATES_CHECK' EXPORTING i_bukrs = p_vdarl-bukrs i_ranl = p_vdarl-ranl i_dvalut = p_budat i_dfaell = p_stich IMPORTING e_dvalut_before_dvarc = l_flg_dpcheck e_dfaell_before_dfarc = l_flg_dfcheck.
FI_PERIOD_DETERMINE CALL FUNCTION 'FI_PERIOD_DETERMINE' EXPORTING i_bukrs = lc_s_t001-bukrs i_budat = pa_budat IMPORTING e_gjahr = lc_gjahr e_monat = lc_monat_bkpf.
FI_PERIOD_CHECK CALL FUNCTION 'FI_PERIOD_CHECK' EXPORTING i_bukrs = lc_s_t001-bukrs * I_OPVAR = lc_s_t001-opvar i_gjahr = lc_gjahr i_koart = '+' i_konto = '+' i_monat = lc_monat_t001b * IMPORTING * E_OPER = EXCEPTIONS error_period = 1 error_period_acc = 2 OTHERS = 3 .
NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = '01' object = 'FVVD_PNNR' subobject = l_wrk_bepp-bukrs IMPORTING number = new_rpnnr EXCEPTIONS interval_not_found = 01 number_range_not_intern = 02 object_not_found = 03 quantity_is_0 = 04.
NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = '01' object = 'FVVD_RPNSP' subobject = l_wrk_bepp-bukrs IMPORTING number = l_rpnsup EXCEPTIONS interval_not_found = 01 number_range_not_intern = 02 object_not_found = 03 quantity_is_0 = 04.
LOAN_MESSAGES_INITIALIZE CALL FUNCTION 'LOAN_MESSAGES_INITIALIZE' EXPORTING i_collect_and_send = ' ' i_reset = 'X'.
LOAN_POST CALL FUNCTION 'LOAN_POST' EXPORTING i_budat = u_budat "Buchungsdatum i_bktxt = u_bktxt i_protocol = '1' * i_simu = space i_simu = pa_test "N922662 i_primanota = l_wrk_post-rpnnr i_superprimanota = u_rpnsup i_specialperiod = u_monat i_protocol_text = l_buprot "N922662 * i_protocol_text = text-b01 i_omit_checks = space i_delete_plan = space "Plansätze nicht löschen i_update_ist = space i_clear_op_buffer = 'X' "Puffer mit OPs löschen * i_bldat = u_budat "N965967 i_bldat = u_bldat TABLES * xt_vdbepp = u_tab_post xt_vdbepp = lt_post "N1380592 xt_vdbeki = ivdbeki xt_vdbepi = ivdbepi EXCEPTIONS posting_impossible = 1 OTHERS = 2.
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 = l_tab_mesg.
LOAN_IST_SCHREIBEN CALL FUNCTION 'LOAN_IST_SCHREIBEN' EXPORTING I_FLG_SHADOW_TABLE = SPACE TABLES ibeki = ivdbeki ibepi = ivdbepi.
LOAN_IST_SCHREIBEN CALL FUNCTION 'LOAN_IST_SCHREIBEN' EXPORTING I_FLG_SHADOW_TABLE = g_wrk_tdpzz-flg_accr_shadow "N1390715 TABLES ibeki = ivdbeki ibepi = ivdbepi.
FVD_TRLE_DISTRIBUTOR_IF CALL FUNCTION 'FVD_TRLE_DISTRIBUTOR_IF' EXPORTING i_flg_simul = pa_test "N922662 i_flg_log = '1' " display log in popup * i_flg_distribute = 'X' " call TR-Distributor i_flg_distribute = u_flg_distribute "N1002371 i_flg_no_calc_org_amt = 'X' "N1682919 EXCEPTIONS warning_delete_bt = 0 OTHERS = 2.
FVD_ARC_DISBURSEMENT_CHECK CALL FUNCTION 'FVD_ARC_DISBURSEMENT_CHECK' EXPORTING i_bukrs =
-bukrs i_ranl = -ranl IMPORTING e_disbursement_exists = flg_exists EXCEPTIONS key_not_filled = 1 OTHERS = 2.
KEY_DATE_FOR_FLOW_SUPPLY_CHECK CALL FUNCTION 'KEY_DATE_FOR_FLOW_SUPPLY_CHECK' EXPORTING i_company_code = u_bukrs i_ranl = u_ranl i_dbudat = pa_stich i_ddispo = pa_stich i_dfaell = pa_stich i_dvalut = pa_stich IMPORTING e_load_compressed_records = c_flg_compr_rec_usable.
DEQUEUE_EFVDARL CALL FUNCTION 'DEQUEUE_EFVDARL' EXPORTING bukrs = l_wrk_vdarl_key_old-bukrs sarchiv = l_wrk_vdarl_key_old-sarchiv ranl = l_wrk_vdarl_key_old-ranl.
LOAN_FLOWS_SUPPLY CALL FUNCTION 'LOAN_FLOWS_SUPPLY' EXPORTING i_bukrs = l_wrk_vdarl-bukrs read_posted_records = 'X' i_ranl = l_wrk_vdarl-ranl * no_storno = ' ' no_storno = 'X' "N1697882 read_trdc_rec = l_flg_compr_rec_usable read_scheduled_records = 'X' TABLES o_vzzbepp = zitibepp o_trdc_rec = i_trdc_rec EXCEPTIONS ranl_not_found = 1 OTHERS = 2.
LOAN_ACCRUAL_INTERFACE CALL FUNCTION 'LOAN_ACCRUAL_INTERFACE' EXPORTING i_sabgrenz_disa = sabgr_disa i_sabgrenz_rest = sabgr_rest p_kursber = pa_rdevk stichinc = flg_sincl stichtag = pa_stich stichult = pa_sult verfahren = verfahren i_vdarl = l_wrk_vdarl i_vzzkoko = l_wrk_vzzkoko i_loghandle = g_log_data-s_loghandle "N1536151 i_protocol_handler = g_protocol_handler * i_amort_protocol = g_amort_protocol IMPORTING e_protocol_handler = g_protocol_handler * e_amort_protocol = g_amort_protocol TABLES efehler = fvzzbepp eziti = ivzzbepp iziti = zitibepp istich = ivzzstich i_vzzkopo = l_tab_vzzkopo EXCEPTIONS no_record_found_t001 = 1 no_record_found_tzbz = 2 OTHERS = 3.
FVD_ACCRUAL_OTHERS CALL FUNCTION 'FVD_ACCRUAL_OTHERS' EXPORTING i_sabgrenz_rest = sabgr_rest i_flg_condense = h_flg_condense "N1449351 * i_flg_condense = 'X' "N994864 p_kursber = pa_rdevk p_kz_waer = h_kz_waer "N1826485 stichinc = flg_sincl "N987779 stichtag = pa_stich stichult = pa_sult verfahren = verfahren i_vdarl = l_wrk_vdarl i_vzzkoko = l_wrk_vzzkoko u_tab_vzzbepp = zitibepp[] u_tab_vzzkopo = l_tab_vzzkopo[] i_fvd_loan_accrual = fvd_loan_accrual "N1310901 i_flg_cut_period = u_flg_cut_period "N1737452 IMPORTING e_tab_accruals = ivzzbepp[] TABLES efehler = fvzzbepp[] EXCEPTIONS no_record_found_t001 = 1 no_record_found_tzbz = 2 OTHERS = 3.
LOAN_AMOUNT_CALCULATE CALL FUNCTION 'LOAN_AMOUNT_CALCULATE' EXPORTING calculation_date = pa_stich koko = l_wrk_vzzkoko vdarl = l_wrk_vdarl IMPORTING rloam = i_rloam TABLES i_bepp = zitibepp i_kopo = zvzzkopo.
FSBP_READ_BUT000 CALL FUNCTION 'FSBP_READ_BUT000' EXPORTING i_partner = i_abgr-rdarnehm IMPORTING E_BUT000 = l_wrk_but000 EXCEPTIONS OTHERS = 3 .
ACCOUNT_REPORT_DELETE CALL FUNCTION 'ACCOUNT_REPORT_DELETE' EXPORTING buchungskreis = l_wrk_vdarl-bukrs vertragsnummer = l_wrk_vdarl-ranl EXCEPTIONS key_not_filled = 1 account_tables_empty = 2 contract_not_found = 3 OTHERS = 4.
FVD_ENQUEUE_VDARL_MULT CALL FUNCTION 'FVD_ENQUEUE_VDARL_MULT' EXPORTING i_tab_vdarl_key = c_tab_vdarl_key_grp IMPORTING e_tab_vdarl_key_locked = l_tab_vdarl_key_grp e_tab_vdarl_key_error = l_tab_vdarl_key_error.
FVD_DEQUEUE_VDARL_MULT CALL FUNCTION 'FVD_DEQUEUE_VDARL_MULT' EXPORTING i_tab_vdarl_key = u_tab_vdarl_key_grp.
ACCOUNT_REPORT_DELETE CALL FUNCTION 'ACCOUNT_REPORT_DELETE' EXPORTING buchungskreis = u_bukrs vertragsnummer = u_ranl EXCEPTIONS key_not_filled = 1 account_tables_empty = 2 contract_not_found = 3 OTHERS = 4.
READ_EXCHANGE_RATE CALL FUNCTION 'READ_EXCHANGE_RATE' EXPORTING date = pa_stich foreign_currency = u_foreign_c local_currency = u_local_c type_of_rate = s_kurst_h EXCEPTIONS no_rate_found = 1 no_factors_found = 2 no_spread_found = 3 derived_2_times = 4 overflow = 5 zero_rate = 6 OTHERS = 7.
CHECK_LOAN_RELEASED CALL FUNCTION 'CHECK_LOAN_RELEASED' IMPORTING e_loan = l_flg_loan e_posting = l_flg_posting TABLES it_vdarl = l_tab_vdarl EXCEPTIONS internal_error = 1 OTHERS = 2.
EXCHANGE_RATE_SERVICE CALL FUNCTION 'EXCHANGE_RATE_SERVICE' EXPORTING i_betrag =
-bcwhr i_gdatu = -dfaell * I_KURS = I_KURSBER = l_rkursber i_waehrung_nach = u_t001_waers i_waehrung_von = -sbwhr IMPORTING O_KURS = -kurs2 EXCEPTIONS OTHERS = 8.
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 RFAGDFRM or its description.
RFAGDFRM - Loan accrual/deferral form routines RFAC_TEST_UNIMPL_METHODS_10 - Include RFAC_TEST_UNIMPL_METHODS_10 RFAC_TEST_UNIMPL_METHODS_09 - Include RFAC_TEST_UNIMPL_METHODS_09 RFAC_TEST_UNIMPL_METHODS_08 - Include RFAC_TEST_UNIMPL_METHODS_08 RFAC_TEST_UNIMPL_METHODS_07 - Include RFAC_TEST_UNIMPL_METHODS_07 RFAC_TEST_UNIMPL_METHODS_06 - Include RFAC_TEST_UNIMPL_METHODS_06