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

VZBAVF02 SAP ABAP INCLUDE - Additional Data and Display of BAV Lists







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


Text pool values


Title: Additional Data and Display of BAV Lists


INCLUDES used within this REPORT VZBAVF02

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 = sy-datum foreign_amount = betrag_sdv4 foreign_currency = vdsdv4-swhrval local_currency = a_waer IMPORTING local_amount = vdsdv4-bvalhyp.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = sy-datum foreign_amount = betrag_vdlv foreign_currency = vdlv-svwaers local_currency = a_waer IMPORTING local_amount = vdlv-bvertrag.

BPAR_P_ADDRESS_READ_INTO_PRINT * CALL FUNCTION 'BPAR_P_ADDRESS_READ_INTO_PRINT' * EXPORTING * count_lines = 3 * date = p_datum ** partner = vwpanla-repke "070999 H.160406

FTBP_READ_PARTNER_IN_PRINTFORM * CALL FUNCTION 'FTBP_READ_PARTNER_IN_PRINTFORM' * EXPORTING ** ADDRESS_INTO_MEMORY = 'X' ** ADRTYP = ' ' ** BUKRS_IN = ' ' * date_in = p_datum ** NO_ADDRESS = ' ' * partnr = twd01-rbgue * roletyp = rolle_beguenstigter ** LINES = 5 ** CNTRY_IN = ** KZ_BPLANGU = ' ' * IMPORTING * anschwa_out = ls_adrs ** NAME_OUT = ** ADREF_OUT = ** NAME_OUT_XTITLE = * EXCEPTIONS * address_not_found = 1 * partner_not_found = 2 * OTHERS = 3.

FTBP_READ_PARTNER_IN_PRINTFORM CALL FUNCTION 'FTBP_READ_PARTNER_IN_PRINTFORM' EXPORTING * ADDRESS_INTO_MEMORY = 'X' * ADRTYP = ' ' * BUKRS_IN = ' ' date_in = p_datum * NO_ADDRESS = ' ' partnr = twd01-rbgue * I_OPERATION = ' ' * LINES = 5 * CNTRY_IN = * KZ_BPLANGU = ' ' IMPORTING anschwa_out = ls_adrs * NAME_OUT = * ADREF_OUT = * ADREF_OUT_FS = * NAME_OUT_XTITLE = * E_STND_INSTEAD = EXCEPTIONS address_not_found = 1 partner_not_found = 2 OTHERS = 3 .

FTBP_READ_PARTNER_IN_PRINTFORM CALL FUNCTION 'FTBP_READ_PARTNER_IN_PRINTFORM' EXPORTING * ADDRESS_INTO_MEMORY = 'X' * ADRTYP = ' ' * BUKRS_IN = ' ' date_in = p_datum * NO_ADDRESS = ' ' partnr = vwpanla-repke * LINES = 5 * CNTRY_IN = * KZ_BPLANGU = ' ' IMPORTING anschwa_out = ls_adrs * NAME_OUT = * ADREF_OUT = * NAME_OUT_XTITLE = EXCEPTIONS address_not_found = 1 partner_not_found = 2 OTHERS = 3.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = sy-datum foreign_amount = betrag_sdv5 foreign_currency = vdsdv5-waers local_currency = a_waer IMPORTING local_amount = vdsdv5-bnoms.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = sy-datum foreign_amount = betrag_sdv5 foreign_currency = vdsdv5-waers local_currency = a_waer IMPORTING local_amount = vdsdv5-bkurswrt.

STRING_CONCATENATE * CALL FUNCTION 'STRING_CONCATENATE' * EXPORTING * STRING1 = ABEZ1 * STRING2 = ABEZ2 * IMPORTING * STRING = ABEZL1 * EXCEPTIONS * TOO_SMALL = 1 * OTHERS = 2.

BPAR_R_BPCENTRAL_PARTNER * call function 'BPAR_R_BPCENTRAL_PARTNER' * exporting * partner = vwpanla-repke * importing * bp000_out = xbp000 * exceptions * no_entry_found = 1 * others = 2.

FSBP_DBREAD_BUT000 CALL FUNCTION 'FSBP_DBREAD_BUT000' EXPORTING i_partner = vwpanla-repke IMPORTING e_but000 = ls_but000 EXCEPTIONS not_found = 1 OTHERS = 2.

BPAR_R_BPCENTRAL_PARTNER * call function 'BPAR_R_BPCENTRAL_PARTNER' * exporting * partner = vwpanla-repke * importing * bp000_out = xbp000 * exceptions * no_entry_found = 1 * others = 2.

FSBP_DBREAD_BUT000 CALL FUNCTION 'FSBP_DBREAD_BUT000' EXPORTING i_partner = vwpanla-repke IMPORTING e_but000 = ls_but000 EXCEPTIONS not_found = 1 OTHERS = 2.

BPAR_P_ADDRESS_READ_INTO_PRINT * CALL FUNCTION 'BPAR_P_ADDRESS_READ_INTO_PRINT' * EXPORTING * address_into_memory = ' ' * adr_ref = ' ' * companycode = so_bukr * date = sy-datum * no_address = ' ' * partner = vtbfha-kontrh * role = ' ' * IMPORTING * address = tadrs * EXCEPTIONS * address = 01 * partner = 02.

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

TM_INTEREST_RATE_DETERMINE CALL FUNCTION 'TM_INTEREST_RATE_DETERMINE' EXPORTING cut_off_date = p_datum IMPORTING interest_rate = hlp_pkond starting_date = hlp_datum TABLES conditions = ivtbfinko.

CONVERT_TO_FOREIGN_CURRENCY CALL FUNCTION 'CONVERT_TO_FOREIGN_CURRENCY' "H11 EXPORTING "H11 date = conv_date "H11 foreign_currency = akt_waer "H11 local_amount = xbp021-capi_stock "H11 local_currency = xbp021-bal_sh_cur "H11 IMPORTING "H11 foreign_amount = wxbp021-capi_stock "H11 EXCEPTIONS "H11 no_rate_found = 1 "H11 OTHERS = 1. "H11

CONVERT_TO_FOREIGN_CURRENCY CALL FUNCTION 'CONVERT_TO_FOREIGN_CURRENCY' EXPORTING date = conv_date foreign_currency = akt_waer local_amount = xbp021-capi_stock local_currency = xbp021-bal_sh_cur IMPORTING foreign_amount = wxbp021-capi_stock EXCEPTIONS no_rate_found = 1 OTHERS = 1.

BPAR_R_BPCENTRAL_PARTNER





* call function 'BPAR_R_BPCENTRAL_PARTNER' * exporting * partner = vwpanla-repke * importing * bp000_out = xbp000 * exceptions * no_entry_found = 1 * others = 2.

FSBP_DBREAD_BUT000 CALL FUNCTION 'FSBP_DBREAD_BUT000' EXPORTING i_partner = vwpanla-repke IMPORTING e_but000 = ls_but000 EXCEPTIONS not_found = 1 OTHERS = 2.

ISGP_VZGPO_READ * CALL FUNCTION 'ISGP_VZGPO_READ' * EXPORTING * i_snumobj = 'VD' * i_sobjekt = vdarl-sobjekt * i_date = p_datum ** I_END_DATE = * TABLES * yvzgpo = tvzgpo ** R_PARTNER = * r_roletyp = r_roletyp * EXCEPTIONS * not_found = 1 * OTHERS = 2.

BPAR_P_PARTNER_READ_INTO_PRINT * CALL FUNCTION 'BPAR_P_PARTNER_READ_INTO_PRINT' * EXPORTING * count_lines = 3 ** PARTNER = TVZGPO-PARTNR "H11 * partner = vdarl-rdarnehm "H11 * 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 = p_datum partnr = vdarl-rdarnehm IMPORTING anschwa_out = tadrs EXCEPTIONS address_not_found = 1 partner_not_found = 2 OTHERS = 3.

BPAR_R_ORG_BUSINESS_YEAR * call function 'BPAR_R_ORG_BUSINESS_YEAR' "H11 * exporting * partner = vdarl-rdarnehm * importing * e_bp000 = xbp000 * tables * e_bp021 = tbp021 * exceptions * partner = 1 * no_org_data = 2 * others = 3.

FSBP_DBREAD_BP021 CALL FUNCTION 'FSBP_DBREAD_BP021' EXPORTING i_partnr = vdarl-rdarnehm * I_BYEAR = * I_DB = ' ' * IMPORTING * E_BP021 = TABLES t_bp021 = tbp021 EXCEPTIONS not_found = 1 OTHERS = 2 .

FSBP_DBREAD_BP001 CALL FUNCTION 'FSBP_DBREAD_BP001' EXPORTING i_partner = vdarl-rdarnehm IMPORTING e_bp001 = ls_bp001 EXCEPTIONS not_found = 1 OTHERS = 2.

PARTNER_SELECT * CALL FUNCTION 'PARTNER_SELECT' * EXPORTING * ADRTYP = VZPARO-SANSADR " SPAB1-ADRTYP * DATE_IN = P_DATUM " SY-DATUM ersetzt Dubiel 14.02.95

ISGP_VZGPO_READ * call function 'ISGP_VZGPO_READ' * exporting * i_snumobj = 'VD' * i_sobjekt = vdarl-sobjekt * i_date = p_datum * tables * yvzgpo = tvzgpo * r_roletyp = r_roletyp * exceptions * not_found = 1 * others = 2.

FTBP_READ_PARTNER_IN_PRINTFORM CALL FUNCTION 'FTBP_READ_PARTNER_IN_PRINTFORM' EXPORTING * ADDRESS_INTO_MEMORY = 'X' * ADRTYP = ' ' * BUKRS_IN = ' ' * DATE_IN = SY-DATUM * NO_ADDRESS = ' ' partnr = gwa_but053-partner2 * ROLETYP = ' ' * LINES = 5 * CNTRY_IN = * KZ_BPLANGU = ' ' * IMPORTING * ANSCHWA_OUT = * NAME_OUT = * ADREF_OUT = * NAME_OUT_XTITLE = EXCEPTIONS address_not_found = 1 partner_not_found = 2 OTHERS = 3 .

BPAR_R_ORG_BUSINESS_YEAR * call function 'BPAR_R_ORG_BUSINESS_YEAR' * exporting * partner = vdarl-rdarnehm * importing * e_bp000 = xbp000 * tables * e_bp021 = tbp021 * exceptions * partner = 1 * no_org_data = 2 * others = 3.

FSBP_DBREAD_BP021 CALL FUNCTION 'FSBP_DBREAD_BP021' EXPORTING i_partnr = vdarl-rdarnehm * I_BYEAR = * I_DB = ' ' * IMPORTING * E_BP021 = TABLES t_bp021 = tbp021 EXCEPTIONS not_found = 1 OTHERS = 2 .

PARTNER_SELECT * CALL FUNCTION 'PARTNER_SELECT' * EXPORTING * DATE_IN = P_DATUM " aktiviert Dubiel 14.02.95

BPAR_P_ADDRESS_READ_INTO_PRINT * CALL FUNCTION 'BPAR_P_ADDRESS_READ_INTO_PRINT' * EXPORTING * count_lines = 3 * date = p_datum * partner = vwpanla-repke * IMPORTING * address = tadrs * EXCEPTIONS * address = 1 * partner = 2 * OTHERS = 3.

FTBP_READ_PARTNER_IN_PRINTFORM CALL FUNCTION 'FTBP_READ_PARTNER_IN_PRINTFORM' EXPORTING bukrs_in = so_bukr date_in = p_datum partnr = vwpanla-repke IMPORTING anschwa_out = tadrs EXCEPTIONS address_not_found = 1 partner_not_found = 2 OTHERS = 3.

BPAR_R_ORG_BUSINESS_YEAR * call function 'BPAR_R_ORG_BUSINESS_YEAR' * exporting * partner = vwpanla-repke * importing * e_bp000 = xbp000 * tables * e_bp021 = tbp021 * exceptions * partner = 1 * no_org_data = 2 * others = 3.

FSBP_DBREAD_BP021 CALL FUNCTION 'FSBP_DBREAD_BP021' EXPORTING i_partnr = vwpanla-repke * I_BYEAR = * I_DB = ' ' * IMPORTING * E_BP021 = TABLES t_bp021 = tbp021 EXCEPTIONS not_found = 1 OTHERS = 2 .

FSBP_DBREAD_BP001 CALL FUNCTION 'FSBP_DBREAD_BP001' EXPORTING i_partner = vwpanla-repke IMPORTING e_bp001 = ls_bp001 EXCEPTIONS not_found = 1 OTHERS = 2.

BPAR_P_ADDRESS_READ_INTO_PRINT * call function 'BPAR_P_ADDRESS_READ_INTO_PRINT' * exporting * count_lines = 3 * date = p_datum * partner = bp2000-partnr1 * 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 = p_datum partnr = gwa_but053-partner2 IMPORTING anschwa_out = ls_adrs EXCEPTIONS address_not_found = 1 partner_not_found = 2 OTHERS = 3.

BPAR_R_ORG_BUSINESS_YEAR * call function 'BPAR_R_ORG_BUSINESS_YEAR' * exporting * partner = vwpanla-repke * importing * e_bp000 = xbp000 * tables * e_bp021 = tbp021 * exceptions * partner = 1 * no_org_data = 2 * others = 3.

FSBP_DBREAD_BP021 CALL FUNCTION 'FSBP_DBREAD_BP021' EXPORTING i_partnr = vwpanla-repke * I_BYEAR = * I_DB = ' ' * IMPORTING * E_BP021 = TABLES t_bp021 = tbp021 EXCEPTIONS not_found = 1 OTHERS = 2 .

ADDRESS_ASSIGN * CALL FUNCTION 'ADDRESS_ASSIGN' * EXPORTING * ADR_IN = P_ROBJNR * FUNCTION = 'P' * OBJEKTTYP = OBTYP * IMPORTING * ADRWA_OUT = SANS1 * EXCEPTIONS * ADDRESS_NOT_FOUND = 01 * ILLEGAL_FUNCTION = 02 * NO_ADDRESS_ASSIGNED = 03.

OBJECT_ASSIGN_S * call function 'OBJECT_ASSIGN_S' * exporting ** FLG_SAVE_IN_UPDT = ' ' * function = 'L' * objnr = p_robjnr ** SANO1_NEW = ' ' ** SANS1_NEW = ' ' * importing ** FLG_FIRST_LOAD = ** SANO1_OLD = * sans1_old = sans1 ** TABLES ** VZPARUS_TAB = * exceptions * error = 1 * object_not_found = 2 * others = 3.

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

BPAR_R_PARTNER_CHECK * CALL FUNCTION 'BPAR_R_PARTNER_CHECK' * EXPORTING * partner = vigbuch-partnr * read_from_db = 'X' ** RELEASE = ' ' * IMPORTING * bp000_entry = bp000 * EXCEPTIONS * partner = 1 * partner_not_released = 2 * OTHERS = 3.

FSBP_DBREAD_BUT000 CALL FUNCTION 'FSBP_DBREAD_BUT000' EXPORTING i_partner = vigbuch-partnr IMPORTING e_but000 = ls_but000 EXCEPTIONS not_found = 1 OTHERS = 2.

ADDR_GET * call function 'ADDR_GET' * exporting * address_selection = selection * importing * sadr = sadr * exceptions * adress_no_exist = 1 * others = 2.

ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING address_selection = selection * ADDRESS_GROUP = * READ_SADR_ONLY = ' ' * READ_TEXTS = ' ' IMPORTING * ADDRESS_VALUE = * ADDRESS_ADDITIONAL_INFO = * RETURNCODE = * ADDRESS_TEXT = sadr = sadr * TABLES * ADDRESS_GROUPS = * ERROR_TABLE = * VERSIONS = EXCEPTIONS * PARAMETER_ERROR = 1 address_not_exist = 2 * VERSION_NOT_EXIST = 3 * INTERNAL_ERROR = 4 * OTHERS = 5 .

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = sy-datum foreign_amount = ausz_verpfl_minderung foreign_currency = vdarl-santwhr "DD&AF local_currency = t001-waers IMPORTING local_amount = hlp_minderung exceptions no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 others = 6 .



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