2. SAP/ABAP 程序间数据传递和共享 MEMORY EXPORT/IMPORT

最新推荐文章于 2025-05-09 14:57:48 发布

zwtbin

最新推荐文章于 2025-05-09 14:57:48 发布

阅读量1.2k

点赞数 1

分类专栏： ABAP 文章标签： SAP/ABAP MEMORY EXPORT IMPORT 程序间数据传递与共享

本文链接：https://blog.csdn.net/zwtbin/article/details/88895792

版权

ABAP 专栏收录该内容

2 篇文章

订阅专栏

调用程序：

*&---------------------------------------------------------------------*
*& Report  YZB_TEST3
*&
*&---------------------------------------------------------------------*
*& export  *   to  memory  id  * .
*& import  *   from  memory  id  * .
*&---------------------------------------------------------------------*

report yzb_test3.

*-------------------------------------------------------------------*
*** DATA定义以下【
data: lt_sflight like table of sflight.
*** DATA定义以上】


*-------------------------------------------------------------------*
*** 逻辑处理以下【
select * into corresponding fields of table lt_sflight from sflight where carrid = 'LH'.
export  lt_sflight       to  memory  id  'SFLIGHT_ID' .

submit yzb_test4.
*** 逻辑处理以上】

被调程序：

*&---------------------------------------------------------------------*
*& Report  YZB_TEST4
*&
*&---------------------------------------------------------------------*
*& export  *   to  memory  id  * .
*& import  *   from  memory  id  * .
*&---------------------------------------------------------------------*

report yzb_test4.

*-------------------------------------------------------------------*
*** DATA定义以下【
data: lt_sflight like table of sflight,
      lw_sflight like line of lt_sflight.
*** DATA定义以上】


*-------------------------------------------------------------------*
*** 逻辑处理以下【
import  lt_sflight   from  memory  id  'SFLIGHT_ID' .
free  memory  id  'SFLIGHT_ID' .

loop at lt_sflight into lw_sflight.
  write:/
  lw_sflight-carrid,
  lw_sflight-connid,
  lw_sflight-fldate,
  lw_sflight-price,
  lw_sflight-currency,
  lw_sflight-planetype,
  lw_sflight-seatsmax,
  lw_sflight-seatsocc,
  lw_sflight-paymentsum,
  lw_sflight-seatsmax_b,
  lw_sflight-seatsocc_b,
  lw_sflight-seatsmax_f,
  lw_sflight-seatsocc_f.

endloop.
*** 逻辑处理以上】