SAP Reports / Programs | Personnel Management | Personnel Management | Company Pension Scheme Germany(PA-PF-DE) SAP PA
RPCWPC30 SAP ABAP INCLUDE - HR-BAV: Routines for Main Program Include
RPCWPC30 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 RPCWPC30 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 RPCWPC30. "Basic submit
SUBMIT RPCWPC30 AND RETURN. "Return to original report after report execution complete
SUBMIT RPCWPC30 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: HR-BAV: Routines for Main Program Include
INCLUDES used within this REPORT RPCWPC30
INCLUDE RPCWPC30_VA.
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:
GET_PRINT_PARAMETERS CALL FUNCTION 'GET_PRINT_PARAMETERS' EXPORTING REPORT = repid NO_DIALOG = 'X' IMPORTING OUT_PARAMETERS = pri_params EXCEPTIONS OTHERS = 1.
HR_CHECK_AUTHORITY_INFTY CALL FUNCTION 'HR_CHECK_AUTHORITY_INFTY' "WDPL4DK021865 EXPORTING "WDPL4DK021865 * TCLAS = 'A' "WDPL4DK021865 PERNR = $PERNR "WDPL4DK021865 INFTY = $infty "WDPL4DK021865 SUBTY = $subty "WDPL4DK021865 BEGDA = SY-DATUM "WDPL4DK021865 ENDDA = SY-DATUM "WDPL4DK021865 * LEVEL = 'R' "WDPL4DK021865 * TABLES "WDPL4DK021865 * I0001 = "WDPL4DK021865 EXCEPTIONS "WDPL4DK021865 NO_AUTHORIZATION = 1 "WDPL4DK021865 INTERNAL_ERROR = 2 "WDPL4DK021865 OTHERS = 3. "WDPL4DK021865
RP_01C_EPROC_PROTO call function 'RP_01C_EPROC_PROTO' exporting i07_poscol = 5 c_zeitpunkt = $zeitpunkt w_proto = act_proto "GSGPH0K005509 tables t07_eproc = it_rependp exceptions err_ddic = 1 others = 2.
RP_01C_GET_KONST_VALUES call function 'RP_01C_GET_KONST_VALUES' exporting i37_kotyp = amount_constant i37_konst = $konst i37_begda = $keydt i37_endda = $keydt i37_waers = $waers "WDPN0435347 tables * t37_konst_in = t37_konst_out = limit_konst exceptions no_constants_found = 1 not_all_constants_found = 2 others = 3.
RP_01C_PCEXECUTE call function 'RP_01C_PCEXECUTE' " exporting " i01_iact = wact " i01_keydt = pkeydt_table " i01_proto = act_proto-anrch " i01_waers = calc_currency "WDPN0435347 tables " t01_ient = wment " t01_ires = wmres " exceptions " others = 1. "
RP_01C_MNTELUNG call function 'RP_01C_MNTELUNG' exporting i28_keydt = tmp_keydt i28_wact = wact i28_eindt = entry_date i28_reldat = relevant_date "WDPAHRK042177 i28_proto = act_proto-mntel * i28_cstit = space i28_dialg = space tables t28_fment = fment t28_wmres = wmres t28_istru = istru exceptions others = 1.
RP_01C_ENTITLEMENT_GROUPING call function 'RP_01C_ENTITLEMENT_GROUPING' tables * t29_wment = wment "YMLN593390 t29_wment = $wment "YMLN593390 exceptions others = 1.
RP_01C_INCREASE_DATES call function 'RP_01C_INCREASE_DATES' exporting i27_pernr = fment-pernr i27_zwtyp = normal_increase i27_angrp = fment-angrp "YMLN1292675a i27_hansp = fment-hansp i27_mozbv = fment-mozbv i27_mozan = fment-mozan i27_mozra = fment-mozra i27_keydt = fment-reldt i27_endva = pkeydt_endval i27_keyta = fment-keyta i27_zwind = pkeydt_zwind i27_gbdat = w0002-gbdat i27_gesch = w0002-gesch i27_dialg = space i27_vjjab = fment-vjjab i27_feaua = fment-feaua i27_feama = fment-feama i27_feafr = fment-feafr i27_zwalt = fment-zwalt i27_numid = fment-numid "YMLN1129793 i27_relevantdate = relevant_date "WDPAHRK042177 importing e27_incrs = $inc_param exceptions no_end_of_act_period = 1 tech_date_not_found = 2 no_date_type = 3 no_begin_found = 4 no_end_found = 5 others = 6.
RP_01C_NON_LAPS_ENTITLEMENT call function 'RP_01C_NON_LAPS_ENTITLEMENT' exporting i15_keydt = pkeydt_deadline i15_wact = wact i15_proto = act_proto-chkua tables t15_wment = fment t15_p0202 = w0202.
RP_01C_WAITING_PERIOD call function 'RP_01C_WAITING_PERIOD' exporting i12_keydt = pkeydt_deadline i12_wact = wact i12_proto = act_proto-chkwz tables t12_wment = fment t12_p0202 = w0202 * t12_p0041 = w0041 t12_cstit = tab_cstit t12_msg = error_tab.
RP_01C_DEADLINE_RECORDS call function 'RP_01C_DEADLINE_RECORDS' exporting i28_artst = $artst i28_stgrp = $stgrp tables t28_wment = $wment t28_dline = $dline exceptions no_status_type = 1 invalid_status_type = 2 others = 3.
RP_01C_TRIGGER_REPAYMENT call function 'RP_01C_TRIGGER_REPAYMENT' exporting i46_pernr = pernr-pernr i46_keydt = pkeydt_repayment i46_btznr = last_btznr "STBPH4K027000 i46_proto = act_proto-rerst i46_dialg = space * i25_cstit = space calc_currency = calc_currency "WDPN0435347 tables t46_dabe = dabe t46_daka = daka t46_dabe_bt = save_dabe_bt t46_dabe_rp = save_dabe_rp t46_rpay = rpay t46_p0009 = p0009 t46_istru = istru t46_msg = error_tab exceptions others = 1.
RP_01C_TRIGGER_REPAYMENT call function 'RP_01C_TRIGGER_REPAYMENT' exporting i46_pernr = pernr-pernr i46_keydt = pkeydt_repayment i46_btznr = last_btznr "STBPH4K027000 i46_recal = marked i46_proto = act_proto-rerst i46_dialg = space * i25_cstit = space calc_currency = calc_currency "WDPN0435347 tables t46_dabe = save_dabe t46_daka = save_daka t46_dabe_bt = save_dabe_bt t46_dabe_rp = save_dabe_rp t46_rpay = rcalc t46_p0009 = p0009 t46_istru = istru t46_msg = error_tab exceptions others = 1.
RP_01C_DABE_PRINT call function 'RP_01C_DABE_PRINT' exporting i16_pernr = pernr-pernr i16_headr = marked i16_start = 4 exceptions others = 1.
RP_01C_DABE_PRINT call function 'RP_01C_DABE_PRINT' exporting i16_start = 4 tables t16_dabe = dabe exceptions others = 1.
RP_01C_DAEE_PRINT call function 'RP_01C_DAEE_PRINT' exporting i18_pernr = pernr-pernr i18_headr = marked i18_start = 4 exceptions others = 1.
RP_01C_DAEE_PRINT call function 'RP_01C_DAEE_PRINT' exporting i18_start = 4 tables t18_daee = daee exceptions others = 1.
RP_01C_SINGLE_IMPUTATION call function 'RP_01C_SINGLE_IMPUTATION' exporting i35_act = wact i35_keydt = pkeydt_table i35_proto = act_proto-anrch i35_dialg = space tables t35_pens = wpens_charge t35_ent = wment_charge t35_res = wmres t35_p0014 = w0014 t35_p0015 = w0015.
call function 'RP_01C_OVERALL_IMPUTATION' exporting i36_act = wact i36_keydt = pkeydt_table i36_proto = act_proto-anrch i36_dialg = space tables t36_pens = wpens_charge t36_ent = wment_charge t36_res = wmres t36_p0014 = w0014 t36_p0015 = w0015.
RP_01C_CUT_DEPENDENT call function 'RP_01C_CUT_DEPENDENT' exporting i19_pernr = pernr-pernr i19_proto = act_proto-hblkz i19_keydt = db_endda i19_pensx = space i19_erbla = employee * i19_cstit = tables t19_pens = wpens t19_w0000 = w0000 "Erbl.Daten
RP_01C_PROTO CALL FUNCTION 'RP_01C_PROTO' " EXPORTING " I05_DDICNAME = 'P01C_ASTYP1_PROTO' " I05_POSCOL = 4 " TABLES " T05_OUTTAB = it_proto " EXCEPTIONS " OTHERS = 1. "
RP_01C_PROTO CALL FUNCTION 'RP_01C_PROTO' " EXPORTING " I05_DDICNAME = 'P01C_ASTYP2_PROTO' " I05_POSCOL = 4 " TABLES " T05_OUTTAB = it_proto " EXCEPTIONS " OTHERS = 1. "
RP_01C_GET_BAV_CURRENCY * CALL FUNCTION 'RP_01C_GET_BAV_CURRENCY' * EXPORTING * i61_keydt = $wadat * i61_wakey = $wakey * IMPORTING * e61_waers = $waers * EXCEPTIONS * error_default_waers = 1 * modif_not_in_t5dwf = 2 * OTHERS = 3.
HRCA_COMPANYCODE_GETDETAIL call function 'HRCA_COMPANYCODE_GETDETAIL' exporting companycode = $bukrs language = sy-langu importing comp_name = hrca_company-comp_name city = hrca_company-city country = hrca_company-country currency = hrca_company-currency langu = hrca_company-langu chrt_accts = hrca_company-chrt_accts fy_variant = hrca_company-fy_variant fi_managementarea = hrca_company-fi_management jurisdiction = hrca_company-jurisdiction rate_deviation = hrca_company-rate_deviat address = hrca_company-address exceptions not_found = 1 others = 2.
RP_01C_AGE_YEARS call function 'RP_01C_AGE_YEARS' exporting i37_pernr = $pernr i37_keydt = $keydt i37_gbdat = w0002-gbdat importing e37_gbdat = w0002-gbdat e37_agejj = age_years e37_agemm = age_months "YMLN1129793 tables t37_p0002 = w0002 exceptions others = 1.
RP_01C_DATE_CONVERSION call function 'RP_01C_DATE_CONVERSION' exporting i05_conid = space i05_cutdc = cut_no_rounding i05_begda = $entry_date i05_endda = $key_date importing e05_begda = dec_begda e05_endda = dec_endda e05_ddiff = dec_duration exceptions begda_gt_endda = 4 date_invalid = 8.
RP_01C_ENTRYDATE call function 'RP_01C_ENTRYDATE' exporting i02_begda = $keydt i02_dtype = t5dca-datei i02_pernr = $pernr i02_p16dt = t5dca-p16ei i02_timkz = $timkz "STBPH4K027000 i02_proto = space importing e02_datid = entry_type e02_eindt = entry_date tables t02_p0000 = w0000 t02_p0001 = w0001 t02_p0016 = w0016 t02_p0041 = w0041 exceptions entrydate_not_found = 4.
HR_REFRESH_ERROR_LIST call function 'HR_REFRESH_ERROR_LIST'.
RP_01C_BAV_ERROR_ROUTINE call function 'RP_01C_BAV_ERROR_ROUTINE' exporting i54_emode = free_error_memory.
RP_01C_BAV_ERROR_ROUTINE call function 'RP_01C_BAV_ERROR_ROUTINE' exporting i54_emode = set_error_memory i54_repid = error_program.
RP_01C_ADD_PERIOD_TO_DATE call function 'RP_01C_ADD_PERIOD_TO_DATE' exporting i08_pernr = pernr-pernr i08_adtim = age_in_months i08_dtype = minus i08_methd = plus_missing_days i08_rdwzt = space i08_chkpe = space i08_dialg = space importing e08_newdt = pkeydt_zwind e08_outpe = out_of_period tables t08_period = period exceptions no_period = 1 period_too_long = 2 wrong_method = 3 rp_01c_time_compute = 4 full_months_compute = 5 others = 6.
RP_01C_INITIALIZE_RPDC CALL FUNCTION 'RP_01C_INITIALIZE_RPDC'. "WDPN0513028
RP_01C_DBCLEAR call function 'RP_01C_DBCLEAR'. "QMBPH0K002615
RP_01C_DELETE_STATUS_REFERENCE call function 'RP_01C_DELETE_STATUS_REFERENCE' exporting i54_pernr = $pernr i54_displ = $displ i54_windw = $displ importing e54_fcode = $fcode tables t54_p0202 = $p0202 t54_del_dast = $ddast exceptions others = 1.
RP_01C_PROTO CALL FUNCTION 'RP_01C_PROTO' " EXPORTING " I05_DDICNAME = 'P01C_ASTYP1_PROTO' " I05_POSCOL = 4 " TABLES " T05_OUTTAB = it_proto1 " EXCEPTIONS " OTHERS = 1. "
RP_01C_PROTO CALL FUNCTION 'RP_01C_PROTO' " EXPORTING " I05_DDICNAME = 'P01C_ASTYP2_PROTO' " I05_POSCOL = 4 " TABLES " T05_OUTTAB = it_proto2 " EXCEPTIONS " OTHERS = 1. "
RP_01C_READ_AV CALL FUNCTION 'RP_01C_READ_AV' "WDPN0480972 EXPORTING "WDPN0480972 IAV_AVART = C_T100 "WDPN0480972 IAV_TABLE = C_OAV "WDPN0480972 * IAV_LTRGR = dacv-ltrgr "WDPN0480972"YLMN724025f * IAV_LGART = dacv-lgart "WDPN0480972"YLMN724025f IAV_LTRGR = new_dacv-ltrgr "YLMN724025f IAV_LGART = new_dacv-lgart "YLMN724025f TABLES "WDPN0480972 TAV_AV = lt_oav "WDPN0480972 TAV_LT = lt_olt "YLMN724025f EXCEPTIONS "WDPN0480972 WERTART_NOT_FOUND = 1 "WDPN0480972 WERTART_ALREADY_IN_TABLE = 2. "WDPN0480972
RP_01C_READ_AV CALL FUNCTION 'RP_01C_READ_AV' "WDPN0480972 EXPORTING "WDPN0480972 IAV_AVART = C_T100 "WDPN0480972 IAV_TABLE = C_OAV "WDPN0480972 TABLES "WDPN0480972 TAV_AV = lt_oav "WDPN0480972 TAV_LT = lt_olt "WDPN0480972 EXCEPTIONS "WDPN0480972 WERTART_NOT_FOUND = 1 "WDPN0480972 WERTART_ALREADY_IN_TABLE = 2. "WDPN0480972
RP_01C_DACV_PRINT call function 'RP_01C_DACV_PRINT' exporting i47_pernr = pernr-pernr i47_headr = header_line i47_start = 4.
RP_01C_DACV_PRINT call function 'RP_01C_DACV_PRINT' exporting i47_start = 4 tables t47_dacv = new_dacv.
RP_01C_BEGIN_PAYMENT call function 'RP_01C_BEGIN_PAYMENT' exporting i32_keydt = pkeydt_pension i32_knzbp = wpens-knzbp i32_wpens = wpens "WDP371603 i32_wact = wact "WDP371603 * I32_UEXIT = ............
RP_01C_GET_KONST_VALUES call function 'RP_01C_GET_KONST_VALUES' exporting i37_begda = $keydt i37_endda = $keydt tables t37_konst_in = select_konst t37_konst_out = tmp_found_konst exceptions no_constants_found = 1 not_all_constants_found = 2 others = 3.
RP_01C_ADD_SUB_PENSION call function 'RP_01C_ADD_SUB_PENSION' exporting i16_pernr = pernr-pernr * i16_keydt = pkeydt "WDPN0460076 i16_keydt = pkeydt_table "WDPN0460076 i16_gbdat = p0002-gbdat i16_dialg = space i16_proto = act_proto-abzrb tables t16_wpens = save_wpens t16_wment = save_wment t16_istru = istru.
RP_01C_DBAPPEND CALL FUNCTION 'RP_01C_DBAPPEND' ">>>YMLN1692452c EXPORTING I03_DDICNAME = 'P01C_BRUND' TABLES T03_TAB = lt_brund EXCEPTIONS OTHERS = 1.
RP_01C_ZI_INTEREST_KAP call function 'RP_01C_ZI_INTEREST_KAP' exporting izi_pernr = wpens-pernr izi_idaus = wpens-idaus izi_rente = wpens-betrg izi_keyta = wpens-keyta izi_begda = wpens-begda izi_aansp = wpens-aansp izi_hansp = wpens-hansp izi_protflag = protflag izi_waers = calc_currency tables tzi_rate = rate tzi_p0041 = p0041 tzi_msg = error_tab.
RP_01C_FILL_TAB_FROM_P0201 call function 'RP_01C_FILL_TAB_FROM_P0201' "WDPL4DK028482 exporting "WDPL4DK028482 i01_p0201 = $0201 "WDPL4DK028482 tables "WDPL4DK028482 t01_rbtab = p0201_rbtab. "WDPL4DK028482
RP_01C_FILL_TAB_FROM_P0201 call function 'RP_01C_FILL_TAB_FROM_P0201' "WDPL4DK028482 exporting "WDPL4DK028482 i01_p0201 = $0201 "WDPL4DK028482 tables "WDPL4DK028482 t01_rbtab = p0201_rbtab. "WDPL4DK028482
RP_01C_GET_DEPENDENTS call function 'RP_01C_GET_DEPENDENTS' exporting i33_pernr = pernr-pernr i33_dialg = space * i33_mthhb = read_matchcode "YMLN841347b i33_mthhb = l_mthhb "YMLN841347b i33_keydt = pkeydt_dependent tables t33_getdp = get_dpndt exceptions no_subtype_defined = 1 no_dependents_found = 2 testator_pernr_not_unique = 3 others = 4.
RP_01C_P0202_PRINT call function 'RP_01C_P0202_PRINT' exporting i27_pernr = pernr-pernr i27_headr = header_line i27_start = 4.
RP_01C_P0202_PRINT call function 'RP_01C_P0202_PRINT' exporting i27_start = 4 tables t27_p0202 = w0202.
RP_01C_P0201_PRINT call function 'RP_01C_P0201_PRINT' exporting i51_pernr = print_p0201-pernr i51_headr = header_line i51_start = 4 exceptions others = 1.
RP_01C_P0201_PRINT call function 'RP_01C_P0201_PRINT' exporting i51_start = 4 tables t51_p0201 = print_p0201 exceptions others = 1.
RP_01C_WPENS_PNNNN_PRINT call function 'RP_01C_WPENS_PNNNN_PRINT' exporting i50_pernr = wpens_print-pernr i50_headr = header_line i50_rbtyp = 'P0201' i50_start = 4.
RP_01C_WPENS_PNNNN_PRINT call function 'RP_01C_WPENS_PNNNN_PRINT' exporting i50_start = 4 i50_rbtyp = 'P0201' tables t50_wpens = wpens_pernr.
RP_01C_WPENS_PNNNN_PRINT call function 'RP_01C_WPENS_PNNNN_PRINT' exporting i50_pernr = wpens_print-pernr i50_headr = header_line i50_rbtyp = 'P0014' i50_start = 4.
RP_01C_WPENS_PNNNN_PRINT call function 'RP_01C_WPENS_PNNNN_PRINT' exporting i50_start = 4 i50_rbtyp = 'P0014' tables t50_wpens = wpens_pernr.
RP_01C_WPENS_PNNNN_PRINT call function 'RP_01C_WPENS_PNNNN_PRINT' exporting i50_pernr = wpens_print-pernr i50_headr = header_line i50_rbtyp = 'P0015' i50_start = 4.
RP_01C_WPENS_PNNNN_PRINT call function 'RP_01C_WPENS_PNNNN_PRINT' exporting i50_start = 4 i50_rbtyp = 'P0015' tables t50_wpens = wpens_pernr.
RP_01C_DAUA_PRINT call function 'RP_01C_DAUA_PRINT' exporting i22_pernr = new_daua_pernr i22_headr = header_line i22_start = 4.
RP_01C_DAUA_PRINT call function 'RP_01C_DAUA_PRINT' exporting i22_start = 4 tables t22_daua = new_daua.
RP_01C_DAGP_PRINT call function 'RP_01C_DAGP_PRINT' exporting i23_pernr = new_daua_pernr i23_headr = header_line i23_start = 4.
RP_01C_DAGP_PRINT call function 'RP_01C_DAGP_PRINT' exporting i23_start = 4 tables t23_dagp = new_dagp.
RP_01C_DAGP_PRINT call function 'RP_01C_DAGP_PRINT' exporting i23_pernr = pernr-pernr i23_headr = header_line i23_start = 4.
RP_01C_DAGP_PRINT call function 'RP_01C_DAGP_PRINT' exporting i23_start = 4 tables t23_dagp = dagp.
SAPGUI_PROGRESS_INDICATOR call function 'SAPGUI_PROGRESS_INDICATOR' exporting * percentage = sapgui_prcnt * text = prcnt_text text = $sapgui_text.
RP_HIRE_FIRE call function 'RP_HIRE_FIRE' exporting beg = low_date end = high_date importing fire_date = edatum hire_date = cdatum tables pphifi = phifi pp0000 = w0000 pp0001 = w0001.
RP_01C_PROTO CALL FUNCTION 'RP_01C_PROTO' "QMBN505216 EXPORTING "QMBN505216 I05_DDICNAME = 'P01C_DSOUT_PROTO' "QMBN505216 TABLES "QMBN505216 T05_OUTTAB = it_proto[] "QMBN505216 EXCEPTIONS "QMBN505216 OTHERS = 1. "QMBN505216
RP_01C_DBEXIST call function 'RP_01C_DBEXIST' exporting i06_tname = 'P01C_BMADA' importing e06_exist = exist.
RP_01C_DBAPPEND call function 'RP_01C_DBAPPEND' exporting i03_ddicname = 'P01C_BMADA' i03_struct = employee exceptions others = 1.
RP_01C_DBAPPEND call function 'RP_01C_DBAPPEND' exporting i03_ddicname = 'P01C_BCTRL' i03_struct = wa_bctrl exceptions others = 1.
RP_01C_DBEXPORT call function 'RP_01C_DBEXPORT' exporting i04_pernr = pernr-pernr i04_dtype = t5dc5-dtype * i04_begda = '18000101' "QMBL4DK044874 * i04_endda = pkeydt "QMBL4DK044874 i04_begda = relevant_date "QMBL4DK044874 i04_endda = relevant_date "QMBL4DK044874 exceptions others = 1.
RP_01C_DBEXPORT CALL FUNCTION 'RP_01C_DBEXPORT' EXPORTING I04_PERNR = pernr-pernr I04_DTYPE = t5dc5-dtype I04_BEGDA = relevant_date I04_ENDDA = relevant_date I04_FUNCT = funct TABLES T04_DBKEY = it_dbkey EXCEPTIONS OTHERS = 1.
RP_01C_EXPORT_AV_LT CALL FUNCTION 'RP_01C_EXPORT_AV_LT' " EXCEPTIONS " OTHERS = 1. "
RP_01C_GD_DATE_OF_SEPARATION call function 'RP_01C_GD_DATE_OF_SEPARATION' exporting igd_begda = pkeydt_pension igd_pernr = pernr-pernr * igd_timkz = importing egd_reldt = $datum "Erster Tag nach Austritt * egd_p0000 = "laut Maßnahme tables tgd_p0000 = p0000 * TGD_P0001 = p0001 tgd_istru = istru exceptions relevant_date_found = 1 others = 2.
RP_01C_DBAPPEND call function 'RP_01C_DBAPPEND' exporting i03_ddicname = 'P01C_BDAUA' tables t03_tab = it_bdaua exceptions others = 1.
RP_01C_DBAPPEND call function 'RP_01C_DBAPPEND' exporting i03_ddicname = 'P01C_BDAGP' i03_struct = wa_bdagp exceptions others = 1.
RP_01C_DBAPPEND call function 'RP_01C_DBAPPEND' exporting i03_ddicname = 'P01C_BRERE' i03_struct = wa_brere exceptions others = 1.
RP_GET_CURRENCY call function 'RP_GET_CURRENCY' exporting molga = '01' begda = datum importing waers = calc_currency 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.
CONVERT_TO_LOCAL_CURRENCY call function 'CONVERT_TO_LOCAL_CURRENCY' exporting date = stichtag foreign_amount = betrag foreign_currency = quell_waers local_currency = ziel_waers importing local_amount = betrag exceptions no_rate_found = 1 overflow = 2.
RP_01C_DBAPPEND call function 'RP_01C_DBAPPEND' exporting i03_ddicname = 'P01C_BKAAN' i03_struct = wa_bkaan exceptions others = 1.
RP_01C_DAUA_PRINT call function 'RP_01C_DAUA_PRINT' exporting i22_pernr = pernr-pernr i22_headr = header_line i22_start = 4.
RP_01C_DAUA_PRINT call function 'RP_01C_DAUA_PRINT' exporting i22_start = 4 tables t22_daua = daua_print.
HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' "... übernehmen
HR_FEATURE_BACKFIELD CALL FUNCTION 'HR_FEATURE_BACKFIELD' EXPORTING feature = 'DWCUX' struc_content = l_struc kind_of_error = space IMPORTING back = l_txt EXCEPTIONS no_backvalue = 3.
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 RPCWPC30 or its description.