SAP Reports / Programs

RPCJAGH2 SAP ABAP Report - Monthly reports - status generation - 2003







RPCJAGH2 is a standard Executable ABAP Report 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 RPCJAGH2 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 RPCJAGH2. "Basic submit
SUBMIT RPCJAGH2 AND RETURN. "Return to original report after report execution complete
SUBMIT RPCJAGH2 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 RPCJAGH2

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_FEATURE_BACKFIELD call function 'HR_FEATURE_BACKFIELD' exporting feature = '21PS1' struc_content = lx_pme04 kind_of_error = '2' importing back = l_jogv exceptions others = 7.

HR_HU_TECHN_AZON call function 'HR_HU_TECHN_AZON' exporting pernr = pernr-pernr ref_date = l_begda importing tazo2 = l_tazo2 tazo1 = l_tazo1.

HR_HU_UTOLSO_BELEPES * CALL FUNCTION 'HR_HU_UTOLSO_BELEPES' * EXPORTING * PER_NR = PERNR-PERNR * REF_DATE = F_ENDHO * IMPORTING * LAST_HIRE = F_BEGDA * EXCEPTIONS * NOT_FOUND = 1 * T5H4E_ERROR = 2 * P0041_BEGDA = 3 * P0041_FUTURE = 4 * P0041_SEQUENCE = 5 * OTHERS = 6.

HR_HU_UTOLSO_KILEPES * CALL FUNCTION 'HR_HU_UTOLSO_KILEPES' * EXPORTING * PER_NR = PERNR-PERNR * REF_DATE = F_ENDHO * IMPORTING * LAST_FIRE = F_ENDDA * EXCEPTIONS * NOT_FOUND = 1 * OTHERS = 2.

HR_HU_UTOLSO_BELEPES call function 'HR_HU_UTOLSO_BELEPES' exporting per_nr = pernr-pernr ref_date = dszept1 importing last_hire = g_belep exceptions not_found = 1 t5h4e_error = 2 p0041_begda = 3 p0041_future = 4 p0041_sequence = 5 others = 6.

HR_HU_UTOLSO_KILEPES call function 'HR_HU_UTOLSO_KILEPES' exporting per_nr = pernr-pernr ref_date = dszept1 importing last_fire = g_kilep exceptions not_found = 1 others = 2.

HR_HU_DATE_INTERVAL call function 'HR_HU_DATE_INTERVAL' exporting begda = p0636-begda endda = p0636-endda importing ts_ev = l_ts_ev ts_ho = l_ts_ho tsnap = l_tsnap.

HR_HU_DATE_INTERVAL_SUM * CALL FUNCTION 'HR_HU_DATE_INTERVAL_SUM' * EXPORTING * PERNR = PERNR-PERNR * IMPORTING * TO_EV_KIM = G_TO_EV_KIM * TO_HO_KIM = G_TO_HO_KIM * TONAP_KIM = G_TONAP_KIM * TO_EV_KIMK = G_TO_EV_KIMK * TO_HO_KIMK = G_TO_HO_KIMK * TONAP_KIMK = G_TONAP_KIMK * TO_EV_KIH = G_TO_EV_KIH * TO_HO_KIH = G_TO_HO_KIH * TONAP_KIH = G_TONAP_KIH * TO_EV = G_TO_EV * TO_HO = G_TO_HO * TONAP = G_TONAP * NEGAT = L_NEGAT.

HR_HU_DATE_INTERVAL_SUM_SUBTY call function 'HR_HU_DATE_INTERVAL_SUM_SUBTY' exporting pernr = pernr-pernr subty = 'KIM' importing to_ev = g_to_ev_kim to_ho = g_to_ho_kim tonap = g_tonap_kim * tj_ev = $tj_ev * tj_ho = $tj_ho * tjnap = $tjnap * tv_ev = $tv_ev * tv_ho = $tv_ho * tvnap = $tvnap .

HR_HU_DATE_INTERVAL_SUM_SUBTY call function 'HR_HU_DATE_INTERVAL_SUM_SUBTY' exporting pernr = pernr-pernr subty = 'KIMK' importing to_ev = g_to_ev_kimk to_ho = g_to_ho_kimk tonap = g_tonap_kimk * tj_ev = $tj_ev * tj_ho = $tj_ho * tjnap = $tjnap * tv_ev = $tv_ev * tv_ho = $tv_ho * tvnap = $tvnap .

HR_HU_DATE_INTERVAL_SUM_SUBTY call function 'HR_HU_DATE_INTERVAL_SUM_SUBTY' exporting pernr = pernr-pernr subty = 'KIH' importing to_ev = g_to_ev_kih to_ho = g_to_ho_kih tonap = g_tonap_kih * tj_ev = $tj_ev * tj_ho = $tj_ho * tjnap = $tjnap * tv_ev = $tv_ev * tv_ho = $tv_ho * tvnap = $tvnap .

HR_HU_DATE_INTERVAL_SUMMA call function 'HR_HU_DATE_INTERVAL_SUMMA' exporting pernr = pernr-pernr importing to_ev = g_to_ev to_ho = g_to_ho tonap = g_tonap * TJ_EV = * TJ_HO = * TJNAP = * TV_EV = * TV_HO = * TVNAP = exceptions negativ = 1 others = 2 .

HR_HU_DATE_INTERVAL_SUM_SUBTY call function 'HR_HU_DATE_INTERVAL_SUM_SUBTY' exporting pernr = pernr-pernr subty = 'JTAR' importing to_ev = g_to_ev_jtar to_ho = g_to_ho_jtar tonap = g_tonap_jtar * tj_ev = q0639-tj_ev_jtar * tj_ho = q0639-tj_ho_jtar * tjnap = q0639-tjnap_jtar * tv_ev = q0639-tv_ev_jtar * tv_ho = q0639-tv_ho_jtar * tvnap = q0639-tvnap_jtar .

HR_HU_DATE_PLUS_INTERVAL call function 'HR_HU_DATE_PLUS_INTERVAL' exporting add_ev = g_to_ev_jtar add_ho = g_to_ho_jtar addnap = g_tonap_jtar changing datum = g_jkezd.

HR_HU_DATE_INTERVAL call function 'HR_HU_DATE_INTERVAL' exporting begda = p0636-begda endda = p0636-endda importing ts_ev = l_ts_ev ts_ho = l_ts_ho tsnap = l_tsnap.

HR_HU_DATE_INTERVAL call function 'HR_HU_DATE_INTERVAL' exporting begda = p0636-begda endda = p0636-endda importing ts_ev = l_ts_ev ts_ho = l_ts_ho tsnap = l_tsnap.

HR_HU_DATE_INTERVAL_ADD call function 'HR_HU_DATE_INTERVAL_ADD' exporting add_ev = p0639-to_ev_korr add_ho = p0639-to_ho_korr addnap = p0639-tonap_korr changing mod_ev = $to_ev2 mod_ho = $to_ho2 modnap = $tonap2.

HR_HU_DATE_INTERVAL_SUMMA call function 'HR_HU_DATE_INTERVAL_SUMMA' exporting pernr = pernr-pernr importing to_ev = l_to_ev to_ho = l_to_ho tonap = l_tonap exceptions negativ = 1 others = 2.

HR_HU_UTOLSO_BELEPES





call function 'HR_HU_UTOLSO_BELEPES' exporting per_nr = pernr-pernr ref_date = p0639-begda importing last_hire = l_kinev exceptions not_found = 1 t5h4e_error = 2 p0041_begda = 3 p0041_future = 4 p0041_sequence = 5 others = 6.

HR_HU_DATE_INTERVAL_SUM_SUBTY call function 'HR_HU_DATE_INTERVAL_SUM_SUBTY' exporting pernr = pernr-pernr subty = 'JTAR' importing to_ev = l_to_ev_jtar to_ho = l_to_ho_jtar tonap = l_tonap_jtar * tj_ev = q0639-tj_ev_jtar * tj_ho = q0639-tj_ho_jtar * tjnap = q0639-tjnap_jtar * tv_ev = q0639-tv_ev_jtar * tv_ho = q0639-tv_ho_jtar * tvnap = q0639-tvnap_jtar .

HR_HU_DATE_PLUS_INTERVAL call function 'HR_HU_DATE_PLUS_INTERVAL' exporting add_ev = l_to_ev_jtar add_ho = l_to_ho_jtar addnap = l_tonap_jtar changing datum = l_jkezd.

RP_GET_CURRENCY call function 'RP_GET_CURRENCY' exporting molga = c_molga importing waers = g_waers exceptions molga_not_in_t001p = 1 no_entry_found_in_table_t001 = 2 no_entry_found_in_table_t500p = 3 no_entry_found_in_table_t500c = 4 others = 5.

HR_HU_PS_TART_TAV_IDOSZAK_2001 call function 'HR_HU_PS_TART_TAV_IDOSZAK_2001' exporting ref_begin = f_begda ref_end = f_endda per_nr = pernr-pernr tables perm_per = lt_p21h2 exceptions bad_dates = 1 t554s_error = 2 others = 3.

ENQUEUE_E_TABLE call function 'ENQUEUE_E_TABLE' exporting mode_rstable = 'E' tabname = 'T5HPBSJF' varkey = l_varkey x_tabname = ' ' x_varkey = ' ' _scope = '2' _wait = ' ' _collect = ' ' exceptions foreign_lock = 1 system_failure = 2 others = 3.

DEQUEUE_E_TABLE call function 'DEQUEUE_E_TABLE' exporting mode_rstable = 'E' tabname = 'T5HPBSJF' varkey = l_varkey x_tabname = ' ' x_varkey = ' ' _scope = '3' _synchron = ' ' _collect = ' '.

HR_HU_DATE_INTERVAL_SUMMA call function 'HR_HU_DATE_INTERVAL_SUMMA' exporting pernr = pernr-pernr importing * to_ev = q0639-to_ev * to_ho = q0639-to_ho * tonap = q0639-tonap tj_ev = l_tj_ev tj_ho = l_tj_ho tjnap = l_tjnap * tv_ev = q0639-tv_ev * tv_ho = q0639-tv_ho * tvnap = q0639-tvnap exceptions negativ = 1 others = 2.

HR_HU_DATE_INTERVAL_SUM_SUBTY call function 'HR_HU_DATE_INTERVAL_SUM_SUBTY' exporting pernr = pernr-pernr subty = 'JTAR' importing * to_ev = l_to_ev_jtar * to_ho = l_to_ho_jtar * tonap = l_tonap_jtar tj_ev = l_tj_ev_jtar tj_ho = l_tj_ho_jtar tjnap = l_tjnap_jtar * tv_ev = q0639-tv_ev_jtar * tv_ho = q0639-tv_ho_jtar * tvnap = q0639-tvnap_jtar .

HR_HU_DATE_PLUS_INTERVAL call function 'HR_HU_DATE_PLUS_INTERVAL' exporting add_ev = l_tj_ev_jtar add_ho = l_tj_ho_jtar addnap = l_tjnap_jtar changing datum = jkezj.

RH_READ_OBJECT call function 'RH_READ_OBJECT' exporting plvar = l_plvar otype = l_otype objid = p0001-orgeh * REALO = ' ' istat = l_istat begda = p0001-begda endda = p0001-endda * LANGU = SY-LANGU * OINTERVAL = 'X' * STORE = 'X' * CHECK_STRU_AUTH = 'X' * READ_DB = ' ' importing * OBEG = * OEND = * OSTAT = * HISTO = * SHORT = stext = name * TISTAT = * TLANGU = * TABLES * EXISTENCE = exceptions not_found = 1 others = 2 .

RH_GET_ADDRESS call function 'RH_GET_ADDRESS' exporting begda = p0001-begda endda = p0001-endda istat = l_istat objid = p0001-orgeh otype = l_otype plvar = l_plvar * subty = ' ' tables address = adr .

ENQUEUE_ET5HPBSJ call function 'ENQUEUE_ET5HPBSJ' exporting * MODE_T5HPBSJF = 'E' * MODE_T5HPBSJL = 'E' * MODE_T5HPBSJM = 'E' * MANDT = SY-MANDT jelev = jelev jelho = jelho tazon = tazon * LAPTI = * LAPSZ = * MEZON = x_jelev = 'X' x_jelho = 'X' x_tazon = 'X' * X_LAPTI = ' ' * X_LAPSZ = ' ' * X_MEZON = ' ' * _SCOPE = '2' * _WAIT = ' ' * _COLLECT = ' ' exceptions foreign_lock = 1 system_failure = 2 others = 3 .

DEQUEUE_ET5HPBSJ call function 'DEQUEUE_ET5HPBSJ' exporting * MODE_T5HPBSJF = 'E' * MODE_T5HPBSJL = 'E' * MODE_T5HPBSJM = 'E' * MANDT = SY-MANDT jelev = jelev jelho = jelho tazon = tazon * LAPTI = * LAPSZ = * MEZON = x_jelev = 'X' x_jelho = 'X' x_tazon = 'X' * X_LAPTI = ' ' * X_LAPSZ = ' ' * X_MEZON = ' ' * _SCOPE = '3' * _SYNCHRON = ' ' * _COLLECT = ' ' .



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