ADS2KIP_BROWSER_FORMS5 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 ADS2KIP_BROWSER_FORMS5 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: Subroutines
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING client = sy-mandt id = l_st_thead-tdid language = l_st_thead-tdspras name = l_st_thead-tdname object = l_st_thead-tdobject * ARCHIVE_HANDLE = 0 * LOCAL_CAT = ' ' IMPORTING header = l_st_thead TABLES lines = l_tb_tline EXCEPTIONS id = 1 language = 2 name = 3 not_found = 4 object = 5 reference_check = 6 wrong_access_to_archive = 7 OTHERS = 8.
INIT_TEXT CALL FUNCTION 'INIT_TEXT' EXPORTING id = l_st_thead-tdid language = l_st_thead-tdspras name = l_st_thead-tdname object = l_st_thead-tdobject IMPORTING header = l_st_thead TABLES lines = l_tb_tline EXCEPTIONS ID = 1 LANGUAGE = 2 NAME = 3 OBJECT = 4 OTHERS = 5.
EDIT_TEXT CALL FUNCTION 'EDIT_TEXT' EXPORTING display = l_flag_dis_chg header = l_st_thead TABLES lines = l_tb_tline EXCEPTIONS OTHERS = 0.
COMMIT_TEXT CALL FUNCTION 'COMMIT_TEXT' EXPORTING object = l_st_thead-tdobject name = l_st_thead-tdname id = l_st_thead-tdid language = l_st_thead-tdspras savemode_direct = 'X'.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING client = sy-mandt id = l_st_thead-tdid language = l_st_thead-tdspras name = l_st_thead-tdname object = l_st_thead-tdobject * ARCHIVE_HANDLE = 0 * LOCAL_CAT = ' ' IMPORTING header = l_st_thead TABLES lines = l_tb_tline EXCEPTIONS id = 1 language = 2 name = 3 not_found = 4 object = 5 reference_check = 6 wrong_access_to_archive = 7 OTHERS = 8.
INIT_TEXT CALL FUNCTION 'INIT_TEXT' EXPORTING id = l_st_thead-tdid language = l_st_thead-tdspras name = l_st_thead-tdname object = l_st_thead-tdobject IMPORTING header = l_st_thead TABLES lines = l_tb_tline.
EDIT_TEXT CALL FUNCTION 'EDIT_TEXT' EXPORTING display = l_flag_dis_chg header = l_st_thead TABLES lines = l_tb_tline EXCEPTIONS OTHERS = 0.
COMMIT_TEXT CALL FUNCTION 'COMMIT_TEXT' EXPORTING object = l_st_thead-tdobject name = l_st_thead-tdname id = l_st_thead-tdid language = l_st_thead-tdspras savemode_direct = 'X'.
CHANGEDOCUMENT_READ CALL FUNCTION 'CHANGEDOCUMENT_READ' EXPORTING * archive_handle = 0 changenumber = p_fl_chgnbr date_of_change = p_fl_date objectclass = p_fl_objclass objectid = p_fl_objid tablekey = p_fl_tabkey tablename = p_fl_tabnam time_of_change = p_fl_time username = p_fl_uname TABLES * editpos = l_tb_editpos_h editpos = p_tb_editpos " 638847 EXCEPTIONS no_position_found = 1 OTHERS = 2.
CHANGEDOCUMENT_READ * CALL FUNCTION 'CHANGEDOCUMENT_READ' * EXPORTING ** ARCHIVE_HANDLE = 0 * CHANGENUMBER = l_tb_editpos_h-changenr * DATE_OF_CHANGE = p_fl_date * objectclass = p_fl_objclass * OBJECTID = p_fl_objid ** TABLEKEY = p_fl_tabkey * TABLENAME = p_fl_tabnam * TIME_OF_CHANGE = p_fl_time * USERNAME = p_fl_uname * tables * editpos = l_tb_editpos_tmp * EXCEPTIONS * OTHERS = 0.
CHANGEDOCUMENT_READ ** CALL FUNCTION 'CHANGEDOCUMENT_READ' ** EXPORTING ** changenumber = l_tb_editpos_h-changenr ** objectclass = p_fl_objclass ** TABLES ** editpos = l_tb_editpos_tmp ** EXCEPTIONS ** OTHERS = 0.
CHANGEDOCUMENT_DISPLAY CALL FUNCTION 'CHANGEDOCUMENT_DISPLAY' EXPORTING i_applicationid = p_fl_applicationid * IS_LAYOUT = * IS_VARIANT = flg_autocondense = 'X' * I_CB_PROGRAM = i_objectclas = p_fl_objclass * IS_SEL_HIDE = * I_SCREEN_START_LINE = 0 * I_SCREEN_START_COLUMN = 0 * I_SCREEN_END_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_CALLBACK_PF_STATUS_SET = ' ' * IT_EVENTS = TABLES i_cdred = p_tb_editpos.
STATUS_READ CALL FUNCTION 'STATUS_READ' EXPORTING client = sy-mandt objnr = l_status_object_number only_active = 'X' IMPORTING obtyp = l_status_object_type stsma = l_fl_status_profile stonr = l_fl_user_status TABLES status = l_tb_status EXCEPTIONS OTHERS = 0.
VIEW_MAINTENANCE_CALL CALL FUNCTION 'VIEW_MAINTENANCE_CALL' EXPORTING action = 'U' view_name = p_fl_view_name EXCEPTIONS OTHERS = 0.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.