关于OOALV控制单元格编辑不可编辑功能

我们在定义alv样式的是可以让单元格可编辑
DATA: BEGIN OF WA_FY.

• INCLUDE STRUCTURE zmmus018.INCLUDE STRUCTURE ZMMTUS00730.


DATA: FYXZTXT TYPE VAL_TEXT," MARK,DEL,
YZFTXT TYPE VAL_TEXT,
SKDW_T TYPE STRING,
FKDW_T TYPE STRING,
******ADD-20190222-BEGIN
VBUND TYPE LFA1-VBUND, "贸易伙伴
SGTXT TYPE SGTXT,
******ADD-20190222-END
JZBZ_T TYPE VAL_TEXT,
SEL,
CELLSTYLES TYPE LVC_T_STYL,
END OF WA_FY.
定义变量&＃xff1a;
DATA: l_flag,
lv_canedit(1).
DATA: ls_layout TYPE lvc_s_layo,
ls_variant TYPE disvariant,"LAYOUT
lt_fcat_fy TYPE lvc_t_fcat,
lt_sort TYPE lvc_t_sort,
ls_sort TYPE lvc_s_sort,
lt_filter TYPE lvc_t_filt,
ls_filter TYPE lvc_s_filt,
ls_celltab TYPE lvc_s_styl,
lt_celltab TYPE lvc_t_styl.
"定义宏&＃xff0c;输出grid字段
DEFINE def_grid_fy.
clear g_ls.
g_ls-fieldname &＃61; &1.
g_ls-coltext &＃61; &2.
g_ls-edit &＃61; &3.
if &1 &＃61; ‘SEL’.
g_ls-checkbox &＃61; ‘X’.
endif.

g_ls-inttype &＃61; &5.


• ENDIF.
  g_ls-lzero &＃61; ‘X’.
  if &1 &＃61; ‘SKDW’ or &1 &＃61; ‘FKDW’.
  g_ls-convexit &＃61; ‘ALPHA’.
  endif.
  g_ls-ref_table &＃61; &6.
  g_ls-cfieldname &＃61; &7.

  case &1 .
  when ‘BCSQJE’ or ‘UNITPRICE’ or ‘CHGUNIT’
  or ‘WAERS1’ or ‘BWBHL’
  or ‘CWHL’ or ‘ZSHILV’
  or ‘ZSHIE’ or ‘JYPTWXJS’.
  g_ls-ref_table &＃61; ‘ZMMTUS00730’.

• G_LS-CFIELDNAME &＃61; &＃39;WAERS&＃39;.g_ls-ref_field &＃61; &1.


  endcase.

• IF &5 &＃61; ‘P’.

• G_LS-DO_SUM &＃61; ‘X’.

• ENDIF.
  concatenate &4
  ‘[]’
  into g_table_name. "TABLE BODY
  assign (g_table_name) to . "NOT HEADERLINE
  append g_ls to .
  END-OF-DEFINITION.
  调用宏
  def_grid_fy ‘CWHL’ text-615 ‘X’ ‘LT_FCAT_FY’ ‘P’ ‘’ ‘’.
  def_grid_fy ‘ZSHILV’ text-162 ‘X’ ‘LT_FCAT_FY’ ‘P’ ‘’ ‘’.
  类似这样的部分单元格控制是否可编辑

ls_layout-cwidth_opt &＃61; ‘X’.
ls_layout-zebra &＃61; ‘X’.
*样式表指定控制的内表
ls_layout-stylefname &＃61; ‘CELLSTYLES’.
cl_gui_alv_grid的2个不同属性实现不同功能
*控制单元格可编辑

• ls_celltab-fieldname &＃61; &＃39;CWHL&＃39;.


• ls_celltab-style &＃61; cl_gui_alv_grid&＃61;>mc_style_enabled.


• INSERT ls_celltab INTO TABLE lt_celltab.


*控制单元格不可编辑
ls_celltab-fieldname &＃61; ‘CWHL’.
ls_celltab-style &＃61; cl_gui_alv_grid&＃61;>mc_style_disabled.
INSERT ls_celltab INTO TABLE lt_celltab.
把指定的样式放到显示的内表字段
CLEAR wa_fy-cellstyles[].
wa_fy-cellstyles[] &＃61; lt_celltab[].

MODIFY gt_fy FROM wa_fy.

CREATE OBJECT g_cont_fy
EXPORTING
container_name &＃61; ‘CONT_FY’.
CREATE OBJECT g_grid_fy
EXPORTING
i_parent &＃61; g_cont_fy
i_appl_events &＃61; ‘X’.

CALL METHOD g_grid_fy->register_edit_event
EXPORTING
i_event_id &＃61; cl_gui_alv_grid&＃61;>mc_evt_modified.

DATA l_fy_recevier TYPE REF TO lcl_grid_fy_receiver.
CREATE OBJECT l_fy_recevier .

CALL METHOD g_grid_fy->set_table_for_first_display
EXPORTING
is_layout &＃61; ls_layout
i_save &＃61; ‘A’
is_variant &＃61; ls_variant
CHANGING
it_fieldcatalog &＃61; lt_fcat_fy
it_outtab &＃61; gt_fy
it_sort &＃61; lt_sort
it_filter &＃61; lt_filter.