SAP Reports / Programs | Patient Accounting | SAP Healthcare - Industry-Specific Components for Hospitals | Patient Accounting(IS-H-PA) SAP IS

RNLSTA09 SAP ABAP Report - IS-H: Service and Billing Statistics







RNLSTA09 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This program creates statistics on services performed (i...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 RNLSTA09 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 RNLSTA09. "Basic submit
SUBMIT RNLSTA09 AND RETURN. "Return to original report after report execution complete
SUBMIT RNLSTA09 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Selection Text: PKAT = Service Catalog for Pricing
Selection Text: ORGID = Org. Unit to Be Evaluated
Selection Text: MONATL = Monthly Output
Selection Text: LEIST = Service
Selection Text: HCOKZ = CO-Relevant Services Only
Selection Text: GESAMT = Output for Complete Period
Selection Text: FPDRUCK = Print Case Log
Selection Text: FATYP = Case Category
Selection Text: FALNR = Cases to Be Evaluated
Selection Text: FALLPROT = Case Log
Selection Text: FALAE = Case Type
Selection Text: ERBOE = Performing Org. Unit
Selection Text: ENTGA = Charge Type
Selection Text: CLASS = Class
Selection Text: BSART = Visit Type
Selection Text: AUSENDDT = Evaluation End
Selection Text: AUSBEGDT = Evaluation Start
Selection Text: ANPOE = Requesting Nrs./Trmt OU
Selection Text: ANFOE = Requesting Dept. OU
Selection Text: ALVDVAR = Layout
Selection Text: ABTYP = Billing Category
Selection Text: ABRKZ = Billable Services Only
Selection Text: ABRINFO = With Billing Information
Selection Text: PSPALTE = Catalog Col. for Value Determ.
Selection Text: P_NOEX = D .
Selection Text: P_EXT1 = D .
Selection Text: P_EXSAVE = D .
Selection Text: P_EXLOAD = D .
Selection Text: P_EX2 = D .
Selection Text: P_EX1 = D .
Selection Text: ZEITR = Extended Services
Selection Text: ZEITP = Immediate Services
Selection Text: WR_SEL = Update Case Selection
Selection Text: WAERS = Target Currency
Selection Text: VSATZ = Take Indiv. Prices into Act
Selection Text: VERENDDT = End of Comparison Period
Selection Text: VERBEGDT = Start of Comparison Period
Selection Text: TAGRU = Svce Ctgry





Selection Text: TAEGL = Daily Output
Selection Text: SE_EINRI = Institution
Selection Text: SEL_IMP = Case Selection
Selection Text: SEL_EXP = Case Selection Export
Selection Text: SELCOL2 = Append Cases with Non-Bld Svce
Selection Text: SELCOL1 = All Cases in Case Selection
Selection Text: PSPATT = Catalog Col.for Tax Points Tot
Selection Text: PSPATM = Catalog Col.for Tax Points Med
Selection Text: PSPATG = Catalog Col.for TaxPoints Tech
Title: IS-H: Service and Billing Statistics
Text Symbol: 144 = Total Blld TaxP.Med.
Text Symbol: 145 = Tot.BTT
Text Symbol: 146 = Total Blld TaxP.Tech.
Text Symbol: 147 = Tot.BTT
Text Symbol: 148 = Total Blld TaxP.Tot.
Text Symbol: 149 = EP B.TaxPoints Med.
Text Symbol: 150 = EP B.TaxPoints Tech.
Text Symbol: 151 = EP B.TaxPoints Total
Text Symbol: 152 = CP B.TaxPoints Med.
Text Symbol: 153 = CP B.TaxPoints Tech.
Text Symbol: 154 = CP B.TaxPoints Total
Text Symbol: F01 = Case Log
Text Symbol: H01 = Service and
Text Symbol: H02 = Billing Statistics
Text Symbol: M01 = Jan
Text Symbol: M02 = Feb
Text Symbol: M03 = Mar
Text Symbol: M04 = Apr
Text Symbol: 143 = Tot.BTM
Text Symbol: 142 = Blld TaxP.Tot
Text Symbol: 141 = BTT
Text Symbol: 140 = Blld TaxP.Tech
Text Symbol: 139 = BTT
Text Symbol: 138 = Blld TaxP.Med
Text Symbol: 137 = BTM
Text Symbol: 136 = Billed Tax Points Total
Text Symbol: 135 = B.TaxP.Tot.
Text Symbol: 134 = Billed Tax Points Tech.Port.
Text Symbol: 133 = B.TaxP.Tech.





Text Symbol: 132 = Billed Tax Points Med.Port.
Text Symbol: 131 = B.TaxP.Med.
Text Symbol: 130 = Case Selection Name
Text Symbol: 125 = Total Gross
Text Symbol: 124 = Total Gross
Text Symbol: 123 = Tot. Price
Text Symbol: 122 = Total Net
Text Symbol: M05 = May
Text Symbol: T21 = Column for TaxPoints Total Portion
Text Symbol: T20 = Column for TaxPoints Med.Portion
Text Symbol: T19 = Column for TaxPoints Tech.Portion
Text Symbol: T18 = TaxPoints
Text Symbol: T17 = Case Select.
Text Symbol: T16 = Type of Output
Text Symbol: T15 = Output
Text Symbol: T13 = CO-Relevant Services Only
Text Symbol: T12 = Extended Services
Text Symbol: T11 = Immediate Services
Text Symbol: T10 = Take Indiv. Prices into Act
Text Symbol: T09 = Catalog Col.
Text Symbol: T08 = Service Catalog for Pricing
Text Symbol: T07 = Output Only for Compl.Period
Text Symbol: T06 = Daily Output
Text Symbol: T05 = Monthly Output
Text Symbol: T04 = With Billing Info.
Text Symbol: T03 = Billable Services Only
Text Symbol: T02 = Other Data
Text Symbol: T01 = Data Selection
Text Symbol: S04 = To
Text Symbol: S03 = Comparison Period
Text Symbol: S02 = Evaluation Period
Text Symbol: S01 = Institution
Text Symbol: P05 = Period:
Text Symbol: P04 = Req.Nrs.OU:
Text Symbol: P03 = Req.Dep.OU:
Text Symbol: P02 = Perf. OU:
Text Symbol: P01 = Service:
Text Symbol: M12 = Dec
Text Symbol: M11 = Nov



Text Symbol: M10 = Oct
Text Symbol: M09 = Sep
Text Symbol: M08 = Aug
Text Symbol: M07 = Jul
Text Symbol: M06 = Jun
Text Symbol: 031 = Billable Qty
Text Symbol: 032 = Bbl.Value
Text Symbol: 033 = Billable Value
Text Symbol: 034 = BldQty
Text Symbol: 035 = Billed Qty
Text Symbol: 036 = NBldQt
Text Symbol: 037 = Nonbilled Qty
Text Symbol: 038 = NonbilledVal
Text Symbol: 039 = Non-Billed Value
Text Symbol: 040 = Act.
Text Symbol: 041 = ActualQty
Text Symbol: 042 = Act.Value
Text Symbol: 043 = Act.Value
Text Symbol: 044 = BblQty
Text Symbol: 045 = Billable Qty
Text Symbol: 046 = Bbl.Value
Text Symbol: 047 = Billable Value
Text Symbol: 048 = BldQty
Text Symbol: 049 = Billed Qty
Text Symbol: 050 = NBldQt
Text Symbol: 051 = Nonbilled Qty
Text Symbol: 052 = NonbilledVal
Text Symbol: 053 = Non-Billed Value
Text Symbol: 054 = A
Text Symbol: 055 = ActualQty
Text Symbol: 056 = AV
Text Symbol: 057 = Act.Value
Text Symbol: 058 = B
Text Symbol: 059 = Billable Qty
Text Symbol: 060 = BV
Text Symbol: 001 = General Columns
Text Symbol: 002 = EvalPeriod Qty
Text Symbol: 003 = EvalPeriod Vals
Text Symbol: 004 = EvalPeriod Qty
Text Symbol: 005 = EvalPeriod Vals
Text Symbol: 006 = EP Act. Qty
Text Symbol: 007 = EP Act.Values
Text Symbol: 008 = EP Billable Qty
Text Symbol: 009 = EP Billable Vals
Text Symbol: 010 = EP Billed Qty
Text Symbol: 011 = EP Billed Values
Text Symbol: 012 = EP Nonbilled Qty
Text Symbol: 013 = EP Nonbilled Vals
Text Symbol: 014 = CP Act. Qty
Text Symbol: 015 = CP Act.Vals
Text Symbol: 016 = CP Billable Qty
Text Symbol: 017 = CP Billable Vals
Text Symbol: 018 = CP Billed Qty
Text Symbol: 019 = CP Billed Values
Text Symbol: 020 = CP Nonbilled Qty
Text Symbol: 021 = CP Nonbilled Vals
Text Symbol: 022 = Eval. Period
Text Symbol: 023 = Comp.Period
Text Symbol: 024 = Crcy
Text Symbol: 025 = Currency
Text Symbol: 026 = Act.
Text Symbol: 027 = ActualQty
Text Symbol: 028 = Act.Value
Text Symbol: 029 = Act.Value
Text Symbol: 030 = BblQty
Text Symbol: 061 = Bbl.Value
Text Symbol: 092 = Update Case Selection:
Text Symbol: 093 = ... for Column
Text Symbol: 094 = For Cases from "Actual Quantity" Column
Text Symbol: 095 = For Cases from "Non-Billed Quantity" Column
Text Symbol: 096 = Act.Qty Column
Text Symbol: 097 = Nonbilled Qty Column
Text Symbol: 098 = BG
Text Symbol: 099 = Billed Gross Val.
Text Symbol: 100 = BG
Text Symbol: 101 = Billed Gross Val.
Text Symbol: 102 = BG
Text Symbol: 103 = Billed Gross Val.
Text Symbol: 104 = BG
Text Symbol: 105 = Billed Gross Val.
Text Symbol: 106 = EvalPeriod Total
Text Symbol: 107 = CompPeriod Total
Text Symbol: 108 = TotAct
Text Symbol: 109 = Total ActualQty
Text Symbol: 110 = Tot.ActVal.
Text Symbol: 111 = Total ActualVal
Text Symbol: 112 = TotBQ
Text Symbol: 113 = Total Billable Qty.
Text Symbol: 114 = TotBlblValue
Text Symbol: 115 = Total Blbl.Value
Text Symbol: 116 = TBldQy
Text Symbol: 117 = Total Billed Qty.
Text Symbol: 118 = T.NBQ
Text Symbol: 119 = Total Non-Billed Qty.
Text Symbol: 120 = Tot.NbldVal.
Text Symbol: 121 = Total Nonbilled Val
Text Symbol: 062 = Bd
Text Symbol: 063 = Billed Qty
Text Symbol: 064 = BdV
Text Symbol: 065 = Billed Value
Text Symbol: 066 = N
Text Symbol: 067 = Nonbilled Qty
Text Symbol: 068 = NBd
Text Symbol: 069 = NonbilledVal
Text Symbol: 070 = Jan
Text Symbol: 071 = Feb
Text Symbol: 072 = Mar
Text Symbol: 073 = Apr
Text Symbol: 074 = May
Text Symbol: 075 = Jun
Text Symbol: 076 = Jul
Text Symbol: 077 = Aug
Text Symbol: 078 = Sep
Text Symbol: 079 = Oct
Text Symbol: 080 = Nov
Text Symbol: 081 = Dec
Text Symbol: 082 = Case Log
Text Symbol: 083 = Print Case Log
Text Symbol: 084 = Service
Text Symbol: 085 = R.DeptOU
Text Symbol: 086 = ReqNrsOU
Text Symbol: 087 = Frm
Text Symbol: 088 = Case
Text Symbol: 089 = Blbl. Qty
Text Symbol: 090 = Billed Qty
Text Symbol: 091 = Non-Billed Qty


INCLUDES used within this REPORT RNLSTA09

INCLUDE MNCOLOUR.
INCLUDE RNLSTF03.
INCLUDE RNSSEXTR.
INCLUDE RNSSEINR.
INCLUDE RNSSAZVZ.
INCLUDE RNSSIEXT.
INCLUDE RNSSSEXT_PBO.
INCLUDE RNSSSEXT_VALUE_REQUEST.
INCLUDE RNSSSPAI.
INCLUDE RNSSSEXT.


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_GET_GTARIF call function 'ISH_GET_GTARIF' exporting einrichtung = se_einri stichtag = ausbegdt importing gtarif = pkat exceptions not_found = 1 others = 2.

ISH_MODIFY_SCREEN call function 'ISH_MODIFY_SCREEN' exporting dynnr = sy-dynnr * einri = se_einri * fcode = '*' pname = repid * vcode = 'DIS' exceptions others = 1.

DYNP_VALUES_READ call function 'DYNP_VALUES_READ' exporting dyname = repid dynumb = '1000' * TRANSLATE_TO_UPPER = ' ' * REQUEST = ' ' * PERFORM_CONVERSION_EXITS = ' ' tables dynpfields = dfields exceptions invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 invalid_parameter = 7 undefind_error = 8 others = 9.

REUSE_ALV_VARIANT_F4 call function 'REUSE_ALV_VARIANT_F4' exporting is_variant = hlpvar * I_TABNAME_HEADER = * I_TABNAME_ITEM = * IT_DEFAULT_FIELDCAT = i_save = 'A' importing e_exit = gs_exit es_variant = gs_variant exceptions not_found = 1 program_error = 2 others = 3.

ISH_AUTH_CHECK_REPORT_EINRI call function 'ISH_AUTH_CHECK_REPORT_EINRI' exporting repid = repid einri = se_einri no_message = off messagetype = 'E' auto_leave = off.

REUSE_ALV_VARIANT_DEFAULT_GET call function 'REUSE_ALV_VARIANT_DEFAULT_GET' exporting i_save = 'A' changing cs_variant = gs_variant exceptions wrong_input = 1 not_found = 2 program_error = 3 others = 4.

ISH_GET_GTARIF call function 'ISH_GET_GTARIF' exporting einrichtung = se_einri stichtag = ausbegdt importing gtarif = pkat exceptions not_found = 1 others = 2.

ENQUEUE_ENFAK call function 'ENQUEUE_ENFAK' exporting * MODE_NFAK = 'E' * MANDT = SY-MANDT einri = se_einri selkz = sel_exp * X_EINRI = ' ' * X_SELKZ = ' ' * _SCOPE = '2' * _WAIT = ' ' * _COLLECT = ' ' exceptions foreign_lock = 1 system_failure = 2 others = 3.

ISH_GET_LOCAL_CURRENCY call function 'ISH_GET_LOCAL_CURRENCY' exporting einri = se_einri importing hwaers = hwaers exceptions einri_not_found = 1 bukrs_not_found = 2 others = 3.

ISH_CALL_LIST_HEAD call function 'ISH_CALL_LIST_HEAD' exporting ausbegdt = rnstat-ausbegdt ausenddt = rnstat-ausenddt einri = se_einri line_size = rnstat-line_size repid = repid title_lin1 = rnstat-title_lin1 title_lin2 = rnstat-title_lin2 uline = ' ' verbegdt = rnstat-verbegdt verenddt = rnstat-verenddt exceptions invalid_einri = 01. " Einrichtung wurde bereits geprüft

ISH_CASE_SELECTION_READ call function 'ISH_CASE_SELECTION_READ' exporting ss_einri = se_einri ss_selkz = sel_imp * IMPORTING * SS_NFAK = tables ss_nfap = infap ss_faelle = falnr * SS_FALNR = exceptions not_found = 1 others = 2.

ISH_GET_AUFDT_ENTDT call function 'ISH_GET_AUFDT_ENTDT' exporting ss_einri = se_einri ss_falnr = $infal-falnr * SS_STORNO = ' ' importing ss_aufdt = $infal-aufdt ss_aufzt = $infal-aufzt ss_entart = $infal-entart ss_entdt = $infal-entdt ss_entzt = $infal-entzt exceptions not_found = 1 no_authority = 2 others = 3.

ISH_DETERMINE_CLASS_OF_SERVICE call function 'ISH_DETERMINE_CLASS_OF_SERVICE' exporting einri = $a_nlei-einri lnrls = $a_nlei-lnrls falnr = $a_nlei-falnr bgdt = $a_nlei-ibgdt bgzt = $a_nlei-ibzt endt = $a_nlei-iendt enzt = $a_nlei-iezt lfdbew = $a_nlei-lfdbew importing payclass = pclass exceptions missing_data = 1 lnrls_not_found = 2 no_data_found = 3 others = 4.

ISH_NBEWTAB_REFRESH call function 'ISH_NBEWTAB_REFRESH'.

ISH_READ_NTPK_NTPT_NEW call function 'ISH_READ_NTPK_NTPT_NEW' exporting begdt = $istat-txtdt einri = se_einri enddt = $istat-txtdt * SPRAS = SY-LANGU talst = $istat-leist tarif = gtarif importing e_ntpk = ntpk * e_ntpt = ntpt ktxtconc = text exceptions missing_data = 1 no_ntpk_ntpt_found = 2 others = 3.

ISH_SHOW_SERVICES_INSURERS call function 'ISH_SHOW_SERVICES_INSURERS' exporting einri = se_einri falnr = $a_nlei-falnr lnrls = $a_nlei-lnrls zeitr = $a_nlei-zeitr read_per_case = 'X' read_buffer = ' ' i_nlei = tmp_nlei revenues_only = 'X' tables irnabi1 = irnabi exceptions missing_data = 1 missing_data_einri = 2 no_data = 3 wrong_einri = 4 wrong_falnr = 5 others = 6.

CONVERT_TO_FOREIGN_CURRENCY call function 'CONVERT_TO_FOREIGN_CURRENCY' exporting date = irnabi-abdat foreign_currency = waers local_amount = irnabi-erlwert_wa local_currency = irnabi-waers * RATE = 0 * TYPE_OF_RATE = 'M' importing * EXCHANGE_RATE = foreign_amount = erlwert * FOREIGN_FACTOR = * LOCAL_FACTOR = * EXCHANGE_RATEX = * DERIVED_RATE_TYPE = * FIXED_RATE = exceptions no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 others = 6.

CONVERT_TO_FOREIGN_CURRENCY call function 'CONVERT_TO_FOREIGN_CURRENCY' exporting date = irnabi-abdat foreign_currency = waers local_amount = irnabi-bruwert_wa local_currency = irnabi-waers * RATE = 0 * TYPE_OF_RATE = 'M' importing * EXCHANGE_RATE = foreign_amount = erlbwrt * FOREIGN_FACTOR = * LOCAL_FACTOR = * EXCHANGE_RATEX = * DERIVED_RATE_TYPE = * FIXED_RATE = exceptions no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 others = 6.

ISH_NBEWTAB_REFRESH call function 'ISH_NBEWTAB_REFRESH'.

ISH_GET_QUANTITY_SERVICES call function 'ISH_GET_QUANTITY_SERVICES' exporting aufdt = $infal-aufdt aufzt = $infal-aufzt begdt = ibgdt begzt = ibzt einri = se_einri enddt = iendt endzt = iezt etlart = $infal-entart etldt = $infal-entdt etlzt = $infal-entzt falnr = $infal-falnr nbgdt = $a_nlei-nbgdt nbgzt = $a_nlei-nbgzt s_param = $a_nlei-bform talst = $a_nlei-leist tarid = gtarif importing quantity = $a_nlei-imeng exceptions aufdt_gt_begdt = 1 auf_gt_etl = 2 begdt_gt_enddt = 3 etldt_lt_enddt = 4 invalid_einri = 5 invalid_s_param = 6 others = 7.

ISH_GET_QUANTITY_SERVICES call function 'ISH_GET_QUANTITY_SERVICES' exporting aufdt = $infal-aufdt aufzt = $infal-aufzt begdt = nlei_ibgdt "SR note 938450 * BEGZT = '000000' einri = se_einri falnr = $infal-falnr enddt = vortag * ENDZT = '240000' etlart = $infal-entart etldt = $infal-entdt * ETLZT = '240000' nbgdt = $a_nlei-nbgdt nbgzt = $a_nlei-nbgzt s_param = $a_nlei-bform talst = $a_nlei-leist tarid = gtarif importing quantity = vortage exceptions aufdt_gt_begdt = 1 auf_gt_etl = 2 begdt_gt_enddt = 3 etldt_lt_enddt = 4 invalid_einri = 5 invalid_s_param = 6 others = 7.

ISH_CHECK_ABGERECHNET call function 'ISH_CHECK_ABGERECHNET' exporting einri = $a_nlei-einri falnr = $a_nlei-falnr lnrls = $a_nlei-lnrls zeitr = $a_nlei-zeitr importing lei_abger = l_accounted exceptions no_einri = 1 no_falnr = 2 no_lnrls = 3 others = 4.

ISH_CHECK_ABGERECHNET call function 'ISH_CHECK_ABGERECHNET' exporting einri = $a_nlei-einri falnr = $a_nlei-falnr lnrls = $a_nlei-lnrls zeitr = $a_nlei-zeitr importing lei_abger = l_accounted exceptions no_einri = 1 no_falnr = 2 no_lnrls = 3 others = 4.

ISH_GET_QUANTITY_SERVICES call function 'ISH_GET_QUANTITY_SERVICES' exporting aufdt = $infal-aufdt aufzt = $infal-aufzt begdt = ibegdt begzt = ibzt einri = se_einri falnr = $infal-falnr enddt = ienddt endzt = iezt etlart = $infal-entart etldt = $infal-entdt etlzt = $infal-entzt nbgdt = $a_nlei-nbgdt nbgzt = $a_nlei-nbgzt s_param = $a_nlei-bform talst = $a_nlei-leist tarid = gtarif importing quantity = $res_nlei-imeng exceptions aufdt_gt_begdt = 1 auf_gt_etl = 2 begdt_gt_enddt = 3 etldt_lt_enddt = 4 invalid_einri = 5 invalid_s_param = 6 others = 7.

ISH_GET_QUANTITY_SERVICES call function 'ISH_GET_QUANTITY_SERVICES' exporting aufdt = $infal-aufdt aufzt = $infal-aufzt begdt = $a_nlei-ibgdt begzt = $a_nlei-ibzt einri = se_einri falnr = $infal-falnr enddt = vortag * ENDZT = '240000' etlart = $infal-entart etldt = $infal-entdt etlzt = $infal-entzt nbgdt = $a_nlei-nbgdt nbgzt = $a_nlei-nbgzt s_param = $a_nlei-bform talst = $a_nlei-leist tarid = gtarif importing quantity = vortage exceptions aufdt_gt_begdt = 1 auf_gt_etl = 2 begdt_gt_enddt = 3 etldt_lt_enddt = 4 invalid_einri = 5 invalid_s_param = 6 others = 7.

ISH_GET_QUANTITY_SERVICES call function 'ISH_GET_QUANTITY_SERVICES' exporting aufdt = $infal-aufdt aufzt = $infal-aufzt begdt = ibegdt begzt = ibzt einri = se_einri falnr = $infal-falnr enddt = ienddt endzt = iezt etlart = $infal-entart etldt = $infal-entdt etlzt = $infal-entzt nbgdt = $a_nlei-nbgdt nbgzt = $a_nlei-nbgzt s_param = $a_nlei-bform talst = $a_nlei-leist tarid = gtarif importing quantity = $res_nlei-imeng exceptions aufdt_gt_begdt = 1 auf_gt_etl = 2 begdt_gt_enddt = 3 etldt_lt_enddt = 4 invalid_einri = 5 invalid_s_param = 6 others = 7.

ISH_GET_QUANTITY_SERVICES call function 'ISH_GET_QUANTITY_SERVICES' exporting aufdt = $infal-aufdt aufzt = $infal-aufzt begdt = $a_nlei-ibgdt begzt = $a_nlei-ibzt einri = se_einri falnr = $infal-falnr enddt = vortag * ENDZT = '240000' etlart = $infal-entart etldt = $infal-entdt etlzt = $infal-entzt nbgdt = $a_nlei-nbgdt nbgzt = $a_nlei-nbgzt s_param = $a_nlei-bform talst = $a_nlei-leist tarid = gtarif importing quantity = vortage exceptions aufdt_gt_begdt = 1 auf_gt_etl = 2 begdt_gt_enddt = 3 etldt_lt_enddt = 4 invalid_einri = 5 invalid_s_param = 6 others = 7.

REUSE_ALV_LIST_DISPLAY call function 'REUSE_ALV_LIST_DISPLAY' exporting * I_INTERFACE_CHECK = ' ' i_callback_program = repid i_callback_pf_status_set = 'SET_PFSTATUS' i_callback_user_command = 'USER_COMMAND' * I_STRUCTURE_NAME = is_layout = gs_layout it_fieldcat = xfield * IT_EXCLUDING = it_special_groups = gt_sp_groups[] * IT_SORT = * IT_FILTER = is_sel_hide = gs_sel_hide i_default = 'X' i_save = 'A' is_variant = gs_variant it_events = gt_events[] * IT_EVENT_EXIT = * IS_PRINT = * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = tables t_outtab = alv_stat_gesamt exceptions program_error = 1 others = 2.

REUSE_ALV_LIST_DISPLAY call function 'REUSE_ALV_LIST_DISPLAY' exporting * I_INTERFACE_CHECK = ' ' i_callback_program = repid i_callback_pf_status_set = 'SET_PFSTATUS' i_callback_user_command = 'USER_COMMAND' * I_STRUCTURE_NAME = is_layout = gs_layout it_fieldcat = xfield * IT_EXCLUDING = it_special_groups = gt_sp_groups[] * IT_SORT = * IT_FILTER = is_sel_hide = gs_sel_hide * I_DEFAULT = 'X' i_save = 'A' is_variant = gs_variant it_events = gt_events[] * IT_EVENT_EXIT = * IS_PRINT = * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = tables t_outtab = alv_stat_monatl exceptions program_error = 1 others = 2.

REUSE_ALV_LIST_DISPLAY call function 'REUSE_ALV_LIST_DISPLAY' exporting * I_INTERFACE_CHECK = ' ' i_callback_program = repid i_callback_pf_status_set = 'SET_PFSTATUS' i_callback_user_command = 'USER_COMMAND' * I_STRUCTURE_NAME = is_layout = gs_layout it_fieldcat = xfield * IT_EXCLUDING = it_special_groups = gt_sp_groups[] * IT_SORT = * IT_FILTER = is_sel_hide = gs_sel_hide * I_DEFAULT = 'X' i_save = 'A' is_variant = gs_variant it_events = gt_events[] * IT_EVENT_EXIT = * IS_PRINT = * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = tables t_outtab = alv_stat_taegl exceptions program_error = 1 others = 2.

ISH_CHECK_FIELD_TYPE call function 'ISH_CHECK_FIELD_TYPE' exporting decimalplaces = spkom input = twert input_type = sptyp length = splen * LR_SCREEN = E05 screen_or_db = 'D' importing screen = twert exceptions input_too_long = 01 not_numeric = 02 no_decimalpoint = 03 param_decimalplaces_wrong = 04 param_length_wrong = 05 too_many_decimalplaces = 06 wrong_input_source = 07 wrong_input_type = 08.

REUSE_ALV_LIST_DISPLAY call function 'REUSE_ALV_LIST_DISPLAY' exporting * I_INTERFACE_CHECK = ' ' i_callback_program = repid * i_callback_pf_status_set = * I_CALLBACK_USER_COMMAND = ' ' * I_STRUCTURE_NAME = * IS_LAYOUT = it_fieldcat = xfield_p * IT_EXCLUDING = * IT_SPECIAL_GROUPS = * IT_SORT = * IT_FILTER = * IS_SEL_HIDE = * I_DEFAULT = 'X' * I_SAVE = ' ' * IS_VARIANT = ' ' it_events = gt_events_p[] * IT_EVENT_EXIT = * IS_PRINT = i_screen_start_column = 15 i_screen_start_line = 2 i_screen_end_column = 60 i_screen_end_line = 17 * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = tables t_outtab = $fprot exceptions program_error = 1 others = 2.

CONVERT_TO_FOREIGN_CURRENCY call function 'CONVERT_TO_FOREIGN_CURRENCY' exporting date = $a_nlei-prdat foreign_currency = waers local_amount = $a_nlei-preis local_currency = hwaers * RATE = 0 * TYPE_OF_RATE = 'M' importing * EXCHANGE_RATE = foreign_amount = $a_nlei-preis * FOREIGN_FACTOR = * LOCAL_FACTOR = * EXCHANGE_RATEX = * DERIVED_RATE_TYPE = * FIXED_RATE = exceptions no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 others = 6.

ISH_GET_ENDDATE_SERVICES call function 'ISH_GET_ENDDATE_SERVICES' exporting aufdt = $infal-aufdt aufzt = $infal-aufzt begdt = $begdt begzt = $begzt einri = $a_nlei-einri falnr = $a_nlei-falnr etlart = 'X' etldt = $infal-entdt etlzt = $infal-entzt quantity = $meng s_param = $a_nlei-bform exact_abdat = 'X' talst = $a_nlei-leist tarid = $a_nlei-haust importing enddt = enddt exceptions aufdt_gt_begdt = 1 auf_gt_etl = 2 begdt_gt_enddt = 3 etldt_lt_enddt = 4 invalid_einri = 5 invalid_s_param = 6 zuw_leist = 7 others = 8.

ISH_GET_QUANTITY_SERVICES call function 'ISH_GET_QUANTITY_SERVICES' exporting aufdt = $infal-aufdt aufzt = $infal-aufzt begdt = $begdt begzt = $begzt einri = $a_nlei-einri falnr = $infal-falnr enddt = ntsp_edt * ENDZT = '240000' etlart = $infal-entart etldt = $infal-entdt etlzt = $infal-entzt nbgdt = $a_nlei-nbgdt nbgzt = $a_nlei-nbgzt s_param = $a_nlei-bform talst = $a_nlei-leist tarid = $a_nlei-haust importing quantity = menge exceptions aufdt_gt_begdt = 1 auf_gt_etl = 2 begdt_gt_enddt = 3 etldt_lt_enddt = 4 invalid_einri = 5 invalid_s_param = 6 others = 7.

CONVERT_TO_FOREIGN_CURRENCY call function 'CONVERT_TO_FOREIGN_CURRENCY' exporting date = $prdat foreign_currency = waers local_amount = hntsp-twert local_currency = kat_waers-waers * RATE = 0 * TYPE_OF_RATE = 'M' importing * EXCHANGE_RATE = foreign_amount = hntsp-twert * FOREIGN_FACTOR = * LOCAL_FACTOR = * EXCHANGE_RATEX = * DERIVED_RATE_TYPE = * FIXED_RATE = exceptions no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 others = 6.

GET_PRINT_PARAMETERS call function 'GET_PRINT_PARAMETERS' exporting immediately = off line_size = l_line_size mode = 'CURRENT' no_dialog = on report = repid importing out_parameters = l_print_parameters valid = l_valid * VALID_FOR_SPOOL_CREATION = "XTSNOTE972882 exceptions archive_info_not_found = 1 invalid_print_params = 2 invalid_archive_params = 3 others = 4.

ISH_READ_NTPK call function 'ISH_READ_NTPK' exporting einri = $a_nlei-einri talst = $a_nlei-leist tarif = $a_nlei-haust importing e_ntpk = ntpk exceptions not_found = 1 others = 2.

ISH_CASE_SELECTION_CREATE call function 'ISH_CASE_SELECTION_CREATE' exporting ss_einri = se_einri ss_selkz = sel_exp ss_seltx = seltxt * SS_UPDATE_ALLOWED = 'X' tables ss_falnr = faelle exceptions exists = 1 invalid_sign_option = 2 invalid_einri = 3 others = 4.

REUSE_ALV_EXTRACT_SAVE call function 'REUSE_ALV_EXTRACT_SAVE' exporting is_extract = gs_extract1 i_get_selinfos = on * I_NO_MESSAGE = * IS_SEL_HIDE = i_exp01 = selscreen i_exp02 = gs_variant i_exp03 = rnstat * I_EXP04 = * I_EXP05 = * I_EXP06 = * I_EXP07 = * I_EXP08 = * I_EXP09 = * I_EXP10 = tables it_exp01 = istat it_exp02 = vistat * TABLES * IT_EXP03 = * IT_EXP04 = * IT_EXP05 = * IT_EXP06 = * IT_EXP07 = * IT_EXP08 = * IT_EXP09 = * IT_EXP10 = * EXCEPTIONS * WRONG_RELID = 1 * NO_REPORT = 2 * NO_EXNAME = 3 * NO_EXTRACT_CREATED = 4 * OTHERS = 5 .

REUSE_ALV_EXTRACT_LOAD call function 'REUSE_ALV_EXTRACT_LOAD' exporting is_extract = gs_extract2 * I_NO_MESSAGE = importing * ES_ADMIN = es_sel_hide = gs_sel_hide tables et_exp01 = istat et_exp02 = vistat * ET_EXP03 = * ET_EXP04 = * ET_EXP05 = * ET_EXP06 = * ET_EXP07 = * ET_EXP08 = * ET_EXP09 = * ET_EXP10 = changing c_exp01 = selscreen c_exp02 = gs_variant c_exp03 = rnstat * CHANGING * C_EXP04 = * C_EXP05 = * C_EXP06 = * C_EXP07 = * C_EXP08 = * C_EXP09 = * C_EXP10 = * EXCEPTIONS * NOT_FOUND = 1 * WRONG_RELID = 2 * NO_REPORT = 3 * NO_EXNAME = 4 * NO_IMPORT_POSSIBLE = 5 * OTHERS = 6 .

ISH_CHECK_FIELD_ACTIVE_CVERS call function 'ISH_CHECK_FIELD_ACTIVE_CVERS' exporting ss_pname = p_repid ss_dynnr = '1000' ss_field = p_field exceptions field_not_active = 1 others = 2.

ISH_CH_READ_NTPKCH call function 'ISH_CH_READ_NTPKCH' exporting einri = $a_nlei-einri talst = $a_nlei-leist tarif = $a_nlei-haust i_vdate = $a_nlei-ibgdt importing e_ntpkch = l_ntpkch exceptions not_found = 1 others = 2.

ISH_DYNP_VALUES_READ call function 'ISH_DYNP_VALUES_READ' exporting dyname = p_repid dynumb = p_dynnr tables dynpfields = lt_dynpread exceptions others = 1.

CONVERSION_EXIT_ALPHA_INPUT call function 'CONVERSION_EXIT_ALPHA_INPUT' exporting input = se_einri importing output = se_einri exceptions others = 1.

ISH_GRAPHIC_ORGID_SELECT call function 'ISH_GRAPHIC_ORGID_SELECT' exporting einri = se_einri freig = '*' ambes = p_outpatient fazuw = p_department pfzuw = p_nursing no_bauid = on importing selected_orgid = p_org exceptions bauid_not_in_nbau = 1 einri_not_in_tn01 = 2 no_hierarchy = 3 orgid_not_in_norg = 4 others = 5.

ISH_UNIRETCASE_ATTRIB_GET call function 'ISH_UNIRETCASE_ATTRIB_GET' exporting i_einri = $p_nfal-einri i_falnr = $p_nfal-falnr importing e_lead = l_leading_case e_falnr_lead = l_falnr_lead exceptions no_uniretcase = 1 others = 2.

ISH_READ_NLEI CALL FUNCTION 'ISH_READ_NLEI' EXPORTING ss_einri = $p_nfal-einri ss_falnr = $p_nfal-falnr ss_db_read = on TABLES ss_nlei = inlei EXCEPTIONS OTHERS = 0.

ISH_NBEWTAB_GET_ADMISSION call function 'ISH_NBEWTAB_GET_ADMISSION' exporting ss_einri = p_einri ss_falnr = p_falnr_lead importing ss_nbew = adm_nbew exceptions not_found = 1 others = 2.

ISH_NBEWTAB_GET_DISCHARGE call function 'ISH_NBEWTAB_GET_DISCHARGE' exporting ss_einri = p_einri ss_falnr = p_falnr_lead importing ss_nbew = dis_nbew exceptions not_found = 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 RNLSTA09 or its description.