SAPF130K is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This program generates letters to your vendors for the purpose of checking payables and receivables, as well as the necessary reply slips...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.
If you would like to execute this report or see the full code listing simply enter SAPF130K 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.
Selection Text: FA1PFACH = PO Box
Selection Text: FA1PSTL2 = PO Box postal code
Selection Text: FA1PSTLZ = Postal code
Selection Text: FA1REGIO = Region
Selection Text: FA1SORTL = Search term
Selection Text: FA1SPERM = Central purchasing block
Selection Text: FA1SPERQ = Block function
Selection Text: FA1SPERR = Central posting block
Selection Text: FA1SPRAS = Language
Selection Text: FA1STCD1 = Tax code 1
Selection Text: FA1STCD2 = Tax code 2
Selection Text: FA1STCEG = VAT registration number
Selection Text: FA1STKZA = Output tax
Selection Text: FA1STKZN = Indicator: Natural person
Selection Text: FA1STKZU = Taxes on sales/purchases
Selection Text: FA1STRAS = Street
Selection Text: FA1TELBX = Telebox number
Selection Text: FA1TELF1 = 1st telephone number
Selection Text: FA1TELF2 = 2nd telephone number
Selection Text: FA1TELFX = Fax Number
Selection Text: FA1TELTX = Teletext number
Selection Text: FA1TELX1 = Telex number
Selection Text: FA1TXJCD = Jurisdiction cde for tax calc.
Selection Text: FA1VBUND = Trading partner
Selection Text: FA1XZEMP = Alternative payee in document
Selection Text: FB1AKONT = Reconciliation account
Selection Text: FB1ALTKN = Old master record number
Selection Text: FB1BEGRU = Authorization group in co.code
Selection Text: FB1BLNKZ = Preference indicator
Selection Text: FB1BUSAB = Accounting clerk
Selection Text: FB1DATLZ = Date of last interest calc.
Selection Text: FB1EIKTO = Account at customer
Selection Text: FB1ERDAT = Creation date in company code
Selection Text: FB1ERNAM = Entry in company code
Selection Text: FB1FDGRV = Cash management group
Selection Text: FB1HBKID = House bank
Selection Text: FB1KULTG = Cashed checks duration
Selection Text: FB1KVERM = Account memo
INCLUDE RFDBRMAC.
INCLUDE F130KSEL.
INCLUDE RKASMAWF.
INCLUDE F130KBKR.
No SAP DATABASE tables are accessed within this REPORT code!
FI_PROC_CURR_CHANGE_ACTIVE CALL FUNCTION 'FI_PROC_CURR_CHANGE_ACTIVE' IMPORTING E_ACTIVE = pcccheck EXCEPTIONS NOT_ACTIVE = 1 ERROR_OCCURRED = 2 OTHERS = 3.
FI_MESSAGE_INIT call function 'FI_MESSAGE_INIT'.
QF05_RANDOM_INTEGER CALL FUNCTION 'QF05_RANDOM_INTEGER' EXPORTING RAN_INT_MAX = GELESENE_SAETZE IMPORTING RAN_INT = AUSTAUSCH_INDEX.
QF05_RANDOM_INTEGER CALL FUNCTION 'QF05_RANDOM_INTEGER' EXPORTING RAN_INT_MAX = GELESENE_SAETZE IMPORTING RAN_INT = AUSTAUSCH_INDEX.
QF05_RANDOM_SAVE_SEED CALL FUNCTION 'QF05_RANDOM_SAVE_SEED'.
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 .
FI_MESSAGE_PROTOCOL CALL FUNCTION 'FI_MESSAGE_PROTOCOL' EXCEPTIONS OTHERS = 1.
FI_MESSAGE_PRINT CALL FUNCTION 'FI_MESSAGE_PRINT' EXPORTING i_xausn = 'X' i_comsg = 0 EXCEPTIONS OTHERS = 1.
CLOSE_FORM CALL FUNCTION 'CLOSE_FORM' IMPORTING result = itcpp TABLES otfdata = hotfdata EXCEPTIONS unopened = 3.
DISPLAY_OTF CALL FUNCTION 'DISPLAY_OTF' EXPORTING CONTROL = itcpp IMPORTING result = itcpp TABLES otf = hotfdata EXCEPTIONS OTHERS = 1.
CORRESPONDENCE_POPUP_EMAIL CALL FUNCTION 'CORRESPONDENCE_POPUP_EMAIL' EXPORTING i_intad = finaa-intad IMPORTING e_answer = hanswer e_intad = finaa-intad EXCEPTIONS OTHERS = 1.
CONVERT_OTF_AND_ARCHIVE CALL FUNCTION 'CONVERT_OTF_AND_ARCHIVE' EXPORTING arc_p = h_archive_params arc_i = h_archive_index TABLES otf = hotfdata EXCEPTIONS OTHERS = 1.
FI_MESSAGE_COLLECT CALL FUNCTION 'FI_MESSAGE_COLLECT' EXPORTING i_fimsg = ls_fimsg i_xappn = 'X' EXCEPTIONS OTHERS = 1.
CLOSE_FORM CALL FUNCTION 'CLOSE_FORM' IMPORTING result = itcpp TABLES otfdata = hotfdata EXCEPTIONS unopened = 3.
CLOSE_FORM CALL FUNCTION 'CLOSE_FORM' IMPORTING result = itcpp TABLES otfdata = hotfdata EXCEPTIONS unopened = 3.
END_FORM CALL FUNCTION 'END_FORM'.
END_FORM CALL FUNCTION 'END_FORM'.
END_FORM CALL FUNCTION 'END_FORM'.
OPEN_FORM CALL FUNCTION 'OPEN_FORM' EXPORTING ARCHIVE_INDEX = H_ARCHIVE_INDEX ARCHIVE_PARAMS = H_ARCHIVE_PARAMS DEVICE = HTDDEVICE DIALOG = HDIALOG FORM = ' ' "Space schon Default Language = Language "1643828 OPTIONS = ITCPO IMPORTING RESULT = ITCPP EXCEPTIONS FORM = 5.
START_FORM CALL FUNCTION 'START_FORM' EXPORTING ARCHIVE_INDEX = H_ARCHIVE_INDEX FORM = FINAA-FORMC LANGUAGE = SAVE_LANGU STARTPAGE = 'FIRST' importing language = language.
WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING WINDOW = 'RECEIVER'.
END_FORM CALL FUNCTION 'END_FORM'.
OPEN_FI_PERFORM_00002410_P CALL FUNCTION 'OPEN_FI_PERFORM_00002410_P' EXPORTING I_RF130 = RF130 * I_KNA1 = KNA1 * I_KNB1 = KNB1 I_LFA1 = LFA1 I_LFB1 = L_LFB1 TABLES T_FIMSG = T_FIMSG CHANGING C_FINAA = FINAA C_ITCPO = ITCPO C_ARCHIVE_INDEX = H_ARCHIVE_INDEX C_ARCHIVE_PARAMS = H_ARCHIVE_PARAMS.
FI_MESSAGE_COLLECT CALL FUNCTION 'FI_MESSAGE_COLLECT' EXPORTING I_FIMSG = T_FIMSG I_XAPPN = 'X' EXCEPTIONS MSGID_MISSING = 1 MSGNO_MISSING = 2 MSGTY_MISSING = 3 OTHERS = 4.
SK_NUMBER_TO_DEST * CALL FUNCTION 'SK_NUMBER_TO_DEST' "Faxgerät bestimmen * EXPORTING SERVICE = 'TELEFAX' * NUMBER = FINAA-TDTELENUM * COUNTRY = FINAA-TDTELELAND * EXCEPTIONS COUNTRY_NOT_CONFIGURED = 1 * SERVICE_NOT_SUPPORTED = 2 * SERVER_NOT_FOUND = 3 * NUMBER_EMPTIED = 4 * NUMBER_EMPTY = 5 * NUMBER_NOT_LEGAL = 6.
TELECOMMUNICATION_NUMBER_CHECK CALL FUNCTION 'TELECOMMUNICATION_NUMBER_CHECK' EXPORTING SERVICE = 'TELEFAX' NUMBER = FINAA-TDTELENUM COUNTRY = FINAA-TDTELELAND EXCEPTIONS OTHERS = 4.
SO_PROFILE_READ CALL FUNCTION 'SO_PROFILE_READ' * EXPORTING * LOCAL = ' ' IMPORTING PROFILE = HPROFIL EXCEPTIONS COMMUNICATION_FAILURE = 1 PROFILE_NOT_EXIST = 2 SYSTEM_FAILURE = 3 OTHERS = 4.
READ_FORM CALL FUNCTION 'READ_FORM' EXPORTING FORM = FORM IMPORTING FOUND = FOUND TABLES FORM_LINES = HTLINE PAGES = HITCTG PAGE_WINDOWS = HITCTH PARAGRAPHS = HITCDP STRINGS = HITCDS TABS = HITCDQ WINDOWS = HITCTW.
START_FORM CALL FUNCTION 'START_FORM' EXPORTING ARCHIVE_INDEX = H_ARCHIVE_INDEX FORM = SAVE_FORNR LANGUAGE = LANGUAGE STARTPAGE = STARTPAGE IMPORTING LANGUAGE = LANGUAGE EXCEPTIONS FORM = 5.
START_FORM CALL FUNCTION 'START_FORM' EXPORTING ARCHIVE_INDEX = H_ARCHIVE_INDEX FORM = SAVE_FORNR LANGUAGE = LANGUAGE STARTPAGE = STARTPAGE IMPORTING LANGUAGE = LANGUAGE EXCEPTIONS FORM = 5.
START_FORM CALL FUNCTION 'START_FORM' EXPORTING FORM = SAVE_RESUFORM LANGUAGE = LANGUAGE STARTPAGE = 'ET_FIRST' IMPORTING LANGUAGE = LANGUAGE EXCEPTIONS FORM = 5.
START_FORM CALL FUNCTION 'START_FORM' EXPORTING FORM = SAVE_ERROFORM LANGUAGE = LANGUAGE STARTPAGE = 'ER_FIRST' IMPORTING LANGUAGE = LANGUAGE EXCEPTIONS FORM = 5.
START_FORM CALL FUNCTION 'START_FORM' EXPORTING FORM = SAVE_ERROFORM LANGUAGE = LANGUAGE STARTPAGE = 'ER_FIRST' IMPORTING LANGUAGE = LANGUAGE EXCEPTIONS FORM = 5 UNOPENED = 3.
START_FORM CALL FUNCTION 'START_FORM' EXPORTING FORM = SAVE_LISTFORM LANGUAGE = LANGUAGE STARTPAGE = 'LI_FIRST' EXCEPTIONS FORM = 5.
DETERMINE_DUE_DATE CALL FUNCTION 'DETERMINE_DUE_DATE' EXPORTING I_FAEDE = FAEDE IMPORTING E_FAEDE = FAEDE EXCEPTIONS OTHERS = 1.
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. "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. "SADR40A
FI_ONETIMEACNT_RECEIVER_DECODE CALL FUNCTION 'FI_ONETIMEACNT_RECEIVER_DECODE' EXPORTING I_CPDVS = CPDVS IMPORTING E_EMPFG = BSEC-EMPFG.
CORRESPONDENCE_DATA_BUSAB CALL FUNCTION 'CORRESPONDENCE_DATA_BUSAB' EXPORTING I_BUKRS = LFB1-BUKRS I_BUSAB = LFB1-BUSAB I_LANGU = LANGUAGE IMPORTING E_T001S = T001S E_FSABE = FSABE EXCEPTIONS BUSAB_NOT_FOUND = 01 OTHERS = 02.
CORRESPONDENCE_DATA_BUSAB CALL FUNCTION 'CORRESPONDENCE_DATA_BUSAB' EXPORTING I_BUKRS = LFB1-BUKRS I_BUSAB = *LFB1-BUSAB I_LANGU = LANGUAGE IMPORTING E_T001S = *T001S E_FSABE = *FSABE EXCEPTIONS BUSAB_NOT_FOUND = 01 OTHERS = 02.
CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING COMMAND = 'ENDPROTECT'.
CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING COMMAND = 'PROTECT'.
GET_CURRENT_YEAR * CALL FUNCTION 'GET_CURRENT_YEAR' * EXPORTING BUKRS = SAVE_BUKRS * DATE = ABSTITAG * IMPORTING CURRY = KBWDT-HIGH.
BUKRS_AUTHORITY_CHECK CALL FUNCTION 'BUKRS_AUTHORITY_CHECK' EXPORTING XDATABASE = 'K' TABLES XBUKREIS = KD_BUKRS.
BUKRS_AUTHORITY_CHECK CALL FUNCTION 'BUKRS_AUTHORITY_CHECK' EXPORTING XDATABASE = 'B' TABLES XBUKREIS = KD_BUKRS.
GET_CURRENT_YEAR CALL FUNCTION 'GET_CURRENT_YEAR' EXPORTING BUKRS = T001-BUKRS DATE = ABSTITAG IMPORTING CURRY = AKTGJAHR.
GET_CURRENT_YEAR CALL FUNCTION 'GET_CURRENT_YEAR' EXPORTING BUKRS = SAVE5_BUKRS DATE = ABSTITAG IMPORTING CURRY = KBWDT-HIGH.
PRINT_SELECTIONS CALL FUNCTION 'PRINT_SELECTIONS' EXPORTING RNAME = SY-REPI2 RVARIANTE = SY-SLSET MODE = 'TABLE' TABLES INFOTAB = INFO.
CURRENCY_GET_SUBSEQUENT CALL FUNCTION 'CURRENCY_GET_SUBSEQUENT' EXPORTING CURRENCY = CWAERS PROCESS = 'SAPF130' DATE = IDATE BUKRS = IBUKRS IMPORTING CURRENCY_NEW = NEW_WAERS.
DDIF_FIELDINFO_GET CALL FUNCTION 'DDIF_FIELDINFO_GET' EXPORTING TABNAME = 'BSIK' TABLES DFIES_TAB = XDFIES EXCEPTIONS NOT_FOUND = 1 INTERNAL_ERROR = 2 OTHERS = 3.
CURRENCY_DOCUMENT_CONVERT CALL FUNCTION 'CURRENCY_DOCUMENT_CONVERT' EXPORTING FROM_CURRENCY = IWAERS TO_CURRENCY = EWAERS LOCAL_CURRENCY = IHWAER DATE = IDATE CONVERSION_MODE = 'O' TABLES FIELDLIST = FIELDLIST_BSIK CHANGING LINE = CBSIK EXCEPTIONS OTHERS = 5.
CONVERT_FOREIGN_TO_FOREIGN_CUR CALL FUNCTION 'CONVERT_FOREIGN_TO_FOREIGN_CUR' EXPORTING DATE = IDATE FROM_AMOUNT = CAMNT FROM_CURRENCY = IWAERS TO_CURRENCY = EWAERS LOCAL_CURRENCY = IHWAER CONVERSION_MODE = 'X' IMPORTING TO_AMOUNT = CAMNT.
CURRENCY_CHECK_FOR_PROCESS CALL FUNCTION 'CURRENCY_CHECK_FOR_PROCESS' EXPORTING PROCESS = 'SAPF130' IMPORTING ALL_BUKRS = XALW_BUKRS TABLES T_BUKRS = ALW_BUKRS EXCEPTIONS PROCESS_NOT_MAINTAINED = 1 OTHERS = 2.
FUNCTION_EXISTS CALL FUNCTION 'FUNCTION_EXISTS' EXPORTING FUNCNAME = 'SCMA_JOB_STARTED_FROM_SCMA' * IMPORTING * GROUP = * INCLUDE = * NAMESPACE = * STR_AREA = EXCEPTIONS FUNCTION_NOT_EXIST = 1 OTHERS = 2.
SCMA_JOB_STARTED_FROM_SCMA CALL FUNCTION 'SCMA_JOB_STARTED_FROM_SCMA' exporting BEFORE_INIT = 'X' WF_WITEM = WF_WITEM IMPORTING E_SCMA = G_SCMA.
KPEP_MONI_INIT_RECORD CALL FUNCTION 'KPEP_MONI_INIT_RECORD' EXPORTING LS_DETAIL = LS_DETAIL LS_WITEM = LS_WITEM * LS_APPL = * LD_WORKLIST_FLAG = ' ' IMPORTING LS_KEY = LS_KEY_STATIC TABLES LT_SELKRIT = LT_SELKRIT LT_PARAM = LT_PARAM.
BAL_DB_SAVE CALL FUNCTION 'BAL_DB_SAVE' EXPORTING * I_IN_UPDATE_TASK = I_SAVE_ALL = ' ' I_T_LOG_HANDLE = LT_LOG_HANDLE EXCEPTIONS LOG_NOT_FOUND = 1 SAVE_NOT_ALLOWED = 2 NUMBERING_ERROR = 3 OTHERS = 4.
KPEP_MONI_CLOSE_RECORD CALL FUNCTION 'KPEP_MONI_CLOSE_RECORD' EXPORTING LS_KEY = LS_KEY_STATIC LS_MESSAGE = LS_MESSAGE * LD_OBJECTS = * LS_EXT = * LS_RL = LS_SCMA_EVENT = LS_SCMA_EVENT TABLES LT_SPOOL = GT_SPONO CHANGING LD_APLSTAT = LD_APLSTAT EXCEPTIONS * NO_ID_GIVEN = 1 OTHERS = 0.
BAL_LOG_CREATE CALL FUNCTION 'BAL_LOG_CREATE' EXPORTING I_S_LOG = L_S_LOG IMPORTING E_LOG_HANDLE = G_LOG_HANDLE EXCEPTIONS LOG_HEADER_INCONSISTENT = 1 OTHERS = 2.
BAL_LOG_MSG_ADD CALL FUNCTION 'BAL_LOG_MSG_ADD' EXPORTING I_LOG_HANDLE = G_LOG_HANDLE I_S_MSG = L_S_MSG * IMPORTING * E_S_MSG_HANDLE = * E_MSG_WAS_LOGGED = * E_MSG_WAS_DISPLAYED = EXCEPTIONS LOG_NOT_FOUND = 1 * MSG_INCONSISTENT = 2 * LOG_IS_FULL = 3 OTHERS = 4.
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 SAPF130K or its description.
SAPF130K - Vendor Balance Confirmation SAPF130K - Vendor Balance Confirmation SAPF130G - Change Selection Criteria for Balance Confirmations SAPF130G - Change Selection Criteria for Balance Confirmations SAPF130F - Display Address List from Central Address Administration SAPF130F - Display Address List from Central Address Administration