ABAP开发示例:使用 ASSIGN加速 LOOP循环

根据下面的程序的运行对比,发现使用ASSIGN 的程序比另一个快了大约 25%。

使用 "LOOP AT itab ASSIGNING ." 而不是使用工作区(无论是显式的还是通过表头行的),可以避免数据在工作区的传输。字段符号是一个指针,指向(!)表中的行,所以可以直接修改表中的行而不需要使用 MODIFY ,从而避免另一次数据传输。示例程序如下:

sql 复制代码
Report Y1.
TYPES: BEGIN OF rec_type,
                count TYPE i,
                string(1024) TYPE c,
           END OF rec_type.
TYPES tab_type TYPE rec_type OCCURS 0.
DATA: itab TYPE tab_type,
          wa TYPE rec_type.
DO 100000 TIMES.
      APPEND wa TO itab.
ENDDO.
LOOP AT itab INTO wa.
         wa-count = sy-tabix.
         wa-string = 'x'.
         MODIFY itab FROM wa. "修改内表
ENDLOOP.
使用 assign 的代码:
Report Y2.
TYPES: BEGIN OF rec_type,
                 count TYPE i,
                 string(1024) TYPE c,
          END OF rec_type.
TYPES tab_type TYPE rec_type OCCURS 0.
DATA: itab TYPE tab_type,
          wa TYPE rec_type.
FIELD-SYMBOLS <fs> TYPE rec_type.
DO 100000 TIMES.
       APPEND wa TO itab.
ENDDO.
LOOP AT itab ASSIGNING. " pointer
     <fs>-count = sy-tabix. " 修改内表 itab
    <fs>-string = 'x'. " 不需要用 MODIFY

ENDLOOP.
相关推荐
wclass-zhengge12 分钟前
Docker篇(Docker Compose)
运维·docker·容器
李启柱20 分钟前
项目开发流程规范文档
运维·软件构建·个人开发·设计规范
力姆泰克1 小时前
看电动缸是如何提高农机的自动化水平
大数据·运维·服务器·数据库·人工智能·自动化·1024程序员节
BPM_宏天低代码2 小时前
低代码 BPA:简化业务流程自动化的新趋势
运维·低代码·自动化
sun0077002 小时前
拷贝 cp -rdp 和 cp -a
linux·运维·服务器
wowocpp2 小时前
ubuntu 22.04 server 安装 anaconda3
linux·运维·ubuntu
tingting01193 小时前
Linux 普通用户禁用sudo su - 命令
linux·运维·服务器
IT-民工211103 小时前
CI/CD 实践总结
运维·ci/cd·自动化
dessler3 小时前
Linux系统-rocky系统安装
linux·运维·后端
写代码的学渣3 小时前
Linux云计算个人学习总结(一)
linux·运维·云计算