SAP Reports / Programs | Payroll | Russia(PY-RU) SAP PY

PCSUBRUZ_OLD SAP ABAP INCLUDE - for HRUCALC0 - old func/operations from 4.6C (not support now)







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

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:

HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' EXPORTING persnr = pernr-pernr IMPORTING entrydate = entrydate TABLES entry_dates = entry_dates EXCEPTIONS entry_date_not_found = 1 pernr_not_assigned = 2 OTHERS = 3.

HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' EXPORTING persnr = pernr-pernr IMPORTING entrydate = entrydate TABLES entry_dates = entry_dates EXCEPTIONS entry_date_not_found = 1 pernr_not_assigned = 2 OTHERS = 3.

HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' EXPORTING persnr = pernr-pernr IMPORTING entrydate = entrydate TABLES entry_dates = entry_dates EXCEPTIONS entry_date_not_found = 1 pernr_not_assigned = 2 OTHERS = 3.

RP_CHECK_PAY_PERIOD CALL FUNCTION 'RP_CHECK_PAY_PERIOD' EXPORTING abkrs = aper-abkrs abrpr = aper-paper zanzl = p0014-zanzl zdate = p0014-zdate zeitx = p0014-zeinz zfper = p0014-zfper model = p0014-model "QXOK146729 IMPORTING rcode = returncode TABLES tabelle = idates EXCEPTIONS "QXOK146729 * no_model_found = 1. "QXOK146729 "YREP30K026643

RP_READ_T100 CALL FUNCTION 'RP_READ_T100' "YREP30K026643 EXPORTING "YREP30K026643 arbgb = sy-msgid "YREP30K026643 msgnr = sy-msgno "YREP30K026643 msgv1 = sy-msgv1 "YREP30K026643 msgv2 = sy-msgv2 "YREP30K026643 msgv3 = sy-msgv3 "YREP30K026643 msgv4 = sy-msgv4 "YREP30K026643 sprsl = sy-langu "YREP30K026643 IMPORTING "YREP30K026643 text = message_text "YREP30K026643 EXCEPTIONS "YREP30K026643 no_entry_found = 1 "YREP30K026643 OTHERS = 2. "YREP30K026643

COMPUTE_YEARS_BETWEEN_DATES CALL FUNCTION 'COMPUTE_YEARS_BETWEEN_DATES' EXPORTING first_date = dsl_old second_date = dsl modify_interval = ' ' IMPORTING years_between_dates = service_year.

COMPUTE_YEARS_BETWEEN_DATES CALL FUNCTION 'COMPUTE_YEARS_BETWEEN_DATES' EXPORTING first_date = dsl second_date = wpbp-begda modify_interval = ' ' IMPORTING years_between_dates = service_year.

RP_READ_T100 CALL FUNCTION 'RP_READ_T100' "YREP30K026643 EXPORTING "YREP30K026643 arbgb = sy-msgid "YREP30K026643 msgnr = sy-msgno "YREP30K026643 msgv1 = sy-msgv1 "YREP30K026643 msgv2 = sy-msgv2 "YREP30K026643 msgv3 = sy-msgv3 "YREP30K026643 msgv4 = sy-msgv4 "YREP30K026643 sprsl = sy-langu "YREP30K026643 IMPORTING "YREP30K026643 text = message_text "YREP30K026643 EXCEPTIONS "YREP30K026643 no_entry_found = 1 "YREP30K026643 OTHERS = 2. "YREP30K026643

RP_FILL_WAGE_TYPE_TABLE_EXT CALL FUNCTION 'RP_FILL_WAGE_TYPE_TABLE_EXT' EXPORTING appli = 'P' pernr = pernr-pernr infty = pinfty subty = psubty objps = pobjps * WAERS = SY-WAERS "QEAK11K110108 begda = pbegda endda = pendda seqnr = seqnr "XPSP30K031644 TABLES pp0001 = p0001 "input pp0007 = p0007 "input pp0008 = p0008 "input ppbwla = ppbwla "output pp0230 = p0230 "input "XPMK035581 EXCEPTIONS error_at_indirect_evaluation = 1.

RP_READ_T100 CALL FUNCTION 'RP_READ_T100' EXPORTING arbgb = 'RP' msgnr = sy-msgno msgv1 = sy-msgv1 msgv2 = sy-msgv2 msgv3 = sy-msgv3 msgv4 = sy-msgv4 sprsl = sy-langu IMPORTING text = t100_text EXCEPTIONS no_entry_found = 01.

HR_COV_MARK_TAB_WITH_AWART_GET CALL FUNCTION 'HR_COV_MARK_TAB_WITH_AWART_GET' EXPORTING p_pernr = pernr-pernr begda = ab-begda endda = ab-endda TABLES mark_tab = marktab awart_seltab = awart_seltab.

HR_COV_RECAL_AB_TIMES CALL FUNCTION 'HR_COV_RECAL_AB_TIMES' EXPORTING p_pernr = pernr-pernr ab = aux_ab obegd = aux_ab-obegd oendd = aux_ab-oendd beguz = beguz enduz = enduz calc_from = aux_ab-begda calc_to = aux_ab-endda TABLES m0001 = p0001 pws = psp_tab CHANGING abwtg = aux_ab-abwtg abrtg = aux_ab-abrtg abrst = aux_ab-abrst kaltg = aux_ab-kaltg stdaz = aux_ab-stdaz.

HR_COV_RECAL_AB_TIMES CALL FUNCTION 'HR_COV_RECAL_AB_TIMES' EXPORTING p_pernr = pernr-pernr ab = aux_ab obegd = aux_ab-obegd oendd = aux_ab-oendd beguz = beguz enduz = enduz calc_from = aux_ab-begda calc_to = aux_ab-endda TABLES m0001 = p0001 pws = psp_tab CHANGING abwtg = aux_ab-abwtg abrtg = aux_ab-abrtg abrst = aux_ab-abrst kaltg = aux_ab-kaltg stdaz = aux_ab-stdaz.

HR_COV_SPLIT_AB_BY_XNAB CALL FUNCTION 'HR_COV_SPLIT_AB_BY_XNAB' EXPORTING ppernr = pernr-pernr ab = aux_ab xnab_split = parts xnab_split_line = xnab_split_tab_wa frac_unit = unit_for_fraction TABLES ab_tab = aux_ab[] xnab_split_tab = xnab_split_tab[] CHANGING last_abznr = ab_znr.

HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' EXPORTING persnr = pernr-pernr IMPORTING entrydate = entrydate TABLES entry_dates = entry_dates EXCEPTIONS entry_date_not_found = 1 pernr_not_assigned = 2 OTHERS = 3.

HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' EXPORTING persnr = pernr-pernr IMPORTING entrydate = entrydate TABLES entry_dates = entry_dates EXCEPTIONS entry_date_not_found = 1 pernr_not_assigned = 2 OTHERS = 3.

HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' EXPORTING persnr = pernr-pernr IMPORTING entrydate = entrydate TABLES entry_dates = entry_dates EXCEPTIONS entry_date_not_found = 1 pernr_not_assigned = 2 OTHERS = 3.

HRPY_AVERA_USE_WAGETYPE CALL FUNCTION 'HRPY_AVERA_USE_WAGETYPE' EXPORTING sw_prot = sw_prot currency = calc_currency TABLES it = it i51av_a = i51av_a i51av_p = i51av_p av_it = av_it iptext = ptext.

HRPY_AVERA_USE_FROZEN_AVERAGE





CALL FUNCTION 'HRPY_AVERA_USE_FROZEN_AVERAGE' EXPORTING sw_prot = sw_prot currency = calc_currency TABLES i51av_a = i51av_a i51av_p = i51av_p av_it = av_it average = average wpbp = wpbp iptext = ptext ab = ab it = it.

HRPY_AVERA_GET_ACC_PERIODS CALL FUNCTION 'HRPY_AVERA_GET_ACC_PERIODS' EXPORTING pernr = pernr-pernr molga = calcmolga aper = aper repid = sy-cprog IMPORTING acc_begda = acc_begda acc_endda = acc_endda TABLES iwpbp = wpbp i51av_a = i51av_a i51av_p = i51av_p av_it = av_it ab = ab v0 = v0 avrules_quotas = avrules_quotas iwagetypes = iwagetypes i2006 = i2006 EXCEPTIONS quota_not_found_in_2006 = 1.

HRPY_AVERA_AVERAGE_PERIOD CALL FUNCTION 'HRPY_AVERA_AVERAGE_PERIOD' EXPORTING aper = aper molga = calcmolga employee_number = pernr-pernr *ACC_BRL9CK056265 accrual_begda = acc_begda accrual_endda = acc_endda *ACC_BRL9CK056265 IMPORTING max_week = max_week max_month = max_month max_roll_month = max_roll_month with_current_period = with_current_period av_endda_week = av_endda_week av_endda_month = av_endda_month av_endda_roll_month = av_endda_roll_month warning = warning TABLES i51av_a = i51av_a i51av_a_week = i51av_a_week i51av_a_month = i51av_a_month i51av_a_roll_month = i51av_a_roll_month *ACC_BRL9CK056265 i51av_a_accrual_period = i51av_a_accrual_period *ACC_BRL9CK056265 av_rgdir = av_rgdir rgdir = rgdir results = results tbuff = tbuff buffer_dir = buffer_dir EXCEPTIONS wrong_paytype = 1 not_end_of_period = 2 technical_error = 3 OTHERS = 4.

HR_CONVERT_CURRENCY_RESULT CALL FUNCTION 'HR_CONVERT_CURRENCY_RESULT' EXPORTING country_grouping = calcmolga conversion_date = aper-endda foreign_currency = results-inter-versc-waers local_currency = calc_currency pernr = pernr-pernr seqnr = results-evp-seqnr TABLES result_table = results-inter-rt cumulated_result_table = results-inter-crt subsequent_time_ticket_table = results-inter-ls arrears_table = results-inter-arrrs deduction_table = results-inter-ddntk average_table = results-inter-average CHANGING p_buffer_t512w = buffer_t512w EXCEPTIONS invalid_wagetype = 1 error_conversion = 2 OTHERS = 3.

CD_READ_PREVIOUS CALL FUNCTION 'CD_READ_PREVIOUS' EXPORTING in_record = new_rgdir * EXACT = ' ' * LAST = ' ' * ALL = ' ' * IGNORE_ABKRS = ' ' TABLES rgdir = new_rgdir out_rgdir = delete_rgdir EXCEPTIONS no_record_found = 1 OTHERS = 2 .

HRPY_AVERA_LOOP_AT_WEEK CALL FUNCTION 'HRPY_AVERA_LOOP_AT_WEEK' EXPORTING max_weeks = max_week av_endda_week = av_endda_week with_current_period = with_current_period aper = aper employee_number = pernr-pernr TABLES i51av_a_week = i51av_a_week i51av_r = i51av_r i51av_roc = i51av_roc i51av_b = i51av_b i51av_c = i51av_c rgdir = av_rgdir results = results cumulation = cumulation result_rel_payr_all = result_rel_payr result_rel_period = result_rel_period datumsangabe = datumsangabe p0000 = p0000 p0001 = p0001.

HRPY_AVERA_LOOP_AT_MONTH

HR_RU_AVERA_LOOP_AT_MONTH * CALL FUNCTION 'HRPY_AVERA_LOOP_AT_MONTH' CALL FUNCTION 'HR_RU_AVERA_LOOP_AT_MONTH' EXPORTING max_month = max_month av_endda_month = av_endda_month with_current_period = with_current_period aper = aper employee_number = pernr-pernr TABLES i51av_a_month = i51av_a_month i51av_r = i51av_r i51av_roc = i51av_roc i51av_b = i51av_b i51av_c = i51av_c rgdir = av_rgdir results = results cumulation = cumulation result_rel_payr_all = result_rel_payr result_rel_period = result_rel_period datumsangabe = datumsangabe p0000 = p0000 p0001 = p0001.

HRPY_AVERA_LOOP_AT_ROLL_MONTH CALL FUNCTION 'HRPY_AVERA_LOOP_AT_ROLL_MONTH' EXPORTING max_roll_month = max_roll_month av_endda_roll_month = av_endda_roll_month with_current_period = with_current_period aper = aper employee_number = pernr-pernr TABLES i51av_a_roll_month = i51av_a_roll_month i51av_r = i51av_r i51av_roc = i51av_roc i51av_b = i51av_b i51av_c = i51av_c rgdir = av_rgdir results = results cumulation = cumulation result_rel_payr_all = result_rel_payr result_rel_period = result_rel_period datumsangabe = datumsangabe p0000 = p0000 p0001 = p0001.

HRPY_AVERA_LOOP_AT_ACCPERIOD CALL FUNCTION 'HRPY_AVERA_LOOP_AT_ACCPERIOD' EXPORTING av_endda_month = av_endda_month with_current_period = with_current_period aper = aper employee_number = pernr-pernr TABLES avrules_quotas = avrules_quotas i51av_a_accrual_period = i51av_a_accrual_period i51av_r = i51av_r i51av_roc = i51av_roc i51av_b = i51av_b i51av_c = i51av_c rgdir = av_rgdir results = results cumulation_acc = cumulation_acc result_rel_payr_acc = result_rel_payr_acc result_rel_period_acc = result_rel_period_acc datumsangabe = datumsangabe p0000 = p0000 p0001 = p0001.

HRPY_AVERA_COMPARE_WGTYP CALL FUNCTION 'HRPY_AVERA_COMPARE_WGTYP' TABLES i51av_a = i51av_a i51av_p = i51av_p av_it = av_it it = it.

HRPY_AVERA_KEEP_FROZEN_AVERAGE CALL FUNCTION 'HRPY_AVERA_KEEP_FROZEN_AVERAGE' EXPORTING aper = aper TABLES i51av_a = save_i51av_a i51av_p = i51av_p av_it = it average = average ab = ab.

HR_PAYROLL CALL FUNCTION 'HR_PAYROLL' EXPORTING payroll_area = aper-abkrs payroll_period = dialog-payroll_period payroll_year = dialog-payroll_year * payroll_type = '' * payroll_id = '' * payroll_ocrsn = '' * payroll_date = '' selection_variant = t52ocv-varid program_name = t52ocv-repid * off_cycle = '' log_mem_key = m_key country_grp = calcmolga tst_on = 'X' * obj_iprel = obj_iprel "XAIAHRK054770 TABLES employee_numbers = package_abkrs_payid * advance_periods = advance buffer = tbuff buffer_directory = buffer_dir delete_pclx = del_pclx_tab * ps_oper = psoper EXCEPTIONS program_not_exist = 1 variant_not_exist = 2 missing_parameter = 3 wrong_parameter = 4 OTHERS = 5.

HR_PL_IMPORT_LOG_FROM_MEMORY CALL FUNCTION 'HR_PL_IMPORT_LOG_FROM_MEMORY' EXPORTING mem_key = m_key.

HR_PL_EXPORT_LOG_TO_MEMORY * CALL FUNCTION 'HR_PL_EXPORT_LOG_TO_MEMORY' * EXPORTING * MEM_KEY = memo_key.

HR_COPY_TBUFF_TO_BUFFER CALL FUNCTION 'HR_COPY_TBUFF_TO_BUFFER' EXPORTING database_table = 'PCL2' clusterid = 'UR' TABLES buffer = tbuff[] buffer_directory = buffer_dir[] EXCEPTIONS OTHERS = 0.

PYXX_READ_PAYROLL_RESULT CALL FUNCTION 'PYXX_READ_PAYROLL_RESULT' EXPORTING * clusterid = 'UR' employeenumber = pernr-pernr sequencenumber = seqnr * read_only_buffer = 'X' read_only_international = 'X' CHANGING payroll_result = result EXCEPTIONS illegal_isocode_or_clusterid = 1 error_generating_import = 2 import_mismatch_error = 3 subpool_dir_full = 4 no_read_authority = 5 no_record_found = 6 versions_do_not_match = 7 OTHERS = 8.

HR_SEN_CALCULATE_COMPLETE CALL FUNCTION 'HR_SEN_CALCULATE_COMPLETE' EXPORTING id_pernr = pernr-pernr id_molga = calcmolga id_proce = as-parm1 id_sel_date = wpbp-begda id_calty = '1' id_begda = '18000101' id_endda = l_datum IMPORTING es_duration = duration EXCEPTIONS OTHERS = 7.



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