ALV中下拉列表列的实现 二

DATA:ls_drp TYPE lvc_s_drop.
REFRESH gt_drp.
ls_drp-handle = ‘1’ .
ls_drp-value = text-s10. "新增
APPEND ls_drp TO gt_drp .
ls_drp-handle = ‘1’ .
ls_drp-value = ‘新增退回’. "新增
APPEND ls_drp TO gt_drp .
ls_drp-handle = ‘1’ .
ls_drp-value = ‘退回修改’. "新增
APPEND ls_drp TO gt_drp .
ls_drp-handle = ‘1’ .
ls_drp-value = ‘退回删除’. "新增
APPEND ls_drp TO gt_drp .
ls_drp-handle = ‘1’ .
ls_drp-value = ‘退回转来料’. "删除
APPEND ls_drp TO gt_drp .
ls_drp-handle = ‘1’ .
ls_drp-value = ‘退回改直付’. "新增
APPEND ls_drp TO gt_drp .
ls_drp-handle = ‘1’ .
ls_drp-value = text-s14. "待确认
APPEND ls_drp TO gt_drp .
ls_drp-handle = ‘1’ .
ls_drp-value = text-s15. "已确认
APPEND ls_drp TO gt_drp .

ls_drp-handle = ‘2’ .
ls_drp-value = ‘支出’. "新增
APPEND ls_drp TO gt_drp .
ls_drp-handle = ‘2’ .
ls_drp-value = ‘收入’. "新增
APPEND ls_drp TO gt_drp .
ls_drp-handle = ‘2’ .
ls_drp-value = ‘’. "新增
APPEND ls_drp TO gt_drp .

CREATE OBJECT wa_custom_container_290
EXPORTING
container_name = wa_container_290.

CREATE OBJECT grf_alv_grid_290
  EXPORTING
    i_parent = wa_custom_container_290.

**准备取得字段目录
CLEAR: gt_fieldcat_290, gt_fieldcat_290[].
PERFORM frm_field_catalog_290 CHANGING gt_fieldcat_290.
FORM frm_field_catalog_290 CHANGING ct_fieldcat TYPE lvc_t_fcat…

DATA:ls_fieldcat TYPE lvc_s_fcat.
gs_fieldcat-drdn_hndl = ‘1’.
def_fieldcat ‘CWTZ’ ‘财务调整’ g_edit. "
def_fieldcat ‘JZZT’ ‘创建主体’ g_edit. "
gs_fieldcat-drdn_hndl = ‘2’.
def_fieldcat ‘SZFX_LIST’ text-t64 g_edit. "收支方向

• def_fieldcat ‘GSBM’ ‘公司编码’ g_edit. "
  gs_fieldcat-f4availabl = ‘X’.
  def_fieldcat ‘JYDS’ ‘交易对手’ g_edit. "
  def_fieldcat ‘JYDS_TXT’ ‘交易对手描述’ g_edit. "
  def_fieldcat ‘DWQC’ ‘单位全称’ g_edit. "
  def_fieldcat ‘HGBZJ’ ‘海关保证金及税费’ g_edit. "
  def_fieldcat ‘OTHERS’ ‘其他收费金额’ g_edit. "
  ENDFORM. " FRM_FIELD_CATALOG_290

  CALL METHOD grf_alv_grid_290->set_drop_down_table
  EXPORTING
  it_drop_down = gt_drp.
  CALL METHOD grf_alv_grid_290->set_table_for_first_display
  EXPORTING
  it_toolbar_excluding = gt_excl_func
  is_variant = gs_vari_290

•   I_STRUCTURE_NAME     = CNS_ALV_STRUCTURE_700
    is_layout            = gs_layout_290
    i_save               = 'A'
  CHANGING
  

•   it_sort              = gt_sort
    it_filter            = gt_filter
    it_outtab            = gt_list_00510 "GT_LIST_00120
    it_fieldcatalog      = gt_fieldcat_290.
  

  CALL METHOD grf_alv_grid_290->register_f4_for_fields
  EXPORTING
  it_f4 = gt_f4_290[].