SAP Reports / Programs | Financial Services | Regulatory reporting for insurance companies | Germany(FS-SR-DE) SAP FS

DBBAFF00 SAP ABAP INCLUDE - Log. Database BAF Loans, Securities and Real Estate Sub-programs







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


Text pool values


Title: Log. Database BAF Loans, Securities and Real Estate Sub-programs


INCLUDES used within this REPORT DBBAFF00

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:

VALID_VZZKOKO_SELECT * CALL FUNCTION 'VALID_VZZKOKO_SELECT' * EXPORTING * I_BUKRS = P_BUKRS * I_DATUM = SO_DATE * I_RANL = P_RANL * I_SANLF = P_SANLF * I_SKSTYP = '3' " Immer gemäß Datum * IMPORTING * E_VZZKOKO = P_VZZKOKO * EXCEPTIONS * NOT_FOUND = 01.

FVZR_LOAD_KOKOS * CALL FUNCTION 'FVZR_LOAD_KOKOS' * EXPORTING * FLG_LAST = CON_TRUE " X " * I_BUKRS = P_BUKRS * I_DGUEL_BIS = SO_DATE " ENDEDATUM " * I_RKEY1 = P_RANL * I_SANLF = P_SANLF * I_SKOKOART = CON_KOKOART * TABLES * XVZZKOKO = P_VZZKOKO * EXCEPTIONS * NOT_FOUND = 01 * NO_HISTORY = 02 * OTHERS = 10.

FVZK_LOAD_VZZKOPO * CALL FUNCTION 'FVZK_LOAD_VZZKOPO' * EXPORTING * DEFAULT_VALUES = SPACE * DGUEL_KP = Gültig_ab Datum der Kondition * FLG_KOPA_READ = CON_FALSE * GET_EMPTY = CON_FALSE * GSART = P_GSART * INIT_TABLES = 'X' " SPACE * KOKO_KEY = KOKO_KEY * TABLES * IVZZKOPO = P_VZZKOPO * EXCEPTIONS * GROUP_NOT_FOUND = 01 * KONDITION_NOT_FOUND = 02 * SBEWZITI_DIFFERENT = 03 * SKOART_NOT_FOUND = 04 * TEXT_NOT_FOUND = 05 * OTHERS = 10.

FVZK_LOAD_VZZKOPO_BATCH * CALL FUNCTION 'FVZK_LOAD_VZZKOPO_BATCH' * EXPORTING * GSART = P_GSART * KOKO_KEY = KOKO_KEY * READ_TEXT = ' ' * TABLES * IVZZKOPO = P_VZZKOPO.

VALID_VZZKOKO_SELECT CALL FUNCTION 'VALID_VZZKOKO_SELECT' EXPORTING i_bukrs = p_bukrs i_datum = so_date i_ranl = p_ranl i_sanlf = p_sanlf * I_SKSTYP = '3' " Immer gemäß Datum i_skstyp = '1' " Erster ist richtig ! IMPORTING e_vzzkoko = p_vzzkoko EXCEPTIONS not_found = 01.

VALID_VZZKOKO_SELECT ** CALL FUNCTION 'VALID_VZZKOKO_SELECT' ** EXPORTING ** I_BUKRS = P_BUKRS ** I_DATUM = SO_DATE ** I_RANL = P_RANL ** I_SANLF = P_SANLF ** I_SKSTYP = '3' " Immer gemäß Datum ** I_SKSTYP = '1' " Erster ist richtig ! ** IMPORTING ** E_VZZKOKO = P_VZZKOKO ** EXCEPTIONS ** NOT_FOUND = 01.

CONDITIONS_READ_SEC * CALL FUNCTION 'CONDITIONS_READ_SEC' * EXPORTING * i_ranl = p_ranl * i_sanlf = p_sanlf * i_gsart = p_gsart * IMPORTING * e_vzskoko = p_vzskoko * e_vzzkoko = p_vzzkoko * e_kopo = p_vzzkopo * EXCEPTIONS * i_ranl_initial = 1 * i_sanlf_initial = 2 * i_gsart_initial = 3 * product_category_has_no_cond = 4 * condition_header_not_found = 5 * condition_positions_not_found = 6 * OTHERS = 7.

FVZK_LOAD_VZZKOPO * CALL FUNCTION 'FVZK_LOAD_VZZKOPO' * EXPORTING * DEFAULT_VALUES = SPACE * DGUEL_KP = Gültig_ab Datum der Kondition * FLG_KOPA_READ = CON_FALSE * GET_EMPTY = CON_FALSE * GSART = P_GSART * INIT_TABLES = 'X' " SPACE * KOKO_KEY = KOKO_KEY * TABLES * IVZZKOPO = P_VZZKOPO * EXCEPTIONS * GROUP_NOT_FOUND = 01 * KONDITION_NOT_FOUND = 02 * SBEWZITI_DIFFERENT = 03 * SKOART_NOT_FOUND = 04 * TEXT_NOT_FOUND = 05 * OTHERS = 10.

FVZK_LOAD_VZZKOPO_BATCH CALL FUNCTION 'FVZK_LOAD_VZZKOPO_BATCH' EXPORTING gsart = p_gsart koko_key = koko_key read_text = ' ' TABLES ivzzkopo = p_vzzkopo.

FVZK_LOAD_VZZKOPO CALL FUNCTION 'FVZK_LOAD_VZZKOPO' EXPORTING * DEFAULT_VALUES = SPACE dguel_kp = p_vzzkoko-dguel_kk * FLG_KOPA_READ = CON_FALSE * GET_EMPTY = CON_FALSE gsart = p_gsart init_tables = 'X' " SPACE koko_key = koko_key TABLES ivzzkopo = p_vzzkopo EXCEPTIONS group_not_found = 1 kondition_not_found = 2 sbewziti_different = 3 skoart_not_found = 4 text_not_found = 5 OTHERS = 6.

FVZK_LOAD_VZZKOPO_BATCH * CALL FUNCTION 'FVZK_LOAD_VZZKOPO_BATCH' * EXPORTING * GSART = P_GSART * KOKO_KEY = KOKO_KEY * READ_TEXT = ' ' * TABLES * IVZZKOPO = P_VZZKOPO.

TRANSACTIONS_SEC_LOAD_I_VIEW ******** CALL FUNCTION 'TRANSACTIONS_SEC_LOAD_I_VIEW' ******** * aktiviert werden.

TRANSACTIONS_SEC_LOAD_I_VIEW CALL FUNCTION 'TRANSACTIONS_SEC_LOAD_I_VIEW' EXPORTING bukrs = vwpdep1-bukrs ranl = vwpdep1-ranl rldepo = vwpdep1-rldepo type_of_selection = ' ' flag_plan = ' ' flag_no_storno = 'X' TABLES tvwbevi = ivwbevi EXCEPTIONS table_tvwbevi_not_empty = 01.

ACTUAL_RECORDS_RANGES_READ_SEC CALL FUNCTION 'ACTUAL_RECORDS_RANGES_READ_SEC' EXPORTING i_range_bukrs = lt_ran_bukrs i_range_ranl = lt_ran_ranl i_range_rldepo = lt_ran_rldepo i_range_rpnnr = lt_ran_rpnnr i_range_sstorno = lt_ran_sstorno IMPORTING e_vwbevi = lt_vwbevi[] EXCEPTIONS no_entry_found = 1 where_tab_not_filled = 2 OTHERS = 3.

PARTNER_SELECT * CALL FUNCTION 'PARTNER_SELECT' * EXPORTING * FUNCTION = 'P' * PARTTYP = SPACE * PARTWA_IN = SPRT1 * IMPORTING * PARTWA_OUT = SPRT1 * EXCEPTIONS * ILLEGAL_ADRTYP = 01 * ILLEGAL_BZTYP = 02 * ILLEGAL_FUNCTION = 03 * ILLEGAL_PARTTYP = 04 * ILLEGAL_ROLL = 05 * NO_PARTNER_SELECTED = 06 * PARTNER_NOT_FOUND = 07 * PARTNER_ROLL_NOT_FOUND = 08.

BPAR_P_PARTNER_READ_INTO_PRINT * CALL FUNCTION 'BPAR_P_PARTNER_READ_INTO_PRINT' * EXPORTING ** ADR_REF = ' ' ** COMPANYCODE = ' ' * count_lines = 3 * date = so_date * partner = vigbuch-partnr ** PARTNER_INTO_MEMORY = ' ' ** ROLE = ' ' * IMPORTING * address = tadrs * EXCEPTIONS * address = 1 * partner = 2 * OTHERS = 3.

FTBP_READ_PARTNER_IN_PRINTFORM CALL FUNCTION 'FTBP_READ_PARTNER_IN_PRINTFORM' EXPORTING date_in = so_date partnr = vigbuch-partnr IMPORTING anschwa_out = tadrs EXCEPTIONS address_not_found = 1 partner_not_found = 2 OTHERS = 3.

ADDRESS_ASSIGN * CALL FUNCTION 'ADDRESS_ASSIGN' * EXPORTING * FUNCTION = 'P' * OBJECTTYP = 51 * ADR_IN = VIOB01-ADRNR * IMPORTING * ADRWA_OUT = SANS1 * EXCEPTIONS * ADDRESS_NOT_FOUND = 1 * ILLEGAL_FUNCTION = 2 * NO_ADDRESS_ASSIGNED = 3.

OBJECT_ASSIGN_S





CALL FUNCTION 'OBJECT_ASSIGN_S' EXPORTING * FLG_SAVE_IN_UPDT = ' ' function = 'L' objnr = viob01-adrnr * SANO1_NEW = ' ' * SANS1_NEW = ' ' IMPORTING * FLG_FIRST_LOAD = * SANO1_OLD = sans1_old = sans1 TABLES vzparus_tab = xvzparus EXCEPTIONS error = 01 object_not_found = 02.

FVAY_N_OBJECT_GET_BUFFER * call function 'FVAY_N_OBJECT_GET_BUFFER' * exporting * i_objtyp = 'VI' * i_objnr = viob01-adrnr * importing ** E_VZOBJECT_INT = * e_address_int = visans1 * exceptions * object_not_found = 1 * address_not_found = 2 * key_error = 3 * others = 4.

TRANSACTION_LOAN_LOAD * CALL FUNCTION 'TRANSACTION_LOAN_LOAD' * EXPORTING * bukrs = v_vdarl-bukrs * p_i_type = 'I' * ranl = v_vdarl-ranl * sanlf = v_vdarl-sanlf * stichtag = so_date * TABLES * yvdbeki = rvdbeki * yvdbepi = rvdbepi * yvdbepp = rvdbepp * EXCEPTIONS * OTHERS = 01.

TRANSACTION_LOAN_FILL * CALL FUNCTION 'TRANSACTION_LOAN_FILL' * EXPORTING * i_storno = 'X' * p_i_type = 'I' * TABLES * yvdbeki = rvdbeki * yvdbepi = rvdbepi * yvdbepp = rvdbepp * zitibepp = xvdzzbepp.

LOAN_FLOWS_SUPPLY CALL FUNCTION 'LOAN_FLOWS_SUPPLY' EXPORTING i_bukrs = v_vdarl-bukrs i_ranl = v_vdarl-ranl read_scheduled_records = ' ' 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 = xvdzzbepp * 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.

ADDRESS_ASSIGN * call function 'ADDRESS_ASSIGN' * exporting ** ADRZUS_FUNCTION = ' ' ** ADRZUS_IN = ' ' * adr_in = vdhobj-robjnr ** FLG_SAVE_IN_UPDT = ' ' * function = 'P' * objekttyp = 55 * importing * adrwa_out = sans1 ** ADRZUS_OUT = SANO1 ** FLG_CHANGED = * exceptions * address_not_found = 1 * illegal_function = 2 * no_address_assigned = 3 * others = 4.

FVAY_N_OBJECT_GET_BUFFER CALL FUNCTION 'FVAY_N_OBJECT_GET_BUFFER' EXPORTING i_objtyp = 'VD' i_objnr = l_objnr IMPORTING e_address_int = ls_addr1_val EXCEPTIONS object_not_found = 1 address_not_found = 2 key_error = 3 OTHERS = 4.

BPAR_P_PARTNER_READ_INTO_PRINT * CALL FUNCTION 'BPAR_P_PARTNER_READ_INTO_PRINT' * EXPORTING * count_lines = 3 * date = so_date * partner = vigbuch-partnr * IMPORTING * address = tadrs * EXCEPTIONS * address = 1 * partner = 2 * OTHERS = 3.

FTBP_READ_PARTNER_IN_PRINTFORM CALL FUNCTION 'FTBP_READ_PARTNER_IN_PRINTFORM' EXPORTING date_in = so_date partnr = vigbuch-partnr IMPORTING anschwa_out = tadrs EXCEPTIONS address_not_found = 1 partner_not_found = 2 OTHERS = 3.

RK_KOKRS_FIND *** CALL FUNCTION 'RK_KOKRS_FIND' *** EXPORTING *** BUKRS = T001-BUKRS * GSBER = SPACE * TEST_KOKRS = SPACE *** IMPORTING * KOKRS = *** T_KA01 = TKA01 *** EXCEPTIONS *** ASSIGNMENT_NOT_ALLOWED = 01 *** INSUFFICIENT_INPUT = 02 *** NO_KOKRS_ASSIGNED = 03 *** NO_KOKRS_FOR_BUKRS = 04 *** NO_KOKRS_FOR_BU_GB = 05 *** WRONG_KOKRS_FOR_BUKRS = 06 *** WRONG_KOKRS_FOR_BU_GB = 07.

PARTNER_ASSIGN_S * CALL FUNCTION 'PARTNER_ASSIGN_S' * EXPORTING * FUNCTION = 'L' * PARTNR = P_PARTNR * IMPORTING * SPRT1_OLD = XSPRT1 * VZPARZJ_OLD = XVZPARZJ * TABLES * SANS1_TAB = TSANS1 * SPAB1_TAB = TSPAB1 * SPBB1_TAB = TSPBB1 * SPKO1_TAB = TSPKO1 * SPPB1_TAB = TSPPB1 * SPROL_TAB = TSPROL * VZPARJB_TAB = TVZPARJB * VZPARJG_TAB = TVZPARJG * VZPARUS_TAB = TVZPARUS * VZPARZB_TAB = TVZPARZB * EXCEPTIONS * ERROR = 01 * PARTNER_NOT_FOUND = 02.

BPAR_P_ADDRESS_READ_INTO_PRINT * call function 'BPAR_P_ADDRESS_READ_INTO_PRINT' * exporting * date = p_date * partner = p_partner * importing * address = xadrs * exceptions * address = 1 * partner = 2 * others = 3.

FTBP_READ_PARTNER_IN_PRINTFORM CALL FUNCTION 'FTBP_READ_PARTNER_IN_PRINTFORM' EXPORTING * ADDRESS_INTO_MEMORY = 'X' * ADRTYP = ' ' bukrs_in = so_bukr date_in = p_date * NO_ADDRESS = ' ' partnr = p_partner * ROLETYP = ' ' * LINES = 5 * CNTRY_IN = * KZ_BPLANGU = ' ' IMPORTING anschwa_out = ls_adrs name_out = ls_but000 adref_out = ls_but021 adref_out_fs = ls_but021_fs name_out_xtitle = ls_title EXCEPTIONS address_not_found = 1 partner_not_found = 2 OTHERS = 3 .

BPAR_R_BPCENTRAL_PARTNER * CALL FUNCTION 'BPAR_R_BPCENTRAL_PARTNER' * EXPORTING * PARTNER = P_PARTNER * IMPORTING ** FLG_FIRST_LOAD = * BP000_OUT = XBP000 * EXCEPTIONS * NO_ENTRY_FOUND = 1 * OTHERS = 2.

FTBP_READ_BPSREP CALL FUNCTION 'FTBP_READ_BPSREP' EXPORTING i_partner = p_partner IMPORTING e_bpsrep = ls_bpsrep EXCEPTIONS no_partner = 1 OTHERS = 2.

BPAR_R_REPORTING_DATA * call function 'BPAR_R_REPORTING_DATA' * exporting * reporting_in = xbpdmeld * importing * reporting_out = xbpdmeld * exceptions * rep_not_found = 1 * others = 2.

PAV_SELECT_ADR * CALL FUNCTION 'PAV_SELECT_ADR' * EXPORTING * ADRTYP = ' ' " P_SANSADR * AUSW_KZ = 'A' * DATE_IN = P_DATE * NO_ADDRESS = 'X' * NO_COMMUNICATION = 'X' * NO_DISPL_IF_ONE = ' ' * PARTNR = P_PARTNR * SROLEXT = ' ' * IMPORTING * SPRT1_OUT = XSPRT1 * TABLES * SANS1_OUT = TSANS1 * SPAB1_OUT = TSPAB1 * SPKO1_OUT = TSPKO1 * EXCEPTIONS * ILLEGAL_ADRTYP = 01 * ILLEGAL_AUSW = 02 * NO_RECORD_FOUND = 03 * NO_RECORD_SELECTED = 04 * PARTNER_NOT_FOUND = 05 * SELECT_ERROR = 06.

DATE_TO_PERIOD_CONVERT CALL FUNCTION 'DATE_TO_PERIOD_CONVERT' EXPORTING i_date = so_date i_monmit = t093c-monmit i_periv = t001-periv IMPORTING e_gjahr = l_gjahr e_buper = l_bispe EXCEPTIONS OTHERS = 4.

DATE_TO_PERIOD_CONVERT CALL FUNCTION 'DATE_TO_PERIOD_CONVERT' EXPORTING i_date = so_data i_monmit = t093c-monmit i_periv = t001-periv IMPORTING e_buper = l_vonpe EXCEPTIONS OTHERS = 4.

LAST_DAY_IN_YEAR_GET * CALL FUNCTION 'LAST_DAY_IN_YEAR_GET' * EXPORTING * I_DATE = SO_DATE * I_PERIV = T001-PERIV * IMPORTING * E_DATE = LASTDAY_INYEAR * EXCEPTIONS * INPUT_FALSE = 01 * T009_NOTFOUND = 02 * T009B_NOTFOUND = 03.




LAST_DAY_IN_PERIOD_GET CALL FUNCTION 'LAST_DAY_IN_PERIOD_GET' EXPORTING i_gjahr = l_gjahr i_monmit = t093c-monmit i_periv = t001-periv i_poper = l_bispe IMPORTING e_date = lastday_inperiod EXCEPTIONS input_false = 01 t009_notfound = 02 t009b_notfound = 03.

LOAN_FLOW_TYPE_REFERENCE_2 CALL FUNCTION 'LOAN_FLOW_TYPE_REFERENCE_2' EXPORTING i_vdarl = p_vdarl TABLES io_vzzbepp = p_xvzzbepp.



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