ABAP는 내부 테이블의 필드 목록을 동적으로 가져옵니다.

이 예제는 ct_bp_basic 내부 테이블의 필드 목록을 가져 오는 것입니다. 기본 유형은 테이블 유형입니다. 구조에는 include가 포함되어 있으므로 확장해야합니다. inlcude 구조가없는 경우 두 번째 부분은 무시할 수 있습니다.

  data(lo_table_basic) = cast cl_abap_tabledescr( cl_abap_tabledescr=>describe_by_data( ct_bp_basic ) ).
  data(lo_struct_basic) = cast cl_abap_structdescr( lo_table_basic->get_table_line_type( ) ).
  data(lt_component_basic_all) = lo_struct_basic->get_components( ).

  data(lt_component_include) = lt_component_basic_all.
  delete lt_component_include where as_include ne abap_true.
  delete lt_component_basic_all where as_include eq abap_true.

  "展开include结构中
  loop at lt_component_include assigning field-symbol(<fs_component>).
    lo_struct_basic = cast cl_abap_structdescr( <fs_component>-type ).
    data(lt_components) = lo_struct_basic->get_components( ).
    append lines of lt_components to lt_component_basic_all.
  endloop.

ABAP 동적 획득 변수 이름 / 텍스트 설명을 얻기위한 메소드
코드 참조 와 함께 번들로 제공됩니다.

METHOD field_get_name.
    DATA:ls_field_descr TYPE sydes_desc,
         lv_name_string TYPE string.

    DESCRIBE FIELD 	i_value INTO ls_field_descr.

    READ TABLE ls_field_descr-names TRANSPORTING NO FIELDS WITH KEY continue = '*'.
    DATA(lv_index) = sy-tabix.

    LOOP AT ls_field_descr-names INTO DATA(ls_name) FROM lv_index.
      lv_name_string = lv_name_string && ls_name-name.
    ENDLOOP.

    SPLIT lv_name_string AT'-' INTO e_structure e_field.
  ENDMETHOD.

method field_get_text.
  data(lo_element_descr) = cast cl_abap_elemdescr( cl_abap_elemdescr=>describe_by_data( I_VALUE ) ).
  data(ls_element) = lo_element_descr->get_ddic_field( p_langu = '1' ).

  e_text = ls_element-fieldtext.
endmethod.