F130KBKR 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 F130KBKR into the relevant SAP transactions such as SE38 or SE80
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.
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
GET_CURRENT_YEAR CALL FUNCTION 'GET_CURRENT_YEAR' EXPORTING BUKRS = GT_KBUKR-LOW DATE = ABSTITAG IMPORTING CURRY = L_KGJAHR.
GET_CURRENT_YEAR CALL FUNCTION 'GET_CURRENT_YEAR' EXPORTING BUKRS = GT_KBBUKR-BUKRS DATE = ABSTITAG IMPORTING CURRY = L_BGJAHR.
TR_APPEND_LOG CALL FUNCTION 'TR_APPEND_LOG' EXPORTING OPEN_FILE = 'X' CLOSE_FILE = 'X' TABLES XMSG = LT_PROT EXCEPTIONS FILE_NOT_FOUND = 1 WRONG_CALL = 2 OTHERS = 3.
TR_FLUSH_LOG CALL FUNCTION 'TR_FLUSH_LOG'.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SELECTION ADDRESS_GROUP = 'CA01' IMPORTING ADDRESS_VALUE = ADDRESS_VALUE SADR = SADR EXCEPTIONS ADDRESS_NOT_EXIST = 1 OTHERS = 2. "SADR40A
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SELECTION ADDRESS_GROUP = 'CA01' IMPORTING ADDRESS_VALUE = ADDRESS_VALUE SADR = SADR EXCEPTIONS ADDRESS_NOT_EXIST = 1 OTHERS = 2. "ADDR_GET
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SELECTION ADDRESS_GROUP = 'CA01' IMPORTING ADDRESS_VALUE = ADDRESS_VALUE SADR = SADR EXCEPTIONS ADDRESS_NOT_EXIST = 1 OTHERS = 2. "SADR40A
WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING WINDOW = 'MAIN' ELEMENT = EREIGNIS EXCEPTIONS WINDOW = 1 ELEMENT = 2.
WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING WINDOW = 'MAIN' ELEMENT = '516' EXCEPTIONS WINDOW = 1 ELEMENT = 2.
WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING WINDOW = 'MAIN' ELEMENT = EREIGNIS EXCEPTIONS WINDOW = 1 ELEMENT = 2.
WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING WINDOW = 'MAIN' ELEMENT = '516' EXCEPTIONS WINDOW = 1 ELEMENT = 2.
CORRESPONDENCE_DATA_BUSAB CALL FUNCTION 'CORRESPONDENCE_DATA_BUSAB' EXPORTING I_BUKRS = G_KBUKR I_BUSAB = GT_LFB1_KBUKR-BUSAB I_LANGU = LANGUAGE IMPORTING E_T001S = *T001S E_FSABE = *FSABE EXCEPTIONS BUSAB_NOT_FOUND = 01 OTHERS = 02.
FI_ITEMS_PROC_CURR_CHANGE CALL FUNCTION 'FI_ITEMS_PROC_CURR_CHANGE' EXPORTING IV_PROCESS = 'SAPF130' IV_DATE = ABSTITAG IV_TABNAME = 'BSIK' * IS_KNA1 = * IS_LFA1 = * IS_BSEC = * IS_BKPF = * IS_T001 = * IV_NOCHECK = * TABLES * IT_FIELDLIST = CHANGING CS_LINE = BSIK CV_CURRENCY = BSIK-waers EXCEPTIONS * FIELD_NOT_AMOUNT = 1 * CURRENCY_MISSING = 2 * ERROR_IN_CONVERSION = 3 OTHERS = 4 .
WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING WINDOW = 'MAIN' ELEMENT = EREIGNIS EXCEPTIONS WINDOW = 1 ELEMENT = 2.
WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING WINDOW = 'MAIN' ELEMENT = '530' TYPE = 'TOP' EXCEPTIONS WINDOW = 1 ELEMENT = 2.
WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING WINDOW = 'MAIN' ELEMENT = EREIGNIS EXCEPTIONS WINDOW = 1 ELEMENT = 2.
WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING WINDOW = 'MAIN' ELEMENT = '530' TYPE = 'TOP' EXCEPTIONS WINDOW = 1 ELEMENT = 2.
CORRESPONDENCE_DATA_BUSAB CALL FUNCTION 'CORRESPONDENCE_DATA_BUSAB' EXPORTING I_BUKRS = GT_KBBUKR-KBUKR I_BUSAB = GT_LFB1_KBUKR-BUSAB I_LANGU = LANGUAGE IMPORTING E_T001S = T001S E_FSABE = FSABE EXCEPTIONS BUSAB_NOT_FOUND = 01 OTHERS = 02.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.