SAP系统中有两种内存:
https://www.ngui.cc/el/2506560.html?action=onClick
1,ABAP Memory
简单说来一个session就是登录SAP系统开的窗口。 可以通过abap内存实现同一session中的数据交换。具体使用到 EXPORT 和IMPORT memory id 语句.
用户登陆后,最多一个系统可以开6个窗口,这在SAP中称为External Mode。
而同一个窗口中,运行某程序后,可以通过CALL TRANSACTION/SUBMIT或其他代码跳转到其他程序,这个称为
Internal Mode。Internal Mode的调用栈最多为9层。
那么ABAP Memory,它是属于Internal Mode间可以共享的数据,而External Mode间无法共享。
例子. 创建程序ZDEMO03,输入:
DATA matnr TYPE matnr.
IMPORT matnr FROM MEMORY ID ‘YTEST_MATNR’.
WRITE matnr.
创建程序ZDEMO04,输入:
DATA matnr TYPE matnr.
matnr = ‘000000000000001234’.
EXPORT matnr TO MEMORY ID ‘YTEST_MATNR’.
SUBMIT ZDEMO03. “调用程序A
直接运行ZDEMO04,发现程序ZDEMO03从ABAP Memory读到了值并输出到LIST.
说明:
(1)调试运行ZDEMO04到EXPORT语句后面,Goto-System Area-ABAP Memory,可以查看到名为YTEST_MATNR的一片内存。
(2)如果ZDEMO04和ZDEMO03运行在不同的窗口,则ZDEMO03将访问不到数据;当用户输入/N退出当前程序时,内存值也将被清空。
(3)该语句适用于CALL TRANSACTION/SUBMIT过程中的数据共享,也常用于User Exit,类似于定义全局变量的效果。
2,SAP Memory
在整个登录过程中,可以通过SAP内存实现多个session之间的数据交换。具体使用到EXPORT 和IMPORT DATABASE语句。
例子. 创建程序ZDEMO05,输入:
DATA matnr TYPE matnr.
GET PARAMETER ID ‘YTEST’ FIELD matnr.
WRITE matnr.
创建程序ZDEMO06,输入:
DATA: matnr TYPE matnr.
matnr = ‘000000000000012345’.
SET PARAMETER ID ‘YTEST’ FIELD matnr.
在窗口1运行程序ZDEMO06并关闭后,在窗口2运行程序ZDEMO05,发现程序ZDEMO05仍然读到了SAP Memory的值。
说明:
(1)调试时,可通过Goto-System Area-SAP Memory,查看到YTEST及其对应的值。
(2)SET/GET PARAMETER的值与本次登陆有关,当用户注销后才失效。在用户登陆的时候,系统会根据每个用户
User Profile-Own Data-Parameter下的设置,载入到SAP Memory。
(3)Data Element中可以看到Further Characteristics下可定义PARAMETER ID,代表该字段作为屏幕元素时,可
读取该PARAMETER ID作为默认值。比如VA03会自动显示刚刚创建的订单号。
SHARED MEMORY/SHARED BUFFER
前面介绍的都是用户内存,那么不同用户间如何实现数据共享呢?可以用SHARED MEMORY或SHARED BUFFER,它们
是服务器上的某片所有用户共享的内存。关于SHARED MEMORY和SHARED BUFFER的区别,可以F1查看帮助。如果
EXPORT SHARED BUFFER,则必须IMPORT SHARED BUFFER才能读到,用IMPORT SHARED MEMORY是读不到
的。反过来也是。
例子. 创建程序A,输入: DATA matnr TYPE matnr.
IMPORT matnr FROM SHARED BUFFER indx(aa) ID ‘YTEST_MATNR’.
WRITE matnr.
创建程序B,输入:
DATA: matnr TYPE matnr.
matnr = ‘000000000000123456’.
EXPORT matnr TO SHARED BUFFER indx(aa) ID ‘YTEST_MATNR’.
先在用户1的电脑上运行程序B,然后在用户2的电脑上运行程序A,发现用户2可以读取到值。
说明:
(1)既然是服务器上的所有用户共享空间,那么该值将保存到服务器关机重启为止,除非用户用DELETE语句清除它。
其实这个跟ENQUEUE/DEQUEUE有点相似之处。
(2)数据库也可共享数据,不过服务器共享肯定速度快些,理论上适合网络游戏,呵呵。
(3)INDX是系统中存在的符合特定格式要求的表。但这不代表该EXPORT/IMPORT语句将在表INDX中增加记录,仅仅
代表服务器借用了INDX的结构来管理该片共享内存。
DATABASE
上面说了SHARED BUFFER并不访问数据库,而要访问数据库就应该用DATABASE。
如何使用EXPORT 和IMPORT DATABASE语句
EXPORT:
保存数据到SAP内存
EXPORT {p1 = dobj1 p2 = dobj2 ...} | {p1 FROM dobj1 p2 FROM dobj2 ...} | (ptab)
TO { DATABASE dbtab(ar) [FROM wa] [CLIENT cl] ID id }
从SAP内存中取数据
IMPORT {p1 = dobj1 p2 = dobj2 ...} | {p1 TO dobj1 p2 TO dobj2 ...} | (ptab)
FROM { DATABASE dbtab(ar) [TO wa] [CLIENT cl] ID id }
其中各个参数含义如下:
1, {p1 = dobj1 p2 = dobj2 …}与 {p1 FROM dobj1 p2 FROM dobj2 …}的意义一样,只是写法不一样,dobj1、dobj2…变量将会以p1、p2…名称存储到内存或数据库中。p1、p2…名称随便取,如果p1、p2…与将要存储的变量名相同时,只需写变量名即可,即等号与 FROM 后面可以省略。p1、p2…这些名称必须与IMPORT语句中相一致,否则读取不出
2, (ptab):为动态指定需要存储的变量,ptab内表结构要求是这样的:只需要两列,列名任意,但类型需要是字符型;第一列存储如上面的p1、p2…名称,第二列为上面的dobj1、dobj2…变量,如果变量与名称相同,则也可以像上面一样,省略第二列的值。
3, DATABASE: 将变量存储到数据库中;dbtab为簇数据库表的名称(如系统提供的标准表INDX);ar的值为区域ID,它将数据库表的行分成若干区域,它必须被直接指定,且值是两位字符,被存储到簇数据库表中的RELID字段中;id 的值会存储到簇数据表中的RELID字段的下一用户自定义字段中.
REPORT ZDEMO01.
DATA: matnr TYPE matnr.
matnr = '000000000000004321'.
EXPORT matnr TO DATABASE indx(aa) ID 'YTEST_MATNR'.
执行程序,然后SE16查看表INDX,发现新增了一条RELID = AA, SRTFD = YTEST_MATNR的记录。
如果EXPORT
的数据量比较大,则新增的将是多条,这些条目的字段值SRTF2从0递增。所以EXPORT DATABASE与普通数据库操
作的不同之处是,它适合大数据量的操作,系统自动将其拆分成多条记录并存储到数据库中,比如图片或文档。而用
IMPORT DATABASE的过程则相反,系统将把这些条相关记录又自动组合起来成为一个整体。
REPORT ZDEMO02.
DATA: LV_MATNR TYPE MATNR,
matnr type matnr.
CLEAR LV_MATNR.
IMPORT matnr = lv_matnr from DATABASE INDX(aa) id 'YTEST_MATNR'.
write: lv_matnr.