RPCDTJ00 SAP ABAP INCLUDE - PRELIMINARY PROGRAM - DATA MEDIUM EXCHANGE FOR SEPARATE PAYMENT RUN
RPCDTJ00 is a standard ABAP INCLUDE available within your SAP system (depending on your version and release level). It is used for INCLUDE for DME program RPCDTBX0...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 RPCDTJ00 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 RPCDTJ00. "Basic submit
SUBMIT RPCDTJ00 AND RETURN. "Return to original report after report execution complete
SUBMIT RPCDTJ00 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: PRELIMINARY PROGRAM - DATA MEDIUM EXCHANGE FOR SEPARATE PAYMENT RUN
INCLUDES used within this REPORT RPCDTJ00
INCLUDE RPCDTD00.
INCLUDE RPCDTD10.
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:
RP_SET_NAME_FORMAT CALL FUNCTION 'RP_SET_NAME_FORMAT' "HB_2000/01/21 EXPORTING "HB_2000/01/21 REPID = sy_repid "HB_2000/01/21 IMPORTING "HB_2000/01/21 FORMAT = format. "HB_2000/01/21
HR_EMPLOYEE_ENQUEUE CALL FUNCTION 'HR_EMPLOYEE_ENQUEUE' "GWY849631 EXPORTING NUMBER = pernr-pernr IMPORTING RETURN = i_return LOCKING_USER = i_lockuser.
RP_GET_CURRENCY CALL FUNCTION 'RP_GET_CURRENCY' "XAGPH4K016009 EXPORTING "XAGPH4K016009 MOLGA = VERSC-MOLGA "XAGPH4K016009 IMPORTING "XAGPH4K016009 WAERS = VERSC-WAERS "HB_AHRK043270 EXCEPTIONS "XAGPH4 "HB_AHRK043270 * MOLGA_NOT_IN_T001P = 1 "can never occur "XAGPH4 NO_ENTRY_FOUND_IN_TABLE_T001 = 2 "XAGPH4 "HB_AHRK043270 NO_ENTRY_FOUND_IN_TABLE_T500P = 3 "XAGPH4 "HB_AHRK043270 NO_ENTRY_FOUND_IN_TABLE_T500C = 4 "XAGPH4 "HB_AHRK043270 OTHERS = 5. "XAGPH4 "HB_AHRK043270
RP_EDIT_NAME CALL FUNCTION 'RP_EDIT_NAME' "HB_2000/01/21 EXPORTING "HB_2000/01/21 FORMAT = format "HB_2000/01/21 LANGU = sy-langu "HB_2000/01/21 MOLGA = T001P-Molga "HB_2000/01/21 PP0002 = P0002 "HB_2000/01/21 IMPORTING "HB_2000/01/21 EDIT_NAME = edit_name "HB_2000/01/21 RETCODE = ret_code. "HB_2000/01/21
RP_CHECK_PAY_PERIOD CALL FUNCTION 'RP_CHECK_PAY_PERIOD' EXPORTING ABKRS = P0001-ABKRS ABRPR = AAPER ZANZL = P0011-ZANZL ZDATE = P0011-ZDATE ZEITX = P0011-ZEINZ ZFPER = P0011-ZFPER IMPORTING RCODE = I_RCODE "XAGPH4K016471 TABLES TABELLE = IDATES.
RP_CHECK_PAY_PERIOD CALL FUNCTION 'RP_CHECK_PAY_PERIOD' EXPORTING ABKRS = P0001-ABKRS ABRPR = AAPER ZANZL = P0014-ZANZL ZDATE = P0014-ZDATE ZEITX = P0014-ZEINZ ZFPER = P0014-ZFPER IMPORTING RCODE = I_RCODE "XAGPH4K016471 TABLES TABELLE = IDATES.
BAPI_EMPLOYEE_DEQUEUE CALL FUNCTION 'BAPI_EMPLOYEE_DEQUEUE' "GWY849631 EXPORTING NUMBER = pernr-pernr.
HR_INITIALIZE_BUFFER CALL FUNCTION 'HR_INITIALIZE_BUFFER'. "JGONG1716160
RP_CHECK_PAY_PERIOD CALL FUNCTION 'RP_CHECK_PAY_PERIOD' EXPORTING ABKRS = P0001-ABKRS ABRPR = AAPER ZANZL = P0011-ZANZL ZDATE = P0011-ZDATE ZEITX = P0011-ZEINZ ZFPER = P0011-ZFPER IMPORTING RCODE = I_RCODE TABLES TABELLE = IDATES.
RP_CHECK_PAY_PERIOD CALL FUNCTION 'RP_CHECK_PAY_PERIOD' EXPORTING ABKRS = P0001-ABKRS ABRPR = AAPER ZANZL = P0014-ZANZL ZDATE = P0014-ZDATE ZEITX = P0014-ZEINZ ZFPER = P0014-ZFPER IMPORTING * rcode = sy-subrc RCODE = I_RCODE TABLES TABELLE = IDATES.
HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING PERNR = i_pernr INFTY = '0011' BEGDA = i_begda ENDDA = i_endda TABLES INFTY_TAB = ct_p0011 EXCEPTIONS INFTY_NOT_FOUND = 1 OTHERS = 2.
HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING PERNR = i_pernr INFTY = '0014' BEGDA = i_begda ENDDA = i_endda TABLES INFTY_TAB = ct_p0014 EXCEPTIONS INFTY_NOT_FOUND = 1 OTHERS = 2.
HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING PERNR = i_pernr INFTY = '0015' BEGDA = i_begda ENDDA = i_endda TABLES INFTY_TAB = ct_p0015 EXCEPTIONS INFTY_NOT_FOUND = 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 RPCDTJ00 or its description.