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

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

原创最新推荐文章于 2025-05-09 14:57:48 发布 · 1.3k 阅读

7 ·

CC 4.0 BY-SA版权

文章标签：

#SAP/ABAP #MEMORY #EXPORT #IMPORT #程序间数据传递与共享

ABAP 专栏收录该内容

2 篇文章

订阅专栏

本文介绍了一个ABAP程序如何从数据库中选择特定航空公司的航班数据，并将这些数据传递给另一个程序进行处理和显示的例子。主要步骤包括：从`sflight`表中选取航空公司为'LH'的数据，通过内存ID进行数据交换，接收数据并遍历展示。

调用程序：

*&---------------------------------------------------------------------*
*& 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.
*** 逻辑处理以上】