REUSE_ALV_GRID_DISPLAY_LVC-可编辑单元格

最新推荐文章于 2024-04-26 09:56:12 发布
最新推荐文章于 2024-04-26 09:56:12 发布
阅读量1k 收藏 3
点赞数
分类专栏： SAP
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/weixin_42921800/article/details/118489949
版权

1, 列可编辑

只要将catalog中的字段edit设置成‘X'，整列就变成能输入的了，LVC_S_FCAT-EDIT

代码：

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

47

48

49

50

51

52

53

54

55

56

57

58

REPORT ztest_alv_lvc_edit.

TYPES:BEGIN OF gty_ekko,

        ebeln TYPE ekko-ebeln,

        verkf TYPE ekko-verkf,

      END OF gty_ekko.

DATA:git_ekko TYPE STANDARD TABLE OF gty_ekko.

DATA:git_fcat   TYPE lvc_t_fcat,

     gwa_fcat   LIKE LINE OF git_fcat,

     gwa_layout TYPE lvc_s_layo.

DATA:l_pos TYPE i VALUE 1.

START-OF-SELECTION.

  SELECT ebeln

         verkf

    INTO TABLE git_ekko

    FROM ekko

   UP TO 10 ROWS.

  CLEAR: l_pos.

  l_pos = l_pos + 1.

  gwa_fcat-coltext   = 'PO'.

  gwa_fcat-scrtext_l = 'PO'.

  gwa_fcat-scrtext_m = 'PO'.

  gwa_fcat-scrtext_s = 'PO'.

  gwa_fcat-fieldname = 'EBELN'.

  gwa_fcat-col_pos = l_pos.

  gwa_fcat-outputlen = '10'.

  APPEND gwa_fcat TO git_fcat.

  l_pos = l_pos + 1.

  gwa_fcat-coltext   = 'PO item'.

  gwa_fcat-scrtext_l = 'PO item'.

  gwa_fcat-scrtext_m = 'PO item'.

  gwa_fcat-scrtext_s = 'PO item'.

  gwa_fcat-fieldname = 'VERKF'.

  gwa_fcat-col_pos = l_pos.

  gwa_fcat-edit = 'X'.  "设置列为可编辑状态

  gwa_fcat-outputlen = '20'.

  APPEND gwa_fcat TO git_fcat.

  gwa_layout-zebra = 'X'.

  gwa_layout-sel_mode = 'A'.

  gwa_layout-cwidth_opt = 'X'.

  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'

    EXPORTING

      i_callback_program = sy-repid

      is_layout_lvc      = gwa_layout

      it_fieldcat_lvc    = git_fcat

    TABLES

      t_outtab           = git_ekko[]

    EXCEPTIONS

      program_error      = 1

      OTHERS             = 2.

  IF sy-subrc = 0.

*    BREAK-POINT.

  ENDIF.

运行结果：

2, 整个ALV可编辑

将layout中的EDIT字段赋值’X'(LVC_S_LAYO-EDIT)，就可以将整个ALV设置成可输入状态。

还有一种比较笨的办法就是将所有列都设置成可输入。

代码：

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

gwa_layout-zebra = 'X'.

  gwa_layout-sel_mode = 'A'.

  gwa_layout-cwidth_opt = 'X'.

  gwa_layout-edit     = 'X'.       "将整个ALV设置成可编辑

  gwa_glay-edt_cll_cb = 'X'.

  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'

    EXPORTING

      i_callback_program = sy-repid

      is_layout_lvc      = gwa_layout

      it_fieldcat_lvc    = git_fcat

*      i_grid_settings    = gwa_glay

    TABLES

      t_outtab           = git_ekko[]

    EXCEPTIONS

      program_error      = 1

      OTHERS             = 2.

3, 单元格可编辑

如果要让单元格变成可输入，需要在alv输出内表中多定义一个保存单元格style的字段(类型：lvc_t_styl )，然后填入style属性(可编辑或者是不可编辑)，最后还要在layout-stylefname中指定style的字段名。

代码如下：将EBELN设置成不可输入。

1

2

3

4

5

TYPES:BEGIN OF gty_ekko,

        ebeln TYPE ekko-ebeln,

        verkf TYPE ekko-verkf,

        style TYPE lvc_t_styl,  "将该字段设置为保存编辑状态的字段

      END OF gty_ekko.

1

2

3

  gwa_edit-fieldname = 'EBELN'.

  gwa_edit-style = cl_gui_alv_grid=>mc_style_disabled."设置为不可输入

  INSERT gwa_edit INTO TABLE git_edit.

1

gwa_layout-stylefname = 'STYLE'. "指定保存编辑状态的字段名

style属性可以在类CL_GUI_ALV_GRID中可以找到：

MC_STYLE_DISABLED：禁止输入

MC_STYLE_ENABLED:可编辑，可输入。

需要注意的是：MC_STYLE_ENABLED输入性不能单独使用，一定在EDIT = 'X'(layout-edit 或者是catalog-edit)的场合下，才可以利用MC_STYLE_ENABLED进行不可编辑到编辑切换，也就是不设置edit = 'X',MC_STYLE_ENABLED是不起作用的。

完整代码：

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

47

48

49

50

51

52

53

54

55

56

57

58

59

60

61

62

63

64

65

66

67

68

69

70

71

72

73

74

75

76

77

78

79

80

81

82

83

84

85

86

87

88

89

90

91

92

REPORT ztest_alv_lvc_edit.

TYPES:BEGIN OF gty_ekko,

        ebeln TYPE ekko-ebeln,

        verkf TYPE ekko-verkf,

        style TYPE lvc_t_styl,  "设置编辑状态字段

      END OF gty_ekko.

DATA:git_ekko TYPE STANDARD TABLE OF gty_ekko,

     gwa_ekko TYPE gty_ekko.

DATA:git_fcat   TYPE lvc_t_fcat,

     gwa_fcat   LIKE LINE OF git_fcat,

     gwa_layout TYPE lvc_s_layo,

     gwa_glay   TYPE lvc_s_glay.

DATA:gwa_edit TYPE lvc_s_styl,

     git_edit TYPE lvc_t_styl.

START-OF-SELECTION.

  SELECT ebeln

         verkf

    INTO CORRESPONDING FIELDS OF TABLE git_ekko

    FROM ekko

   UP TO 10 ROWS.

  gwa_edit-fieldname = 'VERKF'.

  gwa_edit-style = cl_gui_alv_grid=>mc_style_disabled."设置为不可编辑

  INSERT gwa_edit INTO TABLE git_edit.

  INSERT LINES OF git_edit INTO TABLE gwa_ekko-style.

* 将除第三行的之外所有行的VERKF字段都设置成不能输入

  DO 10 TIMES.

    IF sy-index <> 3.

      MODIFY git_ekko INDEX sy-index FROM gwa_ekko TRANSPORTING style.

    ENDIF.

  ENDDO.

  PERFORM frm_set_catalog.

  gwa_layout-zebra = 'X'.

  gwa_layout-sel_mode = 'A'.

  gwa_layout-cwidth_opt = 'X'.

  gwa_layout-edit     = 'X'.       "将整个ALV设置成可编辑

  gwa_layout-stylefname = 'STYLE'. "指定保存编辑状态的字段名

  gwa_glay-edt_cll_cb = 'X'.

  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'

    EXPORTING

      i_callback_program = sy-repid

      is_layout_lvc      = gwa_layout

      it_fieldcat_lvc    = git_fcat

*      i_grid_settings    = gwa_glay

    TABLES

      t_outtab           = git_ekko[]

    EXCEPTIONS

      program_error      = 1

      OTHERS             = 2.

  IF sy-subrc = 0.

  ENDIF.

*&---------------------------------------------------------------------*

*&      Form  FRM_SET_CATALOG

*&---------------------------------------------------------------------*

*       text

*----------------------------------------------------------------------*

*  -->  p1        text

*  <--  p2        text

*----------------------------------------------------------------------*

FORM frm_set_catalog .

  DATA:l_pos TYPE i VALUE 1.

  CLEAR: l_pos.

  l_pos = l_pos + 1.

  gwa_fcat-coltext   = 'PO'.

  gwa_fcat-scrtext_l = 'PO'.

  gwa_fcat-scrtext_m = 'PO'.

  gwa_fcat-scrtext_s = 'PO'.

  gwa_fcat-fieldname = 'EBELN'.

  gwa_fcat-col_pos = l_pos.

  gwa_fcat-outputlen = '10'.

  APPEND gwa_fcat TO git_fcat.

  l_pos = l_pos + 1.

  gwa_fcat-coltext   = 'PO item'.

  gwa_fcat-scrtext_l = 'PO item'.

  gwa_fcat-scrtext_m = 'PO item'.

  gwa_fcat-scrtext_s = 'PO item'.

  gwa_fcat-fieldname = 'VERKF'.

  gwa_fcat-edit    = 'X'. "将这列设置为可编辑

  gwa_fcat-col_pos = l_pos.

  gwa_fcat-outputlen = '20'.

  APPEND gwa_fcat TO git_fcat.

ENDFORM.

4, 行可编辑

类似于单元格可编辑，只要将一行之外的所有行都变成不可输入，也就实现了行可编辑。逻辑如下：

1，通过layout-edit = ’X' 将整个行项目都变成可输入

2，将某行之外的所有行style设置成 cl_gui_alv_grid=>mc_style_disabled.

代码：

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

47

48

49

50

51

52

53

54

55

56

57

58

59

60

61

62

63

64

65

66

67

68

69

70

71

72

73

74

75

76

77

78

79

80

81

82

83

84

85

86

87

88

89

90

91

92

93

94

95

REPORT ztest_alv_lvc_edit.

TYPES:BEGIN OF gty_ekko,

        ebeln TYPE ekko-ebeln,

        verkf TYPE ekko-verkf,

        style TYPE lvc_t_styl,  "设置编辑状态字段

      END OF gty_ekko.

DATA:git_ekko TYPE STANDARD TABLE OF gty_ekko,

     gwa_ekko TYPE gty_ekko.

DATA:git_fcat   TYPE lvc_t_fcat,

     gwa_fcat   LIKE LINE OF git_fcat,

     gwa_layout TYPE lvc_s_layo,

     gwa_glay   TYPE lvc_s_glay.

DATA:gwa_edit TYPE lvc_s_styl,

     git_edit TYPE lvc_t_styl.

START-OF-SELECTION.

  SELECT ebeln

         verkf

    INTO CORRESPONDING FIELDS OF TABLE git_ekko

    FROM ekko

   UP TO 10 ROWS.

  gwa_edit-fieldname = 'EBELN'.

  gwa_edit-style = cl_gui_alv_grid=>mc_style_disabled.

  INSERT gwa_edit INTO TABLE git_edit.

   gwa_edit-fieldname = 'VERKF'.

  gwa_edit-style = cl_gui_alv_grid=>mc_style_disabled.

  INSERT gwa_edit INTO TABLE git_edit.

  INSERT LINES OF git_edit INTO TABLE gwa_ekko-style.

* 将除第三行之外的所有行都设置成不能输入

  DO 10 TIMES.

    IF sy-index <> 3.

      MODIFY git_ekko INDEX sy-index FROM gwa_ekko TRANSPORTING style.

    ENDIF.

  ENDDO.

  PERFORM frm_set_catalog.

  gwa_layout-zebra = 'X'.

  gwa_layout-sel_mode = 'A'.

  gwa_layout-cwidth_opt = 'X'.

  gwa_layout-edit     = 'X'.       "将整个ALV设置成可编辑

  gwa_layout-stylefname = 'STYLE'. "指定保存编辑状态的字段名

  gwa_glay-edt_cll_cb = 'X'.

  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'

    EXPORTING

      i_callback_program = sy-repid

      is_layout_lvc      = gwa_layout

      it_fieldcat_lvc    = git_fcat

*      i_grid_settings    = gwa_glay

    TABLES

      t_outtab           = git_ekko[]

    EXCEPTIONS

      program_error      = 1

      OTHERS             = 2.

  IF sy-subrc = 0.

  ENDIF.

*&---------------------------------------------------------------------*

*&      Form  FRM_SET_CATALOG

*&---------------------------------------------------------------------*

*       text

*----------------------------------------------------------------------*

*  -->  p1        text

*  <--  p2        text

*----------------------------------------------------------------------*

FORM frm_set_catalog .

  DATA:l_pos TYPE i VALUE 1.

  CLEAR: l_pos.

  l_pos = l_pos + 1.

  gwa_fcat-coltext   = 'PO'.

  gwa_fcat-scrtext_l = 'PO'.

  gwa_fcat-scrtext_m = 'PO'.

  gwa_fcat-scrtext_s = 'PO'.

  gwa_fcat-fieldname = 'EBELN'.

  gwa_fcat-col_pos = l_pos.

  gwa_fcat-outputlen = '10'.

  APPEND gwa_fcat TO git_fcat.

  l_pos = l_pos + 1.

  gwa_fcat-coltext   = 'PO item'.

  gwa_fcat-scrtext_l = 'PO item'.

  gwa_fcat-scrtext_m = 'PO item'.

  gwa_fcat-scrtext_s = 'PO item'.

  gwa_fcat-fieldname = 'VERKF'.

  gwa_fcat-col_pos = l_pos.

  gwa_fcat-outputlen = '20'.

  APPEND gwa_fcat TO git_fcat.

ENDFORM.

显示：

以上。

闫艺宸
关注
专栏目录
REUSE_ALV_GRID_DISPLAY超详细讲解
05-05
REUSE_ALV_GRID_DISPLAY超详细讲解 REUSE_ALV_GRID_DISPLAY是一个功能强大的ABAP函数模块，主要用于在ABAP程序中显示ALV网格控件。该函数模块提供了大量的参数和事件，使得开发者可以根据需要自定义ALV网格控件的...
【SAP Abap】SAP ALV开发（REUSE_ALV_GRID_DISPLAY_LVC）全网最详细 DEMO
XLevon的博客
01-04 7453
SAP ALV开发（REUSE_ALV_GRID_DISPLAY_LVC）全网最详细 DEMO
REUSE_ALV_GRID_DISPLAY_LVC
XSY520_的博客
04-24 1342
*&=========== ================== ========== ========================* *& REUSE_ALV_GRID_DISPLAY_LVC *&---------------------------------------------------------------------* **************************布局********************************BEGI.
REUSE_ALV_GRID_DISPLAY_LVC函数输入参数属性的应用
xuehen86的博客
04-28 1585
转载：http://www.sapjx.com/reuse_alv_grid_display_lvc.html 前面我们讲过，ALV Grid 函数的输出有两个：REUSE_ALV_GRID_DISPLAY 和 REUSE_ALV_GRID_DISPLAY_LVC 两者的操作大同小异，只是后者能更好的和ALV容器结合使用，前后则不能；而在输入参数属性的结构上也有些差异。 本篇文章主要讲解下ALV函...
REUSE_ALV_GRID_DISPLAY_LVC详解
weixin_34199405的博客
04-20 1421
ALV开发流程： 1. 将得到并整理好的数据以ALV的形式显示出来 4 1.1. 在子FORM（这里如：F_FIELDS）指定需要显示的字段 4 1.2. 在子FORM（这里如：F_BUILD_LAYOUT）里设置ALV的全局属性 4 1.3. 在子FORM（这里如：F_DISPLAY）里将内表中的数据进行显示 51.4. 为A...
REUSE_ALV_FIELDCATALOG_MERGE注意点.docx
09-07
在 SAP 开发环境中，"REUSE_ALV_FIELDCATALOG_MERGE" 是一个非常重要的函数，用于合并和创建用于 ALV (ABAP List Viewer) 输出的字段目录。然而，在使用这个函数时，可能存在一些陷阱和注意事项，导致程序出错或者...
abap-ALV.rar_ABAP系统ALV_abap_abap开发alv
09-21
描述中提到“ABAP ALV总结，ALV格式，REUSE_ALV_GRID_DISPLAY_LVC函数使用”，这表明我们将重点关注ALV的基本概念、数据格式以及如何通过REUSE_ALV_GRID_DISPLAY_LVC函数来实现ALV的显示。 ALV格式通常涉及如何组织...
design.rar_asic_reuse methodology
07-14
Xilinx - Design Reuse Methodology For Asic And Fpga Designer
abap_alv工具栏修改
02-22
- **步骤**: 在调用`REUSE_ALV_GRID_DISPLAY`函数模块时，需要传递参数`I_CALLBACK_PF_STATUS_SET`，并将其设置为你在上一步创建的GUI状态的名称。 - **代码示例**: ```abap * Form set_pf_status FORM set_pf_...
Function ALV“REUSE_ALV_GRID_DISPLAY_LVC“实现选择列的实现方式
tao273849019的博客
04-23 348
③维护lvc_t_fcat中的 checkbox 和 edit 字段。①这一步跟第一种一样。
REUSE_ALV_GRID_DISPLAY_LVC-EVENT事件使用
隔壁老王滴滴滴滴
04-14 5948
如上图，选择报废同一个抬头发票对应的任意一行，其他行的报废也自动勾选，使用event事件来实现，代码如下：*&amp;---------------------------------------------------------------------**&amp; Report  ZCNFI_GT03*&amp;*&amp;----------------------------------...
REUSE_ALV_GRID_DISPLAY_LVC 用法
热门推荐
少年休闲海
12-05 1万+
REPORT  XXXX. TYPE-POOLS: slis. INCLUDE .  DATA: u_command TYPE slis_formname VALUE 'USER_COMMAND'.  DATA: ok_code LIKE sy-ucomm.   *ALV data declarations DATA: fieldcatalog TYPE slis_t_fieldcat
REUSE_ALV_GRID_DISPLAY_LVC-可编辑单元格、列可编辑、行可编辑、单位、时间
修电脑的猫的博客
03-01 968
## REUSE_ALV_GRID_DISPLAY_LVC-可编辑单元格、列可编辑、行可编辑 整个报表可编辑 gs_layout-edit = 'X'. "将整个ALV设置成可编辑 列可编辑 FORM build_fieldcat1 . DEFINE %%append_fieldcat . CLEAR gs_fcat . gs_fcat-col_pos = &5."列的输出位置 gs_fcat-fieldname = &1."需要显示
ABAP-ALV-列：F4搜索帮助
qq_34561745的博客
12-15 1660
ABAP-ALV-列：F4搜索帮助
REUSE_ALV_GRID_DISPLAY_LVC的使用
weixin_34273046的博客
11-29 564
ABAP代码中用于调用ALV显示的子例程示例代码： FORM FRM_DIS_ALV . PERFORM FRM_SET_FIELDCAT ."设置字段目录（字段） PERFORM FRM_GET_LAYOUT. "设置布局（行，列） CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC' ...
REUSE_ALV_GRID_DISPLAY_LVC]-显示单选按钮(radio button)
昊宇的笔记本
07-05 373
REPORT ztest_alv_radiobutton. TYPE-POOLS:abap, slis. DATA: BEGIN OF gt_list OCCURS 0, sel TYPE char4, val TYPE i, END OF gt_list. DATA: go_alv_grid TYPE REF TO cl_gui_alv_grid. *&------------------------------------------------...
ABAP中 ALV REUSE_ALV_GRID_DISPLAY_LVC显示前导0
最新发布
qq_34448315的博客
04-26 414
ABAP中 ALV REUSE_ALV_GRID_DISPLAY_LVC显示前导0
ALV显示详解：REUSE_ALV_GRID_DISPLAY函数与参数配置
"本文档详细介绍了在SAP ABAP中使用ALV (ABAP List Viewer) 显示数据的常见参数和方法，特别是通过`REUSE_ALV_GRID_DISPLAY`和`REUSE_ALV_GRID_DISPLAY_LVC`函数。主要内容包括设置显示字段、调整ALV属性、添加表头...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值