RPCPRTJ0 SAP ABAP Report - Payment Report (Total No. of Payments)
RPCPRTJ0 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for In Japan, the employers must submit the legal form
If you would like to execute this report or see the full code listing simply enter RPCPRTJ0 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 RPCPRTJ0. "Basic submit
SUBMIT RPCPRTJ0 AND RETURN. "Return to original report after report execution complete
SUBMIT RPCPRTJ0 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Selection Text: SCRIPT_Y = Use
Selection Text: SCRIPT_N = Not use
Selection Text: RCTVC = D .
Selection Text: R-DATE = Report Date
Selection Text: P_YEAR = Applied Year
Selection Text: PX_LFVAR = Form Variant
Selection Text: PX_LFORM = Form Name
Selection Text: P-TXT142 = Kinyukikan syozaichi
Selection Text: P-TXT141 = Kinyukikan meisyou
Selection Text: P-TXT130 = Syokatu Zeimusyo
Selection Text: P-TXT090 = Jigyo syumoku
Selection Text: P-TXT082 = Kyuyoshirai kijitsu
Selection Text: P-TXT081 = Kyuyoshirai houhou
Selection Text: P-TXT072 = Kaikeijimusyo Tel,no
Selection Text: P-TXT071 = Kaikeijimusyo meisyou
Selection Text: P-TXT063 = Renrakusya Tel,no
Selection Text: P-TXT062 = Renrakusya shimei
Selection Text: P-TXT061 = Renrakusya kakari
Selection Text: P-TXT050 = Keiri sakininsya
Selection Text: FORM = form name
Title: Payment Report (Total No. of Payments)
Text Symbol: T11 = Employee’s details
Text Symbol: T10 = Summary of payment reports
Text Symbol: T09 = List Display (with employee detail)
Text Symbol: T08 = List Display
Text Symbol: T07 = Form Display
Text Symbol: T06 = Result Display
Text Symbol: T05 = Applied Year
Text Symbol: T04 = Not use
Text Symbol: T03 = Form name
Text Symbol: T02 = Use
Text Symbol: SC1 = Form Output
Text Symbol: I01 = No Municipal City to process
Text Symbol: B01 = Display form
Text Symbol: 003 = O
Text Symbol: 002 = Additional selection
INCLUDES used within this REPORT RPCPRTJ0
INCLUDE RPPPXD00.
INCLUDE RPPPXD10.
INCLUDE RPC2RJJ0.
INCLUDE RPC2YJJ1. "JRFK145028
INCLUDE RPC2CD09. "N836765
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_CONVERT_JAPAN_DATE_OUT CALL FUNCTION 'RP_CONVERT_JAPAN_DATE_OUT' EXPORTING seireki = gv_begin_date_of_next_year IMPORTING nengo = gv_wareki_era_name nen = gv_wareki_year.
RP_CONVERT_JAPAN_DATE_OUT CALL FUNCTION 'RP_CONVERT_JAPAN_DATE_OUT' EXPORTING seireki = r-date IMPORTING nengo = gv_submit_era_name nen = gv_submit_year tsuki = gv_submit_month hi = gv_submit_date.
RP_CONVERT_JAPAN_DATE_OUT CALL FUNCTION 'RP_CONVERT_JAPAN_DATE_OUT' EXPORTING seireki = r-date IMPORTING nengo = gv_wareki_rep_date+0(4) nen = gv_wareki_rep_date+4(2) nen_text = gv_wareki_rep_date+6(2) tsuki = gv_wareki_rep_date+8(2) tsuki_text = gv_wareki_rep_date+10(2) hi = gv_wareki_rep_date+12(2) hi_text = gv_wareki_rep_date+14(2).
RP_CONVERT_JAPAN_DATE_OUT CALL FUNCTION 'RP_CONVERT_JAPAN_DATE_OUT' "N910590 EXPORTING "N910590 seireki = gv_begin_date_of_this_year "N910590 IMPORTING "N910590 nengo = gv_paper_era_name "N910590 nen = gv_paper_wareki_year. "N910590
HR_JP_ADJUST_STRING_LENGTH CALL FUNCTION 'HR_JP_ADJUST_STRING_LENGTH' "JPYYPL0K008083 EXPORTING "JPYYPL0K008083 iv_string = t5j63-ctxkj "JPYYPL0K008083 CHANGING "JPYYPL0K008083 cv_length = chk-len. "JPYYPL0K008083
HR_JP_ADJUST_STRING_LENGTH CALL FUNCTION 'HR_JP_ADJUST_STRING_LENGTH' "JPYYPL0K008083 EXPORTING "JPYYPL0K008083 iv_string = emr-addr3 "JPYYPL0K008083 CHANGING "JPYYPL0K008083 cv_length = chk-len. "JPYYPL0K008083
HR_JP_ADJUST_STRING_LENGTH CALL FUNCTION 'HR_JP_ADJUST_STRING_LENGTH' "JPYYPL0K008083 EXPORTING "JPYYPL0K008083 iv_string = edit-jgnnm "JPYYPL0K008083 CHANGING "JPYYPL0K008083 cv_length = chk-len. "JPYYPL0K008083
HR_JP_ADJUST_STRING_LENGTH CALL FUNCTION 'HR_JP_ADJUST_STRING_LENGTH' "JPYYPL0K008083 EXPORTING "JPYYPL0K008083 iv_string = edit-jgnnm "JPYYPL0K008083 CHANGING "JPYYPL0K008083 cv_length = chk-len. "JPYYPL0K008083
HR_JP_ADJUST_STRING_LENGTH CALL FUNCTION 'HR_JP_ADJUST_STRING_LENGTH' "JPYYPL0K008083 EXPORTING "JPYYPL0K008083 iv_string = emr-name "JPYYPL0K008083 CHANGING "JPYYPL0K008083 cv_length = chk-len. "JPYYPL0K008083
HR_JP_ADJUST_STRING_LENGTH CALL FUNCTION 'HR_JP_ADJUST_STRING_LENGTH' "JPYYPL0K008083 EXPORTING "JPYYPL0K008083 iv_string = emr-name "JPYYPL0K008083 CHANGING "JPYYPL0K008083 cv_length = chk-len. "JPYYPL0K008083
OPEN_FORM CALL FUNCTION 'OPEN_FORM' EXPORTING device = 'PRINTER' dialog = 'X' form = form language = sy-langu OPTIONS = p_option EXCEPTIONS canceled = 1 device = 2 form = 3 OPTIONS = 4 unclosed = 5 mail_options = 6 archive_error = 7 OTHERS = 8.
CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING command = 'NEW-PAGE' EXCEPTIONS unopened = 1 unstarted = 2 OTHERS = 3.
WRITE_FORM CALL FUNCTION 'WRITE_FORM'.
CLOSE_FORM CALL FUNCTION 'CLOSE_FORM'.
HR_FEATURE_BACKFIELD CALL FUNCTION 'HR_FEATURE_BACKFIELD' EXPORTING feature = '22TXA' struc_content = pme04 kind_of_error = '4' IMPORTING back = cv_official_resident_ad_subty.
HR_LEAVING_DATE CALL FUNCTION 'HR_LEAVING_DATE' EXPORTING persnr = iv_pernr endda = iv_endda IMPORTING leavingdate = cv_leaving_date TABLES leaving_dates = lt_leaving_dates EXCEPTIONS leaving_date_not_found = 4.
HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' EXPORTING persnr = pernr-pernr begda = cv_leaving_date endda = gv_begin_date_of_next_year IMPORTING entrydate = lv_rehire_date EXCEPTIONS others = 4.
H99B_OPEN_LFORM_JOB CALL FUNCTION 'H99B_OPEN_LFORM_JOB' EXPORTING i_molga = hr99b_form_sel-molga i_fogroup = hr99b_form_sel-fogroup i_folname = hr99b_form_sel-folname i_fovariant = hr99b_form_sel-fovariant OPTIONS = l_itcpo EXCEPTIONS OTHERS = 99.
H99B_OUTPUT_LFORM CALL FUNCTION 'H99B_OUTPUT_LFORM' EXPORTING i_molga = hr99b_form_sel-molga i_fogroup = hr99b_form_sel-fogroup i_folname = hr99b_form_sel-folname i_fovariant = hr99b_form_sel-fovariant i_data_struc = i_data EXCEPTIONS OTHERS = 99.
H99B_OUTPUT_LFORM CALL FUNCTION 'H99B_OUTPUT_LFORM' EXPORTING i_molga = hr99b_form_sel-molga i_fogroup = hr99b_form_sel-fogroup i_folname = hr99b_form_sel-folname i_fovariant = hr99b_form_sel-fovariant i_data_struc = i_data EXCEPTIONS OTHERS = 99.
H99B_CLOSE_LFORM_JOB CALL FUNCTION 'H99B_CLOSE_LFORM_JOB' EXCEPTIONS OTHERS = 2.
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_structure_name = 'p22j_prtj0_MOD' CHANGING ct_fieldcat = lt_fieldcat EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3.
HR_PAL_CREATE_NODE_CATEG CALL FUNCTION 'HR_PAL_CREATE_NODE_CATEG' EXPORTING i_categ_id = 'MOD' it_fieldcat = lt_fieldcat * i_structure_name = 'p22j_prtj0_MOD' is_layout = ls_alv_layout * i_clbk = is_routine is_pushbuttons = is_but * i_rowmark = 'X' EXCEPTIONS program_error = 1 OTHERS = 2.
HR_PAL_NODE_ADD CALL FUNCTION 'HR_PAL_NODE_ADD' EXPORTING i_relatkey = 'ROOT' i_node_txt = lv_title i_categ_id = 'MOD' i_icon = icon_list IMPORTING e_node_key = cv_mod_node EXCEPTIONS program_error = 1 OTHERS = 2.
HR_PAL_NODE_ADD_ROW CALL FUNCTION 'HR_PAL_NODE_ADD_ROW' EXPORTING i_node_key = iv_mod_node i_row_data = is_mod EXCEPTIONS program_error = 1 OTHERS = 2.
HR_PAL_LOG_DISPLAY CALL FUNCTION 'HR_PAL_LOG_DISPLAY' EXPORTING i_s_display_profile = lv_display_profile EXCEPTIONS program_error = 1 no_logs = 2 OTHERS = 3.
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_structure_name = 'p22j_prtj0_SUM' CHANGING ct_fieldcat = lt_fieldcat EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3.
HR_PAL_CREATE_NODE_CATEG CALL FUNCTION 'HR_PAL_CREATE_NODE_CATEG' EXPORTING i_categ_id = 'SUM' it_fieldcat = lt_fieldcat * i_structure_name = 'p22j_prtj0_SUM' is_layout = ls_alv_layout * i_clbk = is_routine is_pushbuttons = is_but i_rowmark = 'X' EXCEPTIONS program_error = 1 OTHERS = 2.
HR_PAL_NODE_ADD CALL FUNCTION 'HR_PAL_NODE_ADD' EXPORTING i_relatkey = iv_mod_node i_node_txt = text-t10 i_categ_id = 'SUM' i_icon = icon_list IMPORTING e_node_key = cv_sum_node EXCEPTIONS program_error = 1 OTHERS = 2.
HR_PAL_NODE_ADD_ROW CALL FUNCTION 'HR_PAL_NODE_ADD_ROW' EXPORTING i_node_key = iv_sum_node i_row_data = is_sum EXCEPTIONS program_error = 1 OTHERS = 2.
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_structure_name = 'p22j_prtj0_EMP' CHANGING ct_fieldcat = lt_fieldcat EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3.
HR_PAL_CREATE_NODE_CATEG CALL FUNCTION 'HR_PAL_CREATE_NODE_CATEG' EXPORTING i_categ_id = 'EMP' it_fieldcat = lt_fieldcat * i_structure_name = 'p22j_prtj0_EMP' is_layout = ls_alv_layout * i_clbk = is_routine is_pushbuttons = is_but * i_rowmark = 'X' EXCEPTIONS program_error = 1 OTHERS = 2.
HR_PAL_NODE_ADD CALL FUNCTION 'HR_PAL_NODE_ADD' EXPORTING i_relatkey = iv_mod_node i_node_txt = text-t11 i_categ_id = 'EMP' i_icon = icon_list IMPORTING e_node_key = cv_emp_node EXCEPTIONS program_error = 1 OTHERS = 2.
HR_PAL_NODE_ADD_ROW CALL FUNCTION 'HR_PAL_NODE_ADD_ROW' EXPORTING i_node_key = iv_emp_node i_row_data = ls_emp EXCEPTIONS program_error = 1 OTHERS = 2.
RP_EDIT_NAME CALL FUNCTION 'RP_EDIT_NAME' EXPORTING langu = sy-langu molga = lv_molga format = lc_format_kanji pp0002 = is_p0002 IMPORTING edit_name = lv_edit_name retcode = lv_subrc.
RP_EDIT_NAME CALL FUNCTION 'RP_EDIT_NAME' EXPORTING langu = sy-langu molga = lv_molga format = lc_format_kana pp0002 = is_p0002 IMPORTING edit_name = lv_edit_name retcode = lv_subrc.
CALL FUNCTION 'RP_EDIT_NAME' EXPORTING langu = sy-langu molga = lv_molga format = lc_format_kanji_koseki pp0002 = p0002 IMPORTING edit_name = lv_edit_name retcode = lv_subrc.
RP_EDIT_NAME CALL FUNCTION 'RP_EDIT_NAME' EXPORTING langu = sy-langu molga = lv_molga format = lc_format_kana_koseki pp0002 = is_p0002 IMPORTING edit_name = lv_edit_name retcode = lv_subrc.
HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' EXPORTING persnr = iv_pernr endda = iv_endda IMPORTING entrydate = cv_entry_date TABLES entry_dates = lt_entry_dates EXCEPTIONS entry_date_not_found = 4.
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 RPCPRTJ0 or its description.