TYPES:BEGIN OF ty_data,
        checkbox TYPE c,
        matnr    TYPE mara-matnr,
        mtart    TYPE mara-mtart,
        matkl    TYPE mara-matkl,
        maktx    TYPE makt-maktx,
        context  TYPE char10,"用于下拉框
      END OF ty_data.

DATA gt_data TYPE TABLE OF ty_data WITH EMPTY KEY.

FORM frm_set_fieldcat.
  DATA lv_pos TYPE i.
  DATA ls_fieldcat LIKE LINE OF gt_fieldcat.
  DEFINE %%append_fieldcat.
    lv_pos = lv_pos + 1.
    ls_fieldcat-col_pos = lv_pos.
    ls_fieldcat-fieldname = &1."字段名
    ls_fieldcat-coltext = &2."文本
*  ls_fieldcat-no_zero = &3."去掉前导零
    ls_fieldcat-ref_table = &3.
    ls_fieldcat-ref_field = &4.
  APPEND ls_fieldcat TO gt_fieldcat.
  CLEAR ls_fieldcat.
  END-OF-DEFINITION.

  %%append_fieldcat:
  ‘CHECKBOX‘ ‘选择‘ ‘‘ ‘‘,
  ‘MATNR‘ ‘‘ ‘MARA‘ ‘MATNR‘,
  ‘MTART‘ ‘‘ ‘MARA‘ ‘MTART‘,
  ‘MATKL‘ ‘‘ ‘MARA‘ ‘MATKL‘,
  ‘MAKTX‘ ‘‘ ‘MAKT‘ ‘MAKTX‘,
  ‘CONTEXT‘ ‘下拉输入1‘ ‘‘ ‘‘.

  READ TABLE gt_fieldcat ASSIGNING FIELD-SYMBOL(<fs1>) WITH KEY fieldname = ‘CONTEXT‘.
  IF sy-subrc EQ 0.
    <fs1>-edit = ‘X‘.
    <fs1>-drdn_hndl = ‘1‘.“分组标识
  ENDIF.

    "ALV 下拉框
    DATA:ls_drop_down TYPE lvc_s_drop,
         lt_drop_down TYPE lvc_t_drop.
    "句柄HANDLE 为I类型，相同数字为同一组下拉框
    DO 5 TIMES.
      CLEAR ls_drop_down.
      ls_drop_down-handle = ‘1‘.“对应分组标识
      ls_drop_down-value = sy-index.
      APPEND ls_drop_down TO lt_drop_down.
    ENDDO.

  "ALV 下拉框
    cr_grid->set_drop_down_table(
  it_drop_down = lt_drop_down
  ).

 CALL METHOD cr_grid->set_table_for_first_display
      EXPORTING
        is_variant           = ls_disvariant
        i_default            = ‘X‘
        i_save               = ‘U‘
        is_layout            = ls_layout
        it_toolbar_excluding = lt_exclude
      CHANGING
        it_outtab            = ct_data
        it_fieldcatalog      = ct_fieldcat.