1. 首页
  2. IT资讯

SAP ABAP 性能优化实践

性能优化实践:

1.        声明内表

TYPES : Begin of fs_XX,

                  F1(4) type c, 

                  F2(2) type n,

                  F3(2) type c,

                End of fs_xx.

DATA : it_XX type standard/sorted/hashed table of fs_XX,

              Wa_XX like line of it_XX.

 用完了记得清理,包括释放空间。

    Refresh it_xx.

    Free it_xx.

2.        删除内表记录

如果一项删除如下

Loop at source_package assigning.

   If-F1 = ‘X’.

        Delete source_package. 

  Endif.

Endloop.

很明显,这个删除是针对整个内表操作的,不妨写成如下形式

Delete source_package where F1 = ‘X’.

   有些时候,可能条件是多个,那么可以采用如下形式:

DATA : TEMP type F1. “i.e. the field for which we are creating SELECT-OPTIONS

SELECT-OPTIONS : s_F1 for temp.

DATA : wa like line of s_F1.

wa-sign = ‘I’.

wa-option = ‘EQ’.

wa-low = ‘ABCD’.

append wa to s_F1.

wa-sign = ‘I’.

wa-option = ‘EQ’.

wa-low = ‘EFGH’.

append wa to s_F1.

Delete source_package where F1 in s_f1.

即把条件写到一个内表中。

3.     Select 系统表用到For All Entries In

我们知道在数据库中可以用内联关系来显示表,那么For—语法有点类似,它把内表和系统表做了联合。当然使用之前,需要检查内表的大小,如果内表为空,那么Select的结果会是所有的系统表值,结局就事与愿违了。

DATA : nb type n.

Describe table it_XX lines nb.

If nb is not initial.

Select F1 F2 F3 from YYY

into it_XX

for all entries in source_package

Where F1 = source_package-F1.

Endif.

 

4.     值比较

请用“IS INITIAL”替代 等于 “”,因为数值型的空值可能是0,而不是””.

5.     内表记录修改

请用Field-Symbol类型的工作区,道理和C语言的指针非常相识。如果一定要用Modify,那么请跟上索引值sy-tabix.

6.     内表复制

请用It1[] = it2[].

7.     读取内表

读取内表之前,排排序是个好习惯。

8.     内表循环嵌套内表

LOOP AT itab1 INTO wa1.

LOOP AT itab2 INTO wa2 WHERE f1 = wa1-f1

AND f3 = wa1-f3.

    “………..

ENDLOOP.

ENDLOOP.

以上的性能是很差的,会做很多无谓的循环。

SORT itab2 BY f1 f3.

LOOP AT itab1 INTO wa1.

READ TABLE itab2 WITH KEY f1 = wa1-f1

f3 = wa1-f3 BINARY SEARCH TRANSPORTING NO FIELDS.

IF sy-subrc EQ 0.

v_tabix = sy-tabix.

LOOP AT itab2 INTO wa2 FROM v_tabix.

IF wa2-f1 NE wa1-f1 or wa2-f3 NE wa1-f3. EXIT ENDIF.

*processing or records here

ENDLOOP.

ENDIF.

ENDLOOP.

上面的结构设计做了一些调整,虽然还是双循环,但是加了一些跳跃动作,体会之后会大呼奇妙。巧的是我当初优化CSRP用得正是这一招。 不得不说,英雄所见略同啊!

 

 

 

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/223653/viewspace-1663727/,如需转载,请注明出处,否则将追究法律责任。

主题测试文章,只做测试使用。发布者:℅傍ㄖ免沦陷dε鬼,转转请注明出处:http://www.cxybcw.com/192587.html

联系我们

13687733322

在线咨询:点击这里给我发消息

邮件:1877088071@qq.com

工作时间:周一至周五,9:30-18:30,节假日休息

QR code