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

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

MF67ASAV SAP ABAP INCLUDE - Form Routines for Save

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

MF67ASAV 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 MF67ASAV 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 MF67ASAV. "Basic submit
SUBMIT MF67ASAV AND RETURN. "Return to original report after report execution complete
SUBMIT MF67ASAV 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 Save

INCLUDES used within this REPORT MF67ASAV

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:

FSBP_READ_BUT000 CALL FUNCTION 'FSBP_READ_BUT000' EXPORTING i_partner = xvzgpo-partnr IMPORTING e_but000 = l_but000 EXCEPTIONS wrong_parameters = 1 no_data_found = 2 OTHERS = 3.

BUPA_ACT_ANALYZE_FOR_DIALOG CALL FUNCTION 'BUPA_ACT_ANALYZE_FOR_DIALOG' EXPORTING iv_partner_guid = l_but000-partner_guid iv_activity = 'BPUS' " partner usage EXCEPTIONS allowed_with_warning = 1 not_allowed = 2 partner_unknown = 3 OTHERS = 4.

FVD_ARC_DISBURSEMENT_CHECK CALL FUNCTION 'FVD_ARC_DISBURSEMENT_CHECK' EXPORTING i_bukrs = vdarl-bukrs i_ranl = vdarl-ranl IMPORTING e_disbursement_exists = flg_disb.

BPAR_R_BPCENTRAL_REFKONT * CALL FUNCTION 'BPAR_R_BPCENTRAL_REFKONT' * EXPORTING * partner = rmf67-rdarnehm * bukrs = vdarl-bukrs * zgp = 'X' * xmemory = 'X' * IMPORTING * vzkpart_n = vzkpart_n * vzkpart_o = vzkpart_o * EXCEPTIONS * no_entry_found = 1 * OTHERS = 2.

FVVM_ACCOUNTREF_PARTNER_READ CALL FUNCTION 'FVVM_ACCOUNTREF_PARTNER_READ' EXPORTING partner = rmf67-rdarnehm emp_date = sy-datum comp_code = vdarl-bukrs i_xmemory = 'X' IMPORTING vzkpart = vzkpart_n EXCEPTIONS no_partner = 1 OTHERS = 2.

ENQUEUE_EBU_PARTNR CALL FUNCTION 'ENQUEUE_EBU_PARTNR' EXPORTING partner = rmf67-rdarnehm _wait = 'X' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

DEQUEUE_EBU_PARTNR CALL FUNCTION 'DEQUEUE_EBU_PARTNR' EXPORTING partner = rmf67-rdarnehm.

FVZR_KOKO_OLD_NEW CALL FUNCTION 'FVZR_KOKO_OLD_NEW' TABLES nvzzkoko = xvzzkoko ovzzkoko = yvzzkoko.

LOAN_CHECK_SZKEY CALL FUNCTION 'LOAN_CHECK_SZKEY' EXPORTING i_szkey = vdarl-szkey IMPORTING e_tvz01 = tvz01 EXCEPTIONS szkey_not_found = 1 OTHERS = 2.

FVD_OBJECTS_TABLE_UPDATE CALL FUNCTION 'FVD_OBJECTS_TABLE_UPDATE' EXPORTING i_flg_adr = 'X' TABLES i_partner_temp = gt_partner_key e_vdrobjnr_temp = ivdrobjnr_temp e_vdsgrundb_temp = ivdsgrundb_temp EXCEPTIONS update_error = 1 OTHERS = 2.

FLBP_ROLE_RANGE_FOR_RLCAT_GET CALL FUNCTION 'FLBP_ROLE_RANGE_FOR_RLCAT_GET' EXPORTING it_rlcat = lt_rlcat IMPORTING et_role_rng = lt_role_rng EXCEPTIONS no_role_found = 1 no_rlcat_supplied = 2 OTHERS = 3.

FVZK_MODIFY_IVZZKOPO_NEU CALL FUNCTION 'FVZK_MODIFY_IVZZKOPO_NEU' EXPORTING step_index = sy-tabix vzzkopo = vzzkopo TABLES ivzzkopo = ivzzkopo EXCEPTIONS general_error = 01 not_found = 02 verstoss_obligatorisch = 03.

FVD_LOAN_OL_REPLACE_RANL CALL FUNCTION 'FVD_LOAN_OL_REPLACE_RANL' EXPORTING i_s_vdarl_key = l_str_vdarl_key i_sworkid = con_workid_escrow i_ranl_int = l_intern_number i_ranl_new = vdarl-ranl EXCEPTIONS input_not_filled = 1 failed = 2 OTHERS = 3.

FVD_LOAN_OL_SET_CHECKED CALL FUNCTION 'FVD_LOAN_OL_SET_CHECKED' EXPORTING i_s_vdarl_key = l_str_vdarl_key i_sworkid = con_workid_escrow EXCEPTIONS failed = 1 OTHERS = 2.

FVVN_NUMBER_BEFORE_SAVE CALL FUNCTION 'FVVN_NUMBER_BEFORE_SAVE' EXPORTING I_VDARL = vdarl CHANGING C_RANL_NEW = l_num_new EXCEPTIONS CONTRACT_NOT_FOUND = 1 CANCELED = 2 OTHERS = 3.

FVD_LOAN_OL_REPLACE_RANL CALL FUNCTION 'FVD_LOAN_OL_REPLACE_RANL' EXPORTING i_s_vdarl_key = l_str_vdarl_key i_sworkid = con_workid_escrow i_ranl_int = l_num_old i_ranl_new = vdarl-ranl EXCEPTIONS input_not_filled = 1 failed = 2 OTHERS = 3.

FVD_LOAN_OL_SET_CHECKED CALL FUNCTION 'FVD_LOAN_OL_SET_CHECKED' EXPORTING i_s_vdarl_key = l_str_vdarl_key i_sworkid = con_workid_escrow EXCEPTIONS failed = 1 OTHERS = 2.

OBJECT_NUMBER_GET_T1

CALL FUNCTION 'OBJECT_NUMBER_GET_T1' EXPORTING bukrs = vdarl-bukrs ranl = vdarl-ranl IMPORTING objnr = iobjnr EXCEPTIONS OTHERS = 1.

FVD_OBJECTS_TABLE_UPDATE CALL FUNCTION 'FVD_OBJECTS_TABLE_UPDATE' TABLES i_partner_temp = gt_partner_key e_vdrobjnr_temp = ivdrobjnr_temp e_vdsgrundb_temp = ivdsgrundb_temp EXCEPTIONS update_error = 1 OTHERS = 2.

FVPH_GET_DEFAULT_ZV CALL FUNCTION 'FVPH_GET_DEFAULT_ZV' EXPORTING i_sanlf = vdarl-sanlf i_bukrs = vdarl-bukrs i_sarchiv = vdarl-sarchiv i_ranl = vdarl-ranl i_waers = vdarl-santwhr i_gsart = vdarl-gsart i_sbuhal = tzpab-sbuhal i_jpaymentreq = tzpab-jpaymentreq TABLES i_vzgpodeb = ivzpardeb e_vdzv_new = x_vdzv CHANGING c_rpzahl = vdarl-rpzahl EXCEPTIONS OTHERS = 1.

VVZZKOPO_TO_VZZKOPO
    CALL FUNCTION 'VVZZKOPO_TO_VZZKOPO'
    EXPORTING
      i_tab_vvzzkopo = ivzzkopo[]
    IMPORTING
      e_tab_vzzkopo  = xvzzkopo_save[]
      e_tab_vzzkopa  = xvzzkopa_save[].

VVZZKOPO_TO_VZZKOPO
    CALL FUNCTION 'VVZZKOPO_TO_VZZKOPO'
    EXPORTING
      i_tab_vvzzkopo = ivzzkopo[]
    IMPORTING
      e_tab_vzzkopo  = xvzzkopo_save[].

FVD_SEPA_OL_SET_USAGE
  CALL FUNCTION 'FVD_SEPA_OL_SET_USAGE'
    EXPORTING
      i_wrk_vdarl       = vdarl
      i_tab_vdzv_old    = y_vdzv[]
      i_tab_vdzv_new    = x_vdzv[]
      i_tab_vzzkopo_old = yvzzkopo[]
      i_tab_vzzkopo_new = xvzzkopo[]
      i_tab_vdgpo_old   = yvzgpo[]
      i_tab_vdgpo_new   = xvzgpo[].

FVD_TRLE_DISTRIBUTOR_IF
    CALL FUNCTION 'FVD_TRLE_DISTRIBUTOR_IF'
      EXPORTING
        i_wrk_vdarl       = vdarl
        i_vzzkoko         = xvzzkoko_save[]
        i_vzzkopo         = xvzzkopo_save[]
      i_vzzkopa         = xvzzkopa_save[]  "note 1383480
        i_flg_log         = '1'            " display log in popup
        i_flg_distribute  = space
      EXCEPTIONS
        warning_delete_bt = 0
        OTHERS            = 2.

FVD_TRLE_SET_GLOBAL_FLAGS CALL FUNCTION 'FVD_TRLE_SET_GLOBAL_FLAGS' EXPORTING i_flg_pro = 'X'.

FVD_TRLE_SET_GLOBAL_FLAGS CALL FUNCTION 'FVD_TRLE_SET_GLOBAL_FLAGS' "N1319373 EXPORTING i_flg_disb = 'X'.

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.

FVD_SEPA_OL_GET_CUST CALL FUNCTION 'FVD_SEPA_OL_GET_CUST' EXPORTING i_bukrs = vdarl-bukrs IMPORTING e_sepa_actv = l_sepa_actv.

FVD_SEPA_OL_GET_EDD_CUST CALL FUNCTION 'FVD_SEPA_OL_GET_EDD_CUST' EXPORTING i_bukrs = vdarl-bukrs i_zlsch = ls_vdgpo-zlsch IMPORTING e_xsepa = l_xsepa.

FVD_SEPA_OL_REFID_SAVE CALL FUNCTION 'FVD_SEPA_OL_REFID_SAVE' EXPORTING i_mnd_id = ls_vdgpo-mndid i_ref_id = vdarl-ranl i_bp_number = ls_vdgpo-partnr i_bank_id = ls_vdgpo-bvtyp i_bukrs = vdarl-bukrs "N1835444 EXCEPTIONS refid_saving_failed = 1 OTHERS = 2.

FVD_SEPA_OL_GET_EDD_CUST CALL FUNCTION 'FVD_SEPA_OL_GET_EDD_CUST' EXPORTING i_bukrs = vdarl-bukrs i_zlsch = ls_vzzkopo-zlsch IMPORTING e_xsepa = l_xsepa.

FVD_SEPA_OL_REFID_SAVE CALL FUNCTION 'FVD_SEPA_OL_REFID_SAVE' EXPORTING i_mnd_id = ls_vzzkopo-mndid i_ref_id = vdarl-ranl i_bp_number = ls_vzzkopo-spartnr i_bank_id = ls_vzzkopo-bvtyp i_bukrs = vdarl-bukrs "N1835444 EXCEPTIONS refid_saving_failed = 1 OTHERS = 2.

FVD_SEPA_OL_GET_EDD_CUST CALL FUNCTION 'FVD_SEPA_OL_GET_EDD_CUST' EXPORTING i_bukrs = vdarl-bukrs i_zlsch = l_zlsch IMPORTING e_xsepa = l_xsepa.

FVD_SEPA_OL_REFID_SAVE CALL FUNCTION 'FVD_SEPA_OL_REFID_SAVE' EXPORTING i_mnd_id = ls_vdzv-mndid i_ref_id = vdarl-ranl i_bp_number = ls_vdzv-rpzahl i_bank_id = ls_vdzv-rpbank i_bukrs = vdarl-bukrs "N1835444 EXCEPTIONS refid_saving_failed = 1 OTHERS = 2.

ACCOUNT_REPORT_DIALOG CALL FUNCTION 'ACCOUNT_REPORT_DIALOG' EXPORTING flg_error_account = ' ' name = text-248 "Buch.prot.Auszahl.

BPOB_MAINTAIN_CONV_SAVE CALL FUNCTION 'BPOB_MAINTAIN_CONV_SAVE' EXPORTING i_xupdtask = ' ' TABLES et_partner_key = gt_partner_key it_objekt_key = gt_objekt_key EXCEPTIONS OTHERS = 1.

BPOB_TRD001_VDGPO_BACK CALL FUNCTION 'BPOB_TRD001_VDGPO_BACK' EXPORTING i_assi_typ = assi_typ_darl IMPORTING e_xchng = lv_xchng TABLES t_vzgpo_new = xvzgpo t_vzgpodeb = ivzpardeb EXCEPTIONS check_error = 1 OTHERS = 2.

FLBP_ROLE_RANGE_FOR_RLCAT_GET CALL FUNCTION 'FLBP_ROLE_RANGE_FOR_RLCAT_GET' EXPORTING i_rlcat = h_rolecat IMPORTING et_role_rng = lt_role_rng EXCEPTIONS no_role_found = 1 no_rlcat_supplied = 2 OTHERS = 3.

FVPH_CHECK_ZV_ON_CHANGE_LOAN CALL FUNCTION 'FVPH_CHECK_ZV_ON_CHANGE_LOAN' EXPORTING i_sanlf = vdarl-sanlf i_bukrs = vdarl-bukrs i_sarchiv = vdarl-sarchiv i_ranl = vdarl-ranl i_waers = vdarl-santwhr i_gsart = vdarl-gsart i_sbuhal = tzpab-sbuhal i_jpaymentreq = tzpab-jpaymentreq IMPORTING e_new_payment_data = new_payment_data TABLES i_vzgpodeb = ivzpardeb e_vdzv = x_vdzv CHANGING c_rpzahl = vdarl-rpzahl c_zv_data_changed = zv_changed EXCEPTIONS no_payment_data = 1 OTHERS = 2.

FVD_OBJECTS_TABLE_UPDATE CALL FUNCTION 'FVD_OBJECTS_TABLE_UPDATE' * EXPORTING * i_flg_adr = ' ' TABLES i_partner_temp = gt_partner_key e_vdrobjnr_temp = ivdrobjnr_temp e_vdsgrundb_temp = ivdsgrundb_temp EXCEPTIONS update_error = 1 OTHERS = 2.

PRELIMINARY_DATA_DELETE CALL FUNCTION 'PRELIMINARY_DATA_DELETE' EXPORTING bukrs = vdarl-bukrs sbuakt = '001' sobjekt = vdarl-sobjekt * SVORGANG = 0 IMPORTING * DEL = sfgbew = vdarl-sfgbew EXCEPTIONS del_failed = 1 error = 2 not_found = 3 OTHERS = 4.

FVD_CORR_EXCLUDE_SAVE CALL FUNCTION 'FVD_CORR_EXCLUDE_SAVE'.

CONFIRMATION_INITIALIZE CALL FUNCTION 'CONFIRMATION_INITIALIZE' EXPORTING bukrs = vdarl-bukrs fgobj = con_sfgobj key = key sparam1 = sparam1 sparam2 = sparam2 verarbfkt = ret_code waers = vdarl-santwhr amount = l_bzusage begru = vdarl-begru IMPORTING fgkz = vdarl-sfgkz EXCEPTIONS fgobj_not_found = 01 read_error = 02.

FVZR_KOKO_OLD_NEW CALL FUNCTION 'FVZR_KOKO_OLD_NEW' TABLES nvzzkoko = xvzzkoko ovzzkoko = yvzzkoko.

FVZK_SAVE_VZZKOPO CALL FUNCTION 'FVZK_SAVE_VZZKOPO' EXPORTING default_values = 'X' dguel_kk = vzzkoko-dguel_kk ohne_verbucher = space rkey1 = vdarl-ranl IMPORTING e_result = l_antwort TABLES x_vzzkopo = xvzzkopo y_vzzkopo = yvzzkopo EXCEPTIONS nametab_error = 01 update_error = 02.

SAVE_VZZKOPA CALL FUNCTION 'SAVE_VZZKOPA' EXPORTING i_ohne_verbucher = space i_rkey1 = vdarl-ranl IMPORTING e_result = l_antwort TABLES new_kopa = xvzzkopa old_kopa = yvzzkopa EXCEPTIONS update_error = 01.

NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = 'VD' object = 'FVVD_KOBJ' IMPORTING number = gv_sobjekt returncode = ret_code EXCEPTIONS interval_not_found = 01 number_range_not_intern = 02 object_not_found = 03 quantity_is_0 = 04 quantity_is_not_1 = 05 interval_overflow = 06.

NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = tzpab-numkr object = 'FVVD_RANL' IMPORTING number = vdarl-ranl returncode = ret_code EXCEPTIONS interval_not_found = 01 number_range_not_intern = 02 object_not_found = 03 quantity_is_0 = 04 quantity_is_not_1 = 05 interval_overflow = 06.

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = vdarl-ranl IMPORTING output = vdarl-ranl.

FVZR_MODIFY_KOKO CALL FUNCTION 'FVZR_MODIFY_KOKO' EXPORTING i_nlfd_alt = xvzzkoko-nlfd_ang uvzzkoko = xvzzkoko EXCEPTIONS not_found = 01.

FVD_COLLATERALS_UPDATE CALL FUNCTION 'FVD_COLLATERALS_UPDATE' TABLES i_tab_partner_key = gt_partner_key EXCEPTIONS OTHERS = 1.

FVD_COLLATERALS_GET_RSICHER CALL FUNCTION 'FVD_COLLATERALS_GET_RSICHER' EXPORTING i_int_rsicher = wa_ivdarlsic-int_rsicher IMPORTING e_rsicher = wa_vdarlsic-rsicher.

FVD_TRLE_DISTRIBUTOR_ACTIVE
  call function 'FVD_TRLE_DISTRIBUTOR_ACTIVE'
    exporting
      i_bukrs                          = vdarl-bukrs
      i_gsart                          = vdarl-gsart
    exceptions
      distributor_cml_not_active       = 1
      others                           = 2.

LOAN_ACCOUNT_PREPARE CALL FUNCTION 'LOAN_ACCOUNT_PREPARE' EXPORTING i_vdarl = vdarl i_no_opt_flows = l_flg_no_opt TABLES ivdbepp = ivdbepp xvdbepp = xvdbepp zitibepp = zitibepp ovdbepp = yvdbepp EXCEPTIONS empty_ivdbepp = 1 deb_hdn_not_found = 2 ddispo_before_ddarc = 3 dfaell_before_dfarc = 3 dvalut_before_dvarc = 3 OTHERS = 4.

FVZR_MODIFY_KOKO CALL FUNCTION 'FVZR_MODIFY_KOKO' EXPORTING i_dguel_alt = xvzzkoko-dguel_kk i_nlfd_alt = xvzzkoko-nlfd_ang uvzzkoko = xvzzkoko EXCEPTIONS not_found = 01.

VDBEPP_CONSTRUCT CALL FUNCTION 'VDBEPP_CONSTRUCT' EXPORTING ivdarl = vdarl i_no_check_budat = ret_code i_budatmessage = 'X' "bei berlappenden Buchungen i_prol_nr = ivdpopo-rpnr "kommt Meldung keine Exception i_arc_doc_rec = arc_doc_rec IMPORTING e_datum_lfz = vdarl-drueck "voraussichtliches LFZEnde TABLES ivdbeki = yvdbeki ivdbepi = yvdbepi ivzzkoko = xvzzkoko i_vzzkopo = ivzzkopo new_vdbepp = xvdbepp old_vdbepp = yvdbepp i_vzzkopa = ivzzkopa EXCEPTIONS keine_auszahlung = 1 no_koko = 2 storno_istsatz = 3 arc_collision = 4 OTHERS = 5.

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'N' textline1 = text-m45 "Sollen Zahlsplits gelscht textline2 = text-m46 "werden titel = text-m44 IMPORTING answer = l_antwort.

LOAN_DISAGIO_POSTING_UPDATE CALL FUNCTION 'LOAN_DISAGIO_POSTING_UPDATE' EXPORTING ovzzkoko = yvzzkoko nvzzkoko = xvzzkoko i_flg_update_direct = space "ber zentralen Verbucher TABLES ovzzbepp = zitibepp.

FVZK_LOAD_VZZKOPO CALL FUNCTION 'FVZK_LOAD_VZZKOPO' EXPORTING default_values = ' ' flg_kopa_read = ' ' get_empty = ' ' gsart = vdarl-gsart init_tables = ' ' koko_key = i_koko_key TABLES ivzzkopo = i_vzzkopo EXCEPTIONS group_not_found = 01 kondition_not_found = 02 sbewziti_different = 03 skoart_not_found = 04 text_not_found = 05.

FVD_CLERKS_SAVE CALL FUNCTION 'FVD_CLERKS_SAVE' EXPORTING i_update_group = u_update_group i_str_vdarl = vdarl EXCEPTIONS update_error = 1 OTHERS = 2.

FVD_API_COMPARE_STRUCTURES CALL FUNCTION 'FVD_API_COMPARE_STRUCTURES' EXPORTING i_wrk_old = y_vdzv i_wrk_new = x_vdzv IMPORTING e_flg_different = l_flg_different.

FVD_TABLE_USER_DATA_CHANGE CALL FUNCTION 'FVD_TABLE_USER_DATA_CHANGE' EXPORTING i_mode = 'U' CHANGING c_wrk = l_wrk_ruser_update.

FVD_TABLE_USER_DATA_CHANGE CALL FUNCTION 'FVD_TABLE_USER_DATA_CHANGE' EXPORTING i_mode = 'I' CHANGING c_wrk = l_wrk_ruser_insert.

NOTES_MAINTAIN
  CALL FUNCTION 'NOTES_MAINTAIN'
    EXPORTING
      application      = 'VD'
      entity           = vdarl-sanlf
      function         = 'S'
      key              = key_notiz
      titel            = titel_notiz
      flg_save_in_updt = 'X'
    EXCEPTIONS
      deleted          = 1
      illegal_function = 2
      not_found        = 3
      not_saved        = 4
      OTHERS           = 5.

FVD_BAFIN_GET_DATA CALL FUNCTION 'FVD_BAFIN_GET_DATA' EXPORTING i_flg_partner_change = l_flg_change i_tda10_status = tda10-status i_tda10_bearb = tda10-bearb i_str_vdarl = vdarl i_tab_vzzkoko = l_tab_vzzkoko i_tab_xvdgpo = l_tab_xvdgpo i_tab_yvdgpo = l_tab_yvdgpo IMPORTING e_str_vdarl = vdarl.

FVD_CORRTOOL_CALL_CORR_AT_SAVE CALL FUNCTION 'FVD_CORRTOOL_CALL_CORR_AT_SAVE' EXPORTING i_vdarl = p_vdarl * I_VDSCRIPT = it_vdgpo = lt_vdgpo * IMPORTING * ET_ERRORS = .

FVZK_LOAD_VZZKOPO CALL FUNCTION 'FVZK_LOAD_VZZKOPO' EXPORTING get_empty = space gsart = vdarl-gsart koko_key = l_str_kokokey init_tables = space flg_kopa_read = space "note 1397725 TABLES ivzzkopo = l_tmp_vvzzkopo EXCEPTIONS group_not_found = 1 kondition_not_found = 2 sbewziti_different = 3 skoart_not_found = 4 text_not_found = 5 OTHERS = 6.

FVPQ_READ_ZV CALL FUNCTION 'FVPQ_READ_ZV' EXPORTING i_bukrs = vdarl-bukrs i_ranl = vdarl-ranl TABLES e_vdzv = x_vdzv EXCEPTIONS no_payment_data = 1 OTHERS = 2.

FVZR_DELETE_KOKO CALL FUNCTION 'FVZR_DELETE_KOKO' EXPORTING uvzzkoko = xvzzkoko EXCEPTIONS not_found = 01.

FVD_SEPA_OL_GET_CUST CALL FUNCTION 'FVD_SEPA_OL_GET_CUST' "N1819880 EXPORTING i_bukrs = c_vdarl-bukrs IMPORTING E_SEPA_ACTV = l_flg_sepa_act.

FVD_SEPA_OL_SET_CONTRACT_BIC CALL FUNCTION 'FVD_SEPA_OL_SET_CONTRACT_BIC' EXPORTING i_wrk_vdarl = c_vdarl i_det_type = c_vdarl-iban_det IMPORTING E_CONTRACT_BIC = c_vdarl-contract_bic EXCEPTIONS NO_BIC_FOUND = 1 OTHERS = 2.

FVD_SEPA_OL_SET_CONTRACT_IBAN CALL FUNCTION 'FVD_SEPA_OL_SET_CONTRACT_IBAN' EXPORTING i_det_type = c_vdarl-iban_det i_wrk_vdarl = c_vdarl i_bank_key = gs_tzpab_addon-bank_key IMPORTING E_IBAN_DET_TYPE = ls_vdarl_iban_bic-iban_det E_CONTRACT_IBAN = ls_vdarl_iban_bic-contract_iban e_flg_error = l_flg_error EXCEPTIONS OTHERS = 2.

FVD_SEPA_OL_CHECK_IBAN CALL FUNCTION 'FVD_SEPA_OL_CHECK_IBAN' EXPORTING i_iban = u_vdarl-contract_iban i_wrk_vdarl = u_vdarl EXCEPTIONS CHECK_ERROR = 1 OTHERS = 2.

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = vdarl-ranl IMPORTING output = vdarl-ranl.

FVZR_MODIFY_KOKO CALL FUNCTION 'FVZR_MODIFY_KOKO' EXPORTING i_nlfd_alt = xvzzkoko-nlfd_ang uvzzkoko = xvzzkoko EXCEPTIONS not_found = 01.

FVD_SEPA_OL_GET_CUST CALL FUNCTION 'FVD_SEPA_OL_GET_CUST' EXPORTING i_bukrs = vdarl-bukrs IMPORTING e_sepa_actv = l_sepa_actv.

FVZK_LOAD_VZZKOPO * CALL FUNCTION 'FVZK_LOAD_VZZKOPO' * EXPORTING * get_empty = space * gsart = vdarl-gsart * koko_key = l_str_kokokey * init_tables = space * flg_kopa_read = space "note 1397725 * TABLES * ivzzkopo = l_tab_vvzzkopo_tmp * EXCEPTIONS * OTHERS = 6.

VVZZKOPO_TO_VZZKOPO CALL FUNCTION 'VVZZKOPO_TO_VZZKOPO' EXPORTING i_tab_vvzzkopo = l_tab_vvzzkopo IMPORTING E_TAB_VZZKOPO = l_tab_vzzkopo.

FVPQ_READ_ZV CALL FUNCTION 'FVPQ_READ_ZV' EXPORTING i_bukrs = vdarl-bukrs i_ranl = vdarl-ranl TABLES e_vdzv = x_vdzv EXCEPTIONS no_payment_data = 1 OTHERS = 2.

FVD_SEPA_OL_MNDID_CHK_STATUS
  CALL FUNCTION 'FVD_SEPA_OL_MNDID_CHK_STATUS'
  EXPORTING
    I_TAB_VDGPO         = xvzgpo[]
    I_TAB_VZZKOPO       = l_tab_vzzkopo[]
    I_TAB_VDZV          = x_vdzv[]
    i_wrk_vdarl         = vdarl
  EXCEPTIONS
    NOT_VALID           = 1
    OTHERS              = 2.

FVD_SEPA_OL_GET_CUST CALL FUNCTION 'FVD_SEPA_OL_GET_CUST' EXPORTING i_bukrs = vdarl-bukrs IMPORTING E_SEPA_DD_LEADTIME_CHECK = l_active E_SEPA_DD_PRENOT_CHECK = l_active_prenot "N1841685 EXCEPTIONS OTHERS = 2.

CASH_FLOW_FOR_ENTIRE_LOAN
  CALL FUNCTION 'CASH_FLOW_FOR_ENTIRE_LOAN'
    EXPORTING
      ivdarl                      = vdarl
*      KOKO                        = xvzzkoko       "N1911973
      koko                        = l_wrk_vzzkoko
      KOPO                        = l_tab_kopo[]
      KOPA                        = l_tab_kopa[]
      FLG_NO_READ_KOPA            = 'X'
      IVZZBEPP                    = zitibepp[]
*     I_TAB_KOKO                  =
*     I_TAB_KOPO                  =
      I_FLG_NO_DISB_SIM           = 'X'
    IMPORTING
*      SIMULATION_FLAG             = l_sim_flag
      ZITIBEPP                    = l_tab_vzzbepp[]
    EXCEPTIONS
      CASHFLOW_NOT_POSSIBLE       = 1
      KOKO_INVALID                = 2
      OTHERS                      = 3.

FVD_SEPA_OL_DD_GET_MAX_DATE CALL FUNCTION 'FVD_SEPA_OL_DD_GET_MAX_DATE' EXPORTING * I_DATE = SY-DATUM i_flg_include_prenot = l_active_prenot "N1841685 I_RNG_BUKRS = l_rng_bukrs[] IMPORTING E_DATE = l_date EXCEPTIONS NO_DATE_AVAILABLE = 1 OTHERS = 2.

FVD_SEPA_OL_DD_CHECK_DATE CALL FUNCTION 'FVD_SEPA_OL_DD_CHECK_DATE' EXPORTING i_partner = l_wrk_vdbobepp-rpartnr i_bank_id = l_wrk_vdbobepp-bvtyp i_mndid = l_wrk_vdbobepp-mndid I_WRK_VDARL = vdarl i_wrk_vdbobepp = l_wrk_vdbobepp i_date = l_wrk_vdbobepp-ddispo i_zlsch = l_wrk_vdbobepp-zlsch IMPORTING e_check_date = l_min_date EXCEPTIONS OTHERS = 2.

FVD_SEPA_OL_GET_CUST CALL FUNCTION 'FVD_SEPA_OL_GET_CUST' "N1819880 EXPORTING i_bukrs = c_vdarl-bukrs IMPORTING E_SEPA_ACTV = l_flg_sepa_act.

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

MF67ASAV - Form Routines for Save
MF67AO1000 - documentation and ABAP source code
MF67AO10 - Modules: Loans Initial Screen
MF67AO0350 - documentation and ABAP source code
MF67AO0340 - documentation and ABAP source code
MF67AO0339 - documentation and ABAP source code

MF60CF00_GET_DOMAENENTEXT

MDVGPBRE