RNLAUS01 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This report enables you to generate a status extract for a patient...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 RNLAUS01 into the relevant SAP transactions such as SE38 or SE80
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.
Selection Text: XMESSAGE = Display Messages
Selection Text: R_FALNR = Case
Title: IS-H: Patient Status Extract
Text Symbol: 134 = Invoice
Text Symbol: 135 = Cancel
Text Symbol: 136 = Total:
Text Symbol: 137 = Movement Ctgy
Text Symbol: 138 = Read
Text Symbol: 139 = Street/No.
Text Symbol: 140 = PCd/City
Text Symbol: 141 = District
Text Symbol: 142 = Telephone
Text Symbol: 143 = For case
Text Symbol: 144 = No Data Matches these Selection Criteria
Text Symbol: 145 = Case Asgd ;;
Text Symbol: 146 = Address
Text Symbol: 147 = Relatshp
Text Symbol: 148 = Cont.Scheme
Text Symbol: 149 = Original
Text Symbol: 150 = Srg Date
Text Symbol: 151 = No authorization for case list
Text Symbol: 152 = No readmission assignments exist
Text Symbol: 153 = Leading Case
Text Symbol: 154 = Rsn
Text Symbol: 155 = DRG Code
Text Symbol: 156 = MDC Code
Text Symbol: 157 = DRG Catalog
Text Symbol: 158 = SOI
Text Symbol: 133 = Cleared ;;
Text Symbol: 108 = No Surgical Procedures Exist
Text Symbol: 109 = No Coverage/Certificate Exists
Text Symbol: 110 = No Case-Related Ins. Relalationships Exist
Text Symbol: 111 = No Invoices Exist
Text Symbol: 112 = OvrllStat;;
Text Symbol: 113 = Print
Text Symbol: 114 = No.Rem;;
Text Symbol: 115 = Svce From ;;
Text Symbol: 116 = Svce To ;;
INCLUDE MNDATA00.
INCLUDE MNCOLOUR.
No SAP DATABASE tables are accessed within this REPORT code!
ISH_AUTH_CHECK_REPORT_EINRI CALL FUNCTION 'ISH_AUTH_CHECK_REPORT_EINRI' EXPORTING repid = reportid einri = p_einri messagetype = 'E' IMPORTING rc = rc EXCEPTIONS OTHERS = 1.
ISH_COUNTRY_VERSION_GET CALL FUNCTION 'ISH_COUNTRY_VERSION_GET' IMPORTING ss_cvers = g_version EXCEPTIONS OTHERS = 0.
ISH_ACCESSIBILITY_MODE_GET CALL FUNCTION 'ISH_ACCESSIBILITY_MODE_GET' IMPORTING accessibility = acc_mode EXCEPTIONS OTHERS = 1.
ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_patnr = patnr ss_read_db = on ss_check_auth = off ss_with_nadr = off IMPORTING ss_npat = npat EXCEPTIONS not_found = 1 OTHERS = 4.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = dyn_einri IMPORTING output = dyn_einri EXCEPTIONS OTHERS = 0.
ISH_SHOW_LIST_PATIENT CALL FUNCTION 'ISH_SHOW_LIST_PATIENT' EXPORTING anfo = on vcode = 'DIS' npat_einri = dyn_einri IMPORTING npat_patnr = help_patnr storno_selected = storno_selected weiter = weiter EXCEPTIONS geschlecht_falsch = 01 no_authority = 02 npat_not_found = 03 selection_false = 04.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = dyn_einri IMPORTING output = dyn_einri EXCEPTIONS OTHERS = 0.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = dyn_patnr IMPORTING output = dyn_patnr EXCEPTIONS OTHERS = 0.
ISH_SHOW_LIST_FALL CALL FUNCTION 'ISH_SHOW_LIST_FALL' EXPORTING nfal_einri = dyn_einri nfal_patnr = dyn_patnr popup = on repid = repid vcode = 'DIS' IMPORTING nfal_falnr = help_falnr select_nfal = select_nfal storno_selected = storno_selected weiter = weiter EXCEPTIONS pat_not_found = 1 repid_missing = 2 OTHERS = 3.
ISH_DYNP_VALUES_READ CALL FUNCTION 'ISH_DYNP_VALUES_READ' EXPORTING dyname = dyname dynumb = dynumb TABLES dynpfields = idynpread.
ISH_TC_SWITCH_OFF_UNDO call function 'ISH_TC_SWITCH_OFF_UNDO'.
ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_einri = p_einri ss_patnr = patnr IMPORTING ss_npat = npat EXCEPTIONS not_found = 01 no_authority = 02.
ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_einri = p_einri ss_patnr = patnr IMPORTING ss_npat = $npat * ss_nadr = nadr EXCEPTIONS not_found = 01 no_authority = 02.
ISH_NPAT_CONCATENATE CALL FUNCTION 'ISH_NPAT_CONCATENATE' EXPORTING * SS_EINRI = '*' ss_patnr = $npat-patnr * SS_READ_NPAT = ' ' ss_npat = $npat ss_npat_complete = off ss_list = on IMPORTING ss_pname = name EXCEPTIONS OTHERS = 0.
ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_patnr = npat_wa-patnr ss_with_nadr = on IMPORTING ss_nadr_abg = nadr EXCEPTIONS OTHERS = 4.
ISH_READ_NGPA CALL FUNCTION 'ISH_READ_NGPA' EXPORTING gpart = npat_wa-agnum IMPORTING ngpa_e = ngpa nadr_e = nadr EXCEPTIONS OTHERS = 0.
ISH_NFAL_CHECK_AUTHORITY call function 'ISH_NFAL_CHECK_AUTHORITY' exporting ss_einri = einri ss_falnr = infal_tab-falnr i_check_auth = off i_tc_auth = on i_tc_excep = on EXCEPTIONS NO_TREATMENT_CONTRACT = 1 OTHERS = 2.
ISH_ARCHIVE_CASE_LIST CALL FUNCTION 'ISH_ARCHIVE_CASE_LIST' EXPORTING ss_patnr = patnr ss_einri = einri "HW1567621 14.03.2011
ISH_ARCHIVE_READ_NFAL CALL FUNCTION 'ISH_ARCHIVE_READ_NFAL' EXPORTING ss_einri = einri ss_falnr = archive_cases-falnr IMPORTING ss_data = case_data EXCEPTIONS OTHERS = 0.
ARCHIV_CONNECTINFO_GET_META CALL FUNCTION 'ARCHIV_CONNECTINFO_GET_META' EXPORTING * ARCHIV_ID = ' ' * AR_OBJECT = ' ' * DOC_TYPE = ' ' object_id = objectid sap_object = 'NFAL' IMPORTING number = num EXCEPTIONS error_connectiontable = 1 OTHERS = 2.
ISH_EXPORT_KLASSIFIKATION_FALL CALL FUNCTION 'ISH_EXPORT_KLASSIFIKATION_FALL' EXPORTING ss_einri = p_einri ss_falnr = falnr EXCEPTIONS OTHERS = 1.
ISH_SHOW_LIST_FFZ CALL FUNCTION 'ISH_SHOW_LIST_FFZ' EXPORTING nffz_einri = p_einri nffz_falni = falnr no_list_ffz = on npat_patnr = patnr TABLES itab_nffz = ffz_tab EXCEPTIONS npat_not_found = 0.
ISH_READ_NGPA CALL FUNCTION 'ISH_READ_NGPA' EXPORTING gpart = ls_ngpa-gpart ss_with_nadr = off IMPORTING ngpa_e = ls_ngpa_res EXCEPTIONS not_found = 1 no_authority = 2 OTHERS = 3.
ISH_SHOW_LIST_FPZ CALL FUNCTION 'ISH_SHOW_LIST_FPZ' EXPORTING nfpz_einri = p_einri nfpz_falnr = falnr no_list_fpz = on npat_patnr = patnr TABLES itab_nfpz = fpz_tab EXCEPTIONS npat_not_found = 0.
ISH_READ_NDIA CALL FUNCTION 'ISH_READ_NDIA' EXPORTING afdia = on bhdia = on einri = p_einri endia = on ewdia = on falnr = falnr fhdia = on khdia = on opdia = on sperr = on storn = off IMPORTING rc = l_rc TABLES ss_ndia = dia_tab EXCEPTIONS OTHERS = 0.
ISH_INSREL_PAT_GETLIST CALL FUNCTION 'ISH_INSREL_PAT_GETLIST' EXPORTING ss_einri = p_einri ss_patnr = patnr ss_authcheck = on ss_sel_storn = off ss_read_text = off ss_read_adr = off ss_read_fi_cust = off TABLES ss_npir = npir_tab.
ISH_INSREL_CASE_POOL_GET CALL FUNCTION 'ISH_INSREL_CASE_POOL_GET' EXPORTING ss_einri = p_einri ss_falnr = falnr ss_sel_storn = off TABLES ss_ncir_daba = ncir_tab.
ISH_READ_SERVICES CALL FUNCTION 'ISH_READ_SERVICES' EXPORTING abrkz = on einri = p_einri falnr = falnr falnr_exist = on ist = on not_abrkz = on not_storn = on patnr_exist = on plan = on read_all = on storn = off zeitp = on zeitr = on TABLES e_nlei = lei_tab EXCEPTIONS OTHERS = 0.
ISH_PROCEDURE_READ_SIMPLE CALL FUNCTION 'ISH_PROCEDURE_READ_SIMPLE' EXPORTING ss_einri = p_einri ss_falnr = falnr TABLES e_nicp = inicp e_ndicz = indicz EXCEPTIONS OTHERS = 0.
ARCHIV_CONNECTINFO_GET_META CALL FUNCTION 'ARCHIV_CONNECTINFO_GET_META' EXPORTING * ARCHIV_ID = ' ' * AR_OBJECT = ' ' * DOC_TYPE = ' ' object_id = objectid sap_object = 'NKSK' IMPORTING number = num EXCEPTIONS error_connectiontable = 1 OTHERS = 2.
ISH_GET_ADDITIONAL_FI_DATA CALL FUNCTION 'ISH_GET_ADDITIONAL_FI_DATA' EXPORTING belnr = $belnr bukrs = $bukrs einri = $einri event = 'REC001' gjahr = $gjahr IMPORTING bseg_e = $bseg returncode = $rc EXCEPTIONS OTHERS = 0.
ISH_ARCHIVE_FAKTURA_READ CALL FUNCTION 'ISH_ARCHIVE_FAKTURA_READ' EXPORTING i_einri = p_einri i_falnr = falnr IMPORTING e_invoices = arch_invoices[] EXCEPTIONS OTHERS = 0.
ISH_DISTRIBUTE_YEAR_DETERMINE CALL FUNCTION 'ISH_DISTRIBUTE_YEAR_DETERMINE' EXPORTING i_budat = ivbrk-fkdat i_einri = ivbrk-isheinri IMPORTING e_gjahr = gjahr EXCEPTIONS no_configuration_found = 1 error_period = 2 OTHERS = 3.
ARCHIV_CONNECTINFO_GET_META CALL FUNCTION 'ARCHIV_CONNECTINFO_GET_META' EXPORTING * ARCHIV_ID = ' ' * AR_OBJECT = ' ' * DOC_TYPE = ' ' object_id = objectid sap_object = 'VBRK' IMPORTING number = num EXCEPTIONS error_connectiontable = 1 OTHERS = 2.
ISH_DISTRIBUTE_FUNCTION_DEBIT CALL FUNCTION 'ISH_DISTRIBUTE_FUNCTION_DEBIT' EXPORTING einri = einri debitor = szdeb "#EC DOM_EQUAL event = event i_rng12 = g12_n *i_rng12 = g12_a nummernvergabe = numkz only_a_seg = asegm vcode = vcode vcode_read = v_deb IMPORTING debnr = szdeb "#EC DOM_EQUAL e_rng12 = g12_n subrc = fb_subrc msgid = fb_msgid msgno = fb_msgno msgty = fb_msgty msgv1 = fb_msgv1 msgv2 = fb_msgv2 msgv3 = fb_msgv3 msgv4 = fb_msgv4 TABLES bnka_help_tab = bnka_tab EXCEPTIONS * NO_COMMUNICATION = 1 OTHERS = 0.
ISH_READ_NTPT CALL FUNCTION 'ISH_READ_NTPT' EXPORTING einri = p_einri spras = sy-langu talst = leist tarif = haust IMPORTING e_ntpt = ntpt EXCEPTIONS not_found = 1.
ISH_MTPP_CHECK_ACTIVE CALL FUNCTION 'ISH_MTPP_CHECK_ACTIVE' EXCEPTIONS not_active = 1 OTHERS = 2.
ISH_READ_NGPA CALL FUNCTION 'ISH_READ_NGPA' EXPORTING gpart = kostr IMPORTING ngpa_e = ngpa nadr_e = nadr EXCEPTIONS not_found = 1 no_authority = 2 OTHERS = 3.
ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_patnr = npat-patnr ss_with_nadr = on IMPORTING ss_nadr = nadr * ss_nadr_abg = * ss_nadr_an1 = * ss_nadr_an2 = EXCEPTIONS OTHERS = 0.
ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_patnr = npat-patnr ss_with_nadr = on IMPORTING * ss_nadr = nadr * ss_nadr_abg = ss_nadr_an1 = nadr * ss_nadr_an2 = EXCEPTIONS OTHERS = 0.
ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_patnr = npat-patnr ss_with_nadr = on IMPORTING * ss_nadr = nadr * ss_nadr_abg = * ss_nadr_an1 = nadr ss_nadr_an2 = nadr EXCEPTIONS OTHERS = 0.
ISH_CASE_HEADER_LIST CALL FUNCTION 'ISH_CASE_HEADER_LIST' EXPORTING ss_einri = p_einri ss_nfal = t_nfal_wa ss_npat = npat_wa ss_pat_header = off ss_show_no_einri = on TABLES ss_nbewtab = vnbew_tab EXCEPTIONS OTHERS = 0.
ISH_SAP_OM_CHECK_ACTIVE CALL FUNCTION 'ISH_SAP_OM_CHECK_ACTIVE' IMPORTING e_status = l_status EXCEPTIONS not_active = 1 OTHERS = 2.
ISH_OM_BU_GET CALL FUNCTION 'ISH_OM_BU_GET' EXPORTING i_bauid = bew_tab-zimmr i_req_infty = l_reg_infty_bu IMPORTING e_infty_bu = lt_infty_bu EXCEPTIONS nothing_found = 1 internal_error = 2 OTHERS = 3.
ISH_OM_BU_GET CALL FUNCTION 'ISH_OM_BU_GET' EXPORTING i_bauid = bew_tab-bett i_req_infty = l_reg_infty_bu IMPORTING e_infty_bu = lt_infty_bu EXCEPTIONS nothing_found = 1 internal_error = 2 OTHERS = 3.
ISH_SAP_OM_CHECK_ACTIVE CALL FUNCTION 'ISH_SAP_OM_CHECK_ACTIVE' EXCEPTIONS not_active = 1.
ISH_OM_OU_GET CALL FUNCTION 'ISH_OM_OU_GET' EXPORTING i_orgid = orgid IMPORTING et_norg = lt_norg EXCEPTIONS nothing_found = 0 internal_error = 0 OTHERS = 0.
ISH_CHECK_FIELD_ACTIVE_CVERS CALL FUNCTION 'ISH_CHECK_FIELD_ACTIVE_CVERS' EXPORTING ss_pname = p_repid ss_dynnr = '1000' ss_field = p_field ss_cvers = p_cvers EXCEPTIONS field_not_active = 1 OTHERS = 2.
ISH_CH_NWCH70_READ CALL FUNCTION 'ISH_CH_NWCH70_READ' EXPORTING ss_einri = p_einri ss_falnr = p_falnr TABLES ss_nwch70 = pt_nwch70 EXCEPTIONS OTHERS = 0.
ISH_CH_READ_NCH53 CALL FUNCTION 'ISH_CH_READ_NCH53' EXPORTING ss_einri = p_einri ss_falnr = p_falnr TABLES et_nch53 = pt_nch53 EXCEPTIONS OTHERS = 0.
ISH_DOMAIN_VALUE_TEXTS CALL FUNCTION 'ISH_DOMAIN_VALUE_TEXTS' EXPORTING domname = h_dom domvalue = h_val * single = IMPORTING ddtext = $text.
ISH_READ_NKTR CALL FUNCTION 'ISH_READ_NKTR' EXPORTING copy_parms_of_ktart = on kostr = $inwch70-kostr IMPORTING nktr_e = l_nktr EXCEPTIONS not_found = 1 no_authority = 2.
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_program_name = reportid i_internal_tabname = iv_strnamehead i_inclname = reportid CHANGING ct_fieldcat = xt_fcat_master EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3.
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_program_name = reportid i_internal_tabname = iv_strnameitem i_inclname = reportid CHANGING ct_fieldcat = xt_fcat_slave EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3.
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_program_name = reportid i_internal_tabname = iv_strname i_inclname = reportid CHANGING ct_fieldcat = xt_fieldcat EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3.
REUSE_ALV_EVENTS_GET CALL FUNCTION 'REUSE_ALV_EVENTS_GET' EXPORTING i_list_type = 0 IMPORTING et_events = alv_events "xt_eventtab EXCEPTIONS list_type_wrong = 1 OTHERS = 2.
ISH_NPAT_CONCATENATE CALL FUNCTION 'ISH_NPAT_CONCATENATE' EXPORTING ss_patnr = npat-patnr ss_npat = npat ss_npat_complete = off IMPORTING ss_pname = title_name EXCEPTIONS OTHERS = 0.
ISH_CALL_LIST_HEAD CALL FUNCTION 'ISH_CALL_LIST_HEAD' EXPORTING einri = rnstat-einri line_size = rnstat-line_size repid = rnstat-repid title_lin1 = rnstat-title_lin1 title_lin2 = title_name uline = off EXCEPTIONS invalid_einri = 01.
ARCHIV_DISPLAY_META CALL FUNCTION 'ARCHIV_DISPLAY_META' EXPORTING object_id = objectid sap_object = sap_object no_workflowinfos = 'X' EXCEPTIONS error_archiv = 1 error_communicationtable = 2 error_connectiontable = 3 error_kernel = 4 error_parameter = 5 error_version = 6 OTHERS = 7.
REUSE_ALV_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' EXPORTING * I_INTERFACE_CHECK = on i_callback_program = reportid i_callback_pf_status_set = gc_pfstatus i_callback_user_command = c_user_command is_layout = ls_layout it_fieldcat = lt_fieldcat it_events = lt_eventtab is_print = ls_print it_event_exit = ls_exit_tab TABLES t_outtab =
EXCEPTIONS program_error = 1 OTHERS = 2.
REUSE_ALV_HIERSEQ_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY' EXPORTING * I_INTERFACE_CHECK = on i_callback_program = reportid i_callback_user_command = c_user_command is_layout = ls_layout it_fieldcat = lt_fieldcat it_events = lt_eventtab is_keyinfo = ls_key i_tabname_header =
-outtab_hdr_name i_tabname_item = -outtab_itm_name is_print = ls_print it_event_exit = ls_exit_tab TABLES t_outtab_header = t_outtab_item = EXCEPTIONS program_error = 1 OTHERS = 2.
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 RNLAUS01 or its description.
RNLAUS01 - IS-H: Patient Status Extract RNLAUS01 - IS-H: Patient Status Extract RNLAPPDL_REPLACE1_N_VNAPP_NF01 - Include RNLAPPDL_REPLACE1_N_VNAPP_NF01 RNLAPPDL - IS-H: Details of Appointments for Different Entities RNLAPPDL - IS-H: Details of Appointments for Different Entities RNLAMBVS_REPLACE1_N_FALL_BEF01 - Include RNLAMBVS_REPLACE1_N_FALL_BEF01