RSVRSUDZ SAP ABAP INCLUDE - Include: FORMs for Retrieving Versions

RSVRSUDZ is a standard ABAP INCLUDE 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 RSVRSUDZ 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.

Text pool values

INCLUDES used within this REPORT RSVRSUDZ

No INCLUDES are used within this REPORT code!

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:

POPUP_TO_CONFIRM_WITH_MESSAGE
* call function 'POPUP_TO_CONFIRM_WITH_MESSAGE'
*      exporting
*           defaultoption = 'Y'
*           diagnosetext1 = diagtext1
*           diagnosetext2 = 'aktiven Version'(z02)
**          DIAGNOSETEXT3 = 'Version.'(Z03)

POPUP_TO_CONFIRM_WITH_MESSAGE
  call function 'POPUP_TO_CONFIRM_WITH_MESSAGE'
       exporting
            defaultoption = 'Y'
            diagnosetext1 = 'Vor dem Zurückholen von Version'(t01)
            diagnosetext2 = l_diagtext2
            diagnosetext3 = l_diagtext3
            textline1 = 'Soll das Zurückholen fortgesetzt'(t05)
            textline2 = 'werden?'(t06)
            titel = 'Version zurückholen ?'(z04)
       importing
            answer = l_answer.

POPUP_TO_CONFIRM_WITH_MESSAGE
  call function 'POPUP_TO_CONFIRM_WITH_MESSAGE'
       exporting
            defaultoption = 'N'
            diagnosetext1 = l_text2
            diagnosetext2 = text-t12
            textline1     = 'Soll das Zurückholen trotzdem'(t13)
            textline2     = 'fortgesetzt werden?'(t14)
            titel         = 'Version zurückholen ?'(z04)
       importing
            answer        = l_answer.

SDU_AUTH_CHECK
  call function 'SDU_AUTH_CHECK'
       exporting
            get_dev_class = get_dev_class
*           msg_type      = msg_type
            msg_type      = 'I'
            object_type   = obj_type_15
            object_name   = obj_name
            action        = action
       importing
            return_code   = p_subrc.

RS_ACCESS_PERMISSION
  call function 'RS_ACCESS_PERMISSION'
       exporting
            authority_check            = ' '
            global_lock                = 'X'
            language_upd_exit          = exit_rout_name
            master_language            = ' '
            mode                       = 'MODIFY'
            object                     = l_rsudo
            object_class               = sudm_type
            suppress_language_check    = ' '
*      IMPORTING
*           DEVCLASS                   =
*           ERROR_INFO                 =
*           NEW_MASTER_LANGUAGE        =
*           KORRNUM                    =
*           TRANSPORT_KEY              =
*           MODIFICATION_LANGUAGE      =
*           EXTEND                     =
*           TADIRE                     =
       exceptions
            canceled_in_corr           = 1
            enqueued_by_user           = 2
            enqueue_system_failure     = 3
            illegal_parameter_values   = 4
            locked_by_author           = 5
            no_modify_permission       = 6
            no_show_permission         = 7
            permission_failure         = 8
            request_language_denied    = 9
            others                     = 10.

RS_CORR_INSERT
  call function 'RS_CORR_INSERT'
       exporting
            object              = l_rsudo
            object_class        = sudm_type
            mode                = 'MODIFY'
            global_lock         = 'X'
*           DEVCLASS            = ' '
*           KORRNUM             = ' '
*           AUTHOR              = ' '
*           MASTER_LANGUAGE     = ' '
*           GENFLAG             = ' '
*           PROGRAM             = ' '
*           EXTEND              = ' '
*      IMPORTING
*           DEVCLASS            =
*           KORRNUM             =
*           NEW_CORR_ENTRY      =
*           AUTHOR              =
*           TRANSPORT_KEY       =
       exceptions
            cancelled           = 1
            permission_failure  = 2
            unknown_objectclass = 3
            others              = 4.

RS_ACCESS_PERMISSION
    call function 'RS_ACCESS_PERMISSION'         "Entsperren
         exporting
              mode         = 'FREE'
              object       = l_rsudo
              object_class =  sudm_type.

SVRS_AFTER_CHANGED_ONLINE_NEW
  call function 'SVRS_AFTER_CHANGED_ONLINE_NEW'
       exporting
            e071_entry              = stru
            status                  = 'A'
*     IMPORTING
*          VERSION_NEW             =
      exceptions
           non_versionable_objtype = 1
           no_tadir_entry          = 2
           object_not_found        = 3
           object_not_locked       = 4
           others                  = 5.