SAP Reports / Programs | Clinical System | Clinical System(IS-HMED) SAP IS

RN1WPVIEW017 SAP ABAP Report - Selection Screen for Surgeries View







RN1WPVIEW017 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.

If you would like to execute this report or see the full code listing simply enter RN1WPVIEW017 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 RN1WPVIEW017. "Basic submit
SUBMIT RN1WPVIEW017 AND RETURN. "Return to original report after report execution complete
SUBMIT RN1WPVIEW017 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: P_SOCOL6 = Column 6
Selection Text: P_SOCOL5 = Column 5
Selection Text: P_SOCOL4 = Column 4
Selection Text: P_SOCOL3 = Column 3
Selection Text: P_SOCOL2 = Column 2
Selection Text: P_SOCOL1 = Column 1
Selection Text: P_SO7_UP = Ascending
Selection Text: P_SO7_DN = Descending
Selection Text: P_SO6_UP = Ascending
Selection Text: P_SO6_DN = Descending
Selection Text: P_SO5_UP = Ascending
Selection Text: P_SO5_DN = Descending
Selection Text: P_SO4_UP = Ascending
Selection Text: P_SO4_DN = Descending
Selection Text: P_SO3_UP = Ascending
Selection Text: P_SO3_DN = Descending
Selection Text: P_SO2_UP = Ascending
Selection Text: P_SO2_DN = Descending
Selection Text: P_SO1_UP = Ascending
Selection Text: P_SO1_DN = Descending
Selection Text: P_SELWST = Select According to Work Stat.
Selection Text: P_RLPLAN = Do not Indicate Plan Release
Selection Text: P_NOPLAN = No Planning Function
Selection Text: P_LINE_P = Multiple Row Display
Selection Text: P_LINE_A = Multiple Row Display
Selection Text: P_FI_AN = Anesthetist Required
Selection Text: SE_EINRI = D .
Selection Text: R_OPOE = Operating Organizational Unit
Selection Text: R_FI_VMA = Employee
Selection Text: R_FI_OP = Operating Organizational Unit
Selection Text: R_FI_ANP = Initiating Organizational Unit
Selection Text: R_FI_ANF = Initiating Department
Selection Text: R_DATE = Display Period From
Selection Text: R_AUFG4 = Tasks
Selection Text: R_AUFG3 = Tasks
Selection Text: R_AUFG2 = Tasks
Selection Text: R_AUFG1 = Tasks
Selection Text: R_ANPOE = Initiating Organizational Unit





Selection Text: R_ANFOE = Initiating Department
Selection Text: P_WRKDY = Hide Workdays
Selection Text: P_WORKST = Work Station
Selection Text: P_WKEND = Hide Weekend/Public Holiday
Selection Text: P_UEBRIG = Display Remaining Surgeries
Selection Text: P_TEAM4 = Heading
Selection Text: P_TEAM3 = Heading
Selection Text: P_TEAM2 = Heading
Selection Text: P_TEAM1 = Heading
Selection Text: P_STAMPS = Selection with Time Stamps
Selection Text: P_SRT_OP = Operating Organizational Unit
Selection Text: P_SRT_DT = Date
Selection Text: P_SRT_AN = Requester
Selection Text: P_SOCOL7 = Column 7
Selection Text: P_DSP_RQ = Initiated Surgeries
Selection Text: P_DSP_RM = Remaining Surgeries
Selection Text: P_DAYAUT = Aut. Hide Days Without Plan.
Selection Text: P_ANONYM = Display Patient Anonymously
Selection Text: P_ANG_UG = Initiated For
Selection Text: P_ANG_OG = /
Selection Text: G_SELAKT = Manual Entry of Selection
Title: Selection Screen for Surgeries View
Text Symbol: 037 = Column 1
Text Symbol: 036 = Descending
Text Symbol: 035 = Ascending
Text Symbol: 034 = Selection of Surgeries According to Time Stamps
Text Symbol: 033 = Work Station
Text Symbol: 029 = Input Help: Work Station
Text Symbol: 028 = Hide Workdays Without Appointment and Planning Authority
Text Symbol: 027 = Multiple Row Display
Text Symbol: 026 = Hide Weekend/Public Holidays Without Appointment and Plann. Auth.
Text Symbol: 025 = Display Patient Anonymously
Text Symbol: 024 = Surg. Areas + Oper. Rooms
Text Symbol: 011 = Input Help: Initiating Department
Text Symbol: 010 = Input Help: Initiating OU
Text Symbol: 009 = Input Help: Operating OU
Text Symbol: 008 = Operating Organizational Unit
Text Symbol: 007 = Order Initiator
Text Symbol: 006 = Date





Text Symbol: 005 = Days
Text Symbol: 004 = Remaining Since
Text Symbol: 003 = Days
Text Symbol: 002 = /
Text Symbol: 001 = Initiated For
Text Symbol: 038 = Anesthetist Required
Text Symbol: S02 = Manual Entry of Selection Criteria
Text Symbol: S01 = Institution
Text Symbol: B14 = Filter
Text Symbol: B13 = Sort Order
Text Symbol: B11 = Column 4
Text Symbol: B10 = Column 3
Text Symbol: B09 = Column 2
Text Symbol: B08 = Column 1
Text Symbol: B07 = Worklist
Text Symbol: B06 = Worklist Sort Order
Text Symbol: B04 = Work Station
Text Symbol: 100 = ;; Work Station (Place Holder: Empty!)
Text Symbol: 048 = Column 7
Text Symbol: 047 = Column 6
Text Symbol: 046 = Column 5
Text Symbol: 045 = Column 4
Text Symbol: 044 = Hide Days Without Planning Authority
Text Symbol: 043 = Do not Indicate Plan Release in Color
Text Symbol: 042 = No Planning Function
Text Symbol: 041 = Status Selection
Text Symbol: 040 = Column 3
Text Symbol: 039 = Column 2


INCLUDES used within this REPORT RN1WPVIEW017

INCLUDE: MNDATA00,
INCLUDE RN1WPVIEW017_SUBSC0100.
INCLUDE RN1WPVIEW017_SUBSC0110.
INCLUDE RN1WPVIEW017_SUBSC0130.
INCLUDE RN1WPVIEW017_O01.
INCLUDE RN1WPVIEW017_F01.
INCLUDE RN1WPVIEW017_I01.


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:

SELECT_OPTIONS_RESTRICT CALL FUNCTION 'SELECT_OPTIONS_RESTRICT' EXPORTING program = 'RN1WPVIEW017' restriction = lt_restrict EXCEPTIONS OTHERS = 0.




ICON_CREATE * CALL FUNCTION 'ICON_CREATE' * EXPORTING * name = icon_enter_more ** TEXT = ' ' * info = text-041 * add_stdinf = 'X' * IMPORTING * result = sta_icon * EXCEPTIONS * icon_not_found = 1 * outputfield_too_short = 2 * OTHERS = 3.

ICON_CREATE * CALL FUNCTION 'ICON_CREATE' * EXPORTING * name = icon_display_more ** TEXT = ' ' * info = text-041 * add_stdinf = 'X' * IMPORTING * result = sta_icon * EXCEPTIONS * icon_not_found = 1 * outputfield_too_short = 2 * OTHERS = 3.

ISHMED_CHECK_NORG CALL FUNCTION 'ISHMED_CHECK_NORG' EXPORTING ss_einri = p_einri ss_einri_chk = 'J' ss_fazuw = p_fazuw ss_pfzuw = p_pfzuw ss_n1anfkz = p_n1anfkz ss_n1erbrkz = p_n1erbrkz ss_orgid = l_orgid ss_gdatum = p_date ss_check_date = off " ID 19284 ss_oeparm = l_oeparm ss_oeparm_value = l_oeparm_value ss_oeparm_noexc = on IMPORTING e_oeparm_invalid = l_oeparm_err * e_date_invalid = l_date_invalid " ID 19284 * e_norg = ls_norg " ID 19284 EXCEPTIONS not_found = 1 not_valid = 2.

ISHMED_CHECK_BAUID * CALL FUNCTION 'ISHMED_CHECK_BAUID' * EXPORTING * i_einri = p_einri * i_abl_hier = 'X' * TABLES * t_bauid = lt_tn11o * t_bauty = lt_tn11b * EXCEPTIONS * not_found = 1.

ISHMED_CHECK_BAUID CALL FUNCTION 'ISHMED_CHECK_BAUID' EXPORTING i_einri = p_einri i_abl_hier = 'X' TABLES t_bauid = lt_tn11o t_bauty = lt_tn11b EXCEPTIONS not_found = 1.

ISHMED_CHECK_NGPA CALL FUNCTION 'ISHMED_CHECK_NGPA' EXPORTING ss_einri = p_einri ss_pernr = l_gpart * IMPORTING * e_ngpa = l_ngpa * e_nper = l_nper EXCEPTIONS not_found = 1 not_valid = 2 not_auth = 3.

ISHMED_CHECK_AUFGA CALL FUNCTION 'ISHMED_CHECK_AUFGA' EXPORTING ss_gdatum = p_date * SS_ORGID = ' ' ss_vorgang = l_aufga * IMPORTING * E_N1AUFGA = * E_N1AUFGT = EXCEPTIONS not_found = 1 not_valid = 2 OTHERS = 3.

F4IF_GET_SHLP_DESCR * CALL FUNCTION 'F4IF_GET_SHLP_DESCR' * EXPORTING * shlpname = 'N_HWLTY' * IMPORTING * shlp = shlp_descr * EXCEPTIONS * OTHERS = 1.

F4IF_START_VALUE_REQUEST * CALL FUNCTION 'F4IF_START_VALUE_REQUEST' * EXPORTING * shlp = shlp_descr * IMPORTING * rc = pf4_rc * TABLES * return_values = pf4_values * EXCEPTIONS * OTHERS = 1.

ISH_GRAPHIC_ORGID_SELECT CALL FUNCTION 'ISH_GRAPHIC_ORGID_SELECT' EXPORTING date = p_date einri = p_einri erbkz = p_erbkz freig = on graph_title = p_title loekz = off no_bauid = on sperr = off IMPORTING nothing_selected = no_selected selected_orgid = pf4_value EXCEPTIONS OTHERS = 01.

ISHMED_SHOW_BAUID CALL FUNCTION 'ISHMED_SHOW_BAUID' EXPORTING i_einri = p_einri i_abl_hier = 'X' i_title = p_title TABLES t_bauid = lt_tn11o t_bauty = lt_tn11b EXCEPTIONS no_selection = 1 not_found = 2 cancelled = 3.

VRM_SET_VALUES * CALL FUNCTION 'VRM_SET_VALUES' * EXPORTING * id = p_fname * values = lt_list * EXCEPTIONS ** id_illegal_name = 1 * OTHERS = 0.

LVC_FIELDCATALOG_MERGE CALL FUNCTION 'LVC_FIELDCATALOG_MERGE' EXPORTING i_buffer_active = on i_structure_name = l_tabname * I_CLIENT_NEVER_DISPLAY = 'X' i_bypassing_buffer = off CHANGING ct_fieldcat = lt_fieldcat EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3.

ISHMED_VP_AVAR_011 CALL FUNCTION 'ISHMED_VP_AVAR_011' CHANGING c_dispvar = lt_fieldcat.

VRM_SET_VALUES CALL FUNCTION 'VRM_SET_VALUES' EXPORTING id = 'P_SOCOL1' values = lt_list EXCEPTIONS * id_illegal_name = 1 OTHERS = 0.

VRM_SET_VALUES CALL FUNCTION 'VRM_SET_VALUES' EXPORTING id = 'P_SOCOL2' values = lt_list EXCEPTIONS * id_illegal_name = 1 OTHERS = 0.

VRM_SET_VALUES CALL FUNCTION 'VRM_SET_VALUES' EXPORTING id = 'P_SOCOL3' values = lt_list EXCEPTIONS * id_illegal_name = 1 OTHERS = 0.

VRM_SET_VALUES CALL FUNCTION 'VRM_SET_VALUES' EXPORTING id = 'P_SOCOL4' values = lt_list EXCEPTIONS * id_illegal_name = 1 OTHERS = 0.

VRM_SET_VALUES CALL FUNCTION 'VRM_SET_VALUES' EXPORTING id = 'P_SOCOL5' values = lt_list EXCEPTIONS * id_illegal_name = 1 OTHERS = 0.

VRM_SET_VALUES CALL FUNCTION 'VRM_SET_VALUES' EXPORTING id = 'P_SOCOL6' values = lt_list EXCEPTIONS * id_illegal_name = 1 OTHERS = 0.

VRM_SET_VALUES CALL FUNCTION 'VRM_SET_VALUES' EXPORTING id = 'P_SOCOL7' values = lt_list EXCEPTIONS * id_illegal_name = 1 OTHERS = 0.

ISH_GRAPHIC_ORGID_SELECT * CALL FUNCTION 'ISH_GRAPHIC_ORGID_SELECT' * EXPORTING * date = p_date * einri = p_einri * pfzuw = off * ambes = off * freig = on * graph_title = p_title * loekz = off * no_bauid = off * sperr = off * zimkz = on * start_orgfa = p_ou * IMPORTING * nothing_selected = l_no_selected * selected_bauid = l_pf4_value * EXCEPTIONS * OTHERS = 01.

ISHMED_PLANOBJECT_SELECT CALL FUNCTION 'ISHMED_PLANOBJECT_SELECT' EXPORTING i_einri = p_einri it_planobj_mark = lt_planobj_mark IMPORTING e_rc = l_rc et_planobj = lt_planobj.

ISHMED_SHOW_GPART CALL FUNCTION 'ISHMED_SHOW_GPART' EXPORTING ss_einri = p_einri ss_gpart = p_gpart IMPORTING e_ngpa = l_ngpa EXCEPTIONS not_found = 1.

ISHMED_SHOW_AUFGA CALL FUNCTION 'ISHMED_SHOW_AUFGA' EXPORTING ss_gdatum = p_date IMPORTING e_n1aufga = l_n1aufga * E_N1AUFGT = EXCEPTIONS not_found = 1 OTHERS = 2.

ISHMED_STATUS_SELECT * CALL FUNCTION 'ISHMED_STATUS_SELECT' * EXPORTING * i_obtyp = 'N1K' " Objekttyp Klin. Aufträge

ISH_DYNP_VALUES_READ * CALL FUNCTION 'ISH_DYNP_VALUES_READ' * EXPORTING * dyname = repid * dynumb = dynnr * TABLES * dynpfields = dynpr.

DYNP_VALUES_UPDATE * CALL FUNCTION 'DYNP_VALUES_UPDATE' * EXPORTING * dyname = repid * dynumb = dynnr * TABLES * dynpfields = dynpr.

DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = l_prog dynumb = l_dynnr TABLES dynpfields = it_dynpfields EXCEPTIONS OTHERS = 1.

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = se_einri IMPORTING output = se_einri.

DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = l_prog dynumb = l_dynnr TABLES dynpfields = it_dynpfields EXCEPTIONS OTHERS = 1.

ISHMED_CHECK_DATE_TIME CALL FUNCTION 'ISHMED_CHECK_DATE_TIME' EXPORTING i_date = l_date_ext i_date_fill = on IMPORTING e_date = l_date.

ISHMED_SET_SUBSCREEN_POB_0200 CALL FUNCTION 'ISHMED_SET_SUBSCREEN_POB_0200' EXPORTING i_einri = se_einri it_planobj_mark = lt_planobj i_init = on i_okcode = space.

ISHMED_GET_SUBSCREEN_POB_0200 CALL FUNCTION 'ISHMED_GET_SUBSCREEN_POB_0200' IMPORTING et_planobj_mark = lt_planobj.

ISHMED_SET_SUBSCREEN_POB_0200 CALL FUNCTION 'ISHMED_SET_SUBSCREEN_POB_0200' EXPORTING i_einri = se_einri * it_planobj_mark = i_init = off " no initialization! i_okcode = sy-ucomm.

ISHMED_END_SUBSCREEN_POB_0200 CALL FUNCTION 'ISHMED_END_SUBSCREEN_POB_0200'.



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