Application Server Browser Program - ABAP Development - SCN Wiki

Application Server Browser Program - ABAP Development - SCN Wiki
*&---------------------------------------------------------------------**& Report ZAPPSERVBROWSER*&*&---------------------------------------------------------------------**&*&*&---------------------------------------------------------------------*REPORT ZAPPSERVBROWSERNO STANDARD PAGE HEADING LINE-SIZE 1023LINE-COUNT 36 . .TABLES : SSCRFIELDS.INCLUDE <ICON>.CLASS LCL_APPLICATION DEFINITION DEFERRED.CLASS CL_GUI_CFW DEFINITION LOAD.DATA : MAIN_CONTAINER TYPE REF TO CL_GUI_SPLITTER_CONTAINER,CONT_LEFT TYPE REF TO CL_GUI_CONTAINER,CONT_RIGHT TYPE REF TO CL_GUI_CONTAINER,PCOL_TREEM TYPE REF TO CL_COLUMN_TREE_MODEL,ACOL_TREEM TYPE REF TO CL_COLUMN_TREE_MODEL,O_EVENTS_A TYPE REF TO LCL_APPLICATION,HANDLE TYPE REF TO CL_GUI_FRONTEND_SERVICES,CTMENU TYPE REF TO CL_CTMENU.DATA: ITEM_TABLE TYPE TREEMCITAB,ITEM TYPE TREEMCITEM,NODE_KEY TYPE TM_NODEKEY,NODE_KEY_ROOT TYPE TM_NODEKEY,HIERARCHY_HEADER TYPE TREEMHHDR,TREE_NAME TYPE STRING,MOD_TIME(20) TYPE C,FILENAME TYPE RLGRAP-FILENAME.DATA : CMD LIKE SY-UCOMM,ISFOLDER_FLAG(1),EXPANDER_FLAG(1),ITEMS_INCOMP(1),RECUR_FLAG(1),SLASH(1),TITLE_STR(255),LENG TYPE I,COUNT TYPE I,L_OPSYS LIKE SY-OPSYS,SRC_FILE TYPE STRING,LOAD(1),IT_EXCLUDE LIKE TABLE OF RSEXFCODE WITH HEADER LINE,IT_SDOKPATH LIKE TABLE OF SDOKPATH WITH HEADER LINE.DATA: G_NODE_KEY(30) TYPE C,G_ITEM_NAME TYPE TV_ITMNAME,EVENT TYPE CNTL_SIMPLE_EVENT,EVENTS TYPE CNTL_SIMPLE_EVENTS.DATA:BEGIN OF GS_FILE,DIRECTORY(500) TYPE C, " name of http://www.mianfeiwendang.com(75) TYPE C, " name of entry." (possibly truncated.)TYPE(10) TYPE C, " type of entry: directory, fileLEN(16) TYPE P, " length in bytesOWNER(8) TYPE C, " owner of the entryMTIME(6) TYPE P, " last modification date," seconds since 1970MODE(9) TYPE C, " like "rwx-r-x--x":" protection modeERRNO(3) TYPE C,ERRMSG(40) TYPE C,MOD_DATE TYPE D,MOD_TIME(8) TYPE C, " hh:mm:ssSUBRC LIKE SY-SUBRC,END OF GS_FILE.DATA : BEGIN OF IT_FCONTENT OCCURS 0,LINES(1023) TYPE C,"string,END OF IT_FCONTENT.DATA : BEGIN OF IT_RESULT OCCURS 0,LINE(100) TYPE C,END OF IT_RESULT.CONSTANTS : C_X(1) VALUE 'X'.*---------------------------------------------------------------------** CLASS lcl_application DEFINITION*---------------------------------------------------------------------** Class for Handling Events **---------------------------------------------------------------------*CLASS LCL_APPLICATION DEFINITION.PUBLIC SECTION.METHODS:HANDLE_EXPAND_NO_CHILDRENFOR EVENT EXPAND_NO_CHILDRENOF CL_COLUMN_TREE_MODELIMPORTING NODE_KEY,HANDLE_NODE_DOUBLE_CLICKFOR EVENT NODE_DOUBLE_CLICKOF CL_COLUMN_TREE_MODELIMPORTING NODE_KEY,* handle_header_click* FOR EVENT header_click* OF cl_column_tree_model* IMPORTING header_name,HANDLE_HEADER_CONTEXT_MEN


U_REQFOR EVENT HEADER_CONTEXT_MENU_REQUESTOF CL_COLUMN_TREE_MODELIMPORTING HEADER_NAME MENU,HANDLE_HEADER_CONTEXT_MENU_SELFOR EVENT HEADER_CONTE

Word文档免费下载Word文档免费下载:Application Server Browser Program - ABAP Development - SCN Wiki (共10页,当前第1页)

Application Server Browser Program ABAP Development SCN Wiki相关文档

最新文档

返回顶部