SAP Reports / Programs
SAPMNCF0 SAP ABAP Report - SAPMNCF0: IS-H Basic price determination
SAPMNCF0 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This program contains form routines for determining the IS-H base price (price in the service master)...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.
If you would like to execute this report or see the full code listing simply enter SAPMNCF0 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 SAPMNCF0. "Basic submit
SUBMIT SAPMNCF0 AND RETURN. "Return to original report after report execution complete
SUBMIT SAPMNCF0 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: SAPMNCF0: IS-H Basic price determination
INCLUDES used within this REPORT SAPMNCF0
INCLUDE RNDATA00.
INCLUDE MNDATA_CHARGE_TYPES.
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:
ISH_COUNTRY_VERSION_GET CALL FUNCTION 'ISH_COUNTRY_VERSION_GET' IMPORTING ss_cvers = cvers EXCEPTIONS OTHERS = 4.
MESSAGES_ACTIVE CALL FUNCTION 'MESSAGES_ACTIVE' EXCEPTIONS not_active = 01.
MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE'.
ISH_READ_TN21P CALL FUNCTION 'ISH_READ_TN21P' EXPORTING einri = einri kschl = kschl IMPORTING kotxt = kotxt kotyp = kotyp retyp = retyp warng = warng EXCEPTIONS kschl_not_found = 04.
ISH_CH_READ_NTPKCH CALL FUNCTION 'ISH_CH_READ_NTPKCH' EXPORTING einri = einri talst = tarls tarif = tarid i_vdate = l_date IMPORTING e_ntpkch = st_ntpkch EXCEPTIONS not_found = 1 OTHERS = 2.
ISH_GET_LOCAL_CURRENCY CALL FUNCTION 'ISH_GET_LOCAL_CURRENCY' EXPORTING einri = einri IMPORTING hwaers = waers EXCEPTIONS einri_not_found = 1 bukrs_not_found = 2 OTHERS = 3.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/ISHFR/NFR' msgty = 'W' txtnr = '142' msgv1 = tarls msgv2 = ch_komp-ishentga.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/ISHFR/NFR' msgty = 'W' txtnr = '142' msgv1 = tarls msgv2 = ch_komp-ishentga.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = '/ISHFR/NFR' msgty = 'W' txtnr = '142' msgv1 = ch_komp-vgbel msgv2 = ch_komp-ishentga.
ISH_NTSI_CHECK CALL FUNCTION 'ISH_NTSI_CHECK' EXPORTING ss_einri = einri ss_tarid = tarid ss_tarsp = taspa IMPORTING ss_ntsi = s_ntsi EXCEPTIONS not_found = 1 OTHERS = 2.
ISH_GET_LOCAL_CURRENCY CALL FUNCTION 'ISH_GET_LOCAL_CURRENCY' EXPORTING einri = einri IMPORTING hwaers = waers EXCEPTIONS einri_not_found = 1 bukrs_not_found = 2 OTHERS = 3.
ISH_CH_DETERMINE_POINTS CALL FUNCTION 'ISH_CH_DETERMINE_POINTS' EXPORTING ss_einri = einri ss_falnr = falnr ss_knumv = ch_komk-knumv ss_vgbel = ch_komp-vgbel ss_abtar = tarid ss_ablst = tarls ss_abtyp = ch_komp-ishabtyp ss_tarsp = taspa ss_prsdt = prdat CHANGING ss_twert = twert EXCEPTIONS OTHERS = 1.
ISH_CH_READ_NTPKCH CALL FUNCTION 'ISH_CH_READ_NTPKCH' EXPORTING einri = einri talst = tarls tarif = tarid i_vdate = l_date IMPORTING e_ntpkch = st_ntpkch EXCEPTIONS not_found = 1 OTHERS = 2.
ISH_CH_CONV_MEDUNIT ** call function 'ISH_CH_CONV_MEDUNIT' ** exporting ** ss_einri = ch_komk-isheinri ** ss_falnr = ch_komk-ishfalnr ** ss_lnrls = ch_komp-vgbel ** changing ** c_twert = twert.
ISH_READ_TN21 CALL FUNCTION 'ISH_READ_TN21' EXPORTING abart = abrart einri = einri IMPORTING tn21_e = tn21 EXCEPTIONS OTHERS = 04.
ISH_FIND_POINT_VALUE CALL FUNCTION 'ISH_FIND_POINT_VALUE' EXPORTING abint = abrart begdt = prdat buffered_select = 'X' einri = einri enddt = prdat falnr = falnr kostr = kostr ktart = ktart messages_collect = 'X' messages_show = ' ' tagru = tagru talst = tarls tarif = tarid ch_komk = ch_komk ch_komp = ch_komp ch_rgtyp = retyp IMPORTING pwert = pwert waers = waers EXCEPTIONS OTHERS = 04.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'N0' msgty = 'E' txtnr = '467'.
ISH_READ_NTPK CALL FUNCTION 'ISH_READ_NTPK' EXPORTING einri = einri talst = tarls tarif = tarid IMPORTING e_ntpk = st_ntpk EXCEPTIONS not_found = 1 OTHERS = 2.
CALL FUNCTION 'ISH_CH_FIND_COST_DIVISOR_SDRG' EXPORTING i_einri = einri i_falnr = falnr i_komk = ch_komk i_komp = ch_komp i_messages_collect = l_messages_collect i_messages_show = l_messages_show IMPORTING kosteil = l_kosteil EXCEPTIONS missing_einri = 1 missing_falnr = 2 missing_lnrls = 3 tnwch84_read_error = 4 OTHERS = 5.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'N0' msgty = 'E' txtnr = '467'.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'N0' msgty = 'E' txtnr = '467'.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'N0' msgty = 'E' txtnr = '467'.
ISH_FIND_COLUMN CALL FUNCTION 'ISH_FIND_COLUMN' EXPORTING einri = $einri retyp = $retyp tarif = $tarid abart = $abrart begdt = $datum enddt = $datum warng = $warng * entga = $entga messages_show = $ish_mess_show falnr = $falnr i_lnrls = $lnrls IMPORTING taspa = $taspa pktkz = $pktkz EXCEPTIONS no_taspa_found = 01 OTHERS = 04.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = arbgb msgty = $mtyp "I, W, E, A txtnr = $mnr "Message-Nummer msgv1 = $mv1 msgv2 = $mv2 msgv3 = $mv3 msgv4 = $mv4.
ISH_COUNTRY_VERSION_GET CALL FUNCTION 'ISH_COUNTRY_VERSION_GET' IMPORTING ss_cvers = cvers EXCEPTIONS OTHERS = 4.
ISH_COUNTRY_VERSION_GET CALL FUNCTION 'ISH_COUNTRY_VERSION_GET' IMPORTING ss_cvers = cvers EXCEPTIONS OTHERS = 4.
ISH_READ_NTPK CALL FUNCTION 'ISH_READ_NTPK' EXPORTING einri = einri talst = tarls tarif = tarid IMPORTING e_ntpk = l_ntpk EXCEPTIONS not_found = 1 OTHERS = 2.
MBEW_SINGLE_READ CALL FUNCTION 'MBEW_SINGLE_READ' EXPORTING kzrfb = ' ' maxtz = 0 matnr = l_ntpk-vmatr bwkey = l_tn01-werks bwtar = l_wmbew-bwtar sperrmodus = ' ' std_sperrmodus = ' ' IMPORTING wmbew = l_wmbew EXCEPTIONS lock_on_mbew = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 OTHERS = 5.
MATERIAL_UNIT_FIND CALL FUNCTION 'MATERIAL_UNIT_FIND' EXPORTING * KZALL = ' ' matnr = l_ntpk-vmatr meinh = ch_komp-lagme * MEINS = ' ' * IMPORTING * KZEXI = TABLES rmmme_itab = lt_rmmme_itab EXCEPTIONS material_not_found = 1 OTHERS = 2.
ISH_DRG_BASIS_PRICE CALL FUNCTION 'ISH_DRG_BASIS_PRICE' EXPORTING i_einri = p_einri i_falnr = p_falnr i_drg_service = p_tarls i_drg_catalog = p_tarid i_pricing_date = p_prdat * I_BILLING_DATE = i_enzky = p_enzky i_column = p_taspa IMPORTING e_basis_price = basis_price e_relation = relation e_baserate = baserate e_waers = p_waers e_decimals = decimals EXCEPTIONS no_tndrg = 1 OTHERS = 2.
ISH_NTSI_CHECK CALL FUNCTION 'ISH_NTSI_CHECK' EXPORTING ss_einri = p_einri ss_tarid = p_tarid ss_tarsp = p_taspa IMPORTING ss_ntsi = i_ntsi EXCEPTIONS not_found = 1 OTHERS = 2.
ISH_CASESERVICE_POOL_GET CALL FUNCTION 'ISH_CASESERVICE_POOL_GET' EXPORTING ss_einri = p_einri ss_falnr = p_falnr TABLES ss_nlei_daba = st_nlei[].
/ISHFR/_READ_NTPKFR_AK CALL FUNCTION '/ISHFR/_READ_NTPKFR_AK' EXPORTING i_einri =
-einri i_tarif = -haust i_talst = -leist i_aktiv = -/ishfr/aktiv i_phase = -/ishfr/phase i_vdate = p_prdat IMPORTING es_ntpkfr_ak = ls_ntpkfr_ak EXCEPTIONS not_found = 1 OTHERS = 2.
/ISHFR/_READ_NTPKFR_GH CALL FUNCTION '/ISHFR/_READ_NTPKFR_GH' EXPORTING i_einri = p_einri i_tarif = p_tarid i_talst = p_tarls i_vdate = p_prdat IMPORTING es_ntpkfr_gh = ls_ntpkfr_gh EXCEPTIONS not_found = 1 OTHERS = 2.
/ISHFR/READ_TNWFR_F20 CALL FUNCTION '/ISHFR/READ_TNWFR_F20' EXPORTING i_einri = p_einri TABLES et_tnwfr_f20 = st_t_srv_ccp EXCEPTIONS read_error = 1 OTHERS = 2.
ISH_PEPP_BASIS_PRICE CALL FUNCTION 'ISH_PEPP_BASIS_PRICE' EXPORTING i_einri = p_einri i_falnr = p_falnr i_pepp_service = p_tarls i_pepp_catalog = p_tarid i_pricing_date = p_prdat * I_ENZKY = * I_UNITED_RETURN_CASE_VIEW DEFAULT 'X' * I_PROVIDED_DATA_FOR_URCV DEFAULT ' ' IMPORTING e_basis_price = l_basis_price e_relation = l_pepp_cw e_baserate = l_baserate e_waers = p_waers e_decimals = l_decimals EXCEPTIONS no_tnpepp = 1 OTHERS = 2.
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 SAPMNCF0 or its description.