SAP Reports / Programs
RTPM_NOTE_1890394 SAP ABAP Report - Note 1890394: DDIC changes to enable corporate actions for ABS/MBS
RTPM_NOTE_1890394 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 RTPM_NOTE_1890394 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 RTPM_NOTE_1890394. "Basic submit
SUBMIT RTPM_NOTE_1890394 AND RETURN. "Return to original report after report execution complete
SUBMIT RTPM_NOTE_1890394 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Note 1890394: DDIC changes to enable corporate actions for ABS/MBS
INCLUDES used within this REPORT RTPM_NOTE_1890394
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:
BAL_LOG_MSG_READ * CALL FUNCTION 'BAL_LOG_MSG_READ' * EXPORTING * i_s_msg_handle = c_state-list_msgh * IMPORTING * e_s_msg = ls_msg * EXCEPTIONS * log_not_found = 1 * msg_not_found = 2 * OTHERS = 3.
RS_TOOL_ACCESS * CALL FUNCTION 'RS_TOOL_ACCESS' * EXPORTING * operation = 'SHOW' * object_name = ls_tadir-obj_name * object_type = ls_tadir-object * EXCEPTIONS * OTHERS = 1.
AUTHORITY_CHECK_TCODE * CALL FUNCTION 'AUTHORITY_CHECK_TCODE' * EXPORTING * tcode = 'SNOTE' * EXCEPTIONS * ok = 0 * OTHERS = 1.
BAL_LOG_CREATE * CALL FUNCTION 'BAL_LOG_CREATE' * EXPORTING * i_s_log = ls_log * IMPORTING * e_log_handle = gv_log_handle * EXCEPTIONS * log_header_inconsistent = 1 * OTHERS = 2.
SCWB_NOTE_IMPL_STATUS_SIMPLE * CALL FUNCTION 'SCWB_NOTE_IMPL_STATUS_SIMPLE' * EXPORTING * iv_numm = i_note * IMPORTING * ev_status = l_status * EXCEPTIONS * OTHERS = 1.
SCWB_NOTE_READ * CALL FUNCTION 'SCWB_NOTE_READ' * EXPORTING * iv_read_corr_instructions = 'X' * CHANGING * cs_note = ls_note * EXCEPTIONS * note_not_found = 1 * language_not_found = 2 * unreadable_text_format = 3 * corr_instruction_not_found = 4 * OTHERS = 5.
SCWB_CINST_CHECK_VALID * CALL FUNCTION 'SCWB_CINST_CHECK_VALID' * IMPORTING * ev_valid = l_valid * CHANGING * cs_corr_instruction =
* EXCEPTIONS * corr_inst_not_found = 1 * inconsistent_delivery_data = 2 * undefined = 3 * OTHERS = 4.
SCWG_TOOLFLAG_SET * CALL FUNCTION 'SCWG_TOOLFLAG_SET'. "Reset will happen at leave of program
TR_OBJECT_TABLE * CALL FUNCTION 'TR_OBJECT_TABLE' * TABLES * wt_object_text = lt_object_text.
DDIF_DOMA_GET * CALL FUNCTION 'DDIF_DOMA_GET' * EXPORTING * name = 'DOK_ID' * langu = sy-langu * TABLES * dd07v_tab = lt_doktypes * EXCEPTIONS * OTHERS = 0.
RS_WORKING_OBJECT_ACTIVATE * CALL FUNCTION 'RS_WORKING_OBJECT_ACTIVATE' * EXPORTING * dictionary_only = 'X' * TABLES * objects = lt_dwinactiv * EXCEPTIONS * OTHERS = 5.
RS_DD_CHECK_ACTIVATE * CALL FUNCTION 'RS_DD_CHECK_ACTIVATE' * EXPORTING * objtype =
-object * objname = -obj_name ** i_no_ui = 'X' "not in all sap_basis releases * EXCEPTIONS * OTHERS = 1.
RS_WORKING_OBJECT_ACTIVATE * CALL FUNCTION 'RS_WORKING_OBJECT_ACTIVATE' * EXPORTING * dictionary_only = ' ' ** cwb_mode = 'X' * TABLES * objects = lt_dwinactiv * EXCEPTIONS * OTHERS = 5.
POPUP_TO_CONFIRM * CALL FUNCTION 'POPUP_TO_CONFIRM' * EXPORTING * titlebar = 'Activation' "#EC NOTEXT * text_question = 'How do you want to activate DDIC?' "#EC NOTEXT * text_button_1 = 'Online' "#EC NOTEXT * text_button_2 = 'Batch' "#EC NOTEXT * display_cancel_button = 'X' * IMPORTING * answer = lv_answer * EXCEPTIONS * OTHERS = 1.
RFC_READ_TABLE * CALL FUNCTION 'RFC_READ_TABLE' DESTINATION 'NONE' "#EC FB_PAR_MIS * EXPORTING * query_table = ls_tabname-low * rowcount = 1 * EXCEPTIONS * system_failure = 1 MESSAGE l_message * table_not_available = 0 * OTHERS = 0.
JOB_OPEN * CALL FUNCTION 'JOB_OPEN' * EXPORTING * jobname = ls_job-jobname * IMPORTING * jobcount = ls_job-jobcount * CHANGING * ret = lv_rc * EXCEPTIONS * cant_create_job = 1 * invalid_job_data = 2 * jobname_missing = 3 * OTHERS = 4.
JOB_CLOSE * CALL FUNCTION 'JOB_CLOSE' * EXPORTING * jobcount = ls_job-jobcount * jobname = ls_job-jobname * strtimmed = 'X' * EXCEPTIONS * OTHERS = 1.
TR_READ_LOG * CALL FUNCTION 'TR_READ_LOG' * EXPORTING * iv_log_type = 'DB' * iv_logname_db = i_logname * TABLES * et_lines = lt_log * EXCEPTIONS * invalid_input = 1 * access_error = 2 * OTHERS = 3.
* CALL FUNCTION 'TRINT_FREE_MEMORY'.
TR_INITIALIZE_LOG ** CALL FUNCTION 'TR_INITIALIZE_LOG' "to much action, do the main stuff only: * DATA: gv_mem_id(9) VALUE 'prot_file'.
TRINT_CALL_AFTER_IMP_METHOD * CALL FUNCTION 'TRINT_CALL_AFTER_IMP_METHOD' * EXPORTING * iv_trkorr = space * is_e070 = ls_e070 * it_e071 = lt_e071[] * it_e071k = lt_e071k[] * iv_update_lockflag = '' "'X' * CHANGING ">=SAPBASIS700 * it_client = lt_result. ">=SAPBASIS700
TRINT_CALL_AFTER_IMP_METHOD * CALL FUNCTION 'TRINT_CALL_AFTER_IMP_METHOD' * EXPORTING * iv_trkorr = space * is_e070 = ls_e070 * it_e071 = lt_e071[] * it_e071k = lt_e071k[] * iv_update_lockflag = '' "'X' * it_client = lt_client.
TR_READ_LOG * CALL FUNCTION 'TR_READ_LOG' * EXPORTING * iv_log_type = 'MEMORY' ** IV_LOGNAME_FILE = ** IV_LOGNAME_DB = * iv_logname_memory = 'APPEND_LOG' ** IV_TIMESTAMP = '00000000000000' ** IV_CLIENT = ' ' ** IV_LANGUAGE = SYST-LANGU * TABLES * et_lines = lt_trlog * EXCEPTIONS * invalid_input = 1 * access_error = 2 * OTHERS = 3.
TR_TADIR_INTERFACE * CALL FUNCTION 'TR_TADIR_INTERFACE' * EXPORTING ** WI_DELETE_TADIR_ENTRY = ' ' * wi_test_modus = space * wi_tadir_pgmid = 'R3TR' * wi_tadir_object = i_object * wi_tadir_obj_name = l_tadir_name * wi_tadir_devclass = i_devclass * wi_tadir_masterlang = i_langu * EXCEPTIONS * OTHERS = 25.
RS_CORR_INSERT * CALL FUNCTION 'RS_CORR_INSERT' "and create TADIR-entry * EXPORTING * object = l_object_name * object_class = l_object_class * devclass = i_devclass * korrnum = gv_trkorr * global_lock = l_global_lock ** AUTHOR = ' ' * master_language = i_langu ** GENFLAG = ' ' ** PROGRAM = ' ' ** OBJECT_CLASS_SUPPORTS_MA = ' ' * extend = l_extend ** SUPPRESS_DIALOG = ' ' ** MOD_LANGU = ' ' ** ACTIVATION_CALL = ' ' * IMPORTING * korrnum = gv_trkorr ** ORDERNUM = ** NEW_CORR_ENTRY = ** AUTHOR = * transport_key = ls_trkey ** NEW_EXTEND = * EXCEPTIONS * cancelled = 1 * permission_failure = 2 * unknown_objectclass = 3 * OTHERS = 4.
DOCU_OBJECT_NAME_CONCATENATE * CALL FUNCTION 'DOCU_OBJECT_NAME_CONCATENATE' * EXPORTING * docu_id = 'NA' * element = i_msgid * addition = i_msgno * IMPORTING * object = l_obj_name * EXCEPTIONS * OTHERS = 0.
DOCU_GET * CALL FUNCTION 'DOCU_GET' * EXPORTING * id = ls_head-tdid(2) * langu = ls_head-tdspras * object = ls_head-tdname(60) * TABLES * line = lt_line_old * EXCEPTIONS * OTHERS = 0.
DOCU_UPDATE * CALL FUNCTION 'DOCU_UPDATE' * EXPORTING ** ACTCLASS = ' ' * head = ls_head * no_masterlang = lv_no_masterlang * state = 'A' * typ = 'E' * version = l_dokversion * TABLES * line = lt_line.
RPY_PROGRAM_READ * CALL FUNCTION 'RPY_PROGRAM_READ' * EXPORTING * language = i_langu * program_name = i_progname * with_includelist = space * only_texts = 'X' * read_latest_version = 'X' * with_lowercase = 'X' * TABLES * textelements = lt_textpool * EXCEPTIONS * cancelled = 1 * not_found = 2 * permission_error = 3 * OTHERS = 4.
RV_REPORT_WRITE_LANGU ** CALL FUNCTION 'RV_REPORT_WRITE_LANGU' "not in SAP_BASIS ** EXPORTING ** rw_langu = i_langu ** rw_reportname = i_progname ** TABLES ** rw_docu = lt_docu ** rw_textpool = lt_textpool.
BAL_LOG_MSG_ADD * CALL FUNCTION 'BAL_LOG_MSG_ADD' * EXPORTING * i_log_handle = gv_log_handle * i_s_msg = ls_msg * EXCEPTIONS * OTHERS = 0.
BAL_DB_SEARCH ** CALL FUNCTION 'BAL_DB_SEARCH' ** EXPORTING ** i_client = sy-mandt ** i_s_log_filter = ls_filter ** IMPORTING ** e_t_log_header = lt_log_header ** EXCEPTIONS ** log_not_found = 1 ** no_filter_criteria = 2 ** OTHERS = 3.
BAL_DB_LOAD * CALL FUNCTION 'BAL_DB_LOAD' * EXPORTING * i_t_log_header = lt_log_header * IMPORTING * e_t_log_handle = lt_log_handle * EXCEPTIONS * no_logs_specified = 1 * log_not_found = 2 * log_already_loaded = 3 * OTHERS = 4.
BAL_DSP_PROFILE_SINGLE_LOG_GET * CALL FUNCTION 'BAL_DSP_PROFILE_SINGLE_LOG_GET' * IMPORTING * e_s_display_profile = ls_profile * EXCEPTIONS * OTHERS = 0.
BAL_DSP_PROFILE_DETLEVEL_GET * CALL FUNCTION 'BAL_DSP_PROFILE_DETLEVEL_GET' * IMPORTING * e_s_display_profile = ls_profile * EXCEPTIONS * OTHERS = 0.
DDIF_FIELDINFO_GET * CALL FUNCTION 'DDIF_FIELDINFO_GET' * EXPORTING * tabname = c_bal_context * TABLES * dfies_tab = lt_dfies * EXCEPTIONS * not_found = 1 * internal_error = 2 * OTHERS = 3.
BAL_DSP_LOG_DISPLAY * CALL FUNCTION 'BAL_DSP_LOG_DISPLAY' * EXPORTING * i_t_log_handle = lt_log_handle * i_s_display_profile = ls_profile * i_amodal = space * EXCEPTIONS * OTHERS = 0.
BAL_DB_SAVE * CALL FUNCTION 'BAL_DB_SAVE' * EXPORTING * i_t_log_handle = lt_log_handle * EXCEPTIONS * OTHERS = 0.
BAL_GLB_MSG_DEFAULTS_SET * CALL FUNCTION 'BAL_GLB_MSG_DEFAULTS_SET' * EXPORTING * i_s_msg_defaults = ls_msg_defaults * EXCEPTIONS * OTHERS = 0.
SCWB_GET_TADIR_REM * CALL FUNCTION 'SCWB_GET_TADIR_REM' * EXPORTING * is_e071 = ls_e071 * IMPORTING * es_tadir_key = ls_tadir_key * es_tadir = ls_tadir.
SCWB_GET_TADIR_REM * CALL FUNCTION 'SCWB_GET_TADIR_REM' * EXPORTING * is_e071 = ls_e071 * IMPORTING * es_tadir_key = ls_tadir_key * es_tadir = ls_tadir.
BAL_LOG_MSG_ADD_FREE_TEXT * CALL FUNCTION 'BAL_LOG_MSG_ADD_FREE_TEXT' * EXPORTING * i_msgty = 'I' * i_text = l_text * EXCEPTIONS * OTHERS = 0.
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 RTPM_NOTE_1890394 or its description.
RTPM_NOTE_1890394 - Note 1890394: DDIC changes to enable corporate actions for ABS/MBS RTPM_NOTE_1890394 - Note 1890394: DDIC changes to enable corporate actions for ABS/MBS RTPM_NOTE_1849031_DE_EN - Report RTPM_NOTE_1849031_DE_EN RTPM_NOTE_1849031_DE_EN - Report RTPM_NOTE_1849031_DE_EN RTPM_NOTE_1849031 - Report RTPM_NOTE_1849031 RTPM_NOTE_1849031 - Report RTPM_NOTE_1849031