RSDB400X is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This program is the main program of the DB2/400 Performance Monitor (transaction ST04) using the memory-based SQL database monitor...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 RSDB400X 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.
Title: iSeries: Performance Monitor Overview (new DBMON)
Text Symbol: 047 = DB Monitor Configuration
Text Symbol: 048 = Data was changed.
Text Symbol: 049 = Save data?
Text Symbol: 050 = Exit DBmonitor configuration
Text Symbol: 051 = This server is currently not running!
Text Symbol: 052 = Invalid server selected.
Text Symbol: 053 = Data was changed.
Text Symbol: 054 = Save data?
Text Symbol: 055 = Exit DBmonitor configuration
Text Symbol: 056 = Error in F4IF_INT_TABLE_VALUE_REQUEST
Text Symbol: 057 = Error in TH_SERVER_LIST
Text Symbol: 058 = Error in POPUP_GET_VALUES
Text Symbol: 059 = Error in ST04_DB4_GET_DBMON_ACTIVITY
Text Symbol: 060 = ERROR in DBMonitor dump execution.
Text Symbol: 061 = DBMonitor dump executed, RSDB4UPD scheduled.
Text Symbol: 064 = File activity
Text Symbol: 065 = Reads
Text Symbol: 066 = Physical Reads
Text Symbol: 067 = Quality (%)
Text Symbol: 068 = Reads/user call
Text Symbol: 069 = Time (ms)/user call
Text Symbol: C25 = Last successful dump
Text Symbol: C26 = Last successful merge
Text Symbol: C27 = Last time merge started
Text Symbol: C28 = Last time merge skipped
Text Symbol: C29 = Oldest data from
Text Symbol: C30 = DB2/400 database monitor information:
Text Symbol: C31 = Database start
Text Symbol: C32 = Last reset
Text Symbol: C33 = Total database processing time (s)
Text Symbol: C34 = Last merge of database monitor tables
Text Symbol: Y01 = ERROR in generating fieldcatalog
Text Symbol: Y02 = Table/structure does not exist.
Text Symbol: 046 = Delete database monitor statistics
Text Symbol: 001 = Calls
Text Symbol: 002 = User calls
Text Symbol: 003 = SELECT statements
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
ST04_DB4_GET_STATISTICS CALL FUNCTION 'ST04_DB4_GET_STATISTICS' EXPORTING resetflag = p_reset_flag dbhost = i_dbhost schemaname = schemaname IMPORTING db_stats = p_database_statistics sum_waits = p_wait_stats-wait_num sum_wait_times = p_wait_stats-wait_time wait_stat_subrc = i_wait_stat_err EXCEPTIONS wait_stats_error = 1 no_db_stats_found = 2 no_db_stats_and_wait_stats_err = 3 OTHERS = 4.
POPUP_GET_VALUES CALL FUNCTION 'POPUP_GET_VALUES' EXPORTING popup_title = 'Delete statistics older than: '(045) IMPORTING returncode = i_answer TABLES fields = i_fields_tab EXCEPTIONS error_in_fields = 1 OTHERS = 2.
call function 'POPUP_TO_CONFIRM' exporting titlebar = 'Delete database monitor statistics'(046) text_question = i_question display_cancel_button = '' popup_type = 'ICON_MESSAGE_WARNING' importing answer = i_answer.
ENQUEUE_E_DB4DBMCFG CALL FUNCTION 'ENQUEUE_E_DB4DBMCFG' EXPORTING mode_db4dbmcfg = 'E' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
DEQUEUE_E_DB4DBMCFG CALL FUNCTION 'DEQUEUE_E_DB4DBMCFG'.
ST04_DB4_GET_DBMON_ACTIVITY CALL FUNCTION 'ST04_DB4_GET_DBMON_ACTIVITY' TABLES job_tab = i_db4_dbmact EXCEPTIONS th_server_list_error = 1 api_error = 2 OTHERS = 3.
POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING TITLEBAR = 'Exit DBmonitor configuration'(050) text_question = i_question DISPLAY_CANCEL_BUTTON = 'X' IMPORTING answer = answer.
TH_SERVER_LIST CALL FUNCTION 'TH_SERVER_LIST' TABLES list = i_msxxlist EXCEPTIONS no_server_list = 1 OTHERS = 2.
POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING TITLEBAR = 'Exit DBmonitor configuration'(055) text_question = i_question DISPLAY_CANCEL_BUTTON = 'X' IMPORTING answer = answer.
TH_SERVER_LIST CALL FUNCTION 'TH_SERVER_LIST' TABLES list = i_msxxlist EXCEPTIONS no_server_list = 1 OTHERS = 2.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING DDIC_STRUCTURE = 'MSXXLIST' retfield = 'NAME' DYNPPROG = 'RSDB400X' DYNPNR = '0400' DYNPROFIELD = 'DUMP_SERV-DB4MSNAME' VALUE = ' ' VALUE_ORG = 'S' TABLES value_tab = i_msxxlist RETURN_TAB = it_selection EXCEPTIONS PARAMETER_ERROR = 1 NO_VALUES_FOUND = 2 OTHERS = 3.
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 RSDB400X or its description.