/SAPF15/FORMS SAP ABAP INCLUDE - documentation and ABAP source code
/SAPF15/FORMS 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 /SAPF15/FORMS 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 /SAPF15/FORMS. "Basic submit
SUBMIT /SAPF15/FORMS AND RETURN. "Return to original report after report execution complete
SUBMIT /SAPF15/FORMS 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 /SAPF15/FORMS
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:
POPUP_FOR_INTERACTION CALL FUNCTION 'POPUP_FOR_INTERACTION' EXPORTING headline = 'F15 Schnittstelle - Debug Modus' "#EC * text1 = sy-msgv1 text2 = sy-msgv2 text3 = sy-msgv3 text4 = sy-msgv4 text6 = 'F15 Fehlermeldung wird ignoriert!' "#EC * ticon = c_e button_1 = '...'. "#EC *
ENQUEUE_/SAPF15/EF15 CALL FUNCTION 'ENQUEUE_/SAPF15/EF15' EXPORTING relid = p_relid bukrs = p_bukrs belnr = p_belnr gjahr = p_gjahr buzei = p_buzei EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
DEQUEUE_/SAPF15/EF15 CALL FUNCTION 'DEQUEUE_/SAPF15/EF15' EXPORTING relid = idequeue_f15-relid bukrs = idequeue_f15-bukrs belnr = idequeue_f15-belnr gjahr = idequeue_f15-gjahr buzei = idequeue_f15-buzei.
FM_FIPEX_GET_FROM_FIPOS CALL FUNCTION 'FM_FIPEX_GET_FROM_FIPOS' EXPORTING i_fipos = p_fipos IMPORTING e_fipex = fipex EXCEPTIONS OTHERS = 0.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w msgv1 = f15data-f15_vsl msgv2 = 'Verrechnung' txtnr = 50 EXCEPTIONS not_active = 1. "#EC *
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w msgv1 = p_length msgv2 = p_buzei msgv3 =
txtnr = 26 EXCEPTIONS not_active = 1.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w msgv1 = ibsegp-zterm txtnr = 100 EXCEPTIONS not_active = 1.
NET_DUE_DATE_GET CALL FUNCTION 'NET_DUE_DATE_GET' EXPORTING i_zfbdt = ibsegp-zfbdt i_zbd1t = ibsegp-zbd1t i_zbd2t = ibsegp-zbd2t i_zbd3t = ibsegp-zbd3t i_shkzg = ibsegp-shkzg i_rebzg = ibsegp-rebzg i_koart = ibsegp-koart IMPORTING e_faedt = bseg-zfbdt.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w msgv1 = dummy10 txtnr = 55 EXCEPTIONS not_active = 1.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w txtnr = 100 EXCEPTIONS not_active = 1.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w msgv1 = dummy10 txtnr = 54 EXCEPTIONS not_active = 1.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w msgv1 = dummy10 txtnr = 57 EXCEPTIONS not_active = 1.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w msgv1 = dummy10 txtnr = 57 EXCEPTIONS not_active = 1.
DDIF_FIELDINFO_GET CALL FUNCTION 'DDIF_FIELDINFO_GET' EXPORTING tabname = tabname fieldname = fieldname langu = p_langu TABLES dfies_tab = dfies EXCEPTIONS OTHERS = 0.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w txtnr = 103 msgv1 = sy-msgv1 EXCEPTIONS not_active = 1.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_i txtnr = 103 msgv1 = sy-msgv1 EXCEPTIONS not_active = 1.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_e txtnr = 61 EXCEPTIONS not_active = 1.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w msgv1 = ibsegs-kblnr msgv2 = /sapf15/f15gjwvp-hkr_belnr txtnr = 116 EXCEPTIONS not_active = 1.
CALL FUNCTION 'COBL_EX_RECEIVE' IMPORTING ecobl = cobl_ex.
READ_BANK_ADDRESS CALL FUNCTION 'READ_BANK_ADDRESS' EXPORTING bank_country = ibsecp-banks bank_number = ibsecp-bankl IMPORTING bnka_wa = ibnka EXCEPTIONS OTHERS = 0.
FMR3_CHECK_AUTHORITY CALL FUNCTION 'FMR3_CHECK_AUTHORITY' EXPORTING i_activity = p_actvt i_f_kblk = p_kblk EXCEPTIONS not_authorized = 1 OTHERS = 2.
FM_FIPEX_GET_FROM_FIPOS CALL FUNCTION 'FM_FIPEX_GET_FROM_FIPOS' EXPORTING i_fipos = p_fipos IMPORTING e_fipex = fipex EXCEPTIONS OTHERS = 0.
FMFR_CHANGE_COMPLETION_FLAG CALL FUNCTION 'FMFR_CHANGE_COMPLETION_FLAG' EXPORTING i_flg_commit = space i_flg_checkonly = space i_flg_complete_doc = c_x TABLES t_positions = erlpos EXCEPTIONS not_found = 1 internal_error = 2 error_occured = 3 OTHERS = 4.
ENQUEUE_EKBLK CALL FUNCTION 'ENQUEUE_EKBLK' EXPORTING belnr = p_belnr EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'RE' exception_if_not_active = ' ' msgty = c_e msgv1 = sy-msgv1 txtnr = '149'.
FMR2_READ_ALL_KBLX CALL FUNCTION 'FMR2_READ_ALL_KBLX' EXPORTING i_belnr = p_belnr with_kble = space TABLES t_kblk = old_kblk t_kblp = old_kblp EXCEPTIONS not_found = 1 position_not_found = 2 OTHERS = 3.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'RE' exception_if_not_active = ' ' msgty = c_e msgv1 = c_1 msgv2 = p_belnr txtnr = '004'.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'RE' exception_if_not_active = ' ' msgty = c_e msgv1 = c_1 msgv2 = p_belnr txtnr = '144'.
FMR3_CHECK_AUTHORITY CALL FUNCTION 'FMR3_CHECK_AUTHORITY' EXPORTING i_f_kblk = old_kblk i_activity = '02' EXCEPTIONS not_authorized = 1 OTHERS = 2.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'RE' exception_if_not_active = ' ' msgty = c_e msgv1 = p_belnr txtnr = '212'.
FMR8_FILL_XY_TABLES CALL FUNCTION 'FMR8_FILL_XY_TABLES' EXPORTING i_belnr = p_belnr TABLES t_kblk = old_kblk t_kblp = old_kblp c_t_kblk = ykblk c_t_kblp = ykblp.
FMR8_FILL_XY_TABLES CALL FUNCTION 'FMR8_FILL_XY_TABLES' EXPORTING i_belnr = p_belnr TABLES t_kblk = new_kblk t_kblp = new_kblp c_t_kblk = xkblk c_t_kblp = xkblp.
FMRESERV_WRITE_DOCUMENT CALL FUNCTION 'FMRESERV_WRITE_DOCUMENT' "IN UPDATE TASK "#EC * EXPORTING "#EC ARGCHECKED objectid = objectid tcode = tcode utime = utime udate = udate username = username upd_kblk = 'U' upd_kblp = 'U' TABLES icdtxt_fmreserv = icdtxt_fmreserv xkble = xkble ykble = ykble xkblew = xkblew "nicht mehr ab 47x ykblew = ykblew "nicht mehr ab 47x xkblk = xkblk ykblk = ykblk xkblkkred = xkblkkred ykblkkred = ykblkkred xkblp = xkblp ykblp = ykblp xkblpw = xkblpw "nicht mehr ab 47x ykblpw = ykblpw "nicht mehr ab 47x EXCEPTIONS OTHERS = 0.
FMRESERV_WRITE_DOCUMENT CALL FUNCTION 'FMRESERV_WRITE_DOCUMENT' "IN UPDATE TASK EXPORTING objectid = objectid tcode = tcode utime = utime udate = udate username = username upd_kblk = 'U' upd_kblp = 'U' TABLES icdtxt_fmreserv = icdtxt_fmreserv xkble = xkble ykble = ykble "xkblew = xkblew "nicht mehr ab 47x "ykblew = ykblew "nicht mehr ab 47x xkblk = xkblk ykblk = ykblk xkblkkred = xkblkkred ykblkkred = ykblkkred xkblp = xkblp ykblp = ykblp "xkblpw = xkblpw "nicht mehr ab 47x "ykblpw = ykblpw "nicht mehr ab 47x EXCEPTIONS OTHERS = 0.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/sapf15/f15' exception_if_not_active = ' ' msgty = c_e txtnr = '016'.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/sapf15/f15' exception_if_not_active = ' ' msgty = c_e txtnr = '016'.
DD_EXIST_TABLE CALL FUNCTION 'DD_EXIST_TABLE' EXPORTING tabname = dd_tabname status = c_a IMPORTING subrc = subrc EXCEPTIONS wrong_status = 1 OTHERS = 2.
FUNCTION_EXISTS CALL FUNCTION 'FUNCTION_EXISTS' EXPORTING funcname = 'READ_IBAN_INT' EXCEPTIONS function_not_exist = 1 OTHERS = 2.
READ_IBAN_INT CALL FUNCTION 'READ_IBAN_INT' EXPORTING i_banks = ibsecp-banks i_bankl = ibsecp-bankl i_bankn = lf_bankn35 i_bkont = ibsecp-bkont IMPORTING e_iban_wa = ls_tiban.
FUNCTION_EXISTS CALL FUNCTION 'FUNCTION_EXISTS' EXPORTING funcname = 'READ_IBAN_FROM_DB' EXCEPTIONS function_not_exist = 1 OTHERS = 2.
READ_IBAN_FROM_DB CALL FUNCTION 'READ_IBAN_FROM_DB' EXPORTING i_banks = ibsecp-banks i_bankl = ibsecp-bankl i_bankn = ibsecp-bankn i_bkont = ibsecp-bkont i_bkref = ibsecp-bkref IMPORTING e_iban = iban e_iban_valid_from = iban_valid_from.
DELIVERY_GET_COMPONENT_STATE CALL FUNCTION 'DELIVERY_GET_COMPONENT_STATE' EXPORTING iv_compname = 'EA-PS' iv_buffered = space IMPORTING ev_compvers = icompvers ev_comppalv = icomppalv EXCEPTIONS comp_not_found = 1 OTHERS = 2.
DELIVERY_GET_COMPONENT_STATE CALL FUNCTION 'DELIVERY_GET_COMPONENT_STATE' EXPORTING iv_compname = 'IS-PS' iv_buffered = space IMPORTING ev_compvers = icompvers ev_comppalv = icomppalv EXCEPTIONS comp_not_found = 1 OTHERS = 2.
SLIC_GET_LICENCE_NUMBER CALL FUNCTION 'SLIC_GET_LICENCE_NUMBER' IMPORTING license_number = sy_licnr.
FI_DOCUMENT_CHANGE CALL FUNCTION 'FI_DOCUMENT_CHANGE' EXPORTING i_awtyp = ibkpf-awtyp i_awref = iawref i_aworg = iaworg i_awsys = ibkpf-awsys i_obzei = 1 TABLES t_accchg = iaccchg EXCEPTIONS no_reference = 1 no_document = 2 many_documents = 3 OTHERS = 4.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING id = catalog-tdid language = catalog-tdspras name = catalog-tdname object = catalog-tdobject TABLES lines = itline EXCEPTIONS OTHERS = 0.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING id = thead-tdid language = sy-langu name = thead-tdname object = thead-tdobject TABLES lines = itline EXCEPTIONS OTHERS = 0.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING id = thead-tdid language = sy-langu name = thead-tdname object = thead-tdobject TABLES lines = itline EXCEPTIONS OTHERS = 0.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING id = thead-tdid language = sy-langu name = thead-tdname object = thead-tdobject TABLES lines = itline EXCEPTIONS OTHERS = 0.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING id = thead-tdid language = sy-langu name = thead-tdname object = thead-tdobject TABLES lines = itline EXCEPTIONS OTHERS = 0.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING id = thead-tdid language = sy-langu name = thead-tdname object = thead-tdobject TABLES lines = itline EXCEPTIONS OTHERS = 0.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w txtnr = 127 EXCEPTIONS not_active = 1.
FILE_VALIDATE_NAME CALL FUNCTION 'FILE_VALIDATE_NAME' EXPORTING logical_filename = p_uf_logical_filename parameter_1 = lf_filename CHANGING physical_filename = p_cf_physical_filename EXCEPTIONS OTHERS = 1.
FILE_VALIDATE_NAME CALL FUNCTION 'FILE_VALIDATE_NAME' EXPORTING logical_filename = p_uf_logical_filename parameter_1 = lf_filename CHANGING physical_filename = p_cf_physical_filename EXCEPTIONS OTHERS = 1.
FILE_VALIDATE_NAME CALL FUNCTION 'FILE_VALIDATE_NAME' EXPORTING logical_filename = p_uf_logical_filename parameter_1 = lf_filename CHANGING physical_filename = p_cf_physical_filename EXCEPTIONS OTHERS = 1.
GUID_CREATE CALL FUNCTION 'GUID_CREATE' IMPORTING ev_guid_16 = hguid. "#EC FB_OLDED
SEPA_MANDATES_API_GET call function 'SEPA_MANDATES_API_GET' exporting i_sel_criteria = sepa_where i_authority_check = c_x importing et_mandates = sepa_mandate e_message = sepa_return.
OPEN_FI_PERFORM_00001812_P call function 'OPEN_FI_PERFORM_00001812_P' exporting i_laufd = sepa_laufd i_laufi = sepa_laufi i_xvorl = sepa_xvorl is_reguh = sepa_reguh is_regup = sepa_regup i_ziban = iban importing et_messages = sepa_returns changing ct_mandates = sepa_mandate.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_w txtnr = 103 msgv1 = sy-msgv1 EXCEPTIONS not_active = 1.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_i txtnr = 103 msgv1 = sy-msgv3 msgv2 = sy-msgv2 EXCEPTIONS not_active = 1.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/SAPF15/F15' msgty = c_i txtnr = 103 msgv1 = sy-msgv1 msgv2 = sy-msgv2 msgv3 = sy-msgv3 msgv4 = sy-msgv4 EXCEPTIONS not_active = 1.
FUNCTION_EXISTS CALL FUNCTION 'FUNCTION_EXISTS' EXPORTING funcname = lf_fnam EXCEPTIONS function_not_exist = 1 OTHERS = 2.
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 /SAPF15/FORMS or its description.