RSSCD401 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 RSSCD401 into the relevant SAP transactions such as SE38 or SE80
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.
Program to Check and Change TADIR for Change Document Objects
Selection Text: P_TESTN = No, change TADIR immediately
Selection Text: P_TESTJ = Yes, test, no TADIR changes
Selection Text: P_LISTN = No, do not record
Selection Text: P_LISTJ = Yes, record
Selection Text: P_ALLEN = No, only TADIR changes
Selection Text: P_ALLEJ = Yes, all TADIR entries
Selection Text: OBJECT = Change Document Object
Title: Obsolete: Test/Set R3TR CHDO-TADIR Gen. Flag for TCDOB/TCDRP/TCDRS
Text Symbol: 410 = Existing Change Doc. Objects
Text Symbol: 100 = Overview of TADIR Gen. Flag by Change Doc. Object
Text Symbol: 063 = from
Text Symbol: 062 = Preparing GRID display...
Text Symbol: 061 = Processing CHDO objects....
Text Symbol: 060 = Selecting CHDO objects...
Text Symbol: 055 = Count
Text Symbol: 054 = Status
Text Symbol: 053 = Prefix/Multicase
Text Symbol: 052 = Tabname/Function Group
Text Symbol: 051 = Object/Report/Include/Table
Text Symbol: 050 = Table
Text Symbol: 022 = OBJ.
Text Symbol: 019 = Determine object if required; if not, empty?
Text Symbol: 018 = Do you want to display TADIR changes?
Text Symbol: 017 = INCLUDE
Text Symbol: 016 = GENFLAG
Text Symbol: 015 = TCDRS
Text Symbol: 014 = PREFIX
Text Symbol: 013 = FGRP
Text Symbol: 012 = REPORTNAME
Text Symbol: 011 = TCDRP
Text Symbol: 010 = OBJ_NAME
Text Symbol: 009 = PGMID
Text Symbol: 008 = MULTCASE
Text Symbol: 007 = TABNAME
Text Symbol: 006 = OBJECT
Text Symbol: 005 = TCDOB
Text Symbol: 004 = TADIR
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
SAPGUI_PROGRESS_INDICATOR * CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' * EXPORTING ** PERCENTAGE = 0 * text = 'Selektiere die CHDO-Objekte....'(060).
SAPGUI_PROGRESS_INDICATOR * CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' * EXPORTING * percentage = lv_ob_c * text = lv_text.
TRINT_TADIR_UPDATE * CALL FUNCTION 'TRINT_TADIR_UPDATE' * EXPORTING * genflag = c_yes * object = p_tadir-object * obj_name = p_tadir-obj_name * pgmid = lv_pgmid * EXCEPTIONS * object_has_no_tadir = 1 * object_exists_global = 2 * OTHERS = 3.
REUSE_ALV_EVENTS_GET * CALL FUNCTION 'REUSE_ALV_EVENTS_GET' * EXPORTING * i_list_type = 0 * IMPORTING * et_events = rt_events.
SAPGUI_PROGRESS_INDICATOR * CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' * EXPORTING ** PERCENTAGE = 0 * text = 'Bereite die GRID-Anzeige vor...'(062).
REUSE_ALV_GRID_DISPLAY * CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' * EXPORTING * i_background_id = 'ALV_BACKGROUND' "QBJ50 * i_grid_title = text-100 * is_layout = ls_layout * it_fieldcat = lt_field_catalog[] * i_save = lv_save * is_variant = ls_variant * it_events = lt_events[] * IMPORTING * e_exit_caused_by_caller = lv_exit_caused_by_caller * es_exit_caused_by_user = ls_exit_caused_by_user * TABLES * t_outtab = lt_outtab * EXCEPTIONS * program_error = 1 * OTHERS = 2.
TRINT_TADIR_INSERT * CALL FUNCTION 'TRINT_TADIR_INSERT' * EXPORTING * author = p_tadir-author * masterlang = p_tadir-masterlang * devclass = p_tadir-devclass * genflag = c_yes * object = p_tadir-object * obj_name = p_tadir-obj_name * pgmid = p_tadir-pgmid * srcsystem = p_tadir-srcsystem * EXCEPTIONS * object_exists_global = 1 * object_exists_local = 2 * OTHERS = 3.
DYNP_VALUES_READ * CALL FUNCTION 'DYNP_VALUES_READ' * EXPORTING * dyname = my_repid * dynumb = my_dynnr * translate_to_upper = c_yes * TABLES * dynpfields = dyn_f.
HELP_VALUES_GET_WITH_TABLE * CALL FUNCTION 'HELP_VALUES_GET_WITH_TABLE' * EXPORTING * fieldname = c_ffield * tabname = c_ftabname * titel = 'vorhandene Änderungsbelegobjekte'(410) * show_all_values_at_first_time = c_yes * IMPORTING * select_value = sel_field * TABLES * fields = felder * valuetab = tf4_object.
DYNP_VALUES_UPDATE * CALL FUNCTION 'DYNP_VALUES_UPDATE' * EXPORTING * dyname = my_repid * dynumb = my_dynnr * TABLES * dynpfields = dyn_f * EXCEPTIONS * invalid_abapworkarea = 1 * invalid_dynprofield = 2 * invalid_dynproname = 3 * invalid_dynpronummer = 4 * invalid_request = 5 * no_fielddescription = 6 * undefind_error = 7 * OTHERS = 8.
F4IF_INT_TABLE_VALUE_REQUEST **CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' ** EXPORTING *** DDIC_STRUCTURE = ' ' ** retfield = c_fieldname *** PVALKEY = ' ' ** DYNPPROG = my_repid ** DYNPNR = my_dynnr ** DYNPROFIELD = sel_fieldname *** STEPL = 0 ** WINDOW_TITLE = 'vorhandene Aenderungsbelegobjekte'(410) *** VALUE = ' ' ** VALUE_ORG = 'S' *** MULTIPLE_CHOICE = ' ' *** DISPLAY = ' ' *** CALLBACK_PROGRAM = ' ' *** CALLBACK_FORM = ' ' ** tables ** value_tab = tf4_object ** FIELD_TAB = f4feld *** RETURN_TAB = ret_tab *** DYNPFLD_MAPPING = ** EXCEPTIONS ** PARAMETER_ERROR = 1 ** NO_VALUES_FOUND = 2 ** OTHERS = 3.
RS_NAME_SPLIT_NAMESPACE * CALL FUNCTION 'RS_NAME_SPLIT_NAMESPACE' * EXPORTING * name_with_namespace = lv_rep_w_nspace * IMPORTING * namespace = lv_namespace * name_without_namespace = lv_rep_wo_nspace.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.
RSSCD401 - Obsolete: Test/Set R3TR CHDO-TADIR Gen. Flag for TCDOB/TCDRP/TCDRS RSSCD401 - Obsolete: Test/Set R3TR CHDO-TADIR Gen. Flag for TCDOB/TCDRP/TCDRS RSSCD400 - Obsolete: Test or Set Generation Flag TADIR for TCDOB/TCDRP/TCDRS RSSCD400 - Obsolete: Test or Set Generation Flag TADIR for TCDOB/TCDRP/TCDRS RSSCD31I - Obsolete - Delete Change Documents Using CDCLS Up To Rel. 31I RSSCD31I - Obsolete - Delete Change Documents Using CDCLS Up To Rel. 31I