FW: ABAP Code for Parallel Cursor

Abstract

This page will explain how to code very efficiently for nested unrelated tables. The article describes how to improve the performance of processing huge data amounts.

Problem Description

The most common performance problem that occurs in ABAP programs is because of huge number of records in the internal tables. It becomes a severe performance problem if a program has huge nested internal tables. How much ever efficient data select routines are, data processing routines would be contributing significantly for the bad performance. When analyzed it would be revealed that the where condition that is used in inner loops expend a significant amount of processing time. The idea is to avoid where conditions in the inner loops by maintaining the loop indexes manually.

Conventional Code for nested loops

Conventional Method

loop at lt_vbpa into wa_vbpa. loop at lt_kna1 into wa_kna1 where kunnr = wa_vbpa-kunnr. ****** Your Actual logic within inner loop ****** endloop. endloop.

Code sample: Parallel Cursor method

Preferred Method

sort: lt_vbpa by kunnr, "Sorting by key is very important lt_kna1 by kunnr. "Same key which is used for where condition is used here loop at lt_vbpa into wa_vbpa. read lt_kna1 into wa_kna1 " This sets the sy-tabix with key kunnr = wa_vbpa-kunnr binary search. if sy-subrc = 0. "Does not enter the inner loop v_kna1_index = sy-tabix. loop at lt_kna1 into wa_kna1 from v_kna1_index. "Avoiding Where clause if wa_kna1-kunnr <> wa_vbpa-kunnr. "This checks whether to exit out of loop exit. endif. ****** Your Actual logic within inner loop ****** endloop. "KNA1 Loop endif. endloop. " VBPA Loop