WHILE
WHILE n<100 LOOP n := n+1; END LOOP;
FOR var in [REVERSE] debut .. fin [BY increment] LOOP
FOR n in 1 .. 100 LOOP END LOOP;