SAP Reports / Programs | Financial Accounting | Accounts Receivable | Interest Calculation(FI-AR-AR-IN) SAP FI
RFDZIS01_PDF SAP ABAP INCLUDE - Subroutines of the Reports RFDZIS00, RFKZIS00, and RFDZIS10 (Part 1)
RFDZIS01_PDF 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 RFDZIS01_PDF 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 RFDZIS01_PDF. "Basic submit
SUBMIT RFDZIS01_PDF AND RETURN. "Return to original report after report execution complete
SUBMIT RFDZIS01_PDF VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Subroutines of the Reports RFDZIS00, RFKZIS00, and RFDZIS10 (Part 1)
INCLUDES used within this REPORT RFDZIS01_PDF
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:
CURRENCY_DOCUMENT_CONVERT Call function 'CURRENCY_DOCUMENT_CONVERT' "361608 exporting From_currency = T001-Waers "361608 To_currency = Gd_newwaers "361608 Local_currency = T001-Waers "361608 Date = Biszeit "361608 Conversion_mode = 'O' "361608 changing Line = Zis_form. "361608
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '5100'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '6100'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '5002'.
END_FORM * CALL FUNCTION 'END_FORM'.
POPUP_NO_LIST CALL FUNCTION 'POPUP_NO_LIST' .
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '8600'.
GET_PRINT_PARAMETERS Call function 'GET_PRINT_PARAMETERS' "970870 exporting Archive_info = Ld_arc_info "970870 Archive_mode = Armod "970870 Archive_text = Gs_archive_params-Arctext "970870 Ar_object = Gs_archive_params-Ar_object "970870 Data_set = sy-tcode(6) "970870 Destination = Fo-print "970870 List_name = space "970870 List_text = Ld_prtxt "970870 Mode = 'CURRENT' "970870 New_list_id = space "970870 Protect_list = space "970870 Sap_object = Gs_archive_params-Sap_object "970870 importing Out_archive_parameters = Gs_archive_params "970870 Out_parameters = Ls_print_params. "970870
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '7010'.
CONTROL_FORM * CALL FUNCTION 'CONTROL_FORM' * EXPORTING * COMMAND = 'PROTECT'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '5010'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '5020'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '5030'.
CONTROL_FORM * CALL FUNCTION 'CONTROL_FORM' * EXPORTING * COMMAND = 'ENDPROTECT'.
CONTROL_FORM * CALL FUNCTION 'CONTROL_FORM' * EXPORTING * COMMAND = 'PROTECT'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '6020'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '6010'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '6030'.
* CALL FUNCTION 'CONTROL_FORM' * EXPORTING * COMMAND = 'ENDPROTECT'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '8000'.
POSTING_INTERFACE_END CALL FUNCTION 'POSTING_INTERFACE_END'.
BDC_CLOSE_GROUP CALL FUNCTION 'BDC_CLOSE_GROUP'.
FI_PERIOD_DETERMINE CALL FUNCTION 'FI_PERIOD_DETERMINE' EXPORTING I_budat = Ld_datum "373691 I_BUKRS = ZS-BUKRS * i_periv = ' ' * i_gjahr = 0000 * i_monat = 00 * x_xmo16 = ' ' IMPORTING E_GJAHR = WF-GJAHR * e_monat = * e_poper = EXCEPTIONS FISCAL_YEAR = 1 PERIOD = 2 PERIOD_VERSION = 3 POSTING_PERIOD = 4 SPECIAL_PERIOD = 5 VERSION = 6 POSTING_DATE = 7 OTHERS = 8.
NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING NR_RANGE_NR = T056S-NRKREIS OBJECT = 'RF_BELEG' * quantity = '1' SUBOBJECT = ZS-BUKRS TOYEAR = WF-GJAHR * ignore_buffer = ' ' IMPORTING NUMBER = WF-FORMNR * quantity = * returncode = EXCEPTIONS INTERVAL_NOT_FOUND = 1 NUMBER_RANGE_NOT_INTERN = 2 * object_not_found = 3 * quantity_is_0 = 4 * quantity_is_not_1 = 5 INTERVAL_OVERFLOW = 6.
FI_GET_FAX_MAIL_RECEIVERS Call function 'FI_GET_FAX_MAIL_RECEIVERS' "970870 exporting Id_faxnr = Zs-Tlfxs "970870 Id_land1 = Zs-Land1 "970870 Id_mailadr = Zs-Intad "970870 tables Ct_mail_recip = Gt_mail_recip "970870 Ct_fax_recip = Gt_fax_recip "970870 exceptions No_data = 0. "970870
FI_CHECK_FAX_MAIL_OPTIONS Call function 'FI_CHECK_FAX_MAIL_OPTIONS' "970870 importing Ed_device = Gd_device "970870 Eb_send = Gb_send "970870 Eb_archive = Gb_archive "1554377 tables It_mail_recip = Gt_mail_recip "970870 It_fax_recip = Gt_fax_recip "970870 changing Cs_params = Gv_fp_outputparams. "970870
CORRESPONDENCE_DATA_BUSAB CALL FUNCTION 'CORRESPONDENCE_DATA_BUSAB' EXPORTING I_BUKRS = ZS-BUKRS I_BUSAB = ZS-BUSAB I_LANGU = WALANGU IMPORTING E_T001S = T001S E_FSABE = FSABE EXCEPTIONS BUSAB_NOT_FOUND = 01 OTHERS = 02.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = F_ELEMENT.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = Z_ELEMENT.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * WINDOW = 'MAIN' * ELEMENT = F_ELEMENT * FUNCTION = 'SET' * TYPE = 'TOP'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * WINDOW = 'MAIN' * ELEMENT = Z_ELEMENT * FUNCTION = 'APPEND' * TYPE = 'TOP'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '0002'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = F_ELEMENT.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = Z_ELEMENT.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * WINDOW = 'MAIN' * ELEMENT = F_ELEMENT * FUNCTION = 'SET' * TYPE = 'TOP'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * WINDOW = 'MAIN' * ELEMENT = Z_ELEMENT * FUNCTION = 'APPEND' * TYPE = 'TOP'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '0002'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = F_ELEMENT.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = Z_ELEMENT.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * WINDOW = 'MAIN' * ELEMENT = F_ELEMENT * FUNCTION = 'SET' * TYPE = 'TOP'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * WINDOW = 'MAIN' * ELEMENT = Z_ELEMENT * FUNCTION = 'APPEND' * TYPE = 'TOP'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '0002'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = F_ELEMENT.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * WINDOW = 'MAIN' * ELEMENT = F_ELEMENT * FUNCTION = 'SET' * TYPE = 'TOP'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '0002'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = F_ELEMENT.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * WINDOW = 'MAIN' * ELEMENT = F_ELEMENT * FUNCTION = 'SET' * TYPE = 'TOP'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '0002'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = F_ELEMENT.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * WINDOW = 'MAIN' * ELEMENT = F_ELEMENT * FUNCTION = 'SET' * TYPE = 'TOP'.
DDIF_FIELDINFO_GET Call function 'DDIF_FIELDINFO_GET' EXPORTING Tabname = 'BKPF' Lfieldname = 'BUKRS' IMPORTING Dfies_wa = Ls_dfies.
DDIF_FIELDINFO_GET Call function 'DDIF_FIELDINFO_GET' EXPORTING Tabname = 'SKB1' Lfieldname = 'VZSKZ' IMPORTING Dfies_wa = Ls_dfies.
DDIF_FIELDINFO_GET Call function 'DDIF_FIELDINFO_GET' EXPORTING Tabname = 'BKPF' Lfieldname = 'WAERS' IMPORTING Dfies_wa = Ls_dfies.
DDIF_FIELDINFO_GET Call function 'DDIF_FIELDINFO_GET' EXPORTING Tabname = 'BSEG' Lfieldname = 'SHKZG' IMPORTING Dfies_wa = Ls_dfies.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * WINDOW = 'MAIN' * ELEMENT = F_ELEMENT * FUNCTION = 'DELETE' * TYPE = 'TOP'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * WINDOW = 'MAIN' * ELEMENT = Z_ELEMENT * FUNCTION = 'DELETE' * TYPE = 'TOP'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '7020'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '9010'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '9100'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '9010'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '9100'.
ROUND_AMOUNT CALL FUNCTION 'ROUND_AMOUNT' EXPORTING AMOUNT_IN = GZINSEN COMPANY = ZS-BUKRS CURRENCY = WAWAERS IMPORTING AMOUNT_OUT = GZINSEN * difference = * no_rounding = EXCEPTIONS OTHERS = 1.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '8550'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '8560'.
ROUND_AMOUNT CALL FUNCTION 'ROUND_AMOUNT' EXPORTING AMOUNT_IN = Z2TAB-ZINSEN COMPANY = ZS-BUKRS CURRENCY = WAWAERS IMPORTING AMOUNT_OUT = Z2TAB-ZINSEN * difference = * no_rounding = EXCEPTIONS OTHERS = 1.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '8570'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '8500'.
WRITE_FORM * CALL FUNCTION 'WRITE_FORM' * EXPORTING * ELEMENT = '8510'.
FP_JOB_OPEN CALL FUNCTION 'FP_JOB_OPEN' CHANGING ie_outputparams = gv_fp_outputparams EXCEPTIONS cancel = 1 usage_error = 2 system_error = 3 internal_error = 4 OTHERS = 5.
ADDRESS_INTO_PRINTFORM CALL FUNCTION 'ADDRESS_INTO_PRINTFORM' EXPORTING address_1 = lt_adrs address_type = '1' "normal/company sender_country = ZIS_FORM-LAND1 number_of_lines = 6 STREET_HAS_PRIORITY = 'X' IMPORTING address_printform_table = lt_address_lines.
ADDRESS_INTO_PRINTFORM CALL FUNCTION 'ADDRESS_INTO_PRINTFORM' EXPORTING address_1 = lt_adrs1 address_type = '1' sender_country = ZIS_FORM-LAND1 number_of_lines = 2 STREET_HAS_PRIORITY = 'X' IMPORTING address_printform_table = lt_address_lines1.
FP_FUNCTION_MODULE_NAME Call function 'FP_FUNCTION_MODULE_NAME' exporting I_name = Lv_formname importing E_funcname = Lv_e_funcname.
FP_JOB_CLOSE Call function 'FP_JOB_CLOSE' exceptions Usage_error = 1 System_error = 2 Internal_error = 3.
FI_SEND_PDF Call function 'FI_SEND_PDF' exporting Ib_send = Gb_send Ib_archive = Gb_archive "1554377 Id_device = Gd_device Is_pdf = Ls_pdf Id_t001_adrnr = T001-Adrnr Is_fsabe = Fsabe Is_receiver = Ls_dkadr Is_outputparams = Gv_fp_outputparams Id_langu = Gs_docparams-Langu Id_mail_text = Gd_mail_text Id_fax_cover = Gd_fax_cover Is_t047i = Ls_t047i tables It_mail_receivers = Gt_mail_recip It_fax_receivers = Gt_fax_recip It_dara = Gs_docparams-Daratab "1554377 exceptions Too_many_receivers = 1 Document_not_sent = 2 Document_type_not_exist = 3 Operation_no_authorization = 4 Enqueue_error = 5 No_document = 6 Invalid_device = 7 Archive_error = 8. "1554377
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 RFDZIS01_PDF or its description.
RFDZIS01_PDF - Subroutines of the Reports RFDZIS00, RFKZIS00, and RFDZIS10 (Part 1) RFDZIS01 - Subroutines of the Reports RFDZIS00, RFKZIS00, and RFDZIS10 (Part 1) RFDZIS00_PDF - Customer Interest Scale RFDZIS00_PDF - Customer Interest Scale RFDZIS00 - Customer Interest Scale RFDZIS00 - Customer Interest Scale