动态内表的创建和使用主要有以下几点：

  • 动态内表的创建，首先要定义动态结构，然后再根据定义的动态结构利用系统一个标准的method：”cl_ALV_table_create=>create_dynamic_table“生成动态内表。
  • 动态内表的赋值，遍历动态结构，获取指定的字段，然后给指定的字段赋值。
  • 动态内表的读取显示，与赋值相似，遍历动态结构，获取指定的字段，然后读取对应字段的值。

其中方法三最简单。

1、方法一

  1. TYPE-POOLS:ABAP.
  2. PARAMETERS p_name TYPE tabname.
  3. DATA lt_table TYPE TABLE OF dfies. "字段结构表
  4. DATA ls_table TYPE dfies.
  5. DATA lr_struc TYPE REF TO cl_abap_structdescr.
  6. DATA lr_table TYPE REF TO cl_abap_tabledescr.
  7. DATA lr_type TYPE REF TO cl_abap_typedescr.
  8. DATA lr_data TYPE REF TO cl_abap_datadescr.
  9. DATA lt_comp TYPE abap_component_tab.
  10. DATA ls_comp LIKE LINE OF lt_comp.
  11. DATA dyn_wa TYPE REF TO data.
  12. DATA dyn_table TYPE REF TO data.
  13. DATA l_string TYPE string.
  14. FIELD-SYMBOLS: <dyn_table> TYPE STANDARD TABLE,
  15. <dyn_wa> TYPE ANY.
  16. *1.获取表中的字段结构
  17. CALL FUNCTION 'DDIF_NAMETAB_GET'
  18. EXPORTING
  19. tabname = p_name
  20. TABLES
  21. dfies_tab = lt_table
  22. EXCEPTIONS
  23. not_found = 1
  24. OTHERS = 2.
  25. IF sy-subrc <> 0.
  26. MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
  27. WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  28. ENDIF.
  29. LOOP AT lt_table INTO ls_table.
  30. CONCATENATE ls_table-tabname '-' ls_table-fieldname INTO l_string.
  31. ls_comp-name = ls_table-fieldname.
  32. *读取字段类型
  33. CALL METHOD cl_abap_datadescr=>describe_by_name
  34. EXPORTING
  35. p_name = l_string
  36. RECEIVING
  37. p_descr_ref = lr_type
  38. EXCEPTIONS
  39. type_not_found = 1
  40. OTHERS = 2.
  41. IF sy-subrc <> 0.
  42. MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
  43. WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  44. ENDIF.
  45. ls_comp-type ?= lr_type.
  46. APPEND ls_comp TO lt_comp.
  47. CLEAR ls_comp.
  48. ENDLOOP.
  49. *根据字段目录创建动态结构类型
  50. CALL METHOD cl_abap_structdescr=>create
  51. EXPORTING
  52. p_components = lt_comp
  53. RECEIVING
  54. p_result = lr_struc.
  55. *根据动态结构创建动态内表类型
  56. CALL METHOD cl_abap_tabledescr=>create
  57. EXPORTING
  58. p_line_type = lr_struc
  59. RECEIVING
  60. p_result = lr_table.
  61. *参照动态结构类型和动态内表类型创建内表与工作区
  62. CREATE DATA dyn_wa TYPE HANDLE lr_struc.
  63. CREATE DATA dyn_table TYPE HANDLE lr_table.
  64. *指定内表与工作区到字段符号
  65. ASSIGN dyn_wa->* TO <dyn_wa>.
  66. ASSIGN dyn_table->* TO <dyn_table>.
  67. *从动态表中取数到动态内表中
  68. SELECT * INTO CORRESPONDING FIELDS OF TABLE <dyn_table> UP TO 100
  69. ROWS FROM (p_name).
  70. *显示内表中的数据
  71. CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
  72. EXPORTING
  73. i_structure_name = p_name
  74. TABLES
  75. t_outtab = <dyn_table>
  76. EXCEPTIONS
  77. program_error = 1
  78. OTHERS = 2.
  79. IF sy-subrc <> 0.
  80. MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
  81. WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  82. ENDIF.

复制代码

2、方法二

  1. TYPE-POOLS:abap.
  2. PARAMETERS p_name TYPE tabname.
  3. DATA: d_ref TYPE REF TO data,
  4. lt_alv_cat TYPE TABLE OF lvc_s_fcat,
  5. ls_alv_cat LIKE LINE OF lt_alv_cat.
  6. DATA: lt_table LIKE TABLE OF dntab.
  7. DATA: ls_table TYPE dntab.
  8. FIELD-SYMBOLS : <dyn_table> TYPE table,
  9. <dyn_wa> TYPE ANY,
  10. <dyn_field> TYPE ANY.
  11. *取出表结构的字段目录
  12. CALL FUNCTION 'NAMETAB_GET'
  13. EXPORTING
  14. langu = sy-langu
  15. tabname = p_name
  16. TABLES
  17. nametab = lt_table
  18. EXCEPTIONS
  19. no_texts_found = 1.
  20. *根据取出的字段目录生成参考字段目录
  21. LOOP AT lt_table INTO ls_table.
  22. ls_alv_cat-fieldname = ls_table-fieldname.
  23. ls_alv_cat-ref_table = p_name.
  24. ls_alv_cat-ref_field = ls_table-fieldname.
  25. APPEND ls_alv_cat TO lt_alv_cat.
  26. CLEAR ls_alv_cat.
  27. ENDLOOP.
  28. *内表创建
  29. CALL METHOD cl_alv_table_create=>create_dynamic_table
  30. EXPORTING
  31. it_fieldcatalog = lt_alv_cat
  32. IMPORTING
  33. ep_table = d_ref.
  34. *指定生成的内表到字段符号
  35. ASSIGN d_ref->* TO <dyn_table>.
  36. *从动态表中取数到动态内表中
  37. SELECT * INTO CORRESPONDING FIELDS OF TABLE <dyn_table> UP TO 100
  38. ROWS FROM (p_name).
  39. *显示内表中的数据
  40. CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
  41. EXPORTING
  42. i_structure_name = p_name
  43. TABLES
  44. t_outtab = <dyn_table>
  45. EXCEPTIONS
  46. program_error = 1
  47. OTHERS = 2.
  48. IF sy-subrc <> 0.
  49. MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
  50. WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  51. ENDIF.

复制代码

3、方法三

  1. PARAMETERS p_name TYPE tabname.
  2. DATA: dyn_table TYPE REF TO data.
  3. DATA: dyn_wa TYPE REF TO data.
  4. FIELD-SYMBOLS: <dyn_table> TYPE table,
  5. <dyn_wa> TYPE ANY.
  6. *创建动态表结构
  7. CREATE DATA dyn_table TYPE TABLE OF (p_name).
  8. *创建动态内表
  9. ASSIGN dyn_table->* TO <dyn_table>.
  10. *创建动态工作区结构
  11. CREATE DATA dyn_wa LIKE LINE OF <dyn_table>.
  12. *创建动态工作区
  13. ASSIGN dyn_wa->* TO <dyn_wa>.
  14. *从动态表中取数到动态内表中
  15. SELECT * INTO CORRESPONDING FIELDS OF TABLE <dyn_table> UP TO 100
  16. ROWS FROM (p_name).
  17. *对取出数据进行处理
  18. LOOP AT <dyn_table> assigning <dyn_wa>.
  19. "内表数据处理
  20. ENDLOOP.
  21. *显示内表中的数据
  22. CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
  23. EXPORTING
  24. i_structure_name = p_name
  25. TABLES
  26. t_outtab = <dyn_table>
  27. EXCEPTIONS
  28. program_error = 1
  29. OTHERS = 2.
  30. IF sy-subrc <> 0.
  31. MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
  32. WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  33. ENDIF.

复制代码

ABAP动态生成内表的三种方法相关推荐

  1. ABAP中创建动态内表的三种方法（转载）

    BAP中创建动态内表的三种方法 第一种: 如果我们需要的动态内表字段或者动态工作区和数据字典中的类型一致,可以直接使用CREATE DATA生成,当然也可以是自定义类型. 比如要产生和数据表MARA结 ...

  2. latex自动生成中文目录_自动生成工作表目录三种方法，看哪种适合你？

    如果在一个工作簿内有很多工作表需要去维护管理,一个个的查找显然是很麻烦的,建立一个工作表的导航目录无疑是最便捷的方法. 下面介绍三种生成工作表目录的方法: 一.利用宏表函数生成可导航目录 第1步:定义 ...

  3. (一)JQuery动态加载js的三种方法

    Jquery动态加载js的三种方法如下: 第一种: $.getscript("test.js"); 例如: <script type="text/javascrip ...

  4. ABAP屏幕上显示LIST的三种方法

    屏幕上显示LIST的三种方法 在abap开发中,经常有用户提出list的需求,实现的方法很多,通常用的有以下三种总结一下供大家参考: 1:手工添加-就是根据需要把LIST要显示的内容一条一条加到LIS ...

  5. python初学者：打印9*9乘法表的三种方法

    再次拾起python,很基础的入门题就是打印9*9乘法表,分别有个人作答版.前辈修改版.老师答案版.现把三种方法都记下来: 打印9*9乘法表 自己作答版:能看出,逻辑很乱,因为思考时是先考虑j=i打印 ...

  6. 细说 MySQL 创建表的三种方法

    文章目录 CREATE TABLE CREATE TABLE ... LIKE CREATE TABLE ... SELECT 总结 大家好!我是只谈技术不剪发的 Tony 老师. SQL 标准使用 ...

  7. pandas中根据两列 或 多列进行条件对比，生成新列【三种方法】

    使用目的: 两列数量对比,收货比期望多,就是标记数量满足,否则就数量不满足 如果数量满足.日期满足,那么总体就标记满足,有一个不满足就总体标记不满足 第一种: .loc赋值 # 这里是先创建一个空列, ...

  8. 引入CSS样式表的三种方法

    1.行内式 <标记名 style="属性1:属性值1;属性2:属性值2;属性3:属性值3;">内容</标记名> 该语法中style是标记的属性,实际上任何H ...

  9. 网站SEO构建内链的三种方法，帮你快速收录

    网站内链就是网站内部页面之间的链接,因而网站内链起着维系站内页面与页面之间的关系.在网站SEO过程中,合理的构建页面关系对于提升用户体验,促进搜索引擎爬取网站页面,快速收录网站,以及让网站排名更靠前, ...

最新文章

  1. arduino蓝牙通讯代码_「Arduino」OLED屏使用教程，显示内容听谁的？我不管，听我的...
  2. python常用命令汇总-Python爬虫框架Scrapy常用命令总结
  3. 搞多媒体开发？吴威麒：先拉个书单看看
  4. A Simple Math Problem（矩阵快速幂）
  5. Hbase JMX 监控 - Region
  6. log4j日志 linux配置,Log4j 日志详细用法
  7. Eclipse连接到My sql数据库之前操作
  8. Visual Studio2010重新安装后，冲突问题
  9. 现在学生物出路真有那么不济吗？
  10. python对数字进行简单的可逆加密_Python实现简单的可逆加密程序实例
  11. linux nfs会崩溃么,在linux上创建nfs遇到的问题。
  12. 三枚Flash 0day漏洞曝光，Flash再次紧急更新
  13. SQL语言入门学习，这一篇就够了
  14. 实战：入侵win10
  15. 认知科学和认知神经科学_设计师认知科学阅读清单
  16. 4x root 红米_红米手机4x如何获取root权限？
  17. 最受中国人欢迎的10种日本药
  18. 强生单剂量新冠疫苗对德尔塔变异病毒有效并可提供持久保护效力
  19. 12种文本数据采集方法
  20. js编码书写规范(自学习用)

热门文章

  1. 【专访】会会创始人李翔昊：重新颠覆职业社交，盲目抄袭只有死路一条
  2. 【pmcaff】2014年中国移动支付用户报告
  3. Linux 进程管理命令之pidof
  4. Java在线问题诊断工具Greys
  5. IBM营收持续下滑 不过蓝色巨人证明自己非老矣
  6. 设计上如何避免EMC问题
  7. 银行实时支付系统是怎么躲过双十一这一坎的呢？
  8. 【转】Matlab axis用法
  9. 用JAVA日志来写诗
  10. 【产品环境】使用ELK搭建日志系统