RN1WPVIEW018 SAP ABAP Report - Selection Screen for Surgery Scheduling View

SAP T-Codes / Example ABAP code
ABAP OO / SAP Function Modules
ABAP reports / SAP Error Messages
SAP Tables / SAP Video Training

RN1WPVIEW018 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 RN1WPVIEW018 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 RN1WPVIEW018. "Basic submit
SUBMIT RN1WPVIEW018 AND RETURN. "Return to original report after report execution complete
SUBMIT RN1WPVIEW018 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_ANG_OG = /
Selection Text: P_ANG_UG = Initiated For
Selection Text: P_DSP_DY = Day-Based Appts Performing OU
Selection Text: P_DSP_RM = Worklist Remaining
Selection Text: P_DSP_RQ = Worklist Initiated
Selection Text: P_ETRBY = Initiated By
Selection Text: P_IGCASE = Ignore Cases
Selection Text: P_IGNORE = Ignore Patients
Selection Text: P_NOSRV = Do not Disp. Orders w/o Svce
Selection Text: P_ORDTYP = Order Type
Selection Text: P_SO1_DN = Descending
Selection Text: P_SO1_UP = Ascending
Selection Text: P_SO2_DN = Descending
Selection Text: P_SO2_UP = Ascending
Selection Text: P_SO3_DN = Descending
Selection Text: P_SO3_UP = Ascending
Selection Text: P_SOCOL1 = Column 1
Selection Text: P_SOCOL2 = Column 2
Selection Text: P_SOCOL3 = Column 3
Selection Text: P_SRT_AN = Requester
Selection Text: P_SRT_DT = Date
Selection Text: P_SRT_OP = Performing Organizational Unit
Selection Text: P_SRT_SO = Others:
Selection Text: P_UEBRIG = Display Remaining Surgeries
Selection Text: R_ANFOE = Initiating Department
Selection Text: R_ANPOE = Initiating Organizational Unit
Selection Text: R_DATE = Planning Period From
Selection Text: R_DATEOT = Surgs w/o Desired Appt From
Selection Text: R_ETRGP = Initiating Business Partner
Selection Text: R_FALNR = Case
Selection Text: R_GPART = Employee Responsible
Selection Text: R_LEIST = Service/Service Group
Selection Text: R_OPOE = Performing Organizational Unit
Selection Text: R_PATNR = Patient
Selection Text: R_PRIO = Priority
Selection Text: R_STAT = Order Status
Selection Text: SE_EINRI = D .
Selection Text: P_ACALC = Automatic Calculation

Selection Text: G_SELAKT = Manual Entry of Selection
Title: Selection Screen for Surgery Scheduling View
Text Symbol: 001 = Initiated For
Text Symbol: 002 = /
Text Symbol: 003 = Days
Text Symbol: 004 = Remaining Since
Text Symbol: 005 = Days
Text Symbol: 006 = Date
Text Symbol: 007 = Initiator
Text Symbol: 008 = Performing Organizational Unit
Text Symbol: 009 = Input Help: Performing OU
Text Symbol: 010 = Input Help: Initiating OU
Text Symbol: 011 = Input Help: Initiating Department
Text Symbol: 012 = Initiated By
Text Symbol: 013 = Others:
Text Symbol: 014 = Surgs with Desired Appt +/-
Text Symbol: 015 = Ignore Patients
Text Symbol: 016 = Ignore Cases
Text Symbol: 017 = Patient
Text Symbol: 018 = Case
Text Symbol: 019 = Order Type
Text Symbol: 031 = initiated
Text Symbol: 032 = remaining
Text Symbol: 033 = Display Day-Based Appointments of Performing OU
Text Symbol: 035 = Ascending
Text Symbol: 036 = Descending
Text Symbol: 037 = Column 1
Text Symbol: 039 = Column 2
Text Symbol: 040 = Column 3
Text Symbol: 041 = Status Selection
Text Symbol: 049 = Automatically Execute Calculation
Text Symbol: B03 = Worklist Sort Order
Text Symbol: B04 = Worklist
Text Symbol: S01 = Institution
Text Symbol: S02 = Manual Entry of Selection Criteria
Text Symbol: S03 = Do not Display Orders Without Services

INCLUDES used within this REPORT RN1WPVIEW018

INCLUDE: MNDATA00, . "#EC INCL_OK
INCLUDE RN1WPVIEW018_SUBSC0100.
INCLUDE RN1WPVIEW018_SUBSC0110.

INCLUDE RN1WPVIEW018_SUBSC0120.
INCLUDE RN1WPVIEW018_SUBSC0130.

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 = 'RN1WPVIEW018' restriction = lt_restrict EXCEPTIONS OTHERS = 1.

ISHMED_VP_AVAR_018 * CALL FUNCTION 'ISHMED_VP_AVAR_018' * 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.

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 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 * e_norg = ls_norg EXCEPTIONS not_found = 1 not_valid = 2.

ISHMED_CHECK_NGPA
    CALL FUNCTION 'ISHMED_CHECK_NGPA'
      EXPORTING
        ss_check    = 'M'
        ss_einri    = p_einri
        ss_pernr    = l_gpart
        ss_gdatum   = p_date
        ss_chk_auth = off
      IMPORTING
        e_ngpa      = ls_ngpa
        e_nper      = ls_nper
      EXCEPTIONS
        not_found   = 1
        not_valid   = 2
        not_auth    = 3.

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

ISH_WLSTA_CHECK CALL FUNCTION 'ISH_WLSTA_CHECK' EXPORTING ss_einri = p_einri ss_wlsta = -low EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_READ_NFAL CALL FUNCTION 'ISH_READ_NFAL' EXPORTING ss_einri = p_einri ss_falnr = l_falnr EXCEPTIONS not_found = 1 not_found_archived = 2 no_authority = 3 OTHERS = 4.

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.

ISH_SHOW_SERVICES_NEW CALL FUNCTION 'ISH_SHOW_SERVICES_NEW' EXPORTING einrichtung = p_einri multi_select = ' ' IMPORTING e_ntpk = ls_ntpk EXCEPTIONS wrong_einri = 1 nothing_found = 2 nothing_selected = 3 missing_zotyp = 4 OTHERS = 5.

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

ISH_SHOW_GPART CALL FUNCTION 'ISH_SHOW_GPART' EXPORTING aufruf = 'Y' loe_disp = ' ' * Kennzeichnet Rolle, die selektiert werden soll * "0" --> Allgemeiner Geschäftspartner rolle = '0' sperr_disp = ' ' vcode = l_vcode IMPORTING e_ngpa = l_ngpa EXCEPTIONS einri_false = 1 gschl_false = 2 ktart_false = 3 not_found = 4 OTHERS = 5.

ISHMED_F4_N1APRI CALL FUNCTION 'ISHMED_F4_N1APRI' EXPORTING i_einri = p_einri * I_ACTIVEX = 'X' i_vcode = l_vcode IMPORTING e_aprie = l_aprie.

ISHMED_F4_WLSTA CALL FUNCTION 'ISHMED_F4_WLSTA' EXPORTING i_einri = p_einri * I_ACTIVEX = 'X' i_vcode = l_vcode IMPORTING e_wlsta = l_wlsta.

ISH_SHOW_LIST_PATIENT CALL FUNCTION 'ISH_SHOW_LIST_PATIENT' EXPORTING npat_einri = p_einri anfo = 'X' " Auswahlpopup vcode = 'DIS' " nur Anzeige+Auswahl fcode = 'PS' " nur Patienten IMPORTING npat_patnr = l_patient EXCEPTIONS geschlecht_falsch = 1 no_authority = 2 npat_not_found = 3 selection_false = 4 message = 5 OTHERS = 6.

ISH_SHOW_LIST_FALL

CALL FUNCTION 'ISH_SHOW_LIST_FALL' EXPORTING nfal_einri = p_einri nfal_patnr = p_patnr vcode = 'DIS' popup = 'X' IMPORTING nfal_falnr = l_falnr EXCEPTIONS pat_not_found = 1 repid_missing = 2 OTHERS = 3.

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

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.

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 = r_patnr-low IMPORTING output = r_patnr-low.

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

RN1WPVIEW018 - Selection Screen for Surgery Scheduling View
RN1WPVIEW018 - Selection Screen for Surgery Scheduling View
RN1WPVIEW017_SUBSC0140 - RN1WPVIEW017SUBSC0140
RN1WPVIEW017_SUBSC0130 - RN1WPVIEW017SUBSC0130
RN1WPVIEW017_SUBSC0110 - RN1WPVIEW017SUBSC0110
RN1WPVIEW017_SUBSC0100 - RN1WPVIEW017SUBSC0100