SAP Reports / Programs | Basis Components | Database Interface, Database Platforms | DB2 for z/OS(BC-DB-DB2) SAP BC
RSDB2CMO SAP ABAP INCLUDE - Include RSDB2CMO
RSDB2CMO 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 RSDB2CMO 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 RSDB2CMO. "Basic submit
SUBMIT RSDB2CMO AND RETURN. "Return to original report after report execution complete
SUBMIT RSDB2CMO VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Include RSDB2CMO
INCLUDES used within this REPORT RSDB2CMO
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:
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = '$DEFAULT_PRIQTY' "#EC NOTEXT IMPORTING value = jcl_priqty_mb EXCEPTIONS parameter_not_found = 1 profile_not_available = 2 OTHERS = 3.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = '$DEFAULT_SECQTY' "#EC NOTEXT IMPORTING value = jcl_secqty_mb EXCEPTIONS parameter_not_found = 1 profile_not_available = 2 OTHERS = 3.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = '$MAXPRIME' "#EC NOTEXT IMPORTING value = jcl_maxprime_cyl EXCEPTIONS parameter_not_found = 1 profile_not_available = 2 OTHERS = 3.
DBSYCHK_GET_DB_RELEASE CALL FUNCTION 'DBSYCHK_GET_DB_RELEASE' EXPORTING CON_NAME = remote_dbcon IMPORTING RELEASE = db2release EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
STU3_ADMIN_SELECT_NONDDIC_REM CALL FUNCTION 'STU3_ADMIN_SELECT_NONDDIC_REM' EXPORTING CON_NAME = remote_dbcon STATEMENT = stmt * DO_NOT_CLOSE_CON = * UPTO_ROWS = 0 * DO_COMMIT = REPORT_ERROR_TO_SYSLOG = ABAP_TRUE CHANGING * CON_REF = ITABLE_REF = itable_ref * SQLERR_REF = EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
DBSYCHK_GET_DB_RELEASE CALL FUNCTION 'DBSYCHK_GET_DB_RELEASE' EXPORTING CON_NAME = remote_dbcon IMPORTING RELEASE = db2release EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
STU3_ADMIN_SELECT_NONDDIC_REM CALL FUNCTION 'STU3_ADMIN_SELECT_NONDDIC_REM' EXPORTING CON_NAME = remote_dbcon STATEMENT = stmt * DO_NOT_CLOSE_CON = * UPTO_ROWS = 0 * DO_COMMIT = REPORT_ERROR_TO_SYSLOG = ABAP_TRUE CHANGING * CON_REF = ITABLE_REF = itable_ref * SQLERR_REF = EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
STU3_ADMIN_SELECT_NONDDIC_REM CALL FUNCTION 'STU3_ADMIN_SELECT_NONDDIC_REM' EXPORTING CON_NAME = remote_dbcon STATEMENT = stmt DO_NOT_CLOSE_CON = abap_false DO_COMMIT = abap_true REPORT_ERROR_TO_SYSLOG = abap_false CHANGING ITABLE_REF = result_ref SQLERR_REF = sqlerr_ref EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING VARIABLE = var_runstats_on_catalog CON_NAME = remote_dbcon IMPORTING VALUE = rst_catalog EXCEPTIONS OTHERS = 1.
STU3_ADMIN_SELECT_NONDDIC_REM CALL FUNCTION 'STU3_ADMIN_SELECT_NONDDIC_REM' EXPORTING CON_NAME = remote_dbcon STATEMENT = stmt DO_NOT_CLOSE_CON = abap_false DO_COMMIT = abap_true REPORT_ERROR_TO_SYSLOG = abap_false CHANGING ITABLE_REF = result_ref SQLERR_REF = sqlerr_ref EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = '$BW_REO_RST' "#EC NOTEXT IMPORTING value = value EXCEPTIONS parameter_not_found = 1 profile_not_available = 2 OTHERS = 3.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = '$SAMPLE_TYPE' "#EC NOTEXT IMPORTING value = value EXCEPTIONS parameter_not_found = 1 profile_not_available = 2 OTHERS = 3.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = '$RUNST_OTHERS' "#EC NOTEXT IMPORTING value = value EXCEPTIONS parameter_not_found = 1 profile_not_available = 2 OTHERS = 3.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = '$REORG_OTHERS' "#EC NOTEXT IMPORTING value = value EXCEPTIONS parameter_not_found = 1 profile_not_available = 2 OTHERS = 3.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = cl_db2_jobprofile=>var_convtool_objects IMPORTING value = value EXCEPTIONS parameter_not_found = 1 profile_not_available = 2 OTHERS = 3.
DBSYCHK_GET_DB_RELEASE CALL FUNCTION 'DBSYCHK_GET_DB_RELEASE' EXPORTING CON_NAME = remote_dbcon IMPORTING RELEASE = db2release EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = var_runst_parallel_degree IMPORTING value = proc_area-maxparall EXCEPTIONS OTHERS = 1.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = var_mod_stat_age IMPORTING value = mod_stat_age EXCEPTIONS OTHERS = 1.
CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = profile_var_sample IMPORTING value = sample_n EXCEPTIONS OTHERS = 1.
DBSYCHK_GET_BW_TABLES_DB2 CALL FUNCTION 'DBSYCHK_GET_BW_TABLES_DB2' EXPORTING con_name = remote_dbcon name_prefix = wa_check_one_tab-name IMPORTING bw_system = bw_flag TABLES tblist = bw_tables.
DBSYCHK_GET_BW_TABLES_DB2 CALL FUNCTION 'DBSYCHK_GET_BW_TABLES_DB2' EXPORTING con_name = remote_dbcon IMPORTING bw_system = bw_flag TABLES tblist = bw_tables.
CCDSNU_CHECK_UTILITY_TEMPLATES CALL FUNCTION 'CCDSNU_CHECK_UTILITY_TEMPLATES'.
STU3_ADMIN_SINGLE_SQL_REMOTE CALL FUNCTION 'STU3_ADMIN_SINGLE_SQL_REMOTE' EXPORTING con_name = remote_dbcon stmt = sql_stmt result = data_ref do_not_close_con = abap_false report_error_to_syslog = abap_false CHANGING sqlerr_ref = sqlerr_ref EXCEPTIONS adbc_sql_error = 1 OTHERS = 2.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = copy_parallel_degree IMPORTING value = proc_area-maxparall EXCEPTIONS OTHERS = 1.
S390_GET_UNIQUE_COPY_ID CALL FUNCTION 'S390_GET_UNIQUE_COPY_ID' IMPORTING number = util_id EXCEPTIONS number_not_found = 1 OTHERS = 2.
GENERAL_GET_RANDOM_STRING CALL FUNCTION 'GENERAL_GET_RANDOM_STRING' EXPORTING number_chars = 2 IMPORTING random_string = tmp.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = var_mod_rec_age IMPORTING value = mod_rec_age EXCEPTIONS OTHERS = 1.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = gdg_limit IMPORTING value = gdg_lim EXCEPTIONS OTHERS = 1.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = var_copy_part IMPORTING value = jcl_prof_val EXCEPTIONS OTHERS = 1.
S_MCOD_GET_LANDSCAPE CALL FUNCTION 'S_MCOD_GET_LANDSCAPE' TABLES tab_db2sapsys = tab_db2sapsys.
CCDSNU_CHECK_EXCEPT_TABLE_DB2 CALL FUNCTION 'CCDSNU_CHECK_EXCEPT_TABLE_DB2' EXPORTING con_name = remote_dbcon TABLES except_list = exception_list EXCEPTIONS sql_error = 1 OTHERS = 2.
DBSYCHK_COMPARE_DB2_TIMESTAMP CALL FUNCTION 'DBSYCHK_COMPARE_DB2_TIMESTAMP' EXPORTING time1 = join_size_tab_wa-statstime * TIME2 = IMPORTING rc = stats.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = co_change_limit IMPORTING value = change_limit EXCEPTIONS OTHERS = 1.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = copy_parallel_degree IMPORTING value = proc_area-maxparall EXCEPTIONS OTHERS = 1.
S390_GET_UNIQUE_COPY_ID CALL FUNCTION 'S390_GET_UNIQUE_COPY_ID' IMPORTING number = util_id EXCEPTIONS number_not_found = 1 OTHERS = 2.
GENERAL_GET_RANDOM_STRING CALL FUNCTION 'GENERAL_GET_RANDOM_STRING' EXPORTING number_chars = 2 IMPORTING random_string = tmp.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = var_mod_rec_age IMPORTING value = mod_rec_age EXCEPTIONS OTHERS = 1.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = gdg_limit IMPORTING value = gdg_lim EXCEPTIONS OTHERS = 1.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = var_copy_part IMPORTING value = jcl_prof_val EXCEPTIONS OTHERS = 1.
S_MCOD_GET_LANDSCAPE CALL FUNCTION 'S_MCOD_GET_LANDSCAPE' TABLES tab_db2sapsys = tab_db2sapsys.
CCDSNU_CHECK_EXCEPT_TABLE_DB2 CALL FUNCTION 'CCDSNU_CHECK_EXCEPT_TABLE_DB2' EXPORTING con_name = remote_dbcon TABLES except_list = exception_list EXCEPTIONS sql_error = 1 OTHERS = 2.
DBSYCHK_COMPARE_DB2_TIMESTAMP CALL FUNCTION 'DBSYCHK_COMPARE_DB2_TIMESTAMP' EXPORTING time1 = join_size_tab_wa-statstime * TIME2 = IMPORTING rc = stats.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = copy_parallel_degree IMPORTING value = proc_area-maxparall EXCEPTIONS OTHERS = 1.
S390_GET_UNIQUE_COPY_ID CALL FUNCTION 'S390_GET_UNIQUE_COPY_ID' IMPORTING number = util_id EXCEPTIONS number_not_found = 1 OTHERS = 2.
GENERAL_GET_RANDOM_STRING CALL FUNCTION 'GENERAL_GET_RANDOM_STRING' EXPORTING number_chars = 2 IMPORTING random_string = tmp.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = var_mod_rec_age IMPORTING value = mod_rec_age EXCEPTIONS OTHERS = 1.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = gdg_limit IMPORTING value = gdg_lim EXCEPTIONS OTHERS = 1.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = var_copy_part IMPORTING value = jcl_prof_val EXCEPTIONS OTHERS = 1.
DBSYCHK_COMPARE_DB2_TIMESTAMP CALL FUNCTION 'DBSYCHK_COMPARE_DB2_TIMESTAMP' EXPORTING time1 = my_db2ccdaily_wa-runstatsti * TIME2 = IMPORTING rc = stats.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = reorg_parallel_degree IMPORTING value = proc_area-maxparall EXCEPTIONS OTHERS = 1.
S390_GET_UNIQUE_COPY_ID CALL FUNCTION 'S390_GET_UNIQUE_COPY_ID' IMPORTING number = util_id EXCEPTIONS number_not_found = 1 OTHERS = 2.
GENERAL_GET_RANDOM_STRING CALL FUNCTION 'GENERAL_GET_RANDOM_STRING' EXPORTING number_chars = 2 IMPORTING random_string = tmp.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = gdg_limit IMPORTING value = gdg_lim EXCEPTIONS OTHERS = 1.
DBSYCHK_GET_BW_TABLES_DB2 CALL FUNCTION 'DBSYCHK_GET_BW_TABLES_DB2' EXPORTING con_name = remote_dbcon IMPORTING bw_system = bw_flag TABLES tblist = bw_tables bw_no_runstats_table_list = bw_tables_no_runstats.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = '$SP_USER' IMPORTING value = high_level_qualifier EXCEPTIONS OTHERS = 1.
CCDSNU_CALL_DSNACCMO CALL FUNCTION 'CCDSNU_CALL_DSNACCMO' TABLES mo_tbl = mo_tbl1 mo_tbl2 = mo_tbl2 * SYSPRINT = outts = outts CHANGING proc_area = proc_area EXCEPTIONS error_in_check_version = 1 less_than_v7 = 2 stoproc_aborted = 3 dsnaccmo_not_installed = 4 create_database_failed = 5 no_input_tables = 6 sql_error = 7 OTHERS = 8.
CCDSNU_CALL_DSNACCMN CALL FUNCTION 'CCDSNU_CALL_DSNACCMN' EXPORTING DB2_COMMAND = db2_command * MEMBER = TABLES COMMAND_OUTPUT = command_out EXCEPTIONS DSNACCMN_NOT_INSTALLED = 1 SQL_ERROR = 2 OTHERS = 3.
CCDSNU_CALL_DSNACCMN CALL FUNCTION 'CCDSNU_CALL_DSNACCMN' EXPORTING DB2_COMMAND = db2_command * MEMBER = TABLES COMMAND_OUTPUT = command_out EXCEPTIONS DSNACCMN_NOT_INSTALLED = 1 SQL_ERROR = 2 OTHERS = 3.
CCDSNU_CALL_DSNUTILS CALL FUNCTION 'CCDSNU_CALL_DSNUTILS' TABLES sysprint = sysprint CHANGING proc_area = proc_area EXCEPTIONS error_in_check_version = 1 less_than_v6 = 2 stoproc_aborted = 3 dsnutils_not_installed = 4 create_database_failed = 5 no_input_tables = 6 sql_error = 7 OTHERS = 8.
S390_GET_CREATOR CALL FUNCTION 'S390_GET_CREATOR' EXPORTING CON_NAME = remote_dbcon CHANGING CREATOR = table_creator SQLERR_REF = sqlerr_ref EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
STU3_ADMIN_SINGLE_SQL_REMOTE CALL FUNCTION 'STU3_ADMIN_SINGLE_SQL_REMOTE' EXPORTING CON_NAME = remote_dbcon STMT = sql_stmt RESULT = data_ref DO_NOT_CLOSE_CON = abap_false REPORT_ERROR_TO_SYSLOG = abap_false IS_STRUCTURE = abap_true CHANGING SQLERR_REF = sqlerr_ref EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
S390_GET_UNIQUE_COPY_ID CALL FUNCTION 'S390_GET_UNIQUE_COPY_ID' IMPORTING number = util_id EXCEPTIONS number_not_found = 1 OTHERS = 2.
GENERAL_GET_RANDOM_STRING CALL FUNCTION 'GENERAL_GET_RANDOM_STRING' EXPORTING number_chars = 2 IMPORTING random_string = tmp.
DBSYCHK_GET_BW_TABLES_DB2 CALL FUNCTION 'DBSYCHK_GET_BW_TABLES_DB2' EXPORTING con_name = remote_dbcon IMPORTING bw_system = bw_flag TABLES tblist = bw_tables bw_no_runstats_table_list = bw_tables_no_runstats.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = gdg_limit IMPORTING value = gdg_lim EXCEPTIONS OTHERS = 1.
DBSYCHK_COMPARE_DB2_TIMESTAMP CALL FUNCTION 'DBSYCHK_COMPARE_DB2_TIMESTAMP' EXPORTING time1 = statstime * TIME2 = IMPORTING rc = stats.
S390_GET_UNIQUE_COPY_ID CALL FUNCTION 'S390_GET_UNIQUE_COPY_ID' IMPORTING number = util_id EXCEPTIONS number_not_found = 1 OTHERS = 2.
GENERAL_GET_RANDOM_STRING CALL FUNCTION 'GENERAL_GET_RANDOM_STRING' EXPORTING number_chars = 2 IMPORTING random_string = tmp.
S390_GET_UNIQUE_COPY_ID CALL FUNCTION 'S390_GET_UNIQUE_COPY_ID' IMPORTING number = util_id EXCEPTIONS number_not_found = 1 OTHERS = 2.
GENERAL_GET_RANDOM_STRING CALL FUNCTION 'GENERAL_GET_RANDOM_STRING' EXPORTING number_chars = 2 IMPORTING random_string = tmp.
S390_GET_UNIQUE_COPY_ID CALL FUNCTION 'S390_GET_UNIQUE_COPY_ID' IMPORTING number = util_id EXCEPTIONS number_not_found = 1 OTHERS = 2.
GENERAL_GET_RANDOM_STRING CALL FUNCTION 'GENERAL_GET_RANDOM_STRING' EXPORTING number_chars = 2 IMPORTING random_string = tmp.
S390_GET_UNIQUE_COPY_ID CALL FUNCTION 'S390_GET_UNIQUE_COPY_ID' IMPORTING number = util_id EXCEPTIONS number_not_found = 1 OTHERS = 2.
GENERAL_GET_RANDOM_STRING CALL FUNCTION 'GENERAL_GET_RANDOM_STRING' EXPORTING number_chars = 2 IMPORTING random_string = tmp.
CCDSNU_CHECK_EXCEPT_TABLE_DB2 CALL FUNCTION 'CCDSNU_CHECK_EXCEPT_TABLE_DB2' EXPORTING con_name = remote_dbcon TABLES except_list = exception_list EXCEPTIONS sql_error = 1 OTHERS = 2.
CCDSNU_JCL_SUBMIT_SYNCH CALL FUNCTION 'CCDSNU_JCL_SUBMIT_SYNCH' IMPORTING RETCODE = jcl_retcode MESSAGE = jcl_message TABLES JS_TBL = it_jcl RESULT = it_result EXCEPTIONS NOT_AUTHORIZED = 1 ERROR_IN_CHECK_VERSION = 2 LESS_THAN_V8 = 3 STOPROC_ABORTED = 4 DSNACCJS_NOT_INSTALLED = 5 DSNACCJQ_NOT_INSTALLED = 6 DSNACCJP_NOT_INSTALLED = 7 DSNACCJF_NOT_INSTALLED = 8 CREATE_DATABASE_FAILED = 9 NO_INPUT_TABLES = 10 SQL_ERROR = 11 JOB_HELD = 12 ENCRYPT_USER_FAILED = 13 DECRYPT_PASSW_FAILED = 14 NO_TSO_USER = 15 OTHERS = 16.
DBSYCHK_GET_DB_RELEASE CALL FUNCTION 'DBSYCHK_GET_DB_RELEASE' EXPORTING CON_NAME = remote_dbcon IMPORTING RELEASE = db2release EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = reorg_parallel_degree IMPORTING value = parallel_stream EXCEPTIONS OTHERS = 1.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = var_reoallts_lobhandling IMPORTING value = lob_handling EXCEPTIONS OTHERS = 1.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = gdg_limit IMPORTING value = gdg_lim EXCEPTIONS OTHERS = 1.
GET_JCL_PROFILE_PARAMETER CALL FUNCTION 'GET_JCL_PROFILE_PARAMETER' EXPORTING variable = var_reoallts_copyhandling IMPORTING value = ddn_type EXCEPTIONS OTHERS = 1.
CCDSNU_CHECK_MAPPINGTABLE_DB2 CALL FUNCTION 'CCDSNU_CHECK_MAPPINGTABLE_DB2' EXPORTING parallel_streams = parallel_stream remote_connection = remote_dbcon EXCEPTIONS sql_error = 1 OTHERS = 2.
S390_GET_UNIQUE_MAPPING_TAB_ID CALL FUNCTION 'S390_GET_UNIQUE_MAPPING_TAB_ID' EXPORTING CON_NAME = remote_dbcon IMPORTING NUMBER = thdindex SQLERR_REF = sqlerr_ref EXCEPTIONS NUMBER_NOT_FOUND = 1 ADBC_SQL_ERROR = 2 OTHERS = 3.
DBSYCHK_GET_BW_TABLES_DB2 CALL FUNCTION 'DBSYCHK_GET_BW_TABLES_DB2' EXPORTING con_name = remote_dbcon IMPORTING bw_system = bw_flag TABLES tblist = it_bw_tables.
CCDSNU_CHECK_EXCEPT_TABLE_DB2 CALL FUNCTION 'CCDSNU_CHECK_EXCEPT_TABLE_DB2' EXPORTING CON_NAME = remote_dbcon IMPORTING * TABLE_PRESENT = SQLERR_REF = sqlerr_ref TABLES EXCEPT_LIST = it_except EXCEPTIONS SQL_ERROR = 1 INTERNAL_ERROR = 2 OTHERS = 3.
STU3_ADMIN_SELECT_NONDDIC_REM CALL FUNCTION 'STU3_ADMIN_SELECT_NONDDIC_REM' EXPORTING CON_NAME = remote_dbcon STATEMENT = stmt DO_NOT_CLOSE_CON = abap_false DO_COMMIT = abap_true REPORT_ERROR_TO_SYSLOG = abap_false CHANGING ITABLE_REF = itable_ref SQLERR_REF = sqlerr_ref EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
STU3_ADMIN_SELECT_NONDDIC_REM CALL FUNCTION 'STU3_ADMIN_SELECT_NONDDIC_REM' EXPORTING CON_NAME = remote_dbcon STATEMENT = stmt DO_NOT_CLOSE_CON = abap_false DO_COMMIT = abap_true REPORT_ERROR_TO_SYSLOG = abap_false CHANGING ITABLE_REF = itable_ref SQLERR_REF = sqlerr_ref EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
CCDSNU_CHECK_EXCEPT_TABLE_DB2 CALL FUNCTION 'CCDSNU_CHECK_EXCEPT_TABLE_DB2' EXPORTING CON_NAME = remote_dbcon IMPORTING * TABLE_PRESENT = SQLERR_REF = sqlerr_ref TABLES EXCEPT_LIST = it_except EXCEPTIONS SQL_ERROR = 1 INTERNAL_ERROR = 2 OTHERS = 3.
CCDSNU_CHECK_EXCEPT_TABLE_DB2 CALL FUNCTION 'CCDSNU_CHECK_EXCEPT_TABLE_DB2' EXPORTING CON_NAME = remote_dbcon IMPORTING * TABLE_PRESENT = SQLERR_REF = sqlerr_ref TABLES EXCEPT_LIST = it_except EXCEPTIONS SQL_ERROR = 1 INTERNAL_ERROR = 2 OTHERS = 3.
STU3_ADMIN_SELECT_NONDDIC_REM CALL FUNCTION 'STU3_ADMIN_SELECT_NONDDIC_REM' EXPORTING CON_NAME = remote_dbcon STATEMENT = stmt DO_NOT_CLOSE_CON = abap_false DO_COMMIT = abap_true REPORT_ERROR_TO_SYSLOG = abap_false CHANGING ITABLE_REF = itable_ref SQLERR_REF = sqlerr_ref EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
STU3_ADMIN_SELECT_NONDDIC_REM CALL FUNCTION 'STU3_ADMIN_SELECT_NONDDIC_REM' EXPORTING CON_NAME = remote_dbcon STATEMENT = stmt DO_NOT_CLOSE_CON = abap_false DO_COMMIT = abap_true REPORT_ERROR_TO_SYSLOG = abap_false CHANGING ITABLE_REF = itable_ref SQLERR_REF = sqlerr_ref EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
STU3_ADMIN_SELECT_NONDDIC_REM CALL FUNCTION 'STU3_ADMIN_SELECT_NONDDIC_REM' EXPORTING CON_NAME = remote_dbcon STATEMENT = stmt DO_NOT_CLOSE_CON = abap_false DO_COMMIT = abap_true REPORT_ERROR_TO_SYSLOG = abap_false CHANGING ITABLE_REF = result_ref SQLERR_REF = sqlerr_ref EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
DBSYCHK_GET_DB_RELEASE CALL FUNCTION 'DBSYCHK_GET_DB_RELEASE' EXPORTING CON_NAME = remote_dbcon IMPORTING RELEASE = db2release EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
GET_QUALIFYING_NUMBER_DB2 CALL FUNCTION 'GET_QUALIFYING_NUMBER_DB2' EXPORTING con_name = remote_dbcon IMPORTING number = number EXCEPTIONS number_not_found = 1 OTHERS = 2.
GENERAL_GET_RANDOM_STRING CALL FUNCTION 'GENERAL_GET_RANDOM_STRING' EXPORTING number_chars = 2 IMPORTING random_string = tmp_s.
STU3_ADMIN_SELECT_NONDDIC_REM call function 'STU3_ADMIN_SELECT_NONDDIC_REM' exporting con_name = remote_dbcon statement = sql_stmt do_not_close_con = abap_false do_commit = abap_true report_error_to_syslog = abap_false changing itable_ref = itab_ref sqlerr_ref = sqlerr_ref exceptions adbc_sql_error = 1 others = 2.
SYSTEM_CALLSTACK CALL FUNCTION 'SYSTEM_CALLSTACK' importing CALLSTACK = it_callstack.
STU3_ADMIN_SELECT_NONDDIC_REM CALL FUNCTION 'STU3_ADMIN_SELECT_NONDDIC_REM' EXPORTING CON_NAME = remote_dbcon STATEMENT = stmt DO_NOT_CLOSE_CON = abap_false DO_COMMIT = abap_true REPORT_ERROR_TO_SYSLOG = abap_false CHANGING ITABLE_REF = result_ref SQLERR_REF = sqlerr_ref EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
STU3_ADMIN_UPDATE_SQL_REMOTE CALL FUNCTION 'STU3_ADMIN_UPDATE_SQL_REMOTE' EXPORTING CON_NAME = remote_dbcon UPD_STMT = stmt COMMIT = abap_true DO_NOT_CLOSE_CON = abap_false REPORT_ERROR_TO_SYSLOG = abap_false IMPORTING SQLERR_REF = sqlerr_ref EXCEPTIONS ADBC_SQL_ERROR = 1 OTHERS = 2.
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 RSDB2CMO or its description.