SAP Reports / Programs | Basic Data | SAP Healthcare - Industry-Specific Components for Hospitals | Basic Data(IS-H-BD) SAP IS

RNUNBAUD SAP ABAP Report - IS-H: Delete Building Units







RNUNBAUD is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This report deletes building units from the database, and at the same time ensures that the database remains consistent...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 RNUNBAUD 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 RNUNBAUD. "Basic submit
SUBMIT RNUNBAUD AND RETURN. "Return to original report after report execution complete
SUBMIT RNUNBAUD 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: TESTM = Test (no DB changes)
Selection Text: NBAUSEL = Building Unit
Selection Text: CHECKBEW = Check movement data
Title: IS-H: Delete Building Units
Text Symbol: U07 = Defined lower-level building units are error-fee.
Text Symbol: U06 = No assignment defined between building units and organizational units
Text Symbol: U05 = No movements defined for the selected building units
Text Symbol: U04 = None of the selected building units is used as a planning object
Text Symbol: U03 = No booked time slots defined for the selected building units
Text Symbol: U02 = *** Test mode ***
Text Symbol: U01 = Checks
Text Symbol: T03 = Messages
Text Symbol: T02 = Building Unit
Text Symbol: SM2 = Number of building units not deleted:
Text Symbol: SM1 = Number of building units deleted:
Text Symbol: SM0 = Warnings
Text Symbol: 019 = Check - Hierarchy of Building Units
Text Symbol: 018 = Check - Assignment of Building Units to Organizational Units
Text Symbol: 017 = The following building unit was not deleted
Text Symbol: 016 = The following building unit was deleted
Text Symbol: 015 = Test mode - no database changes.
Text Symbol: 014 = Database changes: OK
Text Symbol: 013 = Database changes
Text Symbol: 011 = Do not delete:
Text Symbol: 010 = Delete:
Text Symbol: 009 = The following building units were NOT deleted
Text Symbol: 008 = The following building units were deleted
Text Symbol: 007 = Check table TN11O - Building units to org. units assignment
Text Symbol: 006 = Check table NBEW - Movements for case
Text Symbol: 005 = Check table NPOB - Planning objects for Outpatient Clinic Mgmt
Text Symbol: 004 = Check table NAPP - Provisional appointments for visit planning
Text Symbol: 003 = Check table TN11H - Building unit hierarchy
Text Symbol: 001 = Delete building units


INCLUDES used within this REPORT RNUNBAUD

INCLUDE MNDATA_OM.


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_SAP_OM_CHECK_ACTIVE CALL FUNCTION 'ISH_SAP_OM_CHECK_ACTIVE' IMPORTING e_status = g_status EXCEPTIONS not_active = 0 OTHERS = 0.

ISH_OM_GET_ACTIVE_PLVAR * CALL FUNCTION 'ISH_OM_GET_ACTIVE_PLVAR' * IMPORTING * e_plvar = g_plvar * EXCEPTIONS * no_active_plvar = 0 * OTHERS = 0.

ISH_OM_PLVAR_GET CALL FUNCTION 'ISH_OM_PLVAR_GET' IMPORTING e_plvar = g_plvar.

ENQUEUE_ENNBAU CALL FUNCTION 'ENQUEUE_ENNBAU' EXPORTING mode_nbau = 'E' mandt = sy-mandt bauid = inbau-bauid EXCEPTIONS foreign_lock = 1 system_failure = 2.

HR_ENQUEUE_OBJECT CALL FUNCTION 'HR_ENQUEUE_OBJECT' EXPORTING plvar = g_plvar otype = gc_ot_bu objid = inbau-objid EXCEPTIONS enqueue_failed = 1 objid_is_initial = 2 illegal_otype = 3 internal_error = 4 OTHERS = 5.

RH_DELETE_OBJECT CALL FUNCTION 'RH_DELETE_OBJECT' EXPORTING plvar = g_plvar otype = gc_ot_bu objid = inbau-objid vtask = l_vtask EXCEPTIONS error_during_delete = 0 no_authorization = 0 corr_exit = 0 buffer_upd_with_foreign_data = 0 OTHERS = 0.

ISH_OM_BU_GET CALL FUNCTION 'ISH_OM_BU_GET' EXPORTING itr_bauid = ltr_bauid i_add_cond_bu = l_addcond_bu IMPORTING et_nbau = lt_nbau e_infty_bu = gt_infty_bu EXCEPTIONS nothing_found = 1 internal_error = 2 OTHERS = 3.

ISH_VERBUCHER_NBAU CALL FUNCTION 'ISH_VERBUCHER_NBAU' IN UPDATE TASK EXPORTING tcode = sy-tcode upd_icdtxt = upd_icdtxt_nbau upd_nbau = 'X' upd_tn11h = 'X' upd_tn11o = ' ' up_date = sy-datum up_time = sy-uzeit TABLES icdtxt = icdtxt_nbau xnbau = okbau xtn11h = okhier xtn11o = dummy_oex ynbau = dummy_bau ytn11h = dummy_hier ytn11o = dummy_oey exceptions OTHERS = 1.

COMMIT_TEXT CALL FUNCTION 'COMMIT_TEXT' * exporting * object = '*' * name = '*' * id = '*' * language = '*' * savemode_direct = ' ' * keep = ' ' * importing * commit_count = commit_count EXCEPTIONS OTHERS = 1.

DELETE_TEXT CALL FUNCTION 'DELETE_TEXT' EXPORTING * client = sy-mandt id = text_id "0000 language = sy-langu name = text_name "zusammengetzt object = text_obj "nbau * savemode_direct = ' ' * textmemory_only = ' ' EXCEPTIONS not_found = 1 OTHERS = 2.

HELPSCREEN_NA_CREATE CALL FUNCTION 'HELPSCREEN_NA_CREATE' EXPORTING meld_id = 'N2' meld_nr = meld_nr msgv1 = msgv1 msgv2 = msgv2 titel = titel.

ISH_CALL_LIST_HEAD CALL FUNCTION 'ISH_CALL_LIST_HEAD' EXPORTING einri = inbew-einri line_size = 84 repid = 'RNUNBAUD' title_lin1 = text-001 display = ' ' IMPORTING r_form = lr_header EXCEPTIONS invalid_einri = 1 OTHERS = 2.

HELPSCREEN_NA_CREATE CALL FUNCTION 'HELPSCREEN_NA_CREATE' EXPORTING meld_id = 'N2' meld_nr = l_msgno msgv1 = gs_baul-msgv1 msgv2 = gs_baul-msgv2 msgv3 = gs_baul-msgv3 msgv4 = gs_baul-msgv4 titel = l_titel.

ISH_OM_INFTY_BUFFERED_GET CALL FUNCTION 'ISH_OM_INFTY_BUFFERED_GET' EXPORTING it_objects = lt_objects i_infty = gc_relat_infty i_subty = 'A862' IMPORTING et_pnnnn = lt_1001 EXCEPTIONS internal_error = 0 OTHERS = 0.

ISH_OM_INFTY_BUFFERED_GET CALL FUNCTION 'ISH_OM_INFTY_BUFFERED_GET' EXPORTING it_objects = lt_objects i_infty = gc_it_key_ish IMPORTING et_pnnnn = lt_6080 EXCEPTIONS internal_error = 0 OTHERS = 0.

ISH_OM_INFTY_BUFFERED_GET CALL FUNCTION 'ISH_OM_INFTY_BUFFERED_GET' EXPORTING it_objects = lt_objects i_infty = gc_relat_infty i_subty = 'B861' IMPORTING et_pnnnn = lt_1001 EXCEPTIONS internal_error = 0 OTHERS = 0.

ISH_OM_INFTY_BUFFERED_GET CALL FUNCTION 'ISH_OM_INFTY_BUFFERED_GET' EXPORTING it_objects = lt_objects i_infty = gc_it_key_ish IMPORTING et_pnnnn = lt_6080 EXCEPTIONS internal_error = 0 OTHERS = 0.

ISH_OM_BU_GET CALL FUNCTION 'ISH_OM_BU_GET' EXPORTING itr_bauid = ltr_bauid i_add_cond_bu = l_addcond_bu IMPORTING et_nbau = lt_nbau e_infty_bu = lt_infty_bu EXCEPTIONS nothing_found = 1 internal_error = 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 RNUNBAUD or its description.