SAP Reports / Programs
RNSL101 SAP ABAP Report - IS-H: BPflV L 1 - Diagnosis Statistics
RNSL101 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Report RNSL101 creates the statistics L1 - Diagnosis Statistics or statistics L4 - Diagnosis Statistics as required by the Federal Regulation for Hospitals (Germany)...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 RNSL101 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 RNSL101. "Basic submit
SUBMIT RNSL101 AND RETURN. "Return to original report after report execution complete
SUBMIT RNSL101 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: AUSBEGDT = Evaluation Period Start
Selection Text: AUSENDDT = Evaluation Period End
Selection Text: INSUM = Int.Care for Transf. Spec./OU
Selection Text: KZ_FACHR = Specialty-Related
Selection Text: KZ_KRANK = Hospital-Related
Selection Text: KZ_UNTF = Lower-Level Specialties
Selection Text: KZ_UNTO = Lower-Level Org. Units
Selection Text: NEW_PAGE = New Page for Each Specialty/OU
Selection Text: SE_DIGIT = Characters per Diagnosis
Selection Text: SE_DIREF = Diagnosis Code
Selection Text: SE_EINRI = Institution
Selection Text: SE_FACHR = ...Specialties
Selection Text: SE_FALNR = Cases to Be Evaluated
Selection Text: STASP = Take Stats Block into Account
Selection Text: STAT = Inpatient
Selection Text: TSTAT = Day Patient
Selection Text: VERBEGDT = Comparison Period Start
Selection Text: VERENDDT = Comparison Period End
Title: IS-H: BPflV L 1 - Diagnosis Statistics
Text Symbol: NO2 = Group
Text Symbol: P01 = Evaluation Period
Text Symbol: P02 = Comparison Period
Text Symbol: PA1 = Cases ;;
Text Symbol: PA2 = Total ;;
Text Symbol: S01 = Institution
Text Symbol: S02 = Evaluation Period
Text Symbol: S03 = Comparison Period
Text Symbol: S04 = To
Text Symbol: S05 = To
Text Symbol: S06 = Automatic Transmission
Text Symbol: S07 = Create File
Text Symbol: S27 = Create Test Messages
Text Symbol: S28 = Output Specialty Types
Text Symbol: TI2 = Inpatient Cases
Text Symbol: TI3 = Day Patient Cases
Text Symbol: TI4 = Inpatient and Day Patient Cases
Text Symbol: NO1 = Without;;
Text Symbol: 001 = Take Statistics Block into Account
Text Symbol: 002 = Case Logging
Text Symbol: 003 = Without Foreign Cases
Text Symbol: 006 = Diagnosis
Text Symbol: 007 = Hospital-Related ;;
Text Symbol: 008 = Specialty-Related ;;
Text Symbol: 009 = Settings
Text Symbol: 010 = View of Evaluation
Text Symbol: 011 = New Page on Change of Specialty/OU ;;
Text Symbol: 012 = Output
Text Symbol: 013 = Case Types
Text Symbol: 014 = Inpatient
Text Symbol: 015 = Day Patient
Text Symbol: 016 = Display Intensive Care Stays for Transferring Specialty
Text Symbol: 017 = Evaluation for All Catalogs
Text Symbol: 020 = Lower-Level Specialties ;;
Text Symbol: 021 = Lower-Level Org. Units ;;
Text Symbol: 029 = Organizational Unit ;;
Text Symbol: 030 = Specialty ;;
Text Symbol: 031 = Total
Text Symbol: 033 = Number ;;
Text Symbol: 034 = Lgth of Stay;;
Text Symbol: 035 = Surgeries ;;
Text Symbol: 036 = Comp. ;;
Text Symbol: 037 = Oper. Pat. ;;
Text Symbol: 050 = No data found for your selection criteria
Text Symbol: 32A = by Age-Groups From ... to Less Than ... Years
Text Symbol: A01 = Main Department
Text Symbol: A02 = Ext. Phy. Department
Text Symbol: A03 = Special Institution
Text Symbol: DI1 = Main ;;
Text Symbol: DI2 = Diagnosis ;;
Text Symbol: FE1 = Number of Error Messages: ;;
Text Symbol: FE2 = (See Messages) ;;
Text Symbol: FEH = BPflV-L1 Error Messages
Text Symbol: FEI = BPflV1995-L4 Error Messages
INCLUDES used within this REPORT RNSL101
INCLUDE RNSSTABL.
INCLUDE RNSDAT00.
INCLUDE RNSSEINR.
INCLUDE RNSSAZVZ.
INCLUDE RNSSSPAI.
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_PRINT_PROTOCOL CALL FUNCTION 'ISH_PRINT_PROTOCOL' EXPORTING LINE_SIZE = RNSTAT-LINE_SIZE MINUTES_TITLE = FEH_TITLE REPID = MEM_REPID.
ISH_PROCESS_MOVEMENTS_FALNR CALL FUNCTION 'ISH_PROCESS_MOVEMENTS_FALNR' EXPORTING AUSBEGDT = AUSBEGDT AUSENDDT = AUSENDDT COMPLETE_ORGFA = KZ_UNTO COMPLETE_SECTIONS = KZ_FACHR EINRI = SE_EINRI FATYP = FATYP_BPFLV NUMBER_OF_CASES = 200 REPL_INT_SECTIONS = REPL_INT_SECTIONS STASP = STASP VERBEGDT = VERBEGDT VERENDDT = VERENDDT CALC_ORGPF = OFF CALC_ORGFA = KZ_FACHR * parameter inserted because of problem 0120050409 0000045471 1999 ALL_MOVES = ON FOREIGNER = FOREIGNER TABLES RANGES_FALNR = SE_FALNR FALAR = FALLARTEN GSCHL = GSCHL MOVES = BEWEGUNGEN * ausgesternt wegen Problem 0120024545 0000454594 1998 * orgfa = se_orgid ORGFA = ORGFA ORGPF = ORGPF PATIENTS = FALLDATEN EXCEPTIONS NO_FALNR_LEFT = 05.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING INPUT = ITNS02-VONALT IMPORTING OUTPUT = ITNS02-VONALT.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING INPUT = ITNS02-BISALT IMPORTING OUTPUT = ITNS02-BISALT.
ISH_MAIN_DIAGNOSISES CALL FUNCTION 'ISH_MAIN_DIAGNOSISES' EXPORTING BEGDT = BEGDT EINRI = SE_EINRI ENDDT = ENDDT STATID = STATID DIAKAT = SE_STKAT TABLES DIAGNOSISES = KHDIAGNOSEN MOVES = BEWEGUNGEN EXCEPTIONS INCONSISTENT_CATALOGUE = 01.
ISH_FIND_AGE CALL FUNCTION 'ISH_FIND_AGE' EXPORTING DATE = DATE_AGE DATE_OF_BIRTH = FALLDATEN-GBDAT IMPORTING AGE = DIAGNOSEN-ALTER EXCEPTIONS AGE_NEGATIVE = 0.
ISH_GET_QUANTITY_SERVICES CALL FUNCTION 'ISH_GET_QUANTITY_SERVICES' EXPORTING AUFDT = FALLDATEN-BEGDT AUFZT = FALLDATEN-BEGZT BEGDT = FALLDATEN-BEGDT BEGZT = FALLDATEN-BEGZT EINRI = SE_EINRI ENDDT = FALLDATEN-ENDDT ENDZT = FALLDATEN-ENDZT ETLART = FALLDATEN-ENTLART ETLDT = FALLDATEN-ENDDT ETLZT = FALLDATEN-ENDZT FALNR = FALLDATEN-FALNR "PA 02.04.98
ISH_GET_QUANTITY_SERVICES CALL FUNCTION 'ISH_GET_QUANTITY_SERVICES' EXPORTING AUFDT = FALLDATEN-BEGDT AUFZT = FALLDATEN-BEGZT BEGDT = BEWEGUNGEN-BWIDT BEGZT = BEWEGUNGEN-BWIZT EINRI = SE_EINRI ENDDT = BEWEGUNGEN-BWEDT ENDZT = BEWEGUNGEN-BWEZT ETLART = FALLDATEN-ENTLART ETLDT = FALLDATEN-ENDDT ETLZT = FALLDATEN-ENDZT FALNR = FALLDATEN-FALNR "PA 02.04.98
ISH_MAIN_SECTION_DIAGNOSISES CALL FUNCTION 'ISH_MAIN_SECTION_DIAGNOSISES' EXPORTING BEGDT = BEGDT DIAGNOSISES_ORGFA = KZ_UNTO EINRI = SE_EINRI ENDDT = ENDDT STATID = STATID DIAKAT = SE_STKAT MAIN_DIAGNOSIS = OFF TABLES DIAGNOSISES = FHDIAGNOSEN MOVES = BEWEGUNGEN EXCEPTIONS INCONSISTENT_CATALOGUE = 01.
ISH_FIND_AGE CALL FUNCTION 'ISH_FIND_AGE' EXPORTING DATE = DATE_AGE DATE_OF_BIRTH = FALLDATEN-GBDAT IMPORTING AGE = DIAGNOSEN-ALTER EXCEPTIONS AGE_NEGATIVE = 0. "#EC DOM_EQUAL
ISH_DIA_CATALOGUE_INSTANTIATE CALL FUNCTION 'ISH_DIA_CATALOGUE_INSTANTIATE' IMPORTING E_CATALOGUE = DIA_CAT.
MESSAGES_COUNT CALL FUNCTION 'MESSAGES_COUNT' IMPORTING COUNT = TAB_INDEX.
ISH_PRINT_PROTOCOL_BATCH CALL FUNCTION 'ISH_PRINT_PROTOCOL_BATCH' EXPORTING LINE_SIZE = RNSTAT-LINE_SIZE MINUTES_TITLE = FEH_TITLE REPID = RNSTAT-REPID NEW_SECTION = ON EXCEPTIONS OTHERS = 0.
ISH_DIA_CATALOGUE_INSTANTIATE CALL FUNCTION 'ISH_DIA_CATALOGUE_INSTANTIATE' IMPORTING E_CATALOGUE = DIA_CAT.
ISH_CALL_LIST_HEAD CALL FUNCTION 'ISH_CALL_LIST_HEAD' EXPORTING AUSBEGDT = AUSBEGDT AUSENDDT = AUSENDDT EINRI = SE_EINRI REPID = RNSTAT-REPID TITLE_LIN1 = RNSTAT-TITLE_LIN1 TITLE_LIN2 = RNSTAT-TITLE_LIN2 LINE_SIZE = RNSTAT-LINE_SIZE VERBEGDT = VERBEGDT VERENDDT = VERENDDT ULINE = OFF.
ISH_EDI_CM_EVENTS CALL FUNCTION 'ISH_EDI_CM_EVENTS' EXPORTING INSTITUTION = SE_EINRI TABLES EVENTS = EVENTS EXCEPTIONS * MISSING_PARAMETERS = 1 OTHERS = 0.
LIST_FROM_MEMORY CALL FUNCTION 'LIST_FROM_MEMORY' TABLES LISTOBJECT = PROG_LIST EXCEPTIONS NOT_FOUND = 1 OTHERS = 2.
WRITE_LIST CALL FUNCTION 'WRITE_LIST' TABLES LISTOBJECT = PROG_LIST EXCEPTIONS OTHERS = 0.
ISH_EDI_READ_TNC301GI CALL FUNCTION 'ISH_EDI_READ_TNC301GI' EXPORTING INSTITUTION = SE_EINRI EDIPROC = GCN_EDI_MRUC * READ_DB = ' ' IMPORTING ACTIVE = MRUC_ACTIVE EXCEPTIONS OTHERS = 0.
ISH_EDI_READ_ACTIVE_DCPS CALL FUNCTION 'ISH_EDI_READ_ACTIVE_DCPS' EXPORTING I_INSTITUTION = SE_EINRI I_EDIPROC = GCN_EDI_MRUC * I_DATE = SY-DATUM I_DIRECTION = GCN_301DIR_OUT TABLES E_NC301B = INC301B EXCEPTIONS OTHERS = 0.
ISH_EDI_READ_TNC301XI CALL FUNCTION 'ISH_EDI_READ_TNC301XI' EXPORTING I_EINRI = SE_EINRI I_EDIPROC = 'MRUC' IMPORTING E_TNC301XI = TNC301XI EXCEPTIONS NOT_FOUND = 1 PARAMETER_ERROR = 2 OTHERS = 3.
ISH_READ_NORG CALL FUNCTION 'ISH_READ_NORG' EXPORTING ORGID = I_ORGID IMPORTING NORG_E = NORG EXCEPTIONS OTHERS = 1.
GET_PRINT_PARAMETERS CALL FUNCTION 'GET_PRINT_PARAMETERS' EXPORTING LINE_COUNT = 65 LINE_SIZE = line_size IMPORTING OUT_ARCHIVE_PARAMETERS = arc_parameters OUT_PARAMETERS = print_parameters VALID = valid_flag 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 RNSL101 or its description.
RNSL101 - IS-H: BPflV L 1 - Diagnosis Statistics RNSL101 - IS-H: BPflV L 1 - Diagnosis Statistics RNSKHSTATV2007 - documentation and ABAP source code RNSKHSTATV2007 - documentation and ABAP source code RNSKHSTATV2006 - documentation and ABAP source code RNSKHSTATV2006 - documentation and ABAP source code