ABAP 两个内表不同名称字段赋值的方法

*& 两个内表不同名称字段赋值的方法

*& 方法1:使用Loop循环手动赋值

*& 方法2:维护一个映射表,返回一个执行器,调用其execute方法

*& 方法3:CORRESPONDING #( )

复制代码
TYPES :BEGIN OF developer,              "内表1
         name           TYPE string,
         focus_language TYPE string,
         salary         TYPE i,
       END OF developer,

       BEGIN OF presale,               "内表2
         name              TYPE string,
         focus_area        TYPE string,
         salary_plus_bouns TYPE i,
       END OF presale.

DATA: developer_list TYPE TABLE OF developer WITH EMPTY KEY,
      presale_list1  TYPE TABLE OF presale WITH EMPTY KEY,
      presale_list2  TYPE TABLE OF presale WITH EMPTY KEY,
      presale_list3  TYPE TABLE OF presale WITH EMPTY KEY.

developer_list = VALUE #( ( name = 'AAA' focus_language = 'ZH' salary = 1 )
                          ( name = 'BBB' focus_language = 'EN' salary = 2 ) ).

"方法一:使用Loop循环手动赋值
LOOP AT developer_list ASSIGNING FIELD-SYMBOL(<temp1>).
  APPEND INITIAL LINE TO presale_list1 ASSIGNING FIELD-SYMBOL(<temp2>).
  <temp2>-name = <temp1>-name.
  <temp2>-focus_area = <temp1>-focus_language.
  <temp2>-salary_plus_bouns = <temp1>-salary.
ENDLOOP.

"方法2:维护一个映射表,返回一个执行器,调用其execute方法
*DATA(it_mapping) = VALUE cl_abap_corresponding=>mapping_table( ( level = 0 kind = 1 srcname = 'name' dstname = 'name' ) ).
DATA(lo_mapping_executor) = cl_abap_corresponding=>create(
  source      = developer_list
  destination = presale_list2
  mapping     = VALUE cl_abap_corresponding=>mapping_table(
    ( level = 0 kind = 1 srcname = 'name' dstname = 'name' )
    ( level = 0 kind = 1 srcname = 'focus_language' dstname = 'focus_area' )
    ( level = 0 kind = 1 srcname = 'salary' dstname = 'salary_plus_bouns' )
    )
  ).
lo_mapping_executor->execute( EXPORTING source = developer_list
                              CHANGING  destination = presale_list2 ).

"方法3:CORRESPONDING #( )
presale_list3 = CORRESPONDING #( developer_list MAPPING name               = name
                                                        focus_area         = focus_language
                                                        salary_plus_bouns  = salary         ).

推荐方法三,动态的话就用方法二。

相关推荐
聆风吟º1 小时前
Oracle到KingbaseES数据库迁移:全流程实战指南与避坑总结
数据库·oracle·数据库迁移·kingbasees
哈__1 小时前
Oracle至KingbaseES数据库迁移全攻略:痛点拆解、配置实操与问题排查
数据库·oracle
shandianchengzi1 小时前
【记录】Tailscale|部署 Tailscale 到 linux 主机或 Docker 上
linux·运维·docker·tailscale
JZC_xiaozhong2 小时前
电商ERP如何同步订单数据到MySQL?集成方案解析
数据库·mysql·数据分析·etl工程师·嵌入式实时数据库·电商erp集成·数据集成与应用集成
消失的旧时光-19432 小时前
第四篇(实战): 订单表索引设计实战:从慢 SQL 到毫秒级
java·数据库·sql
知识分享小能手2 小时前
Oracle 19c入门学习教程,从入门到精通, Oracle 表空间与数据文件管理详解(9)
数据库·学习·oracle
John Song2 小时前
Linux机器怎么查看进程内存占用情况
linux·运维·chrome
zhengfei6112 小时前
Chroma DB — 未经授权的信息披露
数据库
KaiwuDB3 小时前
KaiwuDB 获评“2025 中国大数据产业年度国产化优秀代表厂商”
数据库
点云SLAM3 小时前
C++内存泄漏检测之Windows 专用工具(CRT Debug、Dr.Memory)和Linux 专业工具(ASan 、heaptrack)
linux·c++·windows·asan·dr.memory·c++内存泄漏检测·c++内存管理