SAP Reports / Programs | Financial Accounting | Accounts Receivable | Basic Functions(FI-AR-AR) SAP FI

RFDUZI01 SAP ABAP INCLUDE - documentation and ABAP source code







RFDUZI01 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 RFDUZI01 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 RFDUZI01. "Basic submit
SUBMIT RFDUZI01 AND RETURN. "Return to original report after report execution complete
SUBMIT RFDUZI01 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 RFDUZI01

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:

WRITE_FORM Call function 'WRITE_FORM' exporting Element = '2260'. "Zahlung

WRITE_FORM Call function 'WRITE_FORM' exporting Element = '2261'. "Fremdwaehrungszahlung

J_1BSA_COMPONENT_ACTIVE CALL FUNCTION 'J_1BSA_COMPONENT_ACTIVE' EXPORTING BUKRS = PARAM_BUKRS COMPONENT = 'AR' EXCEPTIONS OTHERS = 1.

OUTBOUND_CALL_00004110_E Call function 'OUTBOUND_CALL_00004110_E' "387184 exporting Is_bseg = Bseg "387184 Id_netdt = Bsega-Netdt "387184 Id_applk = Ld_applk "387184 Id_intca = Gd_intca "707728 importing Ed_netdt = Ld_netdt "387184 Ed_zinkz = Ld_zinkz "387184 Eb_clear_rebzt = Lb_clear_rebzt. "387184

DETERMINE_DUE_DATE Call function 'DETERMINE_DUE_DATE' "324665 exporting I_faede = Faede "324665 importing E_faede = Faede. "324665

OUTBOUND_CALL_00004110_E Call function 'OUTBOUND_CALL_00004110_E' "387184 exporting Is_bseg = *Bseg "387184 Id_netdt = Faede-Netdt "387184 Id_applk = Ld_applk "387184 Id_intca = Gd_intca "707728 importing Ed_netdt = Ld_netdt "387184 Ed_zinkz = Ld_zinkz "387184 Eb_clear_rebzt = Lb_clear_rebzt. "387184

BDC_OPEN_GROUP CALL FUNCTION 'BDC_OPEN_GROUP' EXPORTING CLIENT = SY-MANDT GROUP = BI-NAME USER = SY-UNAME EXCEPTIONS GROUP_INVALID = 01 HOLDDATE_INVALID = 02 INTERNAL_ERROR = 03.

POSTING_INTERFACE_START CALL FUNCTION 'POSTING_INTERFACE_START' "S11K108587 EXPORTING "S11K108587 I_FUNCTION = 'B' "S11K108587 I_GROUP = BI-NAME "S11K108587 I_USER = SY-UNAME "S11K108587 I_keep = Bi-keep. "434187

BDC_INSERT CALL FUNCTION 'BDC_INSERT' EXPORTING TCODE = 'FD02' TABLES DYNPROTAB = INS_BDC_TAB EXCEPTIONS INTERNAL_ERROR = 1 NOT_OPEN = 2 QUEUE_ERROR = 3 TCODE_INVALID = 4.

BDC_OPEN_GROUP CALL FUNCTION 'BDC_OPEN_GROUP' EXPORTING CLIENT = SY-MANDT GROUP = BI-NAME USER = SY-UNAME EXCEPTIONS GROUP_INVALID = 01 HOLDDATE_INVALID = 02 INTERNAL_ERROR = 03.

POSTING_INTERFACE_START CALL FUNCTION 'POSTING_INTERFACE_START' "S11K108587 EXPORTING "S11K108587 I_FUNCTION = 'B' "S11K108587 I_GROUP = BI-NAME "S11K108587 I_USER = SY-UNAME "S11K108587 I_keep = Bi-keep. "434187

BDC_INSERT CALL FUNCTION 'BDC_INSERT' EXPORTING TCODE = 'FK02' TABLES DYNPROTAB = INS_BDC_TAB EXCEPTIONS INTERNAL_ERROR = 1 NOT_OPEN = 2 QUEUE_ERROR = 3 TCODE_INVALID = 4.

CORRESPONDENCE_DATA_BUSAB CALL FUNCTION 'CORRESPONDENCE_DATA_BUSAB' EXPORTING I_BUKRS = T001-BUKRS I_BUSAB = KNB1-BUSAB I_LANGU = WF-LANGUAGE IMPORTING E_T001S = T001S E_FSABE = FSABE EXCEPTIONS BUSAB_NOT_FOUND = 01 OTHERS = 02.

CLOSE_FORM CALL FUNCTION 'CLOSE_FORM' IMPORTING RESULT = s_ITCPP. " 0397177

END_FORM CALL FUNCTION 'END_FORM'.

ROUND_AMOUNT Call function 'ROUND_AMOUNT' exporting Amount_in = Wf-znbfs Company = Wf-bukrs Currency = Wf-waers importing Amount_out = Wf-znbfs.

ROUND_AMOUNT Call function 'ROUND_AMOUNT' exporting Amount_in = Wf-znbfw Company = Wf-bukrs Currency = Wf-waers importing Amount_out = Wf-znbfw.

CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING COMMAND = 'PROTECT'.

WRITE_FORM





CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '5000' "Neu zu 30C EXCEPTIONS "Neu zu 30C OTHERS = 01. "Neu zu 30C

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '5010'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '5001' "Neu zu 30C EXCEPTIONS "Neu zu 30C OTHERS = 01. "Neu zu 30C

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 = '5000' "Neu zu 30C EXCEPTIONS "Neu zu 30C OTHERS = 01. "Neu zu 30C

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '5010'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '6010'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '5000' "Neu zu 30C EXCEPTIONS "Neu zu 30C OTHERS = 01. "Neu zu 30C

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '5020'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '5001' "Neu zu 30C EXCEPTIONS "Neu zu 30C OTHERS = 01. "Neu zu 30C

CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING COMMAND = 'ENDPROTECT'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '0003'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '7110'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '7110' FUNCTION = 'SET' TYPE = 'TOP'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '7210'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '7210' FUNCTION = 'SET' TYPE = 'TOP'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '7020'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '7010'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '7040'.




WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '7030'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '7050'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '7060'.

CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING COMMAND = 'PROTECT'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '8030' "Neu zu 3.0C

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '8010'.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '8020' "Neu zu 3.0C

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 = FO-ELEMENTZEILE.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = FO-ELEMENTZEILE2.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '2250'. "Zinsbruch

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '2251'. "Zinsbruchzusz.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = FO-ELEMENTZEILE.

WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = '2501'. "Segmenttext

CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING COMMAND = 'ENDPROTECT'.

GET_PRINT_PARAMETERS Call function 'GET_PRINT_PARAMETERS' "156941 exporting Destination = Liprintr "156941 Mode = 'CURRENT' "156941 No_dialog = 'X' "156941 importing Out_parameters = Params. "156941

OPEN_FORM CALL FUNCTION 'OPEN_FORM' EXPORTING FORM = T056D-FORMULAR DEVICE = FODEVICE DIALOG = 'X' Archive_index = Ls_archive_index "663549 Archive_params = Ls_archive_params "663549 options = Itcpo importing New_archive_params = Ls_archive_params "663549 EXCEPTIONS CANCELED = 1 DEVICE = 2 FORM = 3 OPTIONS = 4 UNCLOSED = 5.

OPEN_FORM CALL FUNCTION 'OPEN_FORM' EXPORTING FORM = T056D-FORMULAR DEVICE = FODEVICE DIALOG = SPACE Archive_index = Ls_archive_index "663549 Archive_params = Ls_archive_params "663549 options = Itcpo importing New_archive_params = Ls_archive_params "663549 EXCEPTIONS CANCELED = 1 DEVICE = 2 FORM = 3 OPTIONS = 4 UNCLOSED = 5.

GET_PRINT_PARAMETERS Call function 'GET_PRINT_PARAMETERS' "163186 exporting "163186 Destination = Foprintr "181508 Mode = 'CURRENT' "163186 No_dialog = 'X' "163186 In_archive_parameters = Ls_archive_params "663549 importing "163186 Out_archive_parameters = Ls_archive_params "663549 Out_parameters = Params. "163186

OPEN_FORM CALL FUNCTION 'OPEN_FORM' EXPORTING FORM = T056D-FORMULAR DEVICE = 'PRINTER' DIALOG = SPACE Archive_index = Ls_archive_index "663549 Archive_params = Ls_archive_params "663549 options = Itcpo importing New_archive_params = Ls_archive_params "663549 EXCEPTIONS CANCELED = 1 DEVICE = 2 FORM = 3 OPTIONS = 4 UNCLOSED = 5.



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