ABAP内存运用

(1)ABAP 内存运用语句:

EXPORT  LT_ITAB  TO MEMORY  ID ‘MM’.

IMOIRT   LT_ITTAB FROM MEMORY  ID ‘MM’.

(2)SAP内存使用 SET/GET parameters 方法;
SET  PARAMETER  ID  ‘MAT’ field P_MATNR.
GET  PARAMETER  ID  ‘MAT’ field P_MATNR.

 

输出内存

SUBMIT YTST_018_001

*&---------------------------------------------------------------------*
*& Report  YTST_2017008
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  YTST_2017008.

TYPES:BEGIN OF TY_ITAB,
       FIELD1 TYPE CHAR10,
       FIELD2 TYPE CHAR10,
      END OF TY_ITAB.

DATA:LT_ITAB TYPE TABLE OF TY_ITAB,
     WA_ITAB TYPE TY_ITAB.
DATA:L_LINES TYPE SY-TABIX.

DO 10 TIMES.
*  L_LINES = L_LINES + 1.
L_LINES = sy-index.
  IF L_LINES = 10.
    WA_ITAB-FIELD1 = L_LINES.
    WA_ITAB-FIELD2 = 'LAST line'.
    APPEND WA_ITAB TO LT_ITAB.
    CLEAR WA_ITAB.
  ELSE.
    WA_ITAB-FIELD1 = L_LINES.
    CONDENSE  WA_ITAB-FIELD1 NO-GAPS.
    WA_ITAB-FIELD2 = '这是第' && WA_ITAB-FIELD1 &&  '条数据!'.
    APPEND WA_ITAB TO LT_ITAB.
    CLEAR WA_ITAB.
  ENDIF.

ENDDO.


WA_ITAB-FIELD1 = '100'.
WA_ITAB-FIELD2 = 'aaa'.
APPEND WA_ITAB TO LT_ITAB.

WA_ITAB-FIELD1 = '200'.
WA_ITAB-FIELD2 = 'bbb'.
APPEND WA_ITAB TO LT_ITAB.

EXPORT LT_ITAB TO MEMORY ID 'MM'.
IF SY-SUBRC EQ 0.
  MESSAGE I001(VL) WITH '使用ABAP内存 20170313 输出成功!'.
ENDIF.
* ADD ON 20170313
SUBMIT YTST_2017008_001.
*& submit 则可以访问你,如果B和A运行在不同的窗口,则A将访问不到数据;

WAIT UP TO 3 SECONDS.

 

输入内存

*&---------------------------------------------------------------------*
*& Report  YTST_2017008_001
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  YTST_2017008_001.
*
*TYPES:BEGIN OF TY_ITAB,
*       field1 type char10,
*       field2 type char20,
*      END OF TY_ITAB.
TYPES:BEGIN OF TY_ITAB,
       FIELD1 TYPE CHAR10,
       FIELD2 TYPE CHAR10,
      END OF TY_ITAB.
DATA:LT_ITAB TYPE TABLE OF TY_ITAB,
     WA_ITAB TYPE TY_ITAB.

IMPORT LT_ITAB FROM MEMORY ID 'MM'.
IF SY-SUBRC NE 0.
  MESSAGE I001(VL) WITH '使用ABAP 内存 传值失败!'.
ENDIF.

BREAK-POINT.

 

转载于:https://www.cnblogs.com/rainysblog/p/6544021.html

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
智慧校园整体解决方案是响应国家教育信息化政策,结合教育改革和技术创新的产物。该方案以物联网、大数据、人工智能和移动互联技术为基础,旨在打造一个安全、高效、互动且环保的教育环境。方案强调从数字化校园向智慧校园的转变,通过自动数据采集、智能分析和按需服务,实现校园业务的智能化管理。 方案的总体设计原则包括应用至上、分层设计和互联互通,确保系统能够满足不同用户角色的需求,并实现数据和资源的整合与共享。框架设计涵盖了校园安全、管理、教学、环境等多个方面,构建了一个全面的校园应用生态系统。这包括智慧安全系统、校园身份识别、智能排课及选课系统、智慧学习系统、精品录播教室方案等,以支持个性化学习和教学评估。 建设内容突出了智慧安全和智慧管理的重要性。智慧安全管理通过分布式录播系统和紧急预案一键启动功能,增强校园安全预警和事件响应能力。智慧管理系统则利用物联网技术,实现人员和设备的智能管理,提高校园运营效率。 智慧教学部分,方案提供了智慧学习系统和精品录播教室方案,支持专业级学习硬件和智能化网络管理,促进个性化学习和教学资源的高效利用。同时,教学质量评估中心和资源应用平台的建设,旨在提升教学评估的科学性和教育资源的共享性。 智慧环境建设则侧重于基于物联网的设备管理,通过智慧教室管理系统实现教室环境的智能控制和能效管理,打造绿色、节能的校园环境。电子班牌和校园信息发布系统的建设,将作为智慧校园的核心和入口,提供教务、一卡通、图书馆等系统的集成信息。 总体而言,智慧校园整体解决方案通过集成先进技术,不仅提升了校园的信息化水平,而且优化了教学和管理流程,为学生、教师和家长提供了更加便捷、个性化的教育体验。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值