SAP Reports / Programs | Financial Accounting(FI) SAP FI

RFKORI15PDF SAP ABAP INCLUDE - documentation and ABAP source code







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


INCLUDES used within this REPORT RFKORI15PDF

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:

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSID' IV_FLDNAME = 'WRBTR' IS_LINE = BSID * IS_T001 = CHANGING CV_AMOUNT = bsid-wrbtr CV_CURRENCY = bsid-waers .

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSID' IV_FLDNAME = 'WRBTR' IS_LINE = BSID * IS_T001 = CHANGING CV_AMOUNT = bsid-wrbtr CV_CURRENCY = bsid-waers .

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSID' IV_FLDNAME = 'WRBTR' IS_LINE = BSID * IS_T001 = CHANGING CV_AMOUNT = bsid-wrbtr CV_CURRENCY = bsid-waers .

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSIK' IV_FLDNAME = 'WRBTR' IS_LINE = BSIK * IS_T001 = CHANGING CV_AMOUNT = BSIK-wrbtr CV_CURRENCY = bsid-waers .

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSIK' IV_FLDNAME = 'WRBTR' IS_LINE = BSIK * IS_T001 = CHANGING CV_AMOUNT = BSIK-wrbtr CV_CURRENCY = bsid-waers .

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSIK' IV_FLDNAME = 'WRBTR' IS_LINE = BSIK * IS_T001 = CHANGING CV_AMOUNT = BSIK-wrbtr CV_CURRENCY = bsid-waers .

REMADV_CORRESPONDENCE_INSERT CALL FUNCTION 'REMADV_CORRESPONDENCE_INSERT' EXPORTING i_vorid = '0001' "Kontoauszug i_bukrs = save_bukrs i_koart = save_koart i_konto = save_konto IMPORTING e_avsid = rf140-avsid TABLES t_avico = havico EXCEPTIONS error = 1 OTHERS = 0.

REMADV_SAVE_DB_ALL CALL FUNCTION 'REMADV_SAVE_DB_ALL' EXPORTING i_dialog_update = 'X' i_commit = ' ' EXCEPTIONS OTHERS = 1.

REMADV_POSITIONS_READ CALL FUNCTION 'REMADV_POSITIONS_READ' EXPORTING i_avik = avik TABLES t_avip = havip EXCEPTIONS nothing_found = 1 OTHERS = 2.

PAYMENT_MEDIUM_INIT CALL FUNCTION 'PAYMENT_MEDIUM_INIT' IMPORTING e_paymo = paymo EXCEPTIONS OTHERS = 0.

ADDRESS_INTO_PRINTFORM CALL FUNCTION 'ADDRESS_INTO_PRINTFORM' EXPORTING address_type = '1' address_number = dkadr-adrnr sender_country = dkadr-inlnd * PERSON_NUMBER = ' ' IMPORTING address_printform = ls_adrs_print * NUMBER_OF_USED_LINES = EXCEPTIONS OTHERS = 1.

ADDRESS_INTO_PRINTFORM CALL FUNCTION 'ADDRESS_INTO_PRINTFORM' EXPORTING adrswa_in = ls_adrs IMPORTING adrswa_out = ls_adrs * NUMBER_OF_USED_LINES = EXCEPTIONS OTHERS = 1.

FI_ITEMS_PROC_CURR_CHANGE CALL FUNCTION 'FI_ITEMS_PROC_CURR_CHANGE' EXPORTING IV_PROCESS = process * IV_DATE = datum02 IV_DATE = save3_datum IV_TABNAME = 'BSEG' * IS_KNA1 = * IS_LFA1 = * IS_BSEC = IS_BKPF = bkpf * IS_T001 = * IV_NOCHECK = * TABLES * IT_FIELDLIST = CHANGING CS_LINE = BSEG CV_CURRENCY = BKPF-waers EXCEPTIONS * FIELD_NOT_AMOUNT = 1 * CURRENCY_MISSING = 2 * ERROR_IN_CONVERSION = 3 OTHERS = 4.

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process * IV_DATE = datum02 IV_DATE = save3_datum IV_TABNAME = 'BSEG' IV_FLDNAME = 'PSWBT' IS_LINE = BSEG IS_BKPF = bkpf * IS_T001 = IV_NOCHECK = pcc_nocheck CHANGING CV_AMOUNT = BSEG-pswbt CV_CURRENCY = BSEG-pswsl.

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 * IV_DATE = datum01 IV_TABNAME = 'BSEG' IV_FLDNAME = 'PSWBT' IS_LINE = BSEG IS_BKPF = bkpf * IS_T001 = CHANGING CV_AMOUNT = BSEG-pswbt CV_CURRENCY = BSEG-pswsl.

FI_ITEMS_PROC_CURR_CHANGE CALL FUNCTION 'FI_ITEMS_PROC_CURR_CHANGE' EXPORTING IV_PROCESS = process * IV_DATE = datum02 IV_DATE = save3_datum IV_TABNAME = 'BSEG' * IS_KNA1 = * IS_LFA1 = * IS_BSEC = IS_BKPF = bkpf * IS_T001 = * IV_NOCHECK = * TABLES * IT_FIELDLIST = CHANGING CS_LINE = BSEG CV_CURRENCY = BKPF-waers EXCEPTIONS * FIELD_NOT_AMOUNT = 1 * CURRENCY_MISSING = 2 * ERROR_IN_CONVERSION = 3 OTHERS = 4.

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process * IV_DATE = datum02 IV_DATE = save3_datum IV_TABNAME = 'BSEG' IV_FLDNAME = 'PSWBT' IS_LINE = BSEG IS_BKPF = bkpf * IS_T001 = IV_NOCHECK = pcc_nocheck CHANGING CV_AMOUNT = BSEG-pswbt CV_CURRENCY = BSEG-pswsl.

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 * IV_DATE = datum01 IV_TABNAME = 'BSEG' IV_FLDNAME = 'PSWBT' IS_LINE = BSEG IS_BKPF = bkpf * IS_T001 = CHANGING CV_AMOUNT = BSEG-pswbt CV_CURRENCY = BSEG-pswsl.

FI_ITEMS_PROC_CURR_CHANGE





CALL FUNCTION 'FI_ITEMS_PROC_CURR_CHANGE' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSEG' * IS_KNA1 = * IS_LFA1 = * IS_BSEC = IS_BKPF = bkpf * IS_T001 = * IV_NOCHECK = * TABLES * IT_FIELDLIST = CHANGING CS_LINE = BSEG CV_CURRENCY = BKPF-waers EXCEPTIONS * FIELD_NOT_AMOUNT = 1 * CURRENCY_MISSING = 2 * ERROR_IN_CONVERSION = 3 OTHERS = 4.

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSEG' IV_FLDNAME = 'PSWBT' IS_LINE = BSEG IS_BKPF = bkpf * IS_T001 = CHANGING CV_AMOUNT = BSEG-pswbt CV_CURRENCY = BSEG-pswsl.

FI_ITEMS_PROC_CURR_CHANGE CALL FUNCTION 'FI_ITEMS_PROC_CURR_CHANGE' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSEG' * IS_KNA1 = * IS_LFA1 = * IS_BSEC = IS_BKPF = bkpf * IS_T001 = * IV_NOCHECK = * TABLES * IT_FIELDLIST = CHANGING CS_LINE = BSEG CV_CURRENCY = BKPF-waers EXCEPTIONS * FIELD_NOT_AMOUNT = 1 * CURRENCY_MISSING = 2 * ERROR_IN_CONVERSION = 3 OTHERS = 4.

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSEG' IV_FLDNAME = 'PSWBT' IS_LINE = BSEG IS_BKPF = bkpf * IS_T001 = CHANGING CV_AMOUNT = BSEG-pswbt CV_CURRENCY = BSEG-pswsl.

FI_ITEMS_PROC_CURR_CHANGE CALL FUNCTION 'FI_ITEMS_PROC_CURR_CHANGE' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSEG' * IS_KNA1 = * IS_LFA1 = * IS_BSEC = IS_BKPF = bkpf * IS_T001 = * IV_NOCHECK = * TABLES * IT_FIELDLIST = CHANGING CS_LINE = BSEG CV_CURRENCY = BKPF-waers EXCEPTIONS * FIELD_NOT_AMOUNT = 1 * CURRENCY_MISSING = 2 * ERROR_IN_CONVERSION = 3 OTHERS = 4.

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSEG' IV_FLDNAME = 'PSWBT' IS_LINE = BSEG IS_BKPF = bkpf * IS_T001 = CHANGING CV_AMOUNT = BSEG-pswbt CV_CURRENCY = BSEG-pswsl.

FI_ITEMS_PROC_CURR_CHANGE CALL FUNCTION 'FI_ITEMS_PROC_CURR_CHANGE' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSEG' * IS_KNA1 = * IS_LFA1 = * IS_BSEC = IS_BKPF = bkpf * IS_T001 = * IV_NOCHECK = * TABLES * IT_FIELDLIST = CHANGING CS_LINE = BSEG CV_CURRENCY = BKPF-waers EXCEPTIONS * FIELD_NOT_AMOUNT = 1 * CURRENCY_MISSING = 2 * ERROR_IN_CONVERSION = 3 OTHERS = 4.

OPEN_FI_PERFORM_00000119_P CALL FUNCTION 'OPEN_FI_PERFORM_00000119_P' EXPORTING IV_PROCESS = process IV_DATE = datum02 IV_TABNAME = 'BSEG' IV_FLDNAME = 'PSWBT' IS_LINE = BSEG IS_BKPF = bkpf * IS_T001 = CHANGING CV_AMOUNT = BSEG-pswbt CV_CURRENCY = BSEG-pswsl.

ADDRESS_INTO_PRINTFORM CALL FUNCTION 'ADDRESS_INTO_PRINTFORM' EXPORTING address_type = '1' address_number = fiadr-adrnr sender_country = fiadr-inlnd * PERSON_NUMBER = ' ' IMPORTING address_printform = ls_adrs_print * NUMBER_OF_USED_LINES = EXCEPTIONS OTHERS = 1.

ADDRESS_INTO_PRINTFORM CALL FUNCTION 'ADDRESS_INTO_PRINTFORM' EXPORTING adrswa_in = ls_adrs IMPORTING adrswa_out = ls_adrs * NUMBER_OF_USED_LINES = EXCEPTIONS OTHERS = 1.

PAYMENT_MEDIUM_DATA CALL FUNCTION 'PAYMENT_MEDIUM_DATA' EXPORTING i_paymi = paymi IMPORTING e_paymo = paymo TABLES t_fimsg = hfimsg EXCEPTIONS OTHERS = 4.

FI_MESSAGE_COLLECT CALL FUNCTION 'FI_MESSAGE_COLLECT' EXPORTING i_fimsg = hfimsg * I_XAPPN = ' ' EXCEPTIONS * MSGID_MISSING = 1 * MSGNO_MISSING = 2 * MSGTY_MISSING = 3 OTHERS = 4 .



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