RNWCHFPP SAP ABAP Report - IS-H CH: Report for Flat Rate Price per Case
RNWCHFPP 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 RNWCHFPP 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 RNWCHFPP. "Basic submit
SUBMIT RNWCHFPP AND RETURN. "Return to original report after report execution complete
SUBMIT RNWCHFPP VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: IS-H CH: Report for Flat Rate Price per Case
INCLUDES used within this REPORT RNWCHFPP
INCLUDE KONVDATA.
INCLUDE THEADDAT.
INCLUDE VBRKDATA.
INCLUDE VBRPDATA.
INCLUDE VBPADATA.
INCLUDE VBUVDATA.
INCLUDE SADRDATA.
INCLUDE VBFSDATA.
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_NPAT_CONCATENATE call function 'ISH_NPAT_CONCATENATE' exporting ss_patnr = nfal-patnr ss_read_npat = 'X' importing ss_pname = txtfal exceptions others = 1.
ISH_READ_NFAL call function 'ISH_READ_NFAL' " BS11 exporting " BS11 ss_einri = einri " BS11 ss_falnr = falnr " BS11 importing " BS11 ss_nfal = gs_nfal " BS11 exceptions " BS11 not_found = 1 " BS11 not_found_archived = 2 " BS11 no_authority = 3 " BS11 others = 4. " BS11
ISH_NPAT_CONCATENATE call function 'ISH_NPAT_CONCATENATE' exporting ss_patnr = gs_nfal-patnr ss_read_npat = 'X' importing ss_pname = txtfal exceptions others = 1.
ISH_SHOW_LIST_PATIENT call function 'ISH_SHOW_LIST_PATIENT' exporting anfo = 'X' " Auswahlpopup * npat_einri = einri " BS23* npat_einri = p_einri " BS23 fcode = 'PS' " Nur Patienten vcode = 'DIS' " Nur Anzeige und Auswahl importing npat_patnr = npat-patnr npat_pziff = npat-pziff exceptions geschlecht_falsch = 01 no_authority = 02 npat_not_found = 03 selection_false = 04.
ISH_SHOW_LIST_FALL call function 'ISH_SHOW_LIST_FALL' exporting call_from_dark = ' ' col = 5 exit_on_weiter = ' ' fcode = 'SO' list_layout = '0' * nfal_einri = einri " BS23* nfal_einri = p_einri " BS23 * nfal_falnr = falnr " BS23* nfal_falnr = p_falnr " BS23 nfal_fziff = ' ' nfal_patnr = npat-patnr * npatstring = ' ' only_falnr = ' ' popup = 'X' repid = ' ' row = 6 tcode = ' ' vcode = 'DIS' zuordnung = 'A' importing * LIST_OKCODE = * NBEW_BEWTY = * NBEW_LFDNR = * nfal_falnr = falnr " BS23* nfal_falnr = p_falnr " BS23 nfal_fziff = nfal-fziff * NO_LIST = * SELECT_NFAL = * STORNO_SELECTED = * VCODE_NEU = * WEITER = exceptions pat_not_found = 01 repid_missing = 02.
ISH_CH_READ_NWCHZME_MOD call function 'ISH_CH_READ_NWCHZME_MOD' " BS19 exporting " BS19 i_einri = einri " BS19 i_falnr = falnr " BS19 TABLES " BS19 ET_NWCHZME = gt_nwchzme. " BS19
ISH_CHECKPROCEDURE_EVALUATE call function 'ISH_CHECKPROCEDURE_EVALUATE' exporting ss_einri = einri ss_event = pa_event ss_casetype = gs_nfal-falar ss_casecategory = gs_nfal-fatyp ss_date = pa_sdate IMPORTING * SS_TYPES = ET_TNRS2 = lt_tnrs2.
ISH_CH_GENERATE_SERVICES call function 'ISH_CH_GENERATE_SERVICES' exporting einri = einri falnr = falnr stichtag = help_dat tables evnlei = h_vnlei ernwcherr = h_rnwcherr ench53 = h_nch53 changing lgen_bis = gen_dat exceptions error = 1 others = 2.
ISH_CH_GENERATE_SERVICES call function 'ISH_CH_GENERATE_SERVICES' exporting einri = einri falnr = falnr stichtag = help_dat tables evnlei = h_vnlei ernwcherr = h_rnwcherr ench53 = h_nch53 changing lgen_bis = gen_dat exceptions error = 1 others = 2.
ISH_CH_GENERATE_SERVICES call function 'ISH_CH_GENERATE_SERVICES' exporting einri = einri falnr = falnr stichtag = help_dat tables evnlei = h_vnlei ernwcherr = h_rnwcherr ench53 = i_nch53 changing lgen_bis = gen_dat exceptions error = 1 others = 2.
ISH_CH_CASESERVICE_POOL_SET call function 'ISH_CH_CASESERVICE_POOL_SET' " BS19 exporting " BS19 ss_einri = einri " BS19 ss_falnr = falnr " BS19 * SS_ABRV1 = " BS19 * SS_ABRV2 = " BS19 ss_refr_dep_cond_tab = no " BS19 tables " BS19 SS_NWCHZME = gt_nwchzme " BS19 ss_nnlz = gt_nnlz " BS19 ss_nllz = gt_nllz " BS19 ss_lnrls_abrv = lt_nlei_abrv. " BS19
ISH_CH_PREISERM_LEIST * CALL FUNCTION 'ISH_CH_PREISERM_LEIST' * EXPORTING * FKOMK_I = IFKOMK_I * MODUS = 'A' * RNAB0_I = RNAB0_I * TABLES * XFKOMP = IFKOMP * XNKOMV = IXKOMV * I_NLEI = PREIS_NLEI * I_VBRP = I_VBRP * EXCEPTIONS * OTHERS = 1.
MESSAGES_SHOW * CALL FUNCTION 'MESSAGES_SHOW' * EXCEPTIONS * INCONSISTENT_RANGE = 1 * NO_MESSAGES = 2 * OTHERS = 3.
ISH_SERVICES_PRICE_DETERMINE call function 'ISH_SERVICES_PRICE_DETERMINE' exporting i_einri = einri i_falnr = falnr i_modus = '2' i_rnab2 = l_rnab2 * I_DIALOG = ' ' i_submit = 'X' importing * BREAK_INVOICE = e_fkomk = ifkomk_i * SET_FINAL_BILL = tables * I_ABRGP = * I_ANFOE = * I_BESDT = * I_BESNR = * I_BILLP = * I_ERBOE = * I_NNRL = * I_KOSTR = * I_KTART = * I_LEIST = e_rnfp1 = ifkomp e_xnkomv = ixkomv * E_XRNF31 = i_nlei = preis_nlei.
MESSAGES_GIVE call function 'MESSAGES_GIVE' " BS15 tables " BS15 t_mesg = lt_act_mseg. " BS15
ISH_INVOICE_CREATE * CALL FUNCTION 'ISH_INVOICE_CREATE' * EXPORTING ** DELIVERY_DATE = * INVOICE_DATE = SY-DATUM * INVOICE_TYPE = 'NF01' ** PRICING_DATE = PRICING_DATE * VALUTA_DATE = SY-DATUM * VBSK_I = VBSK * APPLI_I = 'N' * WITH_POSTING = ' ' * NO_FINANCE_POSTING = ' ' * BUILD_XNVBRK_XNVBRP = ' ' * INVOICE_PER_VISIT = ' ' * IMPORTING * VBSK_E = VBSK * TABLES * XKOMFK = XKOMFK * XKOMV = XKOMV * XTHEAD = XTHEAD * XVBFS = XVBFS * XVBPA = XVBPA * XVBRK = XVBRK * XVBRP = XVBRP * XVBSS = XVBSS * XNBRP = IFKOMP * XNKOMV = IXKOMV.
ISH_BILLING_CREATE call function 'ISH_BILLING_CREATE' exporting is_rnab0 = rnab0_i i_posting = ' ' i_falnr = falnr i_act_visit = lt_nbew i_commit_execute = ' ' * I_SET_FINAL_BILL = ' ' * IMPORTING * E_SUBRC = * E_COMMIT_EXECUTE = tables xt_fkomp = ifkomp et_xvbrp = lt_xvbrp et_ixvbrp = xvbrp et_xvbrk = xvbrk et_ixvbrk = lt_xvbrk xt_xnkomv = ixkomv xt_ixnkomv = xkomv et_msgtab = lt_msgtab et_nnrl = lt_nnrl et_ixvbfs = xvbfs changing xs_fkomk = ifkomk_i x_ges_anz_i = l_ges_anz_i.
MESSAGES_GIVE call function 'MESSAGES_GIVE' " BS15 tables " BS15 t_mesg = lt_act_mseg. " BS15
call function 'MESSAGES_INITIALIZE'. " BS15
MESSAGE_STORE call function 'MESSAGE_STORE' " BS15 exporting " BS15 arbgb = lt_mseg-arbgb " BS15 * EXCEPTION_IF_NOT_ACTIVE = 'X' " BS15 msgty = lt_mseg-msgty " BS15 msgv1 = lt_mseg-msgv1 " BS15 msgv2 = lt_mseg-msgv2 " BS15 msgv3 = lt_mseg-msgv3 " BS15 msgv4 = lt_mseg-msgv4 " BS15 txtnr = lt_mseg-txtnr " BS15 * ZEILE = ' ' " BS15 * IMPORTING " BS15 * ACT_SEVERITY = " BS15 * MAX_SEVERITY = " BS15 exceptions " BS15 message_type_not_valid = 1 " BS15 not_active = 2 " BS15 others = 3. " BS15
MESSAGES_SHOW call function 'MESSAGES_SHOW' " BS15 exceptions " BS15 inconsistent_range = 1 " BS15 no_messages = 2 " BS15 others = 3. " BS15
MESSAGES_INITIALIZE call function 'MESSAGES_INITIALIZE'. " BS15
ISH_CH_CASESERVICE_POOL_SET call function 'ISH_CH_CASESERVICE_POOL_SET' " BS19 exporting " BS19 ss_einri = einri " BS19 ss_falnr = falnr " BS19 * SS_ABRV1 = " BS19 * SS_ABRV2 = " BS19 ss_refr_dep_cond_tab = yes " BS19 tables " BS19 SS_NWCHZME = gt_nwchzme " BS19 ss_nnlz = gt_nnlz " BS19 ss_nllz = gt_nllz " BS19 ss_lnrls_abrv = lt_nlei_abrv. " BS19
ISH_SERVICES_PRICE_DETERMINE call function 'ISH_SERVICES_PRICE_DETERMINE' " BS14 exporting " BS14 i_einri = einri " BS14 i_falnr = falnr " BS14 i_modus = '2' " BS14 i_rnab2 = l_rnab2 " BS14 * I_DIALOG = ' ' " BS14 i_submit = 'X' " BS14 importing " BS14 * BREAK_INVOICE = " BS14 e_fkomk = ifkomk_i " BS14 * SET_FINAL_BILL = " BS14 tables " BS14 * I_ABRGP = " BS14 * I_ANFOE = " BS14 * I_BESDT = " BS14 * I_BESNR = " BS14 * I_BILLP = " BS14 * I_ERBOE = " BS14 * I_NNRL = " BS14 * I_KOSTR = " BS14 * I_KTART = " BS14 * I_LEIST = " BS14 e_rnfp1 = ifkomp " BS14 e_xnkomv = ixkomv " BS14 * E_XRNF31 = " BS14 i_nlei = preis_nlei_2. " BS14
MESSAGES_GIVE call function 'MESSAGES_GIVE' " BS15 tables " BS15 t_mesg = lt_act_mseg. " BS15
ISH_BILLING_CREATE call function 'ISH_BILLING_CREATE' " BS14 exporting " BS14 is_rnab0 = rnab0_i " BS14 i_posting = ' ' " BS14 i_falnr = falnr " BS14 i_act_visit = lt_nbew " BS14 i_commit_execute = ' ' " BS14 * I_SET_FINAL_BILL = ' ' " BS14 * IMPORTING " BS14 * E_SUBRC = " BS14 * E_COMMIT_EXECUTE = " BS14 tables " BS14 xt_fkomp = ifkomp " BS14 et_xvbrp = lt_xvbrp " BS14 et_ixvbrp = xvbrp " BS14 et_xvbrk = xvbrk " BS14 et_ixvbrk = lt_xvbrk " BS14 xt_xnkomv = ixkomv " BS14 xt_ixnkomv = xkomv " BS14 et_msgtab = lt_msgtab " BS14 et_nnrl = lt_nnrl " BS14 et_ixvbfs = xvbfs " BS14 changing " BS14 xs_fkomk = ifkomk_i " BS14 x_ges_anz_i = l_ges_anz_i. " BS14
MESSAGES_GIVE call function 'MESSAGES_GIVE' " BS15 tables " BS15 t_mesg = lt_act_mseg. " BS15
MESSAGES_INITIALIZE call function 'MESSAGES_INITIALIZE'. " BS15
MESSAGE_STORE call function 'MESSAGE_STORE' " BS15 exporting " BS15 arbgb = lt_mseg-arbgb " BS15 * EXCEPTION_IF_NOT_ACTIVE = 'X' " BS15 msgty = lt_mseg-msgty " BS15 msgv1 = lt_mseg-msgv1 " BS15 msgv2 = lt_mseg-msgv2 " BS15 msgv3 = lt_mseg-msgv3 " BS15 msgv4 = lt_mseg-msgv4 " BS15 txtnr = lt_mseg-txtnr " BS15 * ZEILE = ' ' " BS15 * IMPORTING " BS15 * ACT_SEVERITY = " BS15 * MAX_SEVERITY = " BS15 exceptions " BS15 message_type_not_valid = 1 " BS15 not_active = 2 " BS15 others = 3. " BS15
MESSAGES_SHOW call function 'MESSAGES_SHOW' " BS15 exceptions " BS15 inconsistent_range = 1 " BS15 no_messages = 2 " BS15 others = 3. " BS15
MESSAGES_INITIALIZE call function 'MESSAGES_INITIALIZE'. " BS15
ISH_CH_CASESERVICE_POOL_REFR call function 'ISH_CH_CASESERVICE_POOL_REFR' " BS19 exporting " BS19 ss_einri = einri " BS19 ss_falnr = falnr. " BS19
ISH_READ_NTPK_NTPT_NEW call function 'ISH_READ_NTPK_NTPT_NEW' exporting begdt = i_vbrp-ishbegdt einri = einri enddt = i_vbrp-ishenddt spras = sy-langu talst = i_vbrp-ishablst tarif = i_vbrp-ishabtar read_ntpt = on importing e_ntpk = i_ntpk e_ntpt = i_ntpt * KTXTCONC = exceptions missing_data = 1 no_ntpk_ntpt_found = 2 others = 3.
REUSE_ALV_HIERSEQ_LIST_DISPLAY call function 'REUSE_ALV_HIERSEQ_LIST_DISPLAY' exporting i_callback_program = repid i_callback_pf_status_set = 'LISTSTAT' i_callback_user_command = 'ABRV_AENDERN' is_layout = gs_layout it_fieldcat = xfield it_sort = gs_sort[] it_events = gt_events[] i_tabname_header = 'S_SERV_TAB' i_tabname_item = 'D_SERV_TAB' is_print = gs_print is_keyinfo = gs_keyinfo is_variant = gs_variant i_default = 'X' i_save = 'A' tables t_outtab_header = s_serv_tab t_outtab_item = d_serv_tab exceptions program_error = 1 others = 2.
ISH_CH_SE54_V_NCH53 call function 'ISH_CH_SE54_V_NCH53' exporting ss_einri = einri ss_falnr = falnr * SS_ACTION = 'UPD' exceptions bad_param = 1 others = 2.
ISH_READ_NFAL call function 'ISH_READ_NFAL' exporting ss_einri = einri ss_falnr = falnr ss_read_db = ' ' importing ss_nfal = nfal_data exceptions not_found = 1 no_authority = 2 others = 3.
ISH_READ_NPAT call function 'ISH_READ_NPAT' exporting ss_einri = einri ss_patnr = nfal_data-patnr ss_read_db = ' ' ss_with_nadr = on "ISHA-9095 importing ss_npat = npat_data exceptions not_found = 1 no_authority = 2 no_einri = 3 others = 4.
ISH_CASE_HEADER_LIST call function 'ISH_CASE_HEADER_LIST' exporting ss_einri = tn01-einri ss_nfal = nfal_data ss_npat = npat_data ss_show_no_einri = 'X' tables ss_nbewtab = nbew_tab exceptions others = 1.
ISH_READ_NPAT call function 'ISH_READ_NPAT' exporting ss_patnr = i_nfal-patnr ss_read_db = 'X' ss_with_nadr = 'X' "ISHA-9095 importing ss_npat = i_npat exceptions not_found = 1 no_authority = 2 others = 3.
ISH_CH_CASESERVICE_POOL_SET call function 'ISH_CH_CASESERVICE_POOL_SET' " BS19 exporting " BS19 ss_einri = einri " BS19 ss_falnr = falnr " BS19 ss_abrv1 = abrv1 " note 1724420 * SS_ABRV2 = " BS19 * SS_REFR_DEP_COND_TAB = " BS19 TABLES " BS19 SS_NWCHZME = gt_nwchzme " BS19 * SS_NNLZ = gt_nnlz " BS19 " BS22* * SS_NLLZ = gt_nllz " BS19 " BS22* SS_NNLZ = lt_nnlz " BS22 SS_NLLZ = lt_nllz " BS22 SS_LNRLS_ABRV = lt_nlei_abrv. " BS19
ISH_SERVICES_RULES_ACTIONS call function 'ISH_SERVICES_RULES_ACTIONS' exporting einri = einri event = event infal = i_nfal inpat = i_npat * MESSAGES_COLLECT = 'X' * messages_show = ' ' stichtag = pa_sdate "GL001 firsttime = firsttime tables ernlsr = i_rnlsr drnlsr = d_rnlsr ernlrg = i_rnlrg ernlrz = i_rnlrz " BS22 inlei = int_nlei * innlz = gt_nnlz " BS19 " BS22* * inllz = gt_nllz " BS19 " BS22* innlz = lt_nnlz " BS22 inllz = lt_nllz " BS22 ivnbew = i_vnbew exceptions error = 1 tnrs2_not_found = 2 no_more = 3 others = 4.
ISH_CH_CASESERVICE_POOL_REFR call function 'ISH_CH_CASESERVICE_POOL_REFR' " BS19 exporting " BS19 ss_einri = einri " BS19 ss_falnr = falnr. " BS19
ISH_SELECT_SERVICES_ACTIONS call function 'ISH_SELECT_SERVICES_ACTIONS' tables ernlsr = i_rnlsr exceptions abbruch = 1 others = 2.
ISH_CH_CASESERVICE_POOL_SET call function 'ISH_CH_CASESERVICE_POOL_SET' " BS19 exporting " BS19 ss_einri = einri " BS19 ss_falnr = falnr " BS19 ss_abrv1 = abrv2 " note 1724420 * SS_ABRV2 = " BS19 * SS_REFR_DEP_COND_TAB = " BS19 TABLES " BS19 SS_NWCHZME = gt_nwchzme " BS19 * SS_NNLZ = gt_nnlz " BS19 " BS22* * SS_NLLZ = gt_nllz " BS19 " BS22* SS_NNLZ = lt_nnlz " BS22 SS_NLLZ = lt_nllz " BS22 SS_LNRLS_ABRV = lt_nlei_abrv. " BS19
ISH_SERVICES_RULES_ACTIONS call function 'ISH_SERVICES_RULES_ACTIONS' exporting einri = einri event = event infal = i_nfal inpat = i_npat * MESSAGES_COLLECT = 'X' * messages_show = ' ' stichtag = pa_sdate "GL001 firsttime = firsttime tables ernlsr = i_rnlsr drnlsr = d_rnlsr ernlrg = i_rnlrg ernlrz = i_rnlrz " BS22 inlei = int_nlei * innlz = gt_nnlz " BS19 " BS22* * inllz = gt_nllz " BS19 " BS22* innlz = lt_nnlz " BS22 inllz = lt_nllz " BS22 ivnbew = i_vnbew exceptions error = 1 tnrs2_not_found = 2 no_more = 3 others = 4.
ISH_CH_CASESERVICE_POOL_REFR call function 'ISH_CH_CASESERVICE_POOL_REFR' " BS19 exporting " BS19 ss_einri = einri " BS19 ss_falnr = falnr. " BS19
ISH_SELECT_SERVICES_ACTIONS call function 'ISH_SELECT_SERVICES_ACTIONS' tables ernlsr = i_rnlsr exceptions abbruch = 1 others = 2.
ISH_READ_NTPK call function 'ISH_READ_NTPK' " BS11 exporting " BS11 einri = einri " BS11 talst = $int_nlei-leist " BS11 tarif = g_tarif " BS11 importing " BS11 e_ntpk = ls_ntpk " BS11 exceptions " BS11 not_found = 1 " BS11 others = 2. " BS11
ISH_READ_NTPK call function 'ISH_READ_NTPK' exporting einri = einri talst = $int_nlei-leist tarif = g_tarif importing e_ntpk = ls_ntpk exceptions not_found = 1 others = 2.
ISH_FORM_PROTOCOL_LIST call function 'ISH_FORM_PROTOCOL_LIST' exporting einri = einri falnr = falnr patnr = i_nfal-patnr.
ISH_FIND_FORMS call function 'ISH_FIND_FORMS' exporting einri = einri patientid = i_nfal-patnr " BS05 patcaseid = i_nfal-falnr " BS05 st_print = std_print importing abnormal_end = abbruch tables conditions = condition_tab events = event_tab forms = print_tab exceptions others = 4.
ISH_READ_NPAT call function 'ISH_READ_NPAT' exporting ss_einri = i_nfal-einri ss_patnr = i_nfal-patnr ss_read_db = 'X' ss_with_npae = 'X' ss_with_nadr = 'X' "ISHA-9095 importing ss_npat = npat ss_npae = npae exceptions not_found = 1 no_authority = 2 others = 3.
ISH_CASEDIAGNOSIS_GETLIST call function 'ISH_CASEDIAGNOSIS_GETLIST' exporting ss_einri = nfal-einri ss_falnr = nfal-falnr ss_authority_check = ' ' tables ss_ndia = ndiatab.
ISH_INSREL_CASE_POOL_GET call function 'ISH_INSREL_CASE_POOL_GET' exporting ss_einri = nfal-einri ss_falnr = nfal-falnr ss_sel_storn = on tables ss_ncir_daba = gt_ncir.
F4IF_INT_TABLE_VALUE_REQUEST call function 'F4IF_INT_TABLE_VALUE_REQUEST' exporting retfield = 'EVENT' dynpprog = l_prog window_title = l_text value_org = 'S' tables value_tab = lt_tnrs2 return_tab = lt_return exceptions parameter_error = 1 no_values_found = 2 others = 3.
ISH_DYNP_VALUES_READ call function 'ISH_DYNP_VALUES_READ' exporting dyname = p_prog dynumb = p_dynpnr translate_to_upper = on tables dynpfields = lt_dynpfields.
CONVERSION_EXIT_ALPHA_INPUT call function 'CONVERSION_EXIT_ALPHA_INPUT' exporting input = p_fieldval importing output = p_fieldval exceptions others = 1.
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 RNWCHFPP or its description.
RNWCHFPP - IS-H CH: Report for Flat Rate Price per Case RNWCHFPP - IS-H CH: Report for Flat Rate Price per Case RNWCHFINDGROUPS - documentation and ABAP source code RNWCHFINDGROUPS - documentation and ABAP source code RNWCHEAUB - documentation and ABAP source code RNWCHEAUB - documentation and ABAP source code