MP021240 SAP ABAP INCLUDE - Subroutines
MP021240 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 MP021240 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 MP021240. "Basic submit
SUBMIT MP021240 AND RETURN. "Return to original report after report execution complete
SUBMIT MP021240 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Subroutines
INCLUDES used within this REPORT MP021240
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_BEN_COB_READ_BENEF_DATA CALL FUNCTION 'HR_BEN_COB_READ_BENEF_DATA' exporting pernr = p0212-pernr cob_subty = p0212-dsubt cob_objps = p0212-dobjp datum = p0212-begda reaction = no_msg importing qb_benefit_data = qb_benefit_data subrc = subrc tables error_table = error_table.
HR_BEN_GET_KEY_DATE CALL FUNCTION 'HR_BEN_GET_KEY_DATE' EXPORTING begda = p0212-begda endda = p0212-endda reaction = no_msg IMPORTING keydt = q0212-cstdt TABLES error_table = error_table.
HR_BEN_GET_CURRENCY CALL FUNCTION 'HR_BEN_GET_CURRENCY' EXPORTING barea = p0212-barea datum = q0212-cstdt reaction = no_msg IMPORTING currency = q0212-curr1 subrc = subrc TABLES error_table = error_table.
HR_BEN_GET_TEXT_DOMVALUE CALL FUNCTION 'HR_BEN_GET_TEXT_DOMVALUE' EXPORTING domname = 'PFREQ' domvalue = q0212-qbper reaction = no_msg IMPORTING text = q0212-pertx subrc = subrc TABLES error_table = error_table.
HR_BEN_COB_GET_ADMIN_DATA CALL FUNCTION 'HR_BEN_COB_GET_ADMIN_DATA' EXPORTING cobst = qb_benefit_data-cobst datum = q0212-cstdt reaction = no_msg IMPORTING admin_data = h5udd subrc = subrc TABLES error_table = error_table.
HR_BEN_COB_GET_HEALTH_COSTS CALL FUNCTION 'HR_BEN_COB_GET_HEALTH_COSTS' EXPORTING qb_benefit_data = qb_benefit_data bplan = p0212-bplan bcost = h5ubb-bcost datum = q0212-cstdt adfee = h5udd-adfee addfe = h5udd-addfe desired_curre = q0212-curr1 desired_perio = q0212-qbper reaction = no_msg IMPORTING rgcst = q0212-rgcst dscst = q0212-dscst cocst = q0212-cocst subrc = subrc TABLES error_table = error_table.
HR_BEN_COB_READ_BENEF_DATA CALL FUNCTION 'HR_BEN_COB_READ_BENEF_DATA' EXPORTING pernr = p0212-pernr cob_subty = p0212-dsubt cob_objps = p0212-dobjp datum = p0212-begda reaction = 'N' IMPORTING qb_benefit_data = qb_ben_data subrc = subrc TABLES error_table = error_table.
HR_BEN_COB_GET_OFFER CALL FUNCTION 'HR_BEN_COB_GET_OFFER' EXPORTING pernr = p0212-pernr cob_subty = p0212-dsubt cob_objps = p0212-dobjp cob_offer_type = 'S' datum = p0212-begda desired_currency = 'USD' qb_benefit_data = qb_ben_data reaction = 'N' TABLES health_offer = health_offer_subs poss_dependents = depend_offer_subs error_table = error_table.
HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING tclas = 'A' pernr = p0212-pernr infty = '0211' IMPORTING subrc = subrc TABLES infty_tab = lt_p0211 EXCEPTIONS infty_not_found = 1 OTHERS = 2.
HR_BEN_COB_GET_ADMIN_DATA CALL FUNCTION 'HR_BEN_COB_GET_ADMIN_DATA' EXPORTING cobst = h5udd-cobst datum = wa_t511k-begda reaction = no_msg IMPORTING admin_data = ls_t5udd subrc = subrc TABLES error_table = error_table.
HR_BEN_COB_READ_BENEF_DATA CALL FUNCTION 'HR_BEN_COB_READ_BENEF_DATA' exporting pernr = p0212-pernr cob_subty = p0212-dsubt cob_objps = p0212-dobjp datum = p0212-begda reaction = no_msg importing qb_benefit_data = qb_benefit_data subrc = subrc tables error_table = error_table.
HR_BEN_COB_CALC_TERM_DATE CALL FUNCTION 'HR_BEN_COB_CALC_TERM_DATE' EXPORTING ee_benefit_data = ee_benefit_data cob_evtyp = qb_benefit_data-evtyp cob_evdat = qb_benefit_data-evdat bplan = bplan reaction = no_msg IMPORTING term_date = subsidy_date subrc = subrc TABLES error_table = error_table.
RP_CALC_DATE_IN_INTERVAL CALL FUNCTION 'RP_CALC_DATE_IN_INTERVAL' EXPORTING date = subsidy_date days = 0 months = 1 years = 0 IMPORTING calc_date = subsidy_date.
HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING tclas = 'A' pernr = p0212-pernr infty = '0211' * BEGDA = '18000101' * ENDDA = '99991231' * BYPASS_BUFFER = ' ' * LEGACY_MODE = ' ' * IMPORTING * SUBRC = TABLES infty_tab = lt_p0211 EXCEPTIONS infty_not_found = 1 OTHERS = 2 .
RP_CALC_DATE_IN_INTERVAL CALL FUNCTION 'RP_CALC_DATE_IN_INTERVAL' EXPORTING date = sbbeg days = 0 months = l_months "9 subsidy extention LC 2010 years = 0 IMPORTING calc_date = sbend.
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 MP021240 or its description.