Split ranges

data : lv_count  type i,
lv_max    type i,
lv_min    type i,

ranges: rng_vbelv for vbfa-vbelv.
ranges: lrng_vbelv for vbfa-vbelv.  "local range.

clear: lv_count, lv_max.
lv_min = 0.
describe table rng_vbelv lines lv_count.
while lv_max lt lv_count.
lv_max = lv_min + 1000.
if lv_max gt lv_count.
lv_max = lv_count.
endif.
refresh lrng_vbelv.
loop at rng_vbelv from lv_min to lv_max.
append rng_vbelv to lrng_vbelv.
endloop.
lv_min = lv_max.
select b~vbeln a~vbelv b~wadat_ist b~kunnr b~ernam b~erzet b~erdat
appending table lt_itab
from vbfa as a
inner join likp as b
on a~vbeln eq b~vbeln
where a~vbelv in lrng_vbelv
order by b~vbeln.
endwhile.

Bir Cevap Bırakın

XHTML: Şu etiketleri kullanabilirsiniz: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>