DEFINE x INT; LET x = 0; BEGIN <<increment_x>> BEGIN LET x = x + 1; END; IF x < 10 THEN GOTO increment_x; END IF; END; END PROCEDURE;
<<lb_for>> FOR i IN 1..5 i := i +1 ; END FOR lb_for;
<<outer>> LOOP ... LOOP ... EXIT outer WHEN ... -- exit from both loops END LOOP; ... END LOOP outer;