MS38A_ILIDRAGNDROP 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 MS38A_ILIDRAGNDROP 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.
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
CONTROL_INIT * CALL FUNCTION 'CONTROL_INIT'.
CONTROL_CREATE * CALL FUNCTION 'CONTROL_CREATE' * EXPORTING ** clsid = 'SAPGUI.HTMLCtrl.1'
CONTROL_FLUSH * CALL FUNCTION 'CONTROL_FLUSH' EXCEPTIONS OTHERS = 1.
CONTROL_CREATE * CALL FUNCTION 'CONTROL_CREATE' * EXPORTING ** clsid = 'SAPGUI.HTMLCtrl.1'
POPUP_TO_CONFIRM_STEP * CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' * EXPORTING * DEFAULTOPTION = 'Y' * TEXTLINE1 = *'You miss an OCX-Component for Drag&Drop on interact. lists'
CONTROL_FLUSH * CALL FUNCTION 'CONTROL_FLUSH'. call method cl_gui_cfw=>flush.
CONTROL_LINK ** CALL FUNCTION 'CONTROL_LINK' ** EXPORTING ** H_CONTROL = h_control ** REPID = M_LINK_REPID ** DYNNR = DYNNR ** CONTAINER = CONTAINER ** EXCEPTIONS ** OTHERS = 1.
CONTROL_FLUSH * CALL FUNCTION 'CONTROL_FLUSH' EXCEPTIONS OTHERS = 0. " change this
CONTROL_LINK * CALL FUNCTION 'CONTROL_LINK' * EXPORTING * H_CONTROL = H_CONTROL * REPID = LINK_REPID * DYNNR = LINK_DYNNR.
HTMLCNTL_GET_EVENT_ACTION ** CALL FUNCTION 'HTMLCNTL_GET_EVENT_ACTION' ** EXPORTING H_CONTROL = h_control ** CHANGING ACTION = ACTION.
HTMLCNTL_GET_EVENT_GETDATA ** CALL FUNCTION 'HTMLCNTL_GET_EVENT_GETDATA' ** EXPORTING ** H_CONTROL = h_control ** CHANGING ** GET_DATA = GETDATA.
CONTROL_DESTROY * CALL FUNCTION 'CONTROL_DESTROY' * CHANGING * H_CONTROL = H_CONTROL * EXCEPTIONS * OTHERS = 1.
CONTROL_FLUSH * CALL FUNCTION 'CONTROL_FLUSH'.
CONTROL_CALL_METHOD *CALL FUNCTION 'CONTROL_CALL_METHOD' * EXPORTING * H_CONTROL = H_CONTROL * METHOD = 'SETSCALES' * P_COUNT = 2 * NO_FLUSH = 'X' * P1 = M_ATOMWIDTH * P2 = M_ATOMHEIGHT.
CONTROL_CALL_METHOD *CALL FUNCTION 'CONTROL_CALL_METHOD' * EXPORTING * H_CONTROL = H_CONTROL * METHOD = 'SETRESIZELIMITS' * P_COUNT = 5 * NO_FLUSH = 'X' " no need to flush.
CONTROL_CALL_METHOD *CALL FUNCTION 'CONTROL_CALL_METHOD' * EXPORTING * H_CONTROL = H_CONTROL * METHOD = 'SHOWCONTEXTMENU' * P_COUNT = 0 * NO_FLUSH = 'X'.
CONTROL_CALL_METHOD *CALL FUNCTION 'CONTROL_CALL_METHOD' * EXPORTING * H_CONTROL = H_CONTROL * METHOD = 'ADDCONTEXTMENU' * P_COUNT = 2 * NO_FLUSH = 'X' " no need to flush.
CONTROL_FLUSH *CALL FUNCTION 'CONTROL_FLUSH'.
*CALL FUNCTION 'CONTROL_CALL_METHOD' * EXPORTING * H_CONTROL = H_CONTROL * METHOD = 'CLEARCONTEXTMENU' * P_COUNT = 0 * NO_FLUSH = 'X'. " no need to flush.
CONTROL_CALL_METHOD *CALL FUNCTION 'CONTROL_CALL_METHOD' * EXPORTING * H_CONTROL = H_CONTROL * METHOD = 'HIDECONTEXTMENU' * P_COUNT = 0 * NO_FLUSH = 'X'. " no need to flush.
CONTROL_CALL_METHOD *CALL FUNCTION 'CONTROL_CALL_METHOD' * EXPORTING * H_CONTROL = H_CONTROL * METHOD = 'SHOWCONTEXTMENU' * P_COUNT = 0 * NO_FLUSH = 'X'. " no need to flush.
CONTROL_CALL_METHOD *CALL FUNCTION 'CONTROL_CALL_METHOD' * EXPORTING * H_CONTROL = H_CONTROL * METHOD = 'HIDEX' * P_COUNT = 0 * NO_FLUSH = 'X'.
CONTROL_FLUSH ** call function 'CONTROL_FLUSH'.
CONTROL_CALL_METHOD *CALL FUNCTION 'CONTROL_CALL_METHOD' * EXPORTING * H_CONTROL = H_CONTROL * METHOD = 'SETRECTS' * P_COUNT = 5 * NO_FLUSH = 'X' * P1 = M_LEFT * P2 = M_TOP * P3 = M_WIDTH * P4 = M_HEIGHT * P5 = M_MODE.
CONTROL_FLUSH **call function 'CONTROL_FLUSH'.
CONTROL_CALL_METHOD *CALL FUNCTION 'CONTROL_CALL_METHOD' * EXPORTING * H_CONTROL = H_CONTROL * METHOD = 'SHOWX' * P_COUNT = 0 * NO_FLUSH = 'X'.
CONTROL_FLUSH *CALL FUNCTION 'CONTROL_FLUSH'.
CONTROL_CALL_METHOD * CALL FUNCTION 'CONTROL_CALL_METHOD' * EXPORTING * H_CONTROL = H_CONTROL * METHOD = 'HIDEX' * P_COUNT = 0 * NO_FLUSH = 'X'.
CONTROL_FLUSH * CALL FUNCTION 'CONTROL_FLUSH'.
CONTROL_DISPATCH * CALL FUNCTION 'CONTROL_DISPATCH' * EXPORTING * FCODE = FCODE ** SYSTEM = ' ' * EXCEPTIONS * CB_NOT_FOUND = 1 * OTHERS = 2.
CONTROL_REGISTER_EVT_CB * CALL FUNCTION 'CONTROL_REGISTER_EVT_CB' * EXPORTING * EVENT = EVENT_ID * CALLBACK_PROG = M_OWNER_REPID * CALLBACK_FORM = 'ON_ILIOX_EVENT' * CHANGING * H_CONTROL = H_CONTROL * EXCEPTIONS * CB_NOT_FOUND = 1 * INV_CALLBACK_DEFINITION = 2 * OTHERS = 3.
CONTROL_FLUSH * CALL FUNCTION 'CONTROL_FLUSH'.
CONTROL_REGISTER_EVENT * CALL FUNCTION 'CONTROL_REGISTER_EVENT' * EXPORTING * H_CONTROL = H_CONTROL * EVENT = EVENT_ID * EXCEPTIONS * CNTL_SYSTEM_ERROR = 1 * CNTL_ERROR = 2 * OTHERS = 3.
CONTROL_FLUSH * CALL FUNCTION 'CONTROL_FLUSH' EXCEPTIONS OTHERS = 1.
CONTROL_FLUSH * CALL FUNCTION 'CONTROL_FLUSH'.
CONTROL_GET_EVENT_PARAM * CALL FUNCTION 'CONTROL_GET_EVENT_PARAM' * EXPORTING H_CONTROL = H_CONTROL * PARAM_ID = 0 * NO_FLUSH = 'X' * CHANGING RETURN = NEWLEFT * EXCEPTIONS OTHERS = 1.
CONTROL_GET_EVENT_PARAM * CALL FUNCTION 'CONTROL_GET_EVENT_PARAM' * EXPORTING H_CONTROL = H_CONTROL * PARAM_ID = 1 * NO_FLUSH = ' ' * CHANGING RETURN = NEWTOP * EXCEPTIONS OTHERS = 1.
CONTROL_GET_EVENT_PARAM * CALL FUNCTION 'CONTROL_GET_EVENT_PARAM' * EXPORTING H_CONTROL = H_CONTROL * PARAM_ID = 0 * NO_FLUSH = 'X' * CHANGING RETURN = NEWWIDTH * EXCEPTIONS OTHERS = 0.
CONTROL_GET_EVENT_PARAM * CALL FUNCTION 'CONTROL_GET_EVENT_PARAM' * EXPORTING H_CONTROL = H_CONTROL * PARAM_ID = 1 * NO_FLUSH = ' ' * CHANGING RETURN = NEWHEIGHT * 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.
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 MS38A_ILIDRAGNDROP or its description.