SAP 多层LOOP嵌套优化

文章通过对比两种不同的数据处理方法——普通循环和优化后的循环,展示了在大量数据处理时时间效率的显著差异。通过对SAPABAP代码的时间戳记录,分析了处理相同数据量时,排序和二分查找如何改善循环性能。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

量越大,时间差距越明显!!!!!!!

DATA:lv_time_s TYPE timestampl,
     lv_time_e TYPE timestampl,
     lv_text   TYPE timestampl.
DATA:lv_tabix  TYPE i.

SELECT * FROM mara INTO TABLE @DATA(it_mara) UP TO 20000 ROWS.              "量越大 时间差越明显

CHECK it_mara IS NOT INITIAL.

SELECT * FROM marc INTO TABLE @DATA(it_marc) FOR ALL ENTRIES IN @it_mara WHERE matnr = @it_mara-matnr.

GET TIME STAMP FIELD lv_time_s.

DATA ls_data LIKE marc.
DATA lt_data LIKE TABLE OF marc.
LOOP AT it_mara INTO DATA(is_mara).
  LOOP AT it_marc INTO DATA(is_marc) WHERE matnr = is_mara-matnr.
    MOVE-CORRESPONDING is_marc TO ls_data.
    APPEND ls_data TO lt_data.
    CLEAR ls_data.
  ENDLOOP.
ENDLOOP.
GET TIME STAMP FIELD lv_time_e.

lv_text = lv_time_e - lv_time_s.

DESCRIBE TABLE lt_data LINES DATA(lv_num_l).
WRITE: /(14) '普通循环时间:', lv_text, '条目数量:', lv_num_l.

CLEAR:lv_text, lv_time_e, lv_time_s,lt_data.

GET TIME STAMP FIELD lv_time_s.

SORT:it_mara BY matnr,
     it_marc BY matnr.
LOOP AT it_mara INTO is_mara.
  READ TABLE it_marc TRANSPORTING NO FIELDS WITH KEY matnr = is_mara-matnr BINARY SEARCH.
  IF sy-subrc = 0.
    lv_tabix = sy-tabix.

    LOOP AT it_marc FROM lv_tabix INTO is_marc.
      IF is_mara-matnr <> is_marc-matnr.
        EXIT.
      ENDIF.

      MOVE-CORRESPONDING is_marc TO ls_data.
      APPEND ls_data TO lt_data.
      CLEAR ls_data.
    ENDLOOP.

  ENDIF.

ENDLOOP.
GET TIME STAMP FIELD lv_time_e.

DESCRIBE TABLE lt_data LINES DATA(lv_num_2).
lv_text = lv_time_e - lv_time_s.

WRITE: /(14) '优化循环时间:', lv_text, '条目数量:', lv_num_2.

 

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值