ABAP动态访问内表字段值

---

前言

      在我们SAP中一些复杂的报表可能会用到动态内表，以满足我们的程序业务需求，例如报表需要根据我配置的改变而增加一列或者减少一列，实际工作中比如 去更改OKTZ 中的配置，如果加一条行项目那么底表中也就会增加一行，那么我们报表也就需要增加一列。笔者最近就遇到了这种开发需求，中间又遇到了如何动态访问内表字段的这个需求，这篇文章来记录一下。

---

一、直接看源码稍后详细解释

---

二、笔者的需求

      

      需要合计 CKNLPRKEPH 表中的特定字段值，这个特定字段就是根据 TCKH3 表 中的全部成本字段值拼接出来的 KST+全部成本 也就是KST+001 KST+003 KST+005 一直到 KST+057 这样拼接起来所有的字段去在 CKNLPRKEPH 表中合计一下 就等于总成本。这个不能写死所以必须动态访问，因为TCKH3 表是会根据OKTZ配置的变化而增加减少的。

---

三、如何实现这样动态的取值方式？

    1、这里先要理解一个小案例

DATA: BEGIN OF line, "声明一个结构变量 有三个字段 分别给上初始值
        col1 TYPE i VALUE '11',
        col2 TYPE i VALUE '22',
        col3 TYPE i VALUE '33',
      END OF line.
      
DATA comp (5) TYPE c VALUE 'COL3'.声明一个字符串变量

FIELD-SYMBOLS: <f1> TYPE ANY,"声明三个内存指针
               <f2> TYPE ANY,
               <f3> TYPE ANY.
               
ASSIGN line TO <f1>."将上面声明的结构赋值给 <f1> 此内存指针
ASSIGN comp TO <f2>.""将上面声明的变量赋值给 <f2> 此内存指针
*核心语句 上面我们声明了一个和line结构中 字段名称 一样的变量  comp
*我们去根据声明的变量值去访问line结构中的字段值此语句也就是访问 col3 字段值赋值给了 <f3>
ASSIGN COMPONENT <f2> OF STRUCTURE <f1> TO <f3>.

上面核心语句的意思读出来就是： 分派 组件(字段名) COL3 来源 结构 line 到 f3内存指针
将上面的核心语句理解只会我们就可以实操了。

    2、实际案例

            a.取出TCKH3表的数据

            b.拼接字段

            c.用拼接字段获取CKNLPRKEPH表中的字段值再合计

循环拼接每一个字段然后取出CKNLPRKEPH表中的字段值进行累加合计。

                                             👇复制代码在下面复制吧ABAPcsdn没有高亮提示👇

LOOP AT gt_alv ASSIGNING FIELD-SYMBOL(<fs_alv>).

    LOOP AT gt_TCKH INTO DATA(ls_TCKH).
    
      CONCATENATE 'KST' ls_TCKH-el_hv INTO str. "拼接字段名
      
      ASSIGN COMPONENT str OF STRUCTURE <fs_alv> TO FIELD-SYMBOL(<item>).“根据拼接的字段名获取字段值
      
      IF sy-subrc = 0.
        <fs_alv>-zzcb = <fs_alv>-zzcb + <item>.
      ENDIF.
      
    ENDLOOP.
    
ENDLOOP.

    3、关于补充点

            a.内存指针声明的类型
ANY是一个通用的数据类型，它可以指代任何数据对象或者数据对象的一部分。在声明字段符号时，如果使用TYPE ANY，那么这个字段符号可以指向任何类型的数据对象，而不需要指定具体的类型。这样可以实现动态的数据访问和操作。

// A code block
FIELD-SYMBOLS: <fs_str> TYPE ANY.
FIELD-SYMBOLS: <fs_tab> TYPE ANY TABLE.

这里，您可以将任何数据对象赋值给TYPE ANY字段符号<fs_str>，而 TYPE ANY TABLE 字段符号<fs_tab>则用于指向任何内表。

            b.

            c.如果后期我想起了有什么要补充的会继续写在这里，或者大家有什么想让我介绍的也可以评论私信我哦。

四、总结

        以上就是今天要讲的内容，本文仅仅简单介绍了ABAP如何动态获取内表的字段值，如果有说错或者不好的地方还望大家提出来见谅。感觉笔者写的好的别忘了关注点赞加评论哦，也欢迎大家一起来讨论。谢谢！