Rangos en vez de “SELECT ... for all entries”

DATA: lr_objnr TYPE RANGE OF coep-objnr,
lwa_objnr LIKE LINE OF lr_objnr.
LOOP AT gts_aufk_afpo ASSIGNING .
CLEAR lwa_objnr.
lwa_objnr-sign = 'I'.
lwa_objnr-option = 'EQ'.
lwa_objnr-low = -objnr.
append lwa_objnr TO lr_objnr.
ENDLOOP.
IF NOT lr_objnr IS INITIAL.
SELECT objnr beknz SUM( mbgbtr ) AS canti SUM( wtgbtr ) AS monto
FROM coep
INTO TABLE ltd_temp
WHERE kokrs = p_kokrs AND
objnr IN lr_objnr AND
perio = p_perio AND
gjahr = p_gjahr AND
lednr = p_lednr AND
beknz IN ('L','S','H')
GROUP BY OBJNR beknz.
* HAVING canti <> 0 AND monto <> 0.
ENDIF.