Code: Alles auswählen.
Do.
clear itabTable.
SELECT *
into itabTable
FROM s671 CLIENT SPECIFIED UP TO 2000 ROWS
WHERE mandt = sy-mandt
.....
and kunnr > minKunnr
order by kunnr.
If sy-dbcnt < 2000.
Ende = ?X?.
endif.
loop at itabTable...
VERARBEITUNG
minKunnr = itabTable-kunnr.
endloop.
If ende = ?X?
Exit.
Endif.
Enddo.
Code: Alles auswählen.
Do.
clear itabTable.
SELECT *
into itabTable
FROM s671 CLIENT SPECIFIED
WHERE mandt = sy-mandt.
.....
and kunnr in ra_Kunnr.
loop at itabTable...
VERARBEITUNG
endloop.
If Ende = ?X?.
Exit.
Endif.
ra_kunnr-low = ra_kunnr-high + 1.
ra_kunnr-high = ra_kunnr-low + 2000.
?.
If ra_kunnr-high >= max_kunnr.
ra_kunnr-high = max_kunnr.
Ende = ?X?.
Endif.
Enddo.