You can use the OPEN CURSOR concept
example:
OPEN CURSOR WITH HOLD bkpf_curs FOR
SELECT
bukrs
belnr
gjahr
budat
cpudt
cputm
blart
bktxt
usnam
waers
awtyp
awkey
FROM bkpf
* into table lt_bkpf
WHERE bukrs IN lr_bukrs AND
bldat IN it_seldate AND
blart IN lr_blart .
DO.
FETCH NEXT CURSOR bkpf_curs INTO CORRESPONDING FIELDS OF
TABLE lt_bkpf
PACKAGE SIZE l_pack_size.
IF sy-subrc <> 0.
EXIT.
ENDIF.