FOR Lcntr IN 1..20 LOOP LCalc := Lcntr * 31; END LOOP; FOR Lcntr IN REVERSE 1..15 LOOP LCalc := Lcntr * 31; END LOOP; for abs_lines in (select * from dual ) loop null; end loop;