CRM加下拉框里面的值

METHOD get_v_XXXXX.

  TYPES:BEGIN OF ty_dd07t,
          ddtext      TYPE dd07t-ddtext,
          domvalue_l  TYPE dd07t-domvalue_l,
        END OF ty_dd07t.

  DATA: lt_ddlb  TYPE bsp_wd_dropdown_table.
  DATA: ls_ddlb  LIKE LINE OF lt_ddlb.
  DATA: ls_dd07t  TYPE ty_dd07t.
  DATA: lt_dd07t  TYPE TABLE OF ty_dd07t.

  DATA lr_ddlb TYPE REF TO  cl_crm_uiu_ddlb.

  CREATE OBJECT lr_ddlb
    EXPORTING
      iv_source_type = 'T'.

  ls_ddlb-key   = ls_dd07t-domvalue_l.
  ls_ddlb-value = ls_dd07t-ddtext.
  APPEND ls_ddlb TO lt_ddlb.

  SELECT ddtext
         domvalue_l
    INTO TABLE lt_dd07t
    FROM dd07t
    WHERE domname = 'ZDO_XXXXX'
      AND ddlanguage = sy-langu
      AND as4local = 'A'.

  IF sy-subrc = 0.

    LOOP AT lt_dd07t INTO ls_dd07t.
      ls_ddlb-key   = ls_dd07t-domvalue_l.
      ls_ddlb-value = ls_dd07t-ddtext.
      APPEND ls_ddlb TO lt_ddlb.
    ENDLOOP.

    lr_ddlb->set_selection_table( it_selection_table = lt_ddlb ).
    rv_valuehelp_descriptor = lr_ddlb.

  ENDIF.

ENDMETHOD.

这个抓的是domain的数据，当然你也可以自己写死些数据做到下拉里面。