一流的窝

首先需要使用T-CODE:SE30 对程序执行时 间分析，找出程序慢的部份，执行完程序可以区分三个阶段的执行时间:ABAP、Database、System，这三个部份对效能的优先 级为Database -> System -> ABAP要依序排除程序这些部份的问题。

SE30使用方 法：

点左上提示技 巧，可以查看SAP所提供的一些效率比较。

输入事务代码、 程序名称、功能模块名称，点Execute，执行程序，执行完程序以后，点击左下角Analyze，可以查看程序执行效率，

根据图形对程序 的执行进行分析，点左上角 ，可以查看详细的每条语句的执行效率，

可以针对语句进 行分析，如果语句执行时间过长，可以对语句或方法进行优化。

在SE30分析程序可以看出哪些Table花费的成本最高，针对程序 中这些SQL语法进行检查:首先要检查索引，程序中的Where子句是否用到表索引，如果没 有Index，就要评估该报表执行频率，如果很高就要建一个索引给它用。

这里对效 率比较低的语句，在网上找了一些资料，针对自己做的优化，以及SAP内自带的一些优化方法，总结了一下。

1．最主要的是 尽量减少I/O操作，然后是内存占用，再就是CPU的负载。CPU的负载可以通过优化程序来改善，在程序中尽量使用诸如SUM(SQL语句)或者COLLECT(ABAP语句)。

2．尽可能多地 使用表的索引作为Where分句的条件选项，尽可能让程序只读取一定范围内的记录（比如说，你只准备操作一个月之内的业务数据，那么对于这一个月的业务就 应该有一定的范围取值，如1000～2000）。

3．尽量使用Select A B C INTO TABLE ITAB这样的 语句。这个操作会将所有符合条件的数据一次性地读进内表，这比在Select A B C INTO ITAB... ENDSELECT的循环中添加数据到内表要快。

4．尽可 能使用Select SINGLE语句。

5．使用ABAP排序而不使用order by 。

6．可以 使用视图来代表基本表的查询。

7．可以使用一 些聚合函数、GROUP BY …HAVING，来进行计算和分组统计，也可以来改善查询的效率。

例如：

不推荐

Maxnu = 0.

Select * from zflight where airln = ‘LF’ and cntry = ‘IN’.

Check zflight-fligh > maxnu.

Maxnu = zflight-fligh.

Endselect.

推荐

Select max( fligh ) from zflight into maxnu where airln = ‘LF’ and cntry = ‘IN’.

8．使用where语句

不推荐

Select * from zflight.

Check : zflight-airln = ‘LF’ and zflight-fligh = ‘BW222’.

Endselect.

推荐

Select * from zflight where airln = ‘LF’ and fligh = ‘222’.

Endselect.

9．使用 批量修改内表代替逐行修改

不推荐

Loop at int_fligh.

If int_fligh-flag is initial.

Int_fligh-flag = ‘X’.

Endif.

Modify int_fligh.

Endloop.

推荐

Int_fligh-flag = ‘X’.

Modify int_fligh transporting flag where flag is initial.．

10．使 用二分法查询，提高查询内表数据速度

不推荐

Read table int_fligh with key airln = ‘LF’.

推荐

Read table int_fligh with key airln = ‘LF’ binary search.

11．两 个内表添加使用批量增加代替逐行

不推荐

Loop at int_fligh1.

Append int_fligh1 to int_fligh2.

Endloop.

推荐

Append lines of int_fligh1 to int_fligh2.

12．使 用FOR ALL Entries

不推荐

Loop at int_cntry.

Select single * from zfligh into int_fligh where cntry = int_cntry-cntry.

Append int_fligh.

Endloop.

推荐

Select * from zfligh appending table int_fligh

For all entries in int_cntry

Where cntry = int_cntry-cntry.

1 数据 ——>工作区，工作区——>内表，

2 数据 ——>内表

很明显少 了一个过程 效率自然高了 如果数据量越大,效果是可想而知的

13．避 免使用SELECT DISTINCT语句

使用的 ABAP SORT + DELETE ADJACENT DUPLICATES 代替.

14.        更多地使用动态 数据对象来访问内表。

例：

 不推荐：

 LOOP AT itab.

                        READ TABLE itab_jest

               WITH KEY objnr = itab-objnr.

      ENDLOOP.

      推荐：

      FIELD-SYMBOLS:

            <ls_itab> TYPE typ_jhgb.

 LOOP AT itab ASSIGNING <ls-itab>.

                        READ TABLE itab_jest

               WITH KEY objnr = <ls-itab>-objnr.

      ENDLOOP.

转载请注明：来自一流的窝
本文地址：http://wendaoliu.cn/?p=90801