SAP Reports / Programs | Patient Management | SAP Healthcare - Industry-Specific Components for Hospitals | Patient Management(IS-H-PM) SAP IS
RNLDIA02 SAP ABAP Report - IS-H: Key Figures for Diagnosis and Procedure Documentation
RNLDIA02 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for The analysis program
If you would like to execute this report or see the full code listing simply enter RNLDIA02 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
S_KK4_96000415 - IS-H: Key Figures for Diagnoses and
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 RNLDIA02. "Basic submit
SUBMIT RNLDIA02 AND RETURN. "Return to original report after report execution complete
SUBMIT RNLDIA02 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: ALVDVAR1 = Layout with Departments
Selection Text: ALVDVAR2 = Layout with Care Units
Selection Text: AUSBEGDT = Evaluation Period Start
Selection Text: AUSENDDT = Evaluation Period End
Selection Text: EXP_DIAG = Threshold Value Expct. Diagn.
Selection Text: P_AUFN = Admission
Selection Text: P_DIAG = DRG Principal Diagnosis
Selection Text: P_ENTL = Discharge
Selection Text: P_NEWBOR = Healthy Newborns
Selection Text: P_SELE1 = Selection by Period
Selection Text: P_SELE2 = Selection by Case Selection
Selection Text: SEL_EXP = Case Selection
Selection Text: SE_EINRI = Institution
Selection Text: SE_EXPAN = Expand Cases
Selection Text: SE_LIST2 = Skip Departments
Selection Text: SE_ORGFA = Departmental Org. Unit
Selection Text: SE_ORGPF = Nursing Organizational Unit
Selection Text: P_EX1 = D .
Selection Text: P_EX2 = D .
Selection Text: P_EXLOAD = D .
Selection Text: P_EXSAVE = D .
Selection Text: P_EXT1 = D .
Selection Text: P_NOEX = D .
Selection Text: SE_SELKZ = D .
Title: IS-H: Key Figures for Diagnosis and Procedure Documentation
Text Symbol: S05 = Test Mode
Text Symbol: S04 = To
Text Symbol: S03 = Comparison Period
Text Symbol: S02 = Select Cases via Evaluation Period and Departmental/Nursing OU
Text Symbol: S01 = Institution
Text Symbol: G05 = Other
Text Symbol: 001 = No data found for your selection criteria
Text Symbol: 002 = Number of cases found:
Text Symbol: 010 = Organizational Unit
Text Symbol: 011 = Case
Text Symbol: 012 = Key Figures for Diagnosis and
Text Symbol: 013 =
Text Symbol: 014 = Procedure Documentation
Text Symbol: 040 = Layout with Departments
Text Symbol: 041 = Layout with Care Units
Text Symbol: 042 = Expand Cases
Text Symbol: 043 = Skip Departments
Text Symbol: 045 = List Layout
Text Symbol: 047 = Threshold Value "Expected Number of Diagnoses"
Text Symbol: 049 = Update Case Selection:
Text Symbol: 050 = Departmental Org. Unit
Text Symbol: 051 = Nursing Organizational Unit
Text Symbol: 052 = Select Cases via Case Selection
Text Symbol: 053 = Admission
Text Symbol: 054 = DRG Principal Diagnosis
Text Symbol: 055 = Discharge
Text Symbol: 056 = Include Healthy Newborns
Text Symbol: 060 = Case Select.
Text Symbol: 061 = Evaluation Period
Text Symbol: BL1 = Relevant for Evaluation Period (Case Selection) and OU Assignment (Results List)
Text Symbol: BL2 = Key Figure-Specific Settings
Text Symbol: BL3 = Select Case
Text Symbol: BL4 = Addit. Selection Criteria
Text Symbol: G01 = OU-Related
Text Symbol: G02 = Diagnosis-Related
Text Symbol: G03 = Therapy-/Srg-Related
Text Symbol: G04 = DRG-Related
INCLUDES used within this REPORT RNLDIA02
INCLUDE RNLALV00.
INCLUDE RNSSTABL.
INCLUDE MNDATA_DRG.
INCLUDE MNDATA_MOVEMENT_CATEGORIES.
INCLUDE RNEXTRACT_DATA.
INCLUDE RNSSEXTR.
INCLUDE RNSSEINR.
INCLUDE RNSSIEIN.
INCLUDE RNSSIEXT.
INCLUDE RNSSSEIN.
INCLUDE RNSSSAUS.
INCLUDE RNSSSEXT.
INCLUDE RNSSSEXT_VALUE_REQUEST.
INCLUDE RNSSSPBO.
INCLUDE RNSSSEXT_PBO.
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_MODIFY_SCREEN CALL FUNCTION 'ISH_MODIFY_SCREEN' EXPORTING dynnr = sy-dynnr pname = repid EXCEPTIONS OTHERS = 1.
ENQUEUE_ENFAK CALL FUNCTION 'ENQUEUE_ENFAK' EXPORTING einri = se_einri selkz = sel_exp EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
REUSE_ALV_EXTRACT_SAVE CALL FUNCTION 'REUSE_ALV_EXTRACT_SAVE' EXPORTING is_extract = gs_extract1 i_get_selinfos = on i_exp01 = rnstat i_exp02 = it_fall i_exp03 = it_keza_pf i_exp04 = it_keza_fa i_exp05 = gs_variant1 i_exp06 = gs_variant2.
REUSE_ALV_EXTRACT_LOAD CALL FUNCTION 'REUSE_ALV_EXTRACT_LOAD' EXPORTING is_extract = gs_extract2 IMPORTING * ES_ADMIN = es_sel_hide = gs_sel_hide CHANGING c_exp01 = rnstat c_exp02 = it_fall c_exp03 = it_keza_pf c_exp04 = it_keza_fa c_exp05 = gs_variant1 c_exp06 = gs_variant2 EXCEPTIONS not_found = 1 wrong_relid = 2 no_report = 3 no_exname = 4 no_import_possible = 5 OTHERS = 6.
GET_PRINT_PARAMETERS CALL FUNCTION 'GET_PRINT_PARAMETERS' EXPORTING line_count = 65 line_size = line_size_int IMPORTING out_archive_parameters = arcpar out_parameters = pripar EXCEPTIONS OTHERS = 1.
ISH_AUTH_DIAGNOSIS_ORGFA CALL FUNCTION 'ISH_AUTH_DIAGNOSIS_ORGFA' EXPORTING ss_einri = rnstat-einri ss_orgfa = wa_keza_pf-orgfa ss_act = '03' EXCEPTIONS no_authority = 1.
ISH_AUTH_DIAGNOSIS_ORGFA CALL FUNCTION 'ISH_AUTH_DIAGNOSIS_ORGFA' EXPORTING ss_einri = se_einri ss_orgfa = p_orgfa ss_act = '03' EXCEPTIONS no_authority = 1.
ISH_READ_NFAL CALL FUNCTION 'ISH_READ_NFAL' EXPORTING ss_einri = se_einri ss_falnr = ls_fall-falnr ss_read_db = ' ' ss_check_auth = ' ' IMPORTING ss_nfal = ls_nfal EXCEPTIONS not_found = 1 not_found_archived = 2 no_authority = 3 OTHERS = 4.
ISH_READ_NFAL CALL FUNCTION 'ISH_READ_NFAL' EXPORTING ss_einri = se_einri ss_falnr = ls_fall-falnr ss_read_db = ' ' ss_check_auth = ' ' IMPORTING ss_nfal = ls_nfal EXCEPTIONS not_found = 1 not_found_archived = 2 no_authority = 3 OTHERS = 4.
ISH_CALL_LIST_HEAD CALL FUNCTION 'ISH_CALL_LIST_HEAD' EXPORTING einri = rnstat-einri ausbegdt = rnstat-ausbegdt ausenddt = rnstat-ausenddt line_size = rnstat-line_size repid = rnstat-repid title_lin1 = rnstat-title_lin1 title_lin2 = rnstat-title_lin2 uline = off EXCEPTIONS OTHERS = 1.
ISH_GRAPHIC_ORGID_SELECT CALL FUNCTION 'ISH_GRAPHIC_ORGID_SELECT' EXPORTING einri = se_einri no_bauid = on freig = on fazuw = l_fazuw pfzuw = l_pfzuw IMPORTING selected_orgid = p_orgid EXCEPTIONS OTHERS = 5.
ISH_COUNTRY_VERSION_GET CALL FUNCTION 'ISH_COUNTRY_VERSION_GET' IMPORTING ss_cvers = l_cvers.
ISH_CALL_LIST_HEAD CALL FUNCTION 'ISH_CALL_LIST_HEAD' EXPORTING einri = rnstat-einri ausbegdt = rnstat-ausbegdt ausenddt = rnstat-ausenddt line_size = rnstat-line_size repid = rnstat-repid title_lin1 = 'Kennzahlen zur Diagnosen- und'(012) title_lin2 = 'Prozedurendokumentation'(014) uline = off EXCEPTIONS OTHERS = 1.
ISHMED_AUTHORITY CALL FUNCTION 'ISHMED_AUTHORITY' EXCEPTIONS ishmed_not_activ = 1.
ISH_READ_NORG CALL FUNCTION 'ISH_READ_NORG' EXPORTING einri = se_einri orgid = p_alv_keza_oe-orgid IMPORTING norg_e = l_norg EXCEPTIONS missing_orgid = 1 OTHERS = 2.
REUSE_ALV_VARIANT_DEFAULT_GET CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET' EXPORTING i_save = 'A' CHANGING cs_variant = gs_variant1 EXCEPTIONS wrong_input = 1 not_found = 2 program_error = 3 OTHERS = 4.
REUSE_ALV_VARIANT_DEFAULT_GET CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET' EXPORTING i_save = 'A' CHANGING cs_variant = gs_variant2 EXCEPTIONS wrong_input = 1 not_found = 2 program_error = 3 OTHERS = 4.
REUSE_ALV_VARIANT_F4 CALL FUNCTION 'REUSE_ALV_VARIANT_F4' EXPORTING is_variant = hlpvar i_save = 'A' IMPORTING e_exit = gs_exit es_variant = gs_variant EXCEPTIONS not_found = 1 program_error = 2 OTHERS = 3.
CALL FUNCTION 'ISH_CHECK_ACTIVE_CN' EXCEPTIONS not_active = 1 OTHERS = 2.
ISH_CASE_SELECTION_READ CALL FUNCTION 'ISH_CASE_SELECTION_READ' EXPORTING ss_einri = rnstat-einri ss_selkz = wa_selkz-low * IMPORTING * SS_NFAK = TABLES * SS_NFAP = * SS_NFAM = * SS_FAELLE = ss_falnr = r_cases * SS_HLFD = EXCEPTIONS not_found = 1 OTHERS = 2.
ISH_MD_KEY_FIGURES CALL FUNCTION 'ISH_MD_KEY_FIGURES' EXPORTING i_dispvar = p_dispvar i_einri = rnstat-einri i_org_ref = org_ref * i_ausbegdt = ausbegdt * i_ausenddt = ausenddt * i_orgfa = se_orgfa[] * i_orgpf = se_orgpf[] i_cases = it_cases i_expected_diags = exp_diag i_healthy_newborn = p_newbor IMPORTING e_kennzahl_fall = it_fall e_kennzahl_pf = it_keza_pf e_kennzahl_fa = it_keza_fa EXCEPTIONS OTHERS = 4.
ISH_MD_KEY_FIGURES CALL FUNCTION 'ISH_MD_KEY_FIGURES' EXPORTING i_dispvar = p_dispvar i_einri = rnstat-einri i_org_ref = org_ref i_ausbegdt = ausbegdt i_ausenddt = ausenddt i_orgfa = se_orgfa[] i_orgpf = se_orgpf[] * I_CASES = i_expected_diags = exp_diag i_healthy_newborn = p_newbor IMPORTING e_kennzahl_fall = it_fall e_kennzahl_pf = it_keza_pf e_kennzahl_fa = it_keza_fa EXCEPTIONS OTHERS = 4.
REUSE_ALV_HIERSEQ_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY' EXPORTING i_callback_program = repid i_callback_pf_status_set = 'ALV_SET_STATUS2' i_callback_user_command = 'ALV_USER_COMMAND2' i_default = 'X' i_save = 'A' it_fieldcat = xfield it_special_groups = gt_sp_groups[] is_variant = gs_variant2 it_events = gt_events[] it_event_exit = gt_event_exits[] is_layout = gs_layout i_tabname_header = 'IT_ALV_KEZA_PF' i_tabname_item = 'IT_ALV_KEZA_FALL' is_keyinfo = gs_keyinfo is_print = gs_print is_sel_hide = gs_sel_hide TABLES * Header table with output data t_outtab_header = it_alv_keza_pf * Position table with output data t_outtab_item = it_alv_keza_fall.
ISH_CASE_SELECTION_CREATE CALL FUNCTION 'ISH_CASE_SELECTION_CREATE' EXPORTING ss_einri = p_einri ss_selkz = p_sel_exp ss_seltx = seltxt * SS_UPDATE_ALLOWED = 'X' TABLES ss_falnr = faelle EXCEPTIONS exists = 0 invalid_sign_option = 0 invalid_einri = 0 OTHERS = 0.
REUSE_ALV_VARIANT_SELECT CALL FUNCTION 'REUSE_ALV_VARIANT_SELECT' EXPORTING i_dialog = off i_user_specific = on * I_DEFAULT = 'X' * I_TABNAME_HEADER = * I_TABNAME_ITEM = it_default_fieldcat = xfield i_layout = gs_layout * I_BYPASSING_BUFFER = * I_BUFFER_ACTIVE = IMPORTING * E_EXIT = et_fieldcat = saved_fieldcat * ET_SORT = * ET_FILTER = * ES_LAYOUT = CHANGING cs_variant = p_variant1 EXCEPTIONS wrong_input = 1 fc_not_complete = 2 not_found = 3 program_error = 4 OTHERS = 5.
REUSE_ALV_VARIANT_SELECT CALL FUNCTION 'REUSE_ALV_VARIANT_SELECT' EXPORTING i_dialog = off i_user_specific = on * I_DEFAULT = 'X' i_tabname_header = 'IT_ALV_KEZA_PF' i_tabname_item = 'IT_ALV_KEZA_FALL' it_default_fieldcat = xfield i_layout = gs_layout * I_BYPASSING_BUFFER = * I_BUFFER_ACTIVE = IMPORTING * E_EXIT = et_fieldcat = saved_fieldcat * ET_SORT = * ET_FILTER = * ES_LAYOUT = CHANGING cs_variant = p_variant2 EXCEPTIONS wrong_input = 1 fc_not_complete = 2 not_found = 3 program_error = 4 OTHERS = 5.
REUSE_ALV_LIST_LAYOUT_INFO_GET CALL FUNCTION 'REUSE_ALV_LIST_LAYOUT_INFO_GET' IMPORTING et_fieldcat = it_fieldcat 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 RNLDIA02 or its description.
RNLDIA02 - IS-H: Key Figures for Diagnosis and Procedure Documentation RNLDIA02 - IS-H: Key Figures for Diagnosis and Procedure Documentation RNLDIA01_REPLACE_FOR_N_VDIAF01 - Include RNLDIA01_REPLACE_FOR_N_VDIAF01 RNLDIA01 - IS-H: Evaluate Diagnoses RNLDIA01 - IS-H: Evaluate Diagnoses RNLCOT00_GET_PNT_MULTIF01 - Include RNLCOT00_GET_PNT_MULTIF01