RN2UIPK1 SAP ABAP Report - Nursing Care Catalog - IMPORT -
RN2UIPK1 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for The report RN2UIPK1 allows the import of basic catalogs and assignment catalogs for the area of the
If you would like to execute this report or see the full code listing simply enter RN2UIPK1 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 RN2UIPK1. "Basic submit
SUBMIT RN2UIPK1 AND RETURN. "Return to original report after report execution complete
SUBMIT RN2UIPK1 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: BKGKAT = Basic Ctlg-Class. Areas Asgnmt
Selection Text: FILENAME = Name of Sequential File
Selection Text: GKAT = Classification Area Catalog
Selection Text: LKGKAT = Svce Ctlg - Class-Areas Asgmt
Selection Text: PKAT = Basic Nursing Catalog
Selection Text: PROT = Log
Selection Text: PSBKAT = StdNursPlan -Basic Catlg Asgmt
Selection Text: PSGKAT = Std.Nrs.Plan-Class.Areas Asgmt
Selection Text: PSLKAT = StdNursPlan - Svce Catlg Asgmt
Selection Text: SKAT = Standardized Nursing Plan
Selection Text: TEST = Test Mode
Selection Text: ZUGKAT = Classification Area Assignment
Title: Nursing Care Catalog - IMPORT -
Text Symbol: 035 = Stdzd Nurs.Plan Name
Text Symbol: 036 = Stdzd Nurs.Plan-Class.AreaAsgnmt:
Text Symbol: 037 = No. of Stdzd Nurs.Plan-Class.Area Asnmt
Text Symbol: 038 = Basic.Ctlg-Class.Area Asgnmt:
Text Symbol: 039 = Number of Basic.Ctlg-Class.Area Asgnmt:
Text Symbol: 040 = Scve.Ctlg-Class.Area Asgnmt:
Text Symbol: 041 = Number of Scve Ctlg-Class.Area Asgnmt:
Text Symbol: 042 = Cycle
Text Symbol: 043 = CycleNo.
Text Symbol: 044 = Cycle Text
Text Symbol: 045 = NGDay
Text Symbol: 046 = Patient Resource Indicator
Text Symbol: 047 = Nursing Problem Indicator
Text Symbol: 048 = Nursing Target Indicator
Text Symbol: 050 = Insert Error
Text Symbol: 051 = Note
Text Symbol: 052 = Catalog Entries Missing/Incorrect
Text Symbol: 053 = Cycle Missng
Text Symbol: 054 = Output to file failed!
Text Symbol: S01 = Institution
Text Symbol: 034 = Basic Catalog Name
Text Symbol: 001 = BC
Text Symbol: 002 = Assignment Catalogs
Text Symbol: 003 = Basic Catalogs
Text Symbol: 004 = Import Parameters
Text Symbol: 005 = NP
Text Symbol: 006 = StdNursPlan-BasCatalg Asgmt:
Text Symbol: 007 = Number of Std.Nurs.Plan-Basic Catalog Asgmts:
Text Symbol: 008 = Std.Nurs.Plan - Service Catlg Asgmt:
Text Symbol: 009 = Number of Std.Nurs.Plan - Service Catalg Asgmts:
Text Symbol: 010 = Classification Area Assignment:
Text Symbol: 011 = Number of Classification Area Assignments:
Text Symbol: 012 = CC
Text Symbol: 013 = Import Catalogs
Text Symbol: 014 = Stdzd Nurs.Plan Code
Text Symbol: 015 = Data Record Imported
Text Symbol: 016 = Stdzd Nurs.Plan Catalog:
Text Symbol: 017 = Number of Stdzd Nurs. Plan Catalog Entries:
Text Symbol: 018 = Classification Area Catalog:
Text Symbol: 019 = Number of Classification Area Catalog Entries:
Text Symbol: 020 = Basic Nursing Catalog:
Text Symbol: 021 = Number of Basic Nursing Catalog Entries:
Text Symbol: 022 = Nursing Code
Text Symbol: 023 = Basic Catalog Text
Text Symbol: 024 = R
Text Symbol: 025 = P
Text Symbol: 026 = N
Text Symbol: 027 = Stdzd Nurs.Plan Text
Text Symbol: 028 = Classific. Area Key
Text Symbol: 029 = Classif.Catalog Text
Text Symbol: 030 = Type
Text Symbol: 031 = Priority
Text Symbol: 032 = SC
Text Symbol: 033 = Service
INCLUDES used within this REPORT RN2UIPK1
INCLUDE RNDATA00.
INCLUDE MNCOLOUR.
INCLUDE RNSSEINR.
INCLUDE RNSSINIT.
INCLUDE RNSSSPBO.
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_N2_AUTHORITY * CALL FUNCTION 'ISH_N2_AUTHORITY'.
FILE_GET_NAME CALL FUNCTION 'FILE_GET_NAME' EXPORTING client = sy-mandt logical_filename = co_logical_file "'RN2UIPK1' including_dir = 'X' IMPORTING file_name = l_filename EXCEPTIONS file_not_found = 1 OTHERS = 2.
ISH_N2_AUTHORITY * CALL FUNCTION 'ISH_N2_AUTHORITY' * EXPORTING * ss_einri = SE_EINRI * ss_sale = c_lic_care.
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 line_size = rnstat-line_size EXCEPTIONS invalid_einri = 01.
AUTHORITY_CHECK_DATASET CALL FUNCTION 'AUTHORITY_CHECK_DATASET' EXPORTING activity = 'READ' filename = l_physical_file EXCEPTIONS no_authority = 1 activity_unknown = 2 OTHERS = 3.
FILE_VALIDATE_NAME CALL FUNCTION 'FILE_VALIDATE_NAME' EXPORTING client = sy-mandt logical_filename = co_logical_file CHANGING physical_filename = filename EXCEPTIONS logical_filename_not_found = 1 validation_failed = 2 OTHERS = 3.
ISH_N2_READ_N2BK CALL FUNCTION 'ISH_N2_READ_N2BK' EXPORTING pkat = pkat pkey = t_n2bk-pkey spras = sy-langu * IMPORTING * E_N2BK = EXCEPTIONS not_found = 1 OTHERS = 2.
ISH_N2_READ_N2PS CALL FUNCTION 'ISH_N2_READ_N2PS' EXPORTING skat = skat skey = t_n2ps-skey * SPRAS = SY-LANGU * IMPORTING * E_N2PS = EXCEPTIONS not_found = 1 OTHERS = 2.
ISH_N2_READ_N2GT CALL FUNCTION 'ISH_N2_READ_N2GT' EXPORTING gkat = gkat gkey = t_n2gt-gkey * SPRAS = SY-LANGU * IMPORTING * E_N2GT = EXCEPTIONS not_found = 1 OTHERS = 2.
ISH_READ_NTPK_NTPT_NEW CALL FUNCTION 'ISH_READ_NTPK_NTPT_NEW' EXPORTING begdt = sy-datum einri = *tn2k1-einri enddt = sy-datum spras = sy-langu talst = temp_tarls "PKEY tarif = pkat read_ntpt = 'X' IMPORTING e_ntpk = $ntpk e_ntpt = ntpt * KTXTCONC = KTXTCONC EXCEPTIONS missing_data = 1 no_ntpk_ntpt_found = 2 OTHERS = 3.
ISHMED_READ_N1STZY_N1STZT CALL FUNCTION 'ISHMED_READ_N1STZY_N1STZT' EXPORTING einri = se_einri "TN2K1-EINRI datum = sy-datum * N1ZNR = N1ZNR n1id = n1id * READ_N1STZT = 'X' * SPRAS = SY-LANGU IMPORTING e_n1stzy = $n1stzy e_n1stzt = *n1stzt EXCEPTIONS missing_data = 1 no_n1stzy_n1stzt = 2 OTHERS = 3.
ISHMED_READ_N1STZY_N1STZT CALL FUNCTION 'ISHMED_READ_N1STZY_N1STZT' EXPORTING einri = tn2k1-einri * DATUM = n1znr = n1znr * N1ID = N1ID * READ_N1STZT = 'X' * SPRAS = SY-LANGU IMPORTING e_n1stzy = $n1stzy e_n1stzt = *n1stzt EXCEPTIONS missing_data = 1 no_n1stzy_n1stzt = 2 OTHERS = 3.
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 RN2UIPK1 or its description.