REUSE_ALV_GRID_DISPLAY

*&===========  ==================  ==========  ========================*
*&    REUSE_ALV_GRID_DISPLAY_LVC
*&---------------------------------------------------------------------*
**************************布局********************************BEGIN1
DATA: lt_spfli TYPE TABLE OF spfli.
DATA: lt_fcat TYPE lvc_t_fcat.
DATA: ls_layout TYPE lvc_s_layo.START-OF-SELECTION.PERFORM data_select.PERFORM build_layout.PERFORM build_fieldcat.PERFORM display_grid_alv.
*&———————————————————————*
*& Form DATA_SELECT
*&———————————————————————*
FORM data_select.SELECT * FROM spfli INTO TABLE lt_spfli.
ENDFORM. "” DATA_SELECT
*&———————————————————————*
*& Form BUILD_LAYOUT
*&———————————————————————*
FORM build_layout.ls_layout-zebra = abap_true.ls_layout-cwidth_opt = abap_true.ls_layout-smalltitle = abap_true. "把标题变小
ENDFORM. "” BUILD_LAYOUT
*&———————————————————————*
*& Form BUILD_FIELDCAT
*&———————————————————————*
FORM build_fieldcat.CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'EXPORTING
*     I_BUFFER_ACTIVE        =i_structure_name       = 'SPFLI'
*     I_CLIENT_NEVER_DISPLAY = ‘X’
*     I_BYPASSING_BUFFER     =
*     I_INTERNAL_TABNAME     =CHANGINGct_fieldcat            = lt_fcatEXCEPTIONSinconsistent_interface = 1program_error          = 2OTHERS                 = 3.LOOP AT lt_fcat ASSIGNING FIELD-SYMBOL(<fs_fcat>).CASE <fs_fcat>-fieldname.WHEN 'COUNTRYFR' OR 'COUNTRYTO'.<fs_fcat>-tech = abap_true.WHEN 'CITYFROM' OR 'CITYTO'.<fs_fcat>-no_out = abap_true.WHEN OTHERS.ENDCASE.ENDLOOP.
ENDFORM. "” BUILD_FIELDCAT
*&———————————————————————*
*& Form DISPLAY_GRID_ALV
*&———————————————————————*
* text
*———————————————————————-*
FORM display_grid_alv.CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'EXPORTING
*     I_INTERFACE_CHECK  = ‘ ‘
*     I_BYPASSING_BUFFER =
*     I_BUFFER_ACTIVE    =i_callback_program = sy-repid
*     I_CALLBACK_PF_STATUS_SET = ‘ ‘
*     I_CALLBACK_USER_COMMAND = ‘ ‘
*     I_CALLBACK_TOP_OF_PAGE = ‘ ‘
*     I_CALLBACK_HTML_TOP_OF_PAGE = ‘ ‘
*     I_CALLBACK_HTML_END_OF_LIST = ‘ ‘
*     i_structure_name   = ‘ ‘
*     I_BACKGROUND_ID    = ‘ ‘i_grid_title       = 'Flight Information'
*     I_GRID_SETTINGS    =is_layout_lvc      = ls_layoutit_fieldcat_lvc    = lt_fcat
*     IT_EXCLUDING       =
*     IT_SPECIAL_GROUPS_LVC =
*     IT_SORT_LVC        =
*     IT_FILTER_LVC      =
*     IT_HYPERLINK       =
*     IS_SEL_HIDE        =
*     I_DEFAULT          = ‘X’
*     I_SAVE             = ‘ ‘
*     IS_VARIANT         =
*     IT_EVENTS          =
*     IT_EVENT_EXIT      =
*     IS_PRINT_LVC       =
*     IS_REPREP_ID_LVC   =
*     I_SCREEN_START_COLUMN = 0
*     I_SCREEN_START_LINE = 0
*     I_SCREEN_END_COLUMN = 0
*     I_SCREEN_END_LINE  = 0
*     I_HTML_HEIGHT_TOP  =
*     I_HTML_HEIGHT_END  =
*     IT_ALV_GRAPHICS    =
*     IT_EXCEPT_QINFO_LVC =
*     IR_SALV_FULLSCREEN_ADAPTER =
* IMPORTING
*     E_EXIT_CAUSED_BY_CALLER =
*     ES_EXIT_CAUSED_BY_USER =TABLESt_outtab           = lt_spfliEXCEPTIONSprogram_error      = 1OTHERS             = 2.
ENDFORM. "” DISPLAY_GRID_ALV
**************************布局********************************END

TYPE-POOLS : slis.
DATA : it_spfli   TYPE TABLE OF spfli,it_sflight TYPE TABLE OF sflight,it_sbook   TYPE TABLE OF sbook.
DATA : it_fieldcat TYPE slis_t_fieldcat_alv,wa_layout   TYPE slis_layout_alv,it_event    TYPE slis_t_event.START-OF-SELECTION.PERFORM fetch_data.END-OF-SELECTION.PERFORM blocked_alv_initialization.PERFORM field_cat USING 'IT_SPFLI' 'SPFLI'.PERFORM blocked_alv_append USING 'IT_SPFLI'  it_spfli.REFRESH it_fieldcat[].PERFORM field_cat USING 'IT_SFLIGHT' 'SFLIGHT'.PERFORM blocked_alv_append USING 'IT_SFLIGHT' it_sflight.REFRESH it_fieldcat[].PERFORM field_cat USING 'IT_SBOOK' 'SBOOK'.PERFORM blocked_alv_append USING 'IT_SBOOK' it_sbook.REFRESH it_fieldcat[].PERFORM blocked_alv_display.
*————————————————————-FORM fetch_data .SELECT * FROM spfli INTO TABLE it_spfli UP TO 10 ROWS.SELECT * FROM sflight INTO TABLE it_sflight UP TO 10 ROWS.SELECT * FROM sbook INTO TABLE it_sbook UP TO 10 ROWS.
ENDFORM.                    "” fetch_data*———————————————————-
FORM blocked_alv_initialization .CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'EXPORTINGi_callback_program = sy-cprog.ENDFORM.                   " ” blocked_alv_initialization*————————————————————
FORM field_cat  USING  itab TYPE ctab_struc TYPE c.CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'EXPORTINGi_program_name     = sy-cprogi_internal_tabname = itabi_structure_name   = tab_strucCHANGINGct_fieldcat        = it_fieldcat.ENDFORM.                   "” field_cat*————————————————————FORM blocked_alv_append USING  itab1 TYPE citab2 TYPE STANDARD TABLE.CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'EXPORTINGis_layout   = wa_layoutit_fieldcat = it_fieldcati_tabname   = itab1it_events   = it_eventTABLESt_outtab    = itab2.ENDFORM.                  "  ” blocked_alv_append*————————————————————FORM blocked_alv_display .CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'.ENDFORM."” blocked_alv_display

REUSE_ALV_GRID_DISPLAY_LVC相关推荐

REUSE_ALV_GRID_DISPLAY_LVC 实现按钮切换ALV编辑状态示例
PF-STATUS复制SAPLKKBL-STANDARD_FULLSCREEN,并设置Toolbar动态文本:设置Toolbar动态文本代码 TYPES: BEGIN OF TY_SFLIGHT,B ...
REUSE_ALV_GRID_DISPLAY_LVC函数输入参数属性的应用
REUSE_ALV_GRID_DISPLAY_LVC函数输入参数属性的应用前面我们讲过,ALV Grid 函数的输出有两个:REUSE_ALV_GRID_DISPLAY 和 REUSE_ALV_GR ...
REUSE_ALV_GRID_DISPLAY_LVC 实现单元格值改变前(DATA_CHANGED)和单元格值改变后(DATA_CHANGED_FINISHED)的事件响应
1. 实现向ALV键入值的时候,触发事件 1. 用于当alv数据被修改之前对数据进行逻辑处理 2. 用于当ALV数据被修改之后,存入内表之后的逻辑处理 3. GO_GRID->GET_SELEC ...
ABAP REUSE_ALV_GRID_DISPLAY和REUSE_ALV_GRID_DISPLAY_LVC的区别
相信大家都见过REUSE_ALV_GRID_DISPLAY和REUSE_ALV_GRID_DISPLAY_LVC这两种显示ALV的方式了,那么它们有什么区别呢? REUSE_ALV_GRID_DISP ...
sap abap alv 实现某行，单元格可编辑与不可编辑 REUSE_ALV_GRID_DISPLAY_LVC
在使用ALV显示列表的过程中,我们可以使用IT_FIELDCAT参数设置某一个字段的可编辑状态.但是,要设置具体的单元格的可编辑状态对于对ALV不是很了解的人来说是一个头大的问题. 具体单元格可编辑状 ...
【SAP Abap】SAP ALV开发（REUSE_ALV_GRID_DISPLAY_LVC）全网最详细 DEMO
SAP ALV开发(REUSE_ALV_GRID_DISPLAY_LVC)全网最详细 DEMO 1.ALV 简介 2.演示程序 1.ALV 简介 ALV 报表程序,是我们在 SAP 项目中最常开发的程 ...
在REUSE_ALV_GRID_DISPLAY_LVC后获取GRID
DATA:GR_GRID TYPE REF TO CL_GUI_ALV_GRID.CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'IMPORTINGE_GRI ...
REUSE_ALV_GRID_DISPLAY_LVC 实现单元格级别的编辑示例
1.实现效果开启编辑关闭编辑 2.实现代码 DATA: BEGIN OF GT_SFLIGHT OCCURS 0,BOX TYPE C.INCLUDE STRUCTURE SFLIGHT. DA ...
如何设置REUSE_ALV_GRID_DISPLAY'的单个单元格的是否可以输入
代码如下:具体说明参见红色说明(本例子是从订单明细提取两个字段的数据到内表) REPORT ZALV_EDIT. TYPE-POOLS: SLIS. *- Fieldcatalog DATA: IT_ ...

REUSE_ALV_GRID_DISPLAY_LVC

REUSE_ALV_GRID_DISPLAY_LVC相关推荐

最新文章

热门文章