首页 文章

创建动态ABAP内部表

提问于
浏览
7

在选择屏幕上,用户需要插入表名,我需要从该表中获取前3个字段并将其显示在输出的ALV中 . 我从阅读教程中理解的是,我需要调用方法 cl_alv_table_create=>create_dynamic_table ,但我不知道如何创建fieldcatalog .

DATA: t_newtable   TYPE REF TO data,
      t_fldcat     TYPE lvc_t_fcat,

CALL METHOD cl_alv_table_create=>create_dynamic_table
  EXPORTING
    it_fieldcatalog = t_fldcat
  IMPORTING
    ep_table        = t_newtable.

1 回答

  • 9

    我假设用户输入的表名是数据字典表(如SFLIGHT) . 如果是,则可以按如下方式生成字段目录 .


    data : it_tabdescr type abap_compdescr_tab,
         wa_tabdescr type abap_compdescr.
    data : ref_table_descr type ref to cl_abap_structdescr.
    
      ref_table_descr ?= cl_abap_typedescr=>describe_by_name( p_table ).
      it_tabdescr[] = ref_table_descr->components[].
      loop at it_tabdescr into wa_tabdescr.
        clear wa_fieldcat.
        wa_fieldcat-fieldname = wa_tabdescr-name .
        wa_fieldcat-datatype  = wa_tabdescr-type_kind.
        wa_fieldcat-inttype   = wa_tabdescr-type_kind.
        wa_fieldcat-intlen    = wa_tabdescr-length.
        wa_fieldcat-decimals  = wa_tabdescr-decimals.
        append wa_fieldcat to it_fieldcat.
      endloop.
    

    这里,“p_table”是包含表名的选择屏幕参数 .

相关问题