SAP Reports / Programs | Financial Services | Loans Management(FS-CML) SAP FS

Home SAP Development ABAP Coding SAP Fiori SAP Training SAP Tables SAP Objects...

MF68SF01 SAP ABAP INCLUDE - Form routines for reversal transaction

SAP T-Codes / Example ABAP code
ABAP OO / SAP Function Modules
ABAP reports / SAP Error Messages
SAP Tables / SAP Video Training

MF68SF01 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 MF68SF01 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 MF68SF01. "Basic submit
SUBMIT MF68SF01 AND RETURN. "Return to original report after report execution complete
SUBMIT MF68SF01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement

Text pool values

Title: Form routines for reversal transaction

INCLUDES used within this REPORT MF68SF01

INCLUDE IFVD_CHGPTR_GENERAL_CONSTANTS.

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:

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         = '3'
*    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         = '3'
*     _WAIT          = ' '
*     _COLLECT       = ' '
    EXCEPTIONS
      foreign_lock   = 1
      system_failure = 2.

DEQUEUE_EFVDARL
  CALL FUNCTION 'DEQUEUE_EFVDARL'
    EXPORTING
      mode_vdarl = 'E'
      mandt      = sy-mandt
      bukrs      = i_bukrs
      sarchiv    = space
      ranl       = i_ranl
      x_bukrs    = space
      x_sarchiv  = space
      x_ranl     = space.

REUSE_ALV_HIERSEQ_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY' EXPORTING i_interface_check = con_false i_callback_program = con_sapmf68s i_callback_pf_status_set = 'SET_SPECIAL_STATUS' i_callback_user_command = 'PROCESS_USER_COMMAND' is_layout = ls_layout it_fieldcat = t_fieldcat it_excluding = t_excl it_sort = t_sort i_default = con_true i_save = 'A' it_events = t_event i_tabname_header = 'T_BEKI_SHOW' i_tabname_item = 'T_BEPI_SHOW' is_keyinfo = ls_keyinfo IMPORTING es_exit_caused_by_user = ls_exit_user TABLES t_outtab_header = t_beki_show t_outtab_item = t_bepi_show EXCEPTIONS program_error = 1 OTHERS = 2.

LOAN_MESSAGES_INITIALIZE CALL FUNCTION 'LOAN_MESSAGES_INITIALIZE' EXPORTING i_collect_and_send = con_false i_reset = con_true.

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 = et_messages.

LOAN_MESSAGES_SHOW CALL FUNCTION 'LOAN_MESSAGES_SHOW' EXPORTING i_anwnd = '0101' i_show_linno = con_false EXCEPTIONS inconsistent_range = 1 no_messages = 2 OTHERS = 3.

FVD_TZB0A_READ_ALL CALL FUNCTION 'FVD_TZB0A_READ_ALL' EXPORTING i_sbewart = l_wrk_vdbepi-sbewart IMPORTING es_tzb0a = l_wrk_tzb0a EXCEPTIONS not_customized = 1 OTHERS = 2.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_program_name = con_sapmf68s i_internal_tabname = 'T_BEKI_SHOW' i_structure_name = 'SAPMF68S_DOCUMENT_HEADER' CHANGING ct_fieldcat = et_fieldcat EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_program_name = con_sapmf68s i_internal_tabname = 'T_BEPI_SHOW' i_structure_name = 'SAPMF68S_DOCUMENT_ITEM' CHANGING ct_fieldcat = et_fieldcat EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3.

FVD_TRLE_DISTRIBUTOR_IF CALL FUNCTION 'FVD_TRLE_DISTRIBUTOR_IF' EXPORTING i_flg_distribute = 'C' EXCEPTIONS OTHERS = 5.

FVD_TABLE_INIT CALL FUNCTION 'FVD_TABLE_INIT' EXCEPTIONS OTHERS = 1.

FVD_BO_OL_REVERSE_SET_ITEMS CALL FUNCTION 'FVD_BO_OL_REVERSE_SET_ITEMS' EXPORTING i_tab_vdbeki = t_vdbeki_rev_all[].

FVD_REV_LOAN_PROC_SET CALL FUNCTION 'FVD_REV_LOAN_PROC_SET' EXPORTING i_tab_vdbeki_rev = t_vdbeki_rev[] "zum Storno markierte Belg i_tab_vdbeki = g_tab_vdbeki "alle Belegköpfe i_tab_vdbepi = g_tab_vdbepi "alle Belegpositionen i_str_vdarl_old = vdarl "aktuelles Darlehen IMPORTING e_str_vdarl_new = l_wrk_vdarl_new "darlehen_neu EXCEPTIONS no_changes = 1 OTHERS = 2.

FVD_LS_API_REVERSAL_SET CALL FUNCTION 'FVD_LS_API_REVERSAL_SET' * IMPORTING * E_FLG_RESET = CHANGING c_str_vdarl = l_wrk_vdarl_new EXCEPTIONS error = 1 OTHERS = 2 .

FVD_REV_CHANGE_FULL_DISB CALL FUNCTION 'FVD_REV_CHANGE_FULL_DISB' EXPORTING i_str_vdarl = l_wrk_vdarl_new i_tab_vdbeki = t_vdbeki_rev[] i_tab_vdbepi = g_tab_vdbepi IMPORTING e_str_vdarl = l_wrk_vdarl_new EXCEPTIONS error = 1 OTHERS = 2.

FVD_REV_CHANGE_PAYM_STATUS CALL FUNCTION 'FVD_REV_CHANGE_PAYM_STATUS' EXPORTING i_str_vdarl = l_wrk_vdarl_new i_tab_vdbeki_rev = t_vdbeki_rev[] i_tab_vdbepi_rev = g_tab_vdbepi IMPORTING e_str_vdarl_changed = l_wrk_vdarl_new.

FVD_TABLE_SET

CALL FUNCTION 'FVD_TABLE_SET' EXPORTING i_tablename = 'VDARL' i_flg_save = 'X' i_wrk_old = vdarl i_wrk_new = l_wrk_vdarl_new EXCEPTIONS OTHERS = 1.

FVD_TABLE_UPDATE CALL FUNCTION 'FVD_TABLE_UPDATE' EXPORTING i_flg_simulation = flg_simulation "N1175910 i_flg_update_task = 'X' i_flg_change_document = 'X' EXCEPTIONS OTHERS = 1.

FVD_DB_VDARL_GET_SNG CALL FUNCTION 'FVD_DB_VDARL_GET_SNG' EXPORTING i_bukrs = t_vdbeki_new-bukrs i_sarchiv = space i_ranl = t_vdbeki_new-ranl IMPORTING * E_STR_VDARL = vdarl "N1803966 E_STR_VDARL = l_wrk_vdarl_old EXCEPTIONS contract_not_found = 1 OTHERS = 2.

FVD_MAP_LC_INIT CALL FUNCTION 'FVD_MAP_LC_INIT' EXPORTING i_wrk_vdarl = l_wrk_vdarl_old "N1803966 EXCEPTIONS error = 1 OTHERS = 2.

FVD_TABLE_UPDATE_GROUP_GET CALL FUNCTION 'FVD_TABLE_UPDATE_GROUP_GET' CHANGING c_update_group = l_update_group EXCEPTIONS error = 1 OTHERS = 2.

FVD_REV_LOAN_PROC_SET CALL FUNCTION 'FVD_REV_LOAN_PROC_SET' EXPORTING * i_tab_vdbeki_rev = t_vdbeki_rev[] "N1378841 i_tab_vdbeki_rev = t_vdbeki_rev_all[] i_tab_vdbeki = g_tab_vdbeki i_tab_vdbepi = g_tab_vdbepi i_str_vdarl_old = l_wrk_vdarl_old "N1803966 IMPORTING e_str_vdarl_new = l_wrk_vdarl_new EXCEPTIONS no_changes = 1 OTHERS = 2.

FVD_LS_API_REVERSAL_SET CALL FUNCTION 'FVD_LS_API_REVERSAL_SET' CHANGING c_str_vdarl = l_wrk_vdarl_new EXCEPTIONS error = 1 OTHERS = 2.

FVD_TABLE_SET CALL FUNCTION 'FVD_TABLE_SET' EXPORTING i_update_group = l_update_group i_tablename = 'VDARL' i_flg_save = 'X' i_wrk_old = l_wrk_vdarl_old "N1803966 i_wrk_new = l_wrk_vdarl_new EXCEPTIONS OTHERS = 1.

FVD_TABLE_UPDATE CALL FUNCTION 'FVD_TABLE_UPDATE' EXPORTING i_update_group = l_update_group i_flg_simulation = flg_simulation i_flg_update_task = 'X' i_flg_change_document = 'X' EXCEPTIONS OTHERS = 1.

FVD_REV_CHECK_EXCLUDE_INIT CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_INIT' .

FVD_DB_VDARL_GET_SNG CALL FUNCTION 'FVD_DB_VDARL_GET_SNG' EXPORTING i_bukrs = bukrs i_sarchiv = space i_ranl = ranl IMPORTING e_str_vdarl = is_vdarl EXCEPTIONS contract_not_found = 1 OTHERS = 2.

FVD_SM_SHOW CALL FUNCTION 'FVD_SM_SHOW' EXPORTING i_bukrs = vdarl-bukrs i_ranl = vdarl-ranl * I_DTO = * I_DFROM = EXCEPTIONS no_authority = 1 loan_does_not_exist = 2 OTHERS = 3.

FVD_VBUDAT_GET_BUDAT_RULES CALL FUNCTION 'FVD_VBUDAT_GET_BUDAT_RULES' EXPORTING i_application = '01' " Storno IMPORTING e_date = local_budat EXCEPTIONS no_entry = 1 OTHERS = 2.

LOAN_GET_ADDITIONAL_DATA CALL FUNCTION 'LOAN_GET_ADDITIONAL_DATA' EXPORTING budat = prop_budat anwendung = '1' "Storno mit Sonderperiode erlaubt i_bukrs = is_vdarl-bukrs "N1837082 IMPORTING abbruch = cancel bktxt = e_sav_bktxt budat = e_sav_budat protocol = l_flg_protocol simulation = x_simulation period = e_sav_specialperiod sstogrd = sstogrd.

LOAN_GET_ADDITIONAL_DATA CALL FUNCTION 'LOAN_GET_ADDITIONAL_DATA' EXPORTING budat = prop_budat anwendung = '4' "Storno nicht in Sonderperiode i_bukrs = is_vdarl-bukrs "N1837082 IMPORTING abbruch = cancel bktxt = e_sav_bktxt budat = e_sav_budat protocol = l_flg_protocol simulation = x_simulation period = e_sav_specialperiod sstogrd = sstogrd.

FVD_REV_POPUP_FOR_ACCOUNT CALL FUNCTION 'FVD_REV_POPUP_FOR_ACCOUNT' EXPORTING i_str_vdarl = is_vdarl i_tab_vdbepi_rev = l_tab_vdbepi_rev i_fvd_loan_reverse = business_add_int "N1329553 IMPORTING e_revaccount_payed_disb = l_flg_revaccount_payed_disb EXCEPTIONS cancel_button_on_account_sel = 1 contract_not_found = 2 no_account = 3 OTHERS = 4.

FVD_REV_POPUP_FOR_ACCOUNT_2 CALL FUNCTION 'FVD_REV_POPUP_FOR_ACCOUNT_2' EXPORTING i_str_vdarl = is_vdarl i_tab_vdbepi_rev = l_tab_vdbepi_rev IMPORTING e_revaccount_cleared_post = l_flg_revaccount_cleared_post EXCEPTIONS cancel_button_on_account_sel = 1 no_account = 2 OTHERS = 3.

FI_PERIOD_DETERMINE
      CALL FUNCTION 'FI_PERIOD_DETERMINE'
        EXPORTING
          i_budat        = e_sav_budat
          i_bukrs        = is_vdarl-bukrs
*         I_PERIV        = ' '
*         I_GJAHR        = 0000
          i_monat        = e_sav_specialperiod
*         X_XMO16        = ' '
        IMPORTING
*         E_GJAHR        =
*         E_MONAT        =
          e_poper        = period_fi
        EXCEPTIONS
          fiscal_year    = 1
          period         = 2
          period_version = 3
          posting_period = 4
          special_period = 5
          version        = 6
          posting_date   = 7
          OTHERS         = 8.

FVD_DB_READ_FI_GLOBAL_CUST CALL FUNCTION 'FVD_DB_READ_FI_GLOBAL_CUST' EXPORTING i_bukrs = is_vdarl-bukrs IMPORTING o_t001 = l_str_t001. "company code settings

LOAN_REVERSE CALL FUNCTION 'LOAN_REVERSE' EXPORTING i_bktxt = e_sav_bktxt i_protocol = e_sav_protocol i_simulation = x_simulation i_primanota = primanota i_superprimanota = e_sav_superprimanota i_protocol_text = ' ' i_omit_checks = con_false i_insert_actual = con_true i_only_plan_items = con_false i_clear_op_buffers = con_true i_post_only = con_true i_revaccount_payed_disb = l_flg_revaccount_payed_disb i_revaccount_cleared_post = l_flg_revaccount_cleared_post i_flg_prep_negative_postings = l_flg_prep_negative_postings IMPORTING et_loanref_del = et_loanref TABLES xt_beki_rev = t_beki_rev et_vdbeki = et_vdbeki_new et_vdbepi = t_vdbepi_dummy et_vdbepp = t_vdbepp_dummy EXCEPTIONS posting_impossible = 1 cancel_button_on_account_sel = 2 OTHERS = 3.

FVD_ALV_GET_HEADER_LIST_LOAN CALL FUNCTION 'FVD_ALV_GET_HEADER_LIST_LOAN' EXPORTING si_is_vdarl = wa_vdarl TABLES se_it_header = t_header.

REUSE_ALV_COMMENTARY_WRITE CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' EXPORTING it_list_commentary = t_header.

FVD_ALV_SHOW_LOAN_DOCUMENT CALL FUNCTION 'FVD_ALV_SHOW_LOAN_DOCUMENT' EXPORTING si_bukrs = it_beki_show-bukrs si_rbelkpfd = it_beki_show-rbelkpfd.

FVD_REV_CASH_FLOW_BUILD
  CALL FUNCTION 'FVD_REV_CASH_FLOW_BUILD'
    EXPORTING
      is_vdarl                      = is_vdarl
      it_vdbeki_rev                 = it_vdbeki_rev[]
      it_vdbeki                     = u_tab_vdbeki
      it_vdbepi                     = u_tab_vdbepi
      it_vdbepp                     = it_vdbepp[]
*     IT_VZZKOKO                    =
*     IT_VVZZKOPO                   =
    IMPORTING
      et_vdbepp_new                 = et_vdbepp_new[]
      e_tab_schedule                = e_tab_schedule
    EXCEPTIONS
      change_planned_records_failed = 1
      build_cash_flow_failed        = 2
      tzb0a_not_customized          = 3
      OTHERS                        = 4.

FVZR_LOAD_KOKOS * CALL FUNCTION 'FVZR_LOAD_KOKOS' * EXPORTING * FLG_AKTUELL = CON_FALSE * FLG_FUTURE = CON_FALSE * FLG_LAST = CON_FALSE * I_BUKRS = VDARL-BUKRS * I_GLOBAL_KOKO = CON_FALSE * I_RKEY1 = VDARL-RANL * I_SANLF = VDARL-SANLF * I_SKOKOART = '01' * I_SKOKOART_BIS = '03' * TABLES * XVZZKOKO = T_VZZKOKO * EXCEPTIONS * NOT_FOUND = 1 * NO_HISTORY = 2 * OTHERS = 3.

REBUILD_BEPP_FROM_BEPI * CALL FUNCTION 'REBUILD_BEPP_FROM_BEPI' * EXPORTING * FLAG_STORNO = CON_TRUE * TABLES * IBEKI = IT_VDBEKI_REV * IBEPI = T_VDBEPI_REV * IBEPP = T_VDBEPP.

TRANSACTION_LOAN_FILL * CALL FUNCTION 'TRANSACTION_LOAN_FILL' * EXPORTING * P_I_TYPE = ' ' * I_STORNO = CON_FALSE * TABLES * YVDBEKI = IT_VDBEKI * YVDBEPI = IT_VDBEPI * YVDBEPP = IT_VDBEPP * ZITIBEPP = T_VZZBEPP.

FVZK_LOAD_VZZKOPO_BATCH * CALL FUNCTION 'FVZK_LOAD_VZZKOPO_BATCH' * EXPORTING * GSART = VDARL-GSART * KOKO_KEY = S_KOKOKEY * TABLES * IVZZKOPO = T_VVZZKOPO.

CASH_FLOW_CONSTRUCT_LOAN * CALL FUNCTION 'CASH_FLOW_CONSTRUCT_LOAN' * EXPORTING * I_KOKO = T_VZZKOKO * I_SAKTPAS = CON_FALSE * I_SSOLIST = VDARL-SSOLIST * I_VDARL = VDARL * TABLES * I_BEPP = T_VZZBEPP * I_KOPO = T_VVZZKOPO * EXCEPTIONS * KEINE_TILGUNGSKONDITIONEN = 1 * LAUFZEITENDE_FEHLT = 2 * LAUFZEITENDE_NICHT_ERMITTELBAR = 3 * LAUFZEIT_ODER_RATE_FEHLT = 4 * NEGATIVE_TILGUNG_AUFGETRETEN = 5 * OTHERS = 6.

LOAN_ACCOUNT_PREPARE * CALL FUNCTION 'LOAN_ACCOUNT_PREPARE' * EXPORTING * BUCHEN = CON_FALSE * I_KUNNR = T_VVZZKOPO-KUNNR * I_VDARL = VDARL * TABLES * IVDBEPP = T_VDBEPP_DUMMY * XVDBEPP = ET_VDBEPP_NEW * ZITIBEPP = T_VZZBEPP * EXCEPTIONS * EMPTY_IVDBEPP = 1 * DEB_HDN_NOT_FOUND = 2 * OTHERS = 3.

FVD_TABLE_SET_VDBEPP
  CALL FUNCTION 'FVD_TABLE_SET_VDBEPP'
    EXPORTING
      i_tab_vdbepp_old = it_vdbepp[]
      i_tab_vdbepp_new = it_vdbepp_new[]
    EXCEPTIONS
      OTHERS           = 1.

FVD_MAP_LC_CALC CALL FUNCTION 'FVD_MAP_LC_CALC' EXPORTING i_flg_calc_offline = space CHANGING c_wrk_vdarl = c_wrk_vdarl EXCEPTIONS OTHERS = 1.

LOAN_SET_ACENV CALL FUNCTION 'LOAN_SET_ACENV' CHANGING xs_vdbeki = it_vdbeki EXCEPTIONS data_missing = 1 could_not_set_acenv = 2 OTHERS = 3.

NUMBER_RANGE_INTERVAL_LIST CALL FUNCTION 'NUMBER_RANGE_INTERVAL_LIST' EXPORTING object = 'FVVD_PNNR' subobject = i_bukrs TABLES interval = interval EXCEPTIONS nr_range_nr1_not_found = 1 nr_range_nr1_not_intern = 2 nr_range_nr2_must_be_space = 3 nr_range_nr2_not_extern = 4 nr_range_nr2_not_found = 5 object_not_found = 6 subobject_must_be_space = 7 subobject_not_found = 8 OTHERS = 9.

NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = interval-nrrangenr object = 'FVVD_PNNR' quantity = '1' subobject = i_bukrs IMPORTING number = e_primanota quantity = quantity returncode = retcode 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_RANGE_INTERVAL_LIST CALL FUNCTION 'NUMBER_RANGE_INTERVAL_LIST' EXPORTING object = 'FVVD_RPNSP' subobject = i_bukrs TABLES interval = interval EXCEPTIONS nr_range_nr1_not_found = 1 nr_range_nr1_not_intern = 2 nr_range_nr2_must_be_space = 3 nr_range_nr2_not_extern = 4 nr_range_nr2_not_found = 5 object_not_found = 6 subobject_must_be_space = 7 subobject_not_found = 8 OTHERS = 9.

NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = interval-nrrangenr object = 'FVVD_RPNSP' quantity = '1' subobject = i_bukrs IMPORTING number = e_superprimanota quantity = quantity returncode = retcode 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_STORE CALL FUNCTION 'LOAN_MESSAGES_STORE' EXPORTING is_mesg = i_ls_trlomesg i_exception_if_not_active = con_true EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

POPUP_TO_SHOW_DB_DATA_IN_TABLE CALL FUNCTION 'POPUP_TO_SHOW_DB_DATA_IN_TABLE' EXPORTING title_text = text-049 TABLES fields = t_fields valuetab = t_values EXCEPTIONS field_not_in_ddic = 1 OTHERS = 2.

FVD_REV_CHECK_EXCLUDE_GET CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_GET' IMPORTING E_TAB_CHECK_EXCLUDE = l_tab_exclude .

FVD_REV_CHECK_EXCLUDE_INIT CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_INIT'.

FVD_REV_CHECK_EXCLUDE_SET CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_SET' EXPORTING I_TAB_CHECK_EXCLUDE = l_tab_exclude_new EXCEPTIONS OTHERS = 2.

FVD_REV_CHECK_POSSIBLE
  CALL FUNCTION 'FVD_REV_CHECK_POSSIBLE'
    EXPORTING
      is_vdarl                 = is_vdarl
*     IS_VDBEKI_REV            =
      it_vdbeki_rev            = xt_vdbeki_rev[]
      it_vdbepi                = u_tab_vdbepi
      i_flg_check_complete     = 'X'
*     I_TAB_VDARL_RELEASE      =
*     i_flg_use_buffer         =
      i_flg_chk_disb_cli       = con_true
    IMPORTING
*     E_FLG_OTHER_DOCUMENTS    =
*     ET_VDBEKI_REV_ALL        =
      e_tab_ranl               = et_vdarl_add
*     E_FLG_OLD_DISB           =
      e_flg_bo_with            = e_flg_bo_with
    EXCEPTIONS
      document_invalid         = 1
      flow_type_not_customized = 2
      reverse_not_possible     = 3
      OTHERS                   = 4.

FVD_REV_CHECK_EXCLUDE_INIT CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_INIT'. "N1801030

FVD_REV_CHECK_EXCLUDE_SET CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_SET' EXPORTING I_TAB_CHECK_EXCLUDE = l_tab_exclude EXCEPTIONS OTHERS = 2.

FVD_REV_CHECK_CLI CALL FUNCTION 'FVD_REV_CHECK_CLI' EXPORTING * I_STR_VDBEKI_REV = i_tab_vdbepi = u_tab_vdbepi * IMPORTING * E_FLG_CLI_DOCUMENT = l_flg_cli_doc CHANGING c_tab_vdbeki_rev = lt_vdbeki_rev[] EXCEPTIONS document_invalid = 1 input_not_qualified = 2 OTHERS = 3 .

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING * TITLEBAR = ' ' diagnose_object = 'TRLO_REVERSE02' "Zahlpr.

LOAN_REFERENCE_READ_REFCONCEPT * CALL FUNCTION 'LOAN_REFERENCE_READ_REFCONCEPT' * TABLES * XT_LOANREF = T_LOANREF * EXCEPTIONS * NO_DATA_FOUND = 1 * INVALID_DATA = 2 * OTHERS = 3.

LOAN_REFERENCE_READ_OBJECTID * CALL FUNCTION 'LOAN_REFERENCE_READ_OBJECTID' * EXPORTING * I_REFCAT = CON_DISBURSEMENT * I_REFCONCEPT = L_REFCONCEPT * I_STATUS = CON_ACTIVE * TABLES * XT_LOANREF = T_LOANREF * EXCEPTIONS * NO_DATA_FOUND = 1 * INVALID_DATA = 2 * OTHERS = 3.

FI_PAYMENT_REQUEST_GET CALL FUNCTION 'FI_PAYMENT_REQUEST_GET' EXPORTING i_keyno = -prkey IMPORTING e_payrq = ls_payrq EXCEPTIONS parameter = 1 OTHERS = 2.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING * TITLEBAR = ' ' diagnose_object = 'TRLO_REVERSE01'"PR text_question = text-p01 * TEXT_BUTTON_1 = 'Ja'(001) * ICON_BUTTON_1 = ' ' * TEXT_BUTTON_2 = 'Nein'(002) * ICON_BUTTON_2 = ' ' * DEFAULT_BUTTON = '1' * DISPLAY_CANCEL_BUTTON = 'X' * USERDEFINED_F1_HELP = ' ' * START_COLUMN = 25 * START_ROW = 6 * POPUP_TYPE = IMPORTING answer = sav_answer TABLES parameter = t_parameter * EXCEPTIONS * TEXT_NOT_FOUND = 1 * OTHERS = 2 .

BUS_OP_REVERSAL_POPUP CALL FUNCTION 'BUS_OP_REVERSAL_POPUP' EXPORTING i_refconcept = l_refconcept.

FVD_CHECK_CHANGE_AFTER_DATE
    CALL FUNCTION 'FVD_CHECK_CHANGE_AFTER_DATE'
      EXPORTING
        si_check_date = min_dvalut
*       SI_IT_VZZBEPP =
        si_it_vdbepp  = it_vdbepp[]
      EXCEPTIONS
        result_true   = 1
        OTHERS        = 2.

FVD_REV_DEPEND_DOCUMENTS_GET CALL FUNCTION 'FVD_REV_DEPEND_DOCUMENTS_GET' EXPORTING it_vdbeki_rev = xt_vdbeki_rev[] it_vdbeki = u_tab_vdbeki it_vdbepi = u_tab_vdbepi IMPORTING et_vdbeki_rev_add = et_vdbeki_rev_all[] e_flg_dependent_documents = flg_dependent_documents EXCEPTIONS determination_failed = 1 OTHERS = 2.

LOAN_CHECK_STOCK_REVERSE CALL FUNCTION 'LOAN_CHECK_STOCK_REVERSE' IMPORTING e_flg_cap_tran = e_flg_cap_tran e_rpnsup_cap_tran = e_rpnsup_cap_tran TABLES et_vdarl_cap_tran = et_vdarl_cap_tran it_vdbeki_rev = xt_vdbeki_rev EXCEPTIONS posting_exists = 1 unreleased_masterdata = 2 unreleased_transactiondata = 3 OTHERS = 4.

READ_CUSTOMIZED_MESSAGE CALL FUNCTION 'READ_CUSTOMIZED_MESSAGE' EXPORTING i_arbgb = 'EP' i_dtype = 'I' i_msgnr = '439' IMPORTING E_MSGTY = l_msgty.

FVD_ARC_FI_CML_DOCUMENT_CHECK CALL FUNCTION 'FVD_ARC_FI_CML_DOCUMENT_CHECK' EXPORTING i_bukrs = xt_vdbeki_rev-bukrs i_ranl = xt_vdbeki_rev-ranl i_rvzblg = xt_vdbeki_rev-rvzblg i_dgjahr = xt_vdbeki_rev-dgjahr * IMPORTING * E_DOCUMENT_IN_ARCHIVE = EXCEPTIONS i_document_is_archived = 1 OTHERS = 2.

FVD_ARC_FI_CML_DOCUMENT_CHECK CALL FUNCTION 'FVD_ARC_FI_CML_DOCUMENT_CHECK' EXPORTING i_bukrs = xt_vdbeki_rev-bukrs * i_ranl = xt_vdbeki_rev-ranl i_rvzblg = xt_vdbeki_rev-rvzblg i_dgjahr = xt_vdbeki_rev-dgjahr * IMPORTING * E_DOCUMENT_IN_ARCHIVE = EXCEPTIONS i_document_is_archived = 1 OTHERS = 2.

CHECK_CONFIRMATION_PROCEDURE CALL FUNCTION 'CHECK_CONFIRMATION_PROCEDURE' EXPORTING bukrs = is_vdarl-bukrs fgobj = 'STORNO' sparam1 = tmp_sstati "N1899552 sparam2 = tmp_gsart waers = doc_curr amount = doc_sum IMPORTING sfgaktiv = p_flg_release EXCEPTIONS not_found = 1 OTHERS = 2.

PRELIMINARY_DATA_READ * CALL FUNCTION 'PRELIMINARY_DATA_READ' * EXPORTING * BUKRS = IS_VDARL-BUKRS * SBUAKT = '012' * SOBJEKT = 'STORNO' * TABLES * I_VDAUSZ = T_VDAUSZ * I_VDBEKI = T_VDBEKI_PRE * I_VDBEPP = T_VDBEPP_PRE * I_VDNBZE = T_VDNBZE * EXCEPTIONS * ERROR = 1 * NOT_FOUND = 2 * READ_ERROR = 3 * OTHERS = 4.

PRELIMINARY_DATA_DELETE * CALL FUNCTION 'PRELIMINARY_DATA_DELETE' * EXPORTING * BUKRS = IS_VDARL-BUKRS * FLG_DEL_VZFGD = CON_TRUE * KEY = TMP_KEY * SBUAKT = '012' * SOBJEKT = IS_VDARL-SOBJEKT * EXCEPTIONS * DEL_FAILED = 1 * ERROR = 2 * NOT_FOUND = 3 * OTHERS = 4.

POPUP_GET_VALUES_DB_CHECKED CALL FUNCTION 'POPUP_GET_VALUES_DB_CHECKED' EXPORTING * CHECK_EXISTENCE = 'X' popup_title = text-p02 "Zusatz für Buchung start_column = '20' start_row = '15' IMPORTING returncode = l_returncode TABLES fields = lt_fields EXCEPTIONS error_in_fields = 1 OTHERS = 2.

CONFIRMATION_INITIALIZE CALL FUNCTION 'CONFIRMATION_INITIALIZE' EXPORTING begru = is_vdarl-begru bukrs = is_vdarl-bukrs fgobj = 'STORNO' flg_no_update_vzfgd = con_false key = tmp_key keyergaenzung = ' ' * sparam1 = ' ' sparam1 = tmp_sstati "N1899552 sparam2 = tmp_gsart text15 = ' ' text50 = ' ' verarbfkt = 'I' waers = doc_curr amount = doc_sum EXCEPTIONS fgobj_not_found = 1 read_error = 2 OTHERS = 3.

PRELIMINARY_DATA_SAVE CALL FUNCTION 'PRELIMINARY_DATA_SAVE' EXPORTING bukrs = is_vdarl-bukrs sbuakt = '012' sobjekt = is_vdarl-sobjekt TABLES i_vdausz = t_vdausz i_vdbeki = t_vdbeki_pre i_vdbepp = t_vdbepp_pre i_vdnbze = t_vdnbze EXCEPTIONS entry_exists = 1 error = 2 insert_failed = 3 no_entry_vdbepp = 4 number_error = 5 OTHERS = 6.

FVD_MAP_CP_CHGPTR_WRITE CALL FUNCTION 'FVD_MAP_CP_CHGPTR_WRITE' EXPORTING i_bukrs = is_vdarl-bukrs i_sarchiv = is_vdarl-sarchiv i_ranl = is_vdarl-ranl i_chgcatg = g_con_chgcatg_rele i_chgcatgsub = g_con_chgcatg_rele_rein i_flg_update_task = space EXCEPTIONS not_active = 1 error = 2 OTHERS = 3.

FVD_MAP_CP_CHGPTR_WRITE CALL FUNCTION 'FVD_MAP_CP_CHGPTR_WRITE' EXPORTING i_tab = it_vdarl_add[] i_chgcatg = g_con_chgcatg_rele i_chgcatgsub = g_con_chgcatg_rele_rein i_flg_update_task = space EXCEPTIONS not_active = 1 error = 2 OTHERS = 3.

FVD_MAP_CP_CHGPTR_WRITE CALL FUNCTION 'FVD_MAP_CP_CHGPTR_WRITE' EXPORTING i_tab = it_vdarl_cap_tran[] i_chgcatg = g_con_chgcatg_rele i_chgcatgsub = g_con_chgcatg_rele_rein i_flg_update_task = space EXCEPTIONS not_active = 1 error = 2 OTHERS = 3.

FVD_DEQUEUE_VDARL_MULT CALL FUNCTION 'FVD_DEQUEUE_VDARL_MULT' EXPORTING i_tab_vdarl_key = lt_vdarl_key.

ACCOUNT_REPORT_DIALOG CALL FUNCTION 'ACCOUNT_REPORT_DIALOG' EXPORTING flg_error_account = con_false name = ' ' prot_text = text-050.

ACCOUNT_REPORT_DIALOG CALL FUNCTION 'ACCOUNT_REPORT_DIALOG' EXPORTING flg_error_account = con_false name = ' ' prot_text = text-051.

LOAN_REFERENCE_READ_REFCONCEPT CALL FUNCTION 'LOAN_REFERENCE_READ_REFCONCEPT' TABLES xt_loanref = t_loanref_1 EXCEPTIONS no_data_found = 1 invalid_data = 2 OTHERS = 3.

LOAN_REFERENCE_READ_OBJECTID CALL FUNCTION 'LOAN_REFERENCE_READ_OBJECTID' EXPORTING i_refcat = t_loanref_1-refcat i_refconcept = t_loanref_1-refconcept i_status = t_loanref_1-status TABLES xt_loanref = t_loanref_2 EXCEPTIONS no_data_found = 1 invalid_data = 2 OTHERS = 3.

FVD_TABLE_INIT CALL FUNCTION 'FVD_TABLE_INIT' EXCEPTIONS OTHERS = 1.

SELECT_STOCK_REVERSE CALL FUNCTION 'SELECT_STOCK_REVERSE' EXPORTING i_vdbeki = it_vdbeki_rev IMPORTING flg_ok = flg_posting_ok e_all_vdarl_old = l_sav_vdarl_all_old e_all_vdarl_new = l_sav_vdarl_all_new e_wrk_vdbeki_err = l_wrk_vdbeki_err "N1590722 e_wrk_vdbepi_err = l_wrk_vdbepi_err "N1590722 flg_sstati_changed = flg_sstati_changed "N1460011 sstati_new = l_sstati_new EXCEPTIONS enqueue_error = 01 loan_error = 02 not_found = 03 user_error = 04 ziti_error = 05 OTHERS = 06.

FVD_REV_VDARL_UPDATE CALL FUNCTION 'FVD_REV_VDARL_UPDATE' EXPORTING i_vdarl_old = l_sav_vdarl_all_old i_vdarl_new = l_sav_vdarl_all_new EXCEPTIONS update_failure = 1 OTHERS = 2.

FVD_TABLE_UPDATE CALL FUNCTION 'FVD_TABLE_UPDATE' EXPORTING i_flg_update_task = 'X' i_flg_change_document = 'X' EXCEPTIONS OTHERS = 1.

FVD_TRLE_DISTRIBUTOR_IF CALL FUNCTION 'FVD_TRLE_DISTRIBUTOR_IF' EXPORTING i_flg_log = '1' " display log in popup i_flg_distribute = 'X' " call TR-Distributor EXCEPTIONS warning_delete_bt = 0 OTHERS = 2.

ACCOUNT_REPORT_DIALOG CALL FUNCTION 'ACCOUNT_REPORT_DIALOG' EXPORTING flg_error_account = con_false name = ' ' prot_text = text-051.

FVD_REV_CHECK_DISB_PAID_OUT CALL FUNCTION 'FVD_REV_CHECK_DISB_PAID_OUT' EXPORTING i_str_vdbepi = l_wrk_vdbepi * I_STR_VDARL = i_sav_ranl = is_vdbeki_rev-ranl IMPORTING * E_FLG_NOT_DEBIT_SIDE = e_flg_paid_out = l_flg_paid_out EXCEPTIONS contract_not_found = 1 no_data_found = 2 invalid_data = 3 OTHERS = 4.

LOAN_REFERENCE_READ_OBJECTID CALL FUNCTION 'LOAN_REFERENCE_READ_OBJECTID' EXPORTING i_refcat = con_disbursement i_refconcept = l_refconcept i_status = con_active TABLES xt_loanref = t_loanref EXCEPTIONS no_data_found = 1 invalid_data = 2 OTHERS = 3.

LOAN_REFERENCE_READ_REFCONCEPT CALL FUNCTION 'LOAN_REFERENCE_READ_REFCONCEPT' TABLES xt_loanref = t_loanref EXCEPTIONS no_data_found = 1 invalid_data = 2 OTHERS = 3.

FI_PAYMENT_RUN_REGUS_DELETE CALL FUNCTION 'FI_PAYMENT_RUN_REGUS_DELETE' EXPORTING i_bukrs = is_vdarl-bukrs.

FVD_REV_DEPEND_DOCUMENTS_GET CALL FUNCTION 'FVD_REV_DEPEND_DOCUMENTS_GET' EXPORTING it_vdbeki_rev = l_tab_vdbeki * IT_VDBEKI = it_vdbepi = u_tab_vdbepi IMPORTING et_vdbeki_rev_add = l_tab_vdbeki_all * E_FLG_DEPENDENT_DOCUMENTS = EXCEPTIONS OTHERS = 2.

FVD_REV_CHECK_EXCLUDE_SET CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_SET' EXPORTING i_bukrs = it_bepi_show-bukrs i_ref_rbelkpfd = it_bepi_show-rbelkpfd i_ref_rposnr = it_bepi_show-rposnr i_type = 'POFF' * I_EXC_RBELKPFD = -rbelkpfd "N1172440 i_exc_rbelkpfd = ls_bepi-rbelkpfd * I_EXC_RPOSNR = EXCEPTIONS OTHERS = 2.

FVD_REV_CHECK_EXCLUDE_SET CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_SET' EXPORTING i_bukrs = -bukrs * I_REF_RBELKPFD = -rbelkpfd * I_REF_RPOSNR = i_exc_rbelkpfd = -rbelkpfd i_type = 'MAB' * I_EXC_RPOSNR = EXCEPTIONS OTHERS = 2.

FVD_REV_CHECK_EXCLUDE_SET CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_SET' EXPORTING i_bukrs = ls_bepi_pao-bukrs i_ref_rbelkpfd = ls_bepi_pao-rbelkpfd i_ref_rposnr = ls_bepi_pao-rposnr i_type = 'POFF' i_exc_rbelkpfd = it_bepi_show-rbelkpfd * I_EXC_RPOSNR = EXCEPTIONS OTHERS = 2.

FVD_REV_CHECK_EXCLUDE_SET CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_SET' EXPORTING i_bukrs = ls_bepi_cap-bukrs i_ref_rbelkpfd = ls_bepi_cap-rbelkpfd i_ref_rposnr = ls_bepi_cap-rposnr i_type = 'CAP' i_exc_rbelkpfd = it_bepi_show-rbelkpfd * I_EXC_RPOSNR = EXCEPTIONS OTHERS = 2.

FVD_REV_CHECK_EXCLUDE_SET CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_SET' EXPORTING i_bukrs = ls_excl-bukrs i_ref_rbelkpfd = ls_excl-rbelkpfd i_ref_rposnr = ls_excl-rposnr i_type = 'POST' i_exc_rbelkpfd = ls_bepi-rbelkpfd * I_EXC_RPOSNR = EXCEPTIONS OTHERS = 2.

FVD_REV_CHECK_POSSIBLE CALL FUNCTION 'FVD_REV_CHECK_POSSIBLE' EXPORTING is_vdarl = is_vdarl is_vdbeki_rev = wa_vdbeki_rev * IT_VDBEKI_REV = it_vdbepi = u_tab_vdbepi i_flg_check_complete = ' ' * I_TAB_VDARL_RELEASE = i_flg_use_buffer = l_flg_use_buffer i_flg_chk_disb_cli = con_true * IMPORTING * E_FLG_OTHER_DOCUMENTS = * ET_VDBEKI_REV_ALL = * E_TAB_RANL = * E_FLG_OLD_DISB = * E_FLG_BO_WITH = EXCEPTIONS document_invalid = 1 flow_type_not_customized = 2 reverse_not_possible = 3 OTHERS = 4 .

FVD_REV_CHECK_CLI CALL FUNCTION 'FVD_REV_CHECK_CLI' EXPORTING i_str_vdbeki_rev = l_str_vdbeki_rev * I_TAB_VDBEPI = IMPORTING e_flg_cli_document = l_flg_cli * CHANGING * C_TAB_VDBEKI_REV = EXCEPTIONS document_invalid = 1 input_not_qualified = 2 OTHERS = 3 .

FVD_BO_OL_REVERSE CALL FUNCTION 'FVD_BO_OL_REVERSE' EXPORTING i_s_vdarl = is_vdarl i_tab_loanref_reverse = it_loanref i_sim = i_flg_simulation i_superprimanota = i_sav_superprimanota i_budat = i_sav_budat i_bktxt = i_sav_bktxt i_protocol = i_sav_protocol i_specialperiod = i_sav_specialperiod IMPORTING e_flg_masterdata_completed = e_flg_masterdata_completed e_t_message = l_tab_message EXCEPTIONS failed = 1 OTHERS = 2.

LOAN_MESSAGES_INITIALIZE CALL FUNCTION 'LOAN_MESSAGES_INITIALIZE' "note 1787972 EXPORTING "note 1787972 i_collect_and_send = con_false "note 1787972 i_reset = con_false. "note 1787972

LOAN_REFERENCE_READ_REFCONCEPT CALL FUNCTION 'LOAN_REFERENCE_READ_REFCONCEPT' TABLES xt_loanref = l_tab_loanref EXCEPTIONS no_data_found = 1 invalid_data = 2 OTHERS = 3.

FVD_TRLE_DISTRIBUTOR_IF CALL FUNCTION 'FVD_TRLE_DISTRIBUTOR_IF' EXPORTING i_flg_simul = i_flg_simul i_flg_log = '1' " display log in popup i_flg_distribute = 'X' " call TR-Distributor EXCEPTIONS warning_delete_bt = 0 OTHERS = 2.

FVD_CONTROL_SERVICE_UPDATE CALL FUNCTION 'FVD_CONTROL_SERVICE_UPDATE' EXPORTING i_tab_service_schedule = u_tab_schedule flg_list = l_str_flg_list EXCEPTIONS error_found = 1 OTHERS = 2.

FVD_IOA_OBJ_GET_FLOWTYPES_RNG CALL FUNCTION 'FVD_IOA_OBJ_GET_FLOWTYPES_RNG' EXPORTING i_bukrs = is_vdarl-bukrs i_gsart = is_vdarl-gsart i_sloanfunc = l_con_func_ioa IMPORTING e_rng_sbewziti = l_rng_sbewziti_ioa EXCEPTIONS not_found = 1.

FVD_IOA_DB_READ_CALC CALL FUNCTION 'FVD_IOA_DB_READ_CALC' EXPORTING i_bukrs = is_vdarl-bukrs i_ranl = is_vdarl-ranl CHANGING c_tab_calc_head = l_tab_calc_head c_tab_calc_det = l_tab_calc_det EXCEPTIONS missing_param = 1 not_found = 2 OTHERS = 3.

FVD_TABLE_INFORM CALL FUNCTION 'FVD_TABLE_INFORM' IMPORTING e_flg_tool_used = l_flg_tool_used EXCEPTIONS error = 1 OTHERS = 2.

FVD_TABLE_INIT CALL FUNCTION 'FVD_TABLE_INIT' EXCEPTIONS OTHERS = 1.

FVD_TABLE_UPDATE_GROUP_GET CALL FUNCTION 'FVD_TABLE_UPDATE_GROUP_GET' CHANGING c_update_group = l_supdate_group EXCEPTIONS OTHERS = 1.

FVD_TABLE_SET CALL FUNCTION 'FVD_TABLE_SET' EXPORTING i_tablename = 'VDIOA_CALC_HEAD' i_update_function = 'FVD_BO_DB_UPDATE_VDIOA_HEAD' i_update_group = l_supdate_group i_tab_old = l_tab_calc_head_old i_tab_new = l_tab_calc_head_new EXCEPTIONS error = 1 OTHERS = 2.

FVD_TABLE_SET CALL FUNCTION 'FVD_TABLE_SET' EXPORTING i_tablename = 'VDIOA_CALC_DET' i_update_function = 'FVD_BO_DB_UPDATE_VDIOA_DET' i_update_group = l_supdate_group i_tab_old = l_tab_calc_det_old i_tab_new = l_tab_calc_det_new EXCEPTIONS error = 1 OTHERS = 2.

FVD_TABLE_UPDATE CALL FUNCTION 'FVD_TABLE_UPDATE' EXPORTING i_flg_update_task = con_true i_flg_change_document = con_true EXCEPTIONS OTHERS = 1.

FVD_REPAY_API_GETLIST CALL FUNCTION 'FVD_REPAY_API_GETLIST' EXPORTING i_bukrs = bukrs i_ranl = ranl IMPORTING e_tab_vdrepayment = l_tab_vdrepayment EXCEPTIONS not_found = 1 OTHERS = 2.

LOAN_MESSAGES_STORE CALL FUNCTION 'LOAN_MESSAGES_STORE' EXPORTING is_mesg = ls_trlomesg i_exception_if_not_active = con_true EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

FVD_TRLE_DISTRIBUTOR_ACTIVE CALL FUNCTION 'FVD_TRLE_DISTRIBUTOR_ACTIVE' EXPORTING i_bukrs = is_vdarl-bukrs i_gsart = is_vdarl-gsart EXCEPTIONS distributor_cml_not_active = 1 OTHERS = 2.

FVD_REV_CHECK_EXCLUDE_SET CALL FUNCTION 'FVD_REV_CHECK_EXCLUDE_SET' EXPORTING i_tab_check_exclude = l_tab_rev_check_exc[] EXCEPTIONS missing_data = 1 OTHERS = 2.

FVD_REV_DEPEND_DOCUMENTS_GET CALL FUNCTION 'FVD_REV_DEPEND_DOCUMENTS_GET' EXPORTING it_vdbeki_rev = l_tab_vdbeki_bo_single it_vdbeki = u_tab_vdbeki it_vdbepi = u_tab_vdbepi IMPORTING et_vdbeki_rev_add = l_tab_vdbeki_bo_all e_flg_dependent_documents = l_flg_dependent_documents EXCEPTIONS determination_failed = 1 OTHERS = 2.

FVD_REV_CHECK_POSSIBLE CALL FUNCTION 'FVD_REV_CHECK_POSSIBLE' EXPORTING is_vdarl = u_str_vdarl * IS_VDBEKI_REV = it_vdbeki_rev = l_tab_vdbeki_chk it_vdbepi = u_tab_vdbepi * it_vdbepi = i_tab_bepi_all i_flg_check_complete = ' ' * I_TAB_VDARL_RELEASE = i_flg_use_buffer = l_flg_use_buffer i_flg_chk_disb_cli = con_true * IMPORTING * E_FLG_OTHER_DOCUMENTS = * ET_VDBEKI_REV_ALL = * E_TAB_RANL = * E_FLG_OLD_DISB = * E_FLG_BO_WITH = EXCEPTIONS document_invalid = 1 flow_type_not_customized = 2 reverse_not_possible = 3 OTHERS = 4 .

FVD_FAC_OL_GET_FAC_CUST_ALL CALL FUNCTION 'FVD_FAC_OL_GET_FAC_CUST_ALL' * EXPORTING * I_FACILITY_PROD_TYPE = * I_DRAWDOWN_PROD_TYPE = IMPORTING e_tab_facility_prod_type = l_tab_facility_prods e_tab_drawdown_prod_type = l_tab_drawdown_prods EXCEPTIONS customizing_error = 1 OTHERS = 2.

FVD_FAC_DB_GET_FACILITY CALL FUNCTION 'FVD_FAC_DB_GET_FACILITY' EXPORTING i_company_code = u_is_vdarl-bukrs i_facility_number = u_is_vdarl-fac_group_number IMPORTING e_str_facility = c_str_vdarl EXCEPTIONS not_found = 1 parameter_error = 2 customizing_error = 3 not_facility = 4 OTHERS = 5.

FVD_FAC_OL_GET_FAC_ALL CALL FUNCTION 'FVD_FAC_OL_GET_FAC_ALL' EXPORTING i_company_code = u_is_vdarl-bukrs i_contract_number = u_is_vdarl-ranl * I_FACILITY_GROUP_NUMBER = * I_TAB_DRAWDOWN_PROD_STATUS = IMPORTING e_str_facilities = l_str_facilities e_tab_subfacility = l_tab_subfacility e_tab_drawdowns = l_tab_drawdowns e_tab_dd_sf_link = l_tab_dd_sf_link EXCEPTIONS not_found = 1 parameter_error = 2 customizing_error = 3 internal_error = 4 OTHERS = 5.

FVD_FAC_OL_CALC_FAC_AMTS CALL FUNCTION 'FVD_FAC_OL_CALC_FAC_AMTS' EXPORTING i_str_facility = l_str_facilities i_tab_subfacility = l_tab_subfacility i_tab_drawdowns = l_tab_drawdowns i_tab_dd_sf_link = l_tab_dd_sf_link * I_CALLED_FROM_SCREEN = IMPORTING e_str_facility_display = l_str_facility_display e_tab_subfaciliy_display = l_tab_subfacility_display e_tab_drawdown_display = l_tab_drawdown_display EXCEPTIONS parameter_error = 1 internal_error = 2 OTHERS = 3.

LOAN_FLOWS_SUPPLY CALL FUNCTION 'LOAN_FLOWS_SUPPLY' EXPORTING i_bukrs = u_bukrs i_ranl = u_ranl I_WRK_VDARL = u_wrk_vdarl READ_SCHEDULED_RECORDS = space READ_POSTED_RECORDS = 'X' NO_STORNO = space * I_FLG_IGNORE_ACCRUALS = ' ' * I_FLG_IGNORE_VALUATIONS = ' ' I_FLG_NO_SHADOW_TABLE = l_flg_no_shadow_table "N1589846 TABLES O_VDBEKI = c_tab_vdbeki O_VDBEPI = c_tab_vdbepi * O_VZZBEPP = * O_VZZBEPP_SHADOW = * O_VDBEKI_SHADOW = * O_VDBEPI_SHADOW = EXCEPTIONS OTHERS = 5 .

FVD_TZB0A_READ_ALL CALL FUNCTION 'FVD_TZB0A_READ_ALL' EXPORTING i_sbewart = l_wrk_vdbepi-sbewart IMPORTING es_tzb0a = l_wrk_tzb0a EXCEPTIONS not_customized = 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 MF68SF01 or its description.

MF68SF01 - Form routines for reversal transaction
MF68OF01 - documentation and ABAP source code
MF68ATOP - documentation and ABAP source code
MF68ATOB - documentation and ABAP source code
MF68ASAV - documentation and ABAP source code
MF68AO55 - Include MF68AO55

MCLAIMI01_FCODE_UC_SET

MF60DF00_GEBAEUDE

MEMIG_SCHEDULEO00

MF60BI21_REINS_PRUEFEN