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

RNASEL01 SAP ABAP Report - IS-H: Case Selection via Outpatient Visits







RNASEL01 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for You can use this program to create a case selection, which determines the cases to be billed according to specific visit types and/or a visit period...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 RNASEL01 into the relevant SAP transactions such as SE38 or SE80


Transaction Code(s):

Below is a list of transaction codes which are relevant to this SAP report

NA25 - IS-H: Billing selection via visits


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 RNASEL01. "Basic submit
SUBMIT RNASEL01 AND RETURN. "Return to original report after report execution complete
SUBMIT RNASEL01 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: AB_SEL = Include Final Billed Cases
Selection Text: AO = Visits for Outpat. Surgery
Selection Text: BISDT = Visit Date To
Selection Text: BWART = Other Visit Types
Selection Text: EINRI = Institution
Selection Text: FALAR = Only Case Type
Selection Text: FSPER = Also Blocked Cases
Selection Text: KV_NOT = Do not Select PPA Cases
Selection Text: KV_ONLY = Select PPA Billing Cases Only
Selection Text: NS = Postdischarge Visits
Selection Text: ORGFA = Departmental Org. Unit
Selection Text: ORGPF = Treatment Org. Unit
Selection Text: SELKZ = Case Selection
Selection Text: SELTX = Comment on Selection
Selection Text: SO_MDSTA = Med. Doc. Status Key
Selection Text: SO_MDSTS = Med.Doc. Status Profile
Selection Text: TEST = Test Mode
Selection Text: VONDT = Visit Date From
Selection Text: VS = Preadmission Visits
Title: IS-H: Case Selection via Outpatient Visits
Text Symbol: U29 = Include First Visit Only
Text Symbol: 028 = Treatment Authorization
Text Symbol: 027 = TrtA
Text Symbol: 026 = Selection not Supported
Text Symbol: 025 = Name
Text Symbol: 024 = Cases Selected
Text Symbol: 001 = Number of Cases Selected:
Text Symbol: 002 = Included in Case Selection:
Text Symbol: 003 = Added to Case Selection:
Text Symbol: 004 = Case Selection
Text Symbol: 005 = Visit Data
Text Symbol: 006 = Case Indicators
Text Symbol: 007 = Further Specifications
Text Symbol: 008 = Visits f. Outp. Sg.
Text Symbol: 009 = Preadmission Visits
Text Symbol: 010 = Postdischarge Visits
Text Symbol: 011 = Select PPA Billing Cases Only
Text Symbol: 012 = Do not Select PPA Billing Cases





Text Symbol: 013 = Also Blocked Cases
Text Symbol: 014 = Include Final Billed Cases
Text Symbol: 015 = Test Mode
Text Symbol: 016 = Set 1 PPA Parameter Only
Text Symbol: 017 = B Symb.
Text Symbol: 018 = Start List Output
Text Symbol: 019 = End List Output
Text Symbol: 020 = Pat./Case Data
Text Symbol: 021 = Visit Data
Text Symbol: 022 = Symbols/Icons
Text Symbol: 023 = Case Selection by Visits
002 t i t OU OU B
001 Case Name C B Visit Dt. M Dept. Nrs. PPA


INCLUDES used within this REPORT RNASEL01

INCLUDE MNCDRGCDF_GENERAL.
INCLUDE RNMDSTATUS_DATA.
INCLUDE RNMDSTATUS_SSR.
INCLUDE RNMDSTATUS_INIT.


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_AUTH_CHECK_REPORT_EINRI CALL FUNCTION 'ISH_AUTH_CHECK_REPORT_EINRI' EXPORTING repid = 'RNASEL01' einri = einri messagetype = 'E'.

ISH_MODIFY_SCREEN CALL FUNCTION 'ISH_MODIFY_SCREEN' EXPORTING dynnr = sy-dynnr pname = sy-repid EXCEPTIONS OTHERS = 1.

ENQUEUE_ENFAK CALL FUNCTION 'ENQUEUE_ENFAK' EXPORTING * MODE_NFAK = 'E' * MANDT = SY-MANDT einri = einri selkz = selkz * X_EINRI = ' ' * X_SELKZ = ' ' * _SCOPE = '2' * _WAIT = ' ' * _COLLECT = ' ' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

ISH_FIRST_VISIT_ONLY CALL FUNCTION 'ISH_FIRST_VISIT_ONLY' EXPORTING it_range_planb = it_range_planb it_range_storn = it_range_storn IMPORTING et_fal_bew = it_not_first_visit CHANGING ct_fal_bew = it_fal_bew EXCEPTIONS no_data = 1 OTHERS = 2.

ISH_READ_NFAL CALL FUNCTION 'ISH_READ_NFAL' EXPORTING ss_einri = einri ss_falnr = i_falnr ss_check_auth = off "note 1520429: without authority check IMPORTING ss_nfal = nfal EXCEPTIONS OTHERS = 3.

STATUS_CHECK CALL FUNCTION 'STATUS_CHECK' EXPORTING * BYPASS_BUFFER = ' ' * CLIENT = SY-MANDT objnr = nfal-objnr status = 'I0351' " billing block EXCEPTIONS object_not_found = 1 status_not_active = 2 OTHERS = 3.

ISH_MD_STATUS_SELECT_OBJNR CALL FUNCTION 'ISH_MD_STATUS_SELECT_OBJNR' EXPORTING i_mdsta = so_mdsta[] i_mdsts = so_mdsts[] i_objnr_tab = it_objnr IMPORTING e_excl_objnr_tab = it_excl_objnr.

ISH_READ_NFAL CALL FUNCTION 'ISH_READ_NFAL' EXPORTING ss_einri = einri ss_falnr = i_falnr IMPORTING ss_nfal = nfal EXCEPTIONS OTHERS = 3.

ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_einri = einri ss_patnr = nfal-patnr IMPORTING ss_npat = npat EXCEPTIONS OTHERS = 04.

ISH_TC_SWITCH_OFF_CHECK CALL FUNCTION 'ISH_TC_SWITCH_OFF_CHECK' CHANGING c_check_tc = l_tc_check.






ISH_TC_SWITCH_OFF_UNDO CALL FUNCTION 'ISH_TC_SWITCH_OFF_UNDO'.

ISH_GET_MD_STATUS CALL FUNCTION 'ISH_GET_MD_STATUS' EXPORTING i_einri = einri i_falnr = f-falnr i_objnr = f-objnr IMPORTING e_md_status = l_md_status EXCEPTIONS not_active = 1 not_found = 2 OTHERS = 3.

ISH_TC_LIST_LINE_CHECK CALL FUNCTION 'ISH_TC_LIST_LINE_CHECK' EXPORTING i_einri = einri I_PATNR = xdata-patnr I_FALNR = xdata-falnr * IS_TC_LOG = ir_tc_api = lr_tc_api * I_CALLED_FROM_CASELIST = ' ' * I_CALLED_FROM_PATCAL = ' ' IMPORTING E_TC_EXIST = l_tc_exist CHANGING cs_line = xdata EXCEPTIONS TC_API_INSTANCE_MISSING = 1 OTHERS = 2.

ISH_TC_SWITCH_OFF CALL FUNCTION 'ISH_TC_SWITCH_OFF'.

REUSE_ALV_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' EXPORTING * I_INTERFACE_CHECK = ' ' i_callback_program = 'RNASEL01' * I_CALLBACK_PF_STATUS_SET = ' ' 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 = i_default = 'X' i_save = 'A' is_variant = gs_variant it_events = gt_events[] * IT_EVENT_EXIT = * IS_PRINT = * IS_REPREP_ID = * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * I_BUFFER_ACTIVE = * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = TABLES t_outtab = xdata EXCEPTIONS program_error = 1 OTHERS = 2.

K_KKB_LIST_DISPLAY * call function 'K_KKB_LIST_DISPLAY' * exporting * i_callback_program = 'RNASEL01' * i_callback_top_of_page = 'TOP_OF_PAGE_NEU' * i_callback_user_command = 'USER_COMMAND' * i_tabname = 'XDATA' * is_layout = gs_layout * it_fieldcat = xfield * it_excluding = gt_extab[] * it_sort = gt_zsum[] * i_fctype = 'R' * it_special_groups = gt_sp_groups[] * tables * t_outtab = xdata * exceptions * others = 1.

ISH_CALL_LIST_HEAD CALL FUNCTION 'ISH_CALL_LIST_HEAD' EXPORTING * AUSBEGDT = ERSDT-LOW * AUSENDDT = ERSDT-HIGH einri = einri line_size = lsize repid = 'RNASEL01' title_lin1 = title1 title_lin2 = title2 uline = off * VERBEGDT = E09 * VERENDDT = E10 EXCEPTIONS invalid_einri = 01.



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 RNASEL01 or its description.