Capitolul II Structurarea bazelor de date

50
a. LOOP
Un bloc LOOP - END LOOP permite definirea unui ciclu din care se iese
prin executarea unei instrucŃiuni EXIT. InstrucŃiunea EXIT este de regulă plasată
într-un IF a cărui condiŃie trebuie să ajungă să fie satisfăcută pentru a se evita
rularea blocului LOOP în ciclu infinit.
Exemplu:
credit_rating NUMBER := 0;
BEGIN
LOOP
credit_rating := credit_rating + 1;
IF credit_rating > 3 THEN
EXIT; -- iesire imediata din loop
END IF;
END LOOP;
-- dupa EXIT, executia se continuă de aici
DBMS_OUTPUT.PUT_LINE ('Credit rating: ' || TO_CHAR(credit_rating));
IF credit_rating > 3 THEN
RETURN; -- în afara blocului LOOP se foloseşte RETURN, nu EXIT
END IF;
DBMS_OUTPUT.PUT_LINE ('Credit rating: ' || TO_CHAR(credit_rating));
END;
/
Dacă ieşirea din ciclu se poate realiza printr-un simplu IF, se poate înlocui
IF prin instrucŃiunea EXIT WHEN conditie_iesire.
Exemplu:
Exemplu:
LOOP
END LOOP;
IF count > 100 THEN EXIT; ENDIF;
EXIT WHEN count > 100;
credit_rating := credit_rating + 1;
EXIT WHEN credit_rating > 3