6.ESTRUCTURAS DE CONTROL DE FLUJO EN PL/SQL
Existe un número de estructuras de control las
cuales nos permiten cambiar el flujo lógico de sentencias dentro de un
bloque PL/SQL. A continuación abordamos cuatro de ellas: La
instrucción IF,
Las expresiones CASE, Los bucles(LOOP, FOR, WHILE), y la sentencia CONTINUE.
____________________________________________________________________________________
Sentencias IF.
En PL/SQL la estructura de
la sentencia IF es
similar a la estructura de la misma en otros lenguajes de programación. Esta
permite a PL/SQL para realizar acciones selectivas
basadas en condiciones.
Sintaxis:
IF condition THEN
statements;
[ELSIF condition THEN
statements;]
[ELSE
statements;]
END IF;
En la sintaxis:
condition |
Es una
expresión o variable Booleana que devuelve TRUE, FALSE o NULL. |
THEN |
Introduce
una cláusula que asocia la expresión Booleana con la secuencia de
instrucciones que le sigue. |
statements |
Pueden
ser una o más instrucciones de PL/SQL o SQL. (Estas instrucciones pueden incluir
sentencias IF adicionales
y estas contener varios IF, ELSE, y ELSIF anidados.)
Las sentencias de la cláusula THEN se
ejecutan sólo si la condición en la cláusula IF asociada evalúa TRUE. |
ELSIF |
Es una
palabra clave que introduce una expresión Booleana (Si la primera condición
es FALSE o NULL, la palabra clave ELSIF introduce condiciones
adicionales). |
ELSE |
Introduce
la cláusula por defecto que se ejecuta si y sólo si ninguno de
los predicados anteriores (introducidos por IF y ELSIF) resulta TRUE. Las pruebas se ejecutan en secuencia,
de manera que los primeros predicados tienen prioridad sobre los
posteriores (si existen dos predicados Verdaderos, solo el
primero de ellos se ejecutara.) |
END IF |
Marca el final de la
sentencia IF. |
ELSIF y ELSE son opcionales en una instrucción IF. Es posible tener cualquier número
de cláusulas ELSIF pero sólo una cláusula ELSE. END IF marca el final de una
instrucción IF y debe terminar con un punto y coma.
Una instrucción IF puede tener múltiples expresiones
condicionales relacionadas con operadores lógicos como AND, OR y NOT. No hay limitación en el número de
las expresiones condicionales. Sin embargo, estas sentencias deben estar
relacionadas con los operadores lógicos adecuados.
Directrices:
• Puede realizar acciones selectivas
basadas en condiciones encontradas.
• Al escribir código, recuerda la ortografía
de las palabras clave:
--ELSIF es una palabra.
--END
IF es de dos palabras.
• Si la condición
de control Booleana es TRUE, se ejecuta la secuencia de sentencias
asociada; Si la condición de control Booleana es FALSE o NULL, se omite la secuencia de sentencias
asociada. Es permitido cualquier número de cláusulas ELSIF.
• Es recomendable indentar las sentencias
condicionales a ejecutar, ya que esto da mayor claridad y facilita el
mantenimiento.
Ejemplos:
SET SERVEROUTPUT ON
SET VERIFY OFF
DECLARE
v_nombre employees.last_name%TYPE;
v_tiempo NUMBER(2);
v_codigo employees.employee_id%TYPE := &codigo;
BEGIN
SELECT
last_name,
TRUNC(MONTHS_BETWEEN(SYSDATE, hire_date)/12)
INTO
v_nombre,
v_tiempo
FROM
employees
WHERE
employee_id = v_codigo;
--
IF (v_nombre = 'King' AND v_tiempo > 8) OR v_nombre
= 'Moquete' THEN
DBMS_OUTPUT.PUT_LINE('Este es un manda mas!!!');
END IF;
END;
/*Este es un simple ejemplo del uso
de la estructura condicional IF; el SCRIPT pide al
usuario introducir un código de empleado para así recuperar
su apellido y tiempo en la empresa, luego valida los datos extraídos, si el
apellido es King y tiene mas de 8 Años o si el apellido es Moquete(sin
importar el tiempo), un mensaje se mostrara.*/
---OUTPUT:
SET SERVEROUTPUT ON
DECLARE
v_edad NUMBER := 15;
BEGIN
IF v_edad
> 17 THEN
DBMS_OUTPUT.PUT_LINE('Edad: '||v_edad||' Años'||CHR(10)||'El individuo es Mayor de edad!!!');
ELSE
DBMS_OUTPUT.PUT_LINE('Edad: '||v_edad||' Años'||CHR(10)||'El individuo es Menor de edad!!!');
END IF;
END;
/*En el ejemplo vemos el uso de
la cláusula ELSE; como el valor que le pasamos a la
variable v_edad no es mayor que 17, la sentencia ejecutada fue
la contenida en el ELSE.*/
---OUTPUT:
SET SERVEROUTPUT ON
SET VERIFY OFF
DECLARE
v_edad NUMBER;
BEGIN
v_edad := &Edad;
IF v_edad BETWEEN 1 AND 17 THEN
DBMS_OUTPUT.PUT_LINE('Edad: '||v_edad||' Años'||CHR(10)||'El individuo es Menor de edad!!!');
ELSIF v_edad BETWEEN 18 AND 90 THEN
DBMS_OUTPUT.PUT_LINE('Edad: '||v_edad||' Años'||CHR(10)||'El individuo es Mayor de edad!!!');
ELSIF v_edad BETWEEN 91 AND 115 THEN
DBMS_OUTPUT.PUT_LINE('Edad: '||v_edad||' Años'||CHR(10)||'WOW, El individuo es Mayor de edad!'
||CHR(10)||'No
dejes que se vaya sin que te diga la formula');
ELSE
DBMS_OUTPUT.PUT_LINE(v_edad||'
Es una Edad Invalida!!!');
END IF;
END;
/*Este ejemplo muestra el uso
de ELSIF; el cual nos ofrece la posibilidad de dar
una validación mas especifica.*/
---OUTPUT:
____________________________________________________________________________________
Expresiones CASE.
Una expresión CASE devuelve un resultado basado en una o
más alternativas. Para devolver el resultado, la expresión CASE utiliza un selector, que es una
expresión cuyo valor se utiliza para retornar una de varias alternativas.
El selector es seguido por una o más cláusulas WHEN que se comprueban secuencialmente. El
valor del selector determina el resultado a retornar. Si el valor del selector
es igual al valor de una cláusula WHEN, el resultado de esa cláusula WHEN es retornado.
Sintaxis:
CASE selector
WHEN expression1 THEN result1
[WHEN expression2 THEN result2
...
WHEN expressionN THEN resultN]
[ELSE resultN+1]
END;
Otra modalidad de expresión CASE es la expresión CASE buscada, la cual no tiene un selector. Mas bien, las
cláusulas WHEN en las expresiones CASE contienen las condiciones de búsqueda
que generan un valor Booleano en lugar de expresiones que pueden contener
un valor de cualquier tipo.
Sintaxis:
CASE
WHEN search_condition1 THEN result1
[WHEN search_condition2 THEN result2
...
WHEN search_conditionN THEN resultN]
[ELSE resultN+1]
END;
Ejemplos:
SET SERVEROUTPUT ON
SET VERIFY OFF
DECLARE
v_selector VARCHAR2(15)
:= '&VALOR';
v_resultado VARCHAR2(35);
BEGIN
v_resultado := CASE v_selector
WHEN '2' THEN 'La Primera cláusula WHEN.'
WHEN 'A' THEN 'La
Segunda cláusula WHEN.'
WHEN '5' THEN 'La
Tercera cláusula WHEN.'
ELSE 'La
cláusula ELSE.'
END;
--
DBMS_OUTPUT.PUT_LINE('El
valor introducido es: '||v_selector||CHR(10)||
'Por
esta razón entró a '||v_resultado);
END;
/*Este ejemplo muestra el uso de
la expresión CASE con un selector; dependiendo del valor introducido por el usuario
un mensaje diferente se mostrara.*/
---OUTPUT:
SET SERVEROUTPUT ON
SET VERIFY OFF
DECLARE
v_valor VARCHAR2(35)
:= '&VALOR';
v_longitud NUMBER(2)
:= LENGTH(v_valor);
v_resultado VARCHAR2(39);
BEGIN
v_resultado := CASE
WHEN v_longitud < 5 THEN 'Se considera Corta.'
WHEN v_longitud < 15 THEN 'No es Corta pero tampoco Larga.'
WHEN v_longitud < 25 THEN 'Se puede considerar Larga.'
ELSE 'Es
Larguísima.'
END;
--
DBMS_OUTPUT.PUT_LINE('Se
introdujo la Cadena: '||v_valor||CHR(10)||
'Con:
'||v_longitud||' caracter/es, '||v_resultado);
END;
/*Para ver un ejemplo de una expresión CASE buscada,
creamos este SCRIPT que evalúa la cantidad de
caracteres de una cadena introducida por el usuario y de acuerdo a su longitud
nuestra un mensaje.*/
---OUTPUT:
____________________________________________________________________________________
Sentencias CASE.
Recordemos el uso de la sentencia IF. Puede incluir n número de instrucciones PL/SQL en
la cláusula THEN así como también en la cláusula ELSE. Del mismo modo, se pueden incluir
en la sentencia CASE, lo cual resulta más fácil de leer en comparación
con varias sentencias IF y ELSIF.
Cómo difiere una Expresión CASE
de una Sentencia CASE?
Una expresión CASE evalúa la condición y devuelve un
valor, mientras que una sentencia CASE evalúa la condición y lleva a cabo una acción.
Una sentencia CASE puede ser un bloque completo de PL/SQL.
• Las sentencias CASE terminan con END CASE ;
• Las expresiones CASE terminan con END;
• El resultado de retorno en las expresiones CASE no termina con punto y coma (;),
mientras que las instrucciones contenidas en una cláusula THEN de una sentencia CASE deben terminar con punto y coma.
Sintaxis:
CASE selector
WHEN expression1 THEN
statemens;
[WHEN expression2 THEN
statemens;
...
WHEN expressionN THEN
statemens;]
[ELSE
statemens;]
END CASE;
---
CASE
WHEN search_condition1 THEN
statements;
[WHEN search_condition2 THEN
statements;
...
WHEN search_conditionN THEN
statements;]
[ELSE
statements;]
END CASE;
Nota: Mientras que una instrucción IF es capaz de no realizar ninguna
acción (las condiciones podrían ser todas falsas y la cláusula ELSE no es obligatoria), una
sentencia CASE debe ejecutar alguna sentencia PL/SQL,
de no hacerlo se levantaría un ERROR.
Ejemplos:
SET SERVEROUTPUT ON
DECLARE
v_dia VARCHAR2(9);
BEGIN
SELECT --Puede
cambiar la linea comentada para ver distintos resultados(-5 = 5 días atrás)
--TO_CHAR(SYSDATE, 'DAY', 'NLS_DATE_LANGUAGE =
SPANISH')
TO_CHAR(SYSDATE-5, 'DAY', 'NLS_DATE_LANGUAGE
= SPANISH')
INTO
v_dia
FROM dual;
--
CASE
SUBSTR(v_dia, 1,2)
WHEN 'LU' THEN
DBMS_OUTPUT.PUT_LINE('Iniciando la semana laboral, que flojera.');
WHEN 'MA' THEN
DBMS_OUTPUT.PUT_LINE('Fin de semana lejos, sigue la flojera.');
WHEN 'MI' THEN
DBMS_OUTPUT.PUT_LINE('Ombligo de la semana, no se reportan mejoras de
animo.');
WHEN 'JU' THEN
DBMS_OUTPUT.PUT_LINE('Llegó algo de esperanza al cuerpo, el futuro se
pinta mejor.');
ELSE
DBMS_OUTPUT.PUT_LINE('Fiesta Carajo....');
END
CASE;
END;
/*Este ejemplo evalúa el Día de
la semana y de acuerdo a el muestra un estado de animo.*/
---OUTPUT:
SET SERVEROUTPUT ON
SET VERIFY OFF
DECLARE
v_caracter CHAR(1);
v_tipo
VARCHAR2(10);
BEGIN
v_caracter := '&Carácter'; ---Debe
introducir solo un carácter, de lo contrario una exception se levantará.
--
CASE
WHEN REGEXP_LIKE(v_caracter, '[[:digit:]]') THEN
v_tipo
:= 'Numérico';
WHEN REGEXP_LIKE(v_caracter, '[[:punct:]]') OR REGEXP_LIKE(v_caracter, '[[:space:]]') THEN
v_tipo := 'Especial';
ELSE
CASE
WHEN 'AEIOU' LIKE '%'||UPPER(v_caracter)||'%' THEN
v_tipo := 'Vocal';
ELSE
v_tipo := 'Consonante';
END CASE;
END CASE;
--
DBMS_OUTPUT.PUT_LINE(q'[El carácter introducido: ']'||v_caracter||q'[',
es ]'||v_tipo);
END;
/*Este ejemplo pide al
usuario introducir un carácter y luego evalúa que
tipo de carácter es.*/
---OUTPUT:
____________________________________________________________________________________
Manejando Valores NULL.
Cuando se trabaja con nulos, puede evitar algunos
errores comunes teniendo en cuenta las siguientes reglas:
• Comparaciones simples que involucran valores
nulos siempre producen NULL.
• Si aplica el operador lógico NOT a un valor nulo, obtiene NULL.
• Si en una sentencia de control condicionar
la condición resulta NULL, su secuencia de
sentencias asociada no se ejecuta.
Consideremos el siguiente ejemplo:
a := 5;
b := NULL;
...
IF a != b THEN -- = NULL, no
TRUE
sequence_of_statements; -- Secuencia de instrucciones que
no se ejecuta.
END IF;
Se puede esperar que la secuencia
de sentencias se ejecute debido a que a y b parecen
desigual. Pero como los valores nulos son indeterminados, se desconoce si a y b son
iguales. Por esta razón, la condición IF resulta NULL y la secuencia de sentencias se pasa
por alto.
a := NULL;
b := NULL;
...
IF a = b THEN -- = NULL, no
TRUE
sequence_of_statements; -- Secuencia de instrucciones que
no se ejecuta.
END IF;
En el último ejemplo vemos un escenario parecido, a y b parecen
iguales. Pero, de nuevo, su igualdad es desconocida, por lo que la
condición IF es NULL y la secuencia de sentencias no se
ejecuta.
____________________________________________________________________________________
Control Iterativo: Sentencias de Bucle(LOOP).
PL/SQL proporciona varias estructuras de Bucles
útiles para repetir una instrucción o secuencia de instrucciones varias veces.
Los bucles se utilizan principalmente para ejecutar sentencias varias veces
hasta que se alcanza una condición de salida. Es obligatorio tener una
condición de salida en un bucle; de lo contrario, sería infinito.
Los bucles son el tercer tipo de estructuras de control. PL/SQL
proporciona los siguientes tipos de bucles:
• Bucle Básico(Basic LOOP) que realiza acciones repetitivas sin condiciones
generales.
• Bucle FOR(FOR LOOP)que realiza acciones iterativas en base a un
conteneo.
• Bucle WHILE que realiza acciones iterativas sobre la base de
una condición.
Nota: Una sentencia de salida(EXIT) puede ser utilizado para terminar bucles. Un
bucle básico debe tener un EXIT.
Basic LOOP.
La forma más simple de una sentencia LOOP es el bucle básico, que encierra una
secuencia de sentencias entre las palabras claves LOOP y END LOOP. Cada vez que el
flujo de ejecución alcanza la cláusula END LOOP, el control
retorna a la cláusula LOOP inicial para repetir la instrucción. Un bucle
básico permite la ejecución de sus sentencias al menos una vez, incluso
cuando la condición de salida se cumple antes de entrar en el bucle. Sin
la sentencia EXIT, el bucle sería infinito.
Sintaxis:
LOOP
statement1;
. . .
EXIT [WHEN condition];
END LOOP;
La Sentencia EXIT.
Puede utilizar la instrucción EXIT para terminar un bucle. Al hacerlo el
control pasa a la siguiente instrucción después de la sentencia END LOOP. Puede emitir EXIT como una acción dentro de una
sentencia IF o como una sentencia independiente dentro del
bucle. La sentencia EXIT debe ser colocada dentro de un bucle.
Adicionalmente, puede usar la cláusula WHEN para habilitar la terminación
condicional del bucle. Cuando se encuentra la instrucción EXIT, se evalúa la condición de la
cláusula WHEN. Si la condición da TRUE, el bucle finaliza y el control pasa
a la siguiente sentencia después del bucle.
Un bucle básico puede contener varias sentencias EXIT, pero se recomienda tener sólo un
punto de salida.
Ejemplo:
DECLARE
v_countryid locations.country_id%TYPE := 'CA';
v_loc_id locations.location_id%TYPE;
v_counter NUMBER(2)
:= 1;
v_new_city locations.city%TYPE := 'Montreal';
BEGIN
SELECT MAX(location_id)
INTO v_loc_id
FROM locations
WHERE country_id = v_countryid;
---
LOOP
INSERT INTO locations(
location_id,
city,
country_id
)
VALUES(
(v_loc_id +
v_counter),
v_new_city,
v_countryid
);
v_counter := v_counter + 1;
EXIT WHEN v_counter > 3;
END
LOOP;
END;
/*El ejemplo anterior consulta el
código de locación mas alto de la tabla locations, luego utiliza
un bucle básico para insertar 3 registros nuevos en misma tabla.*/
---
WHILE LOOP.
Puede utilizar el bucle WHILE para repetir una secuencia de instrucciones hasta
que la condición de control ya no sea TRUE. La condición se evalúa al inicio de cada
iteración. El ciclo termina cuando la condición es FALSE o NULL. Si al inicio del bucle la condición
es FALSE o NULL, no se realizan más iteraciones. Por lo tanto, es posible
que ninguna de las instrucciones dentro del bucle se ejecutan.
Si las variables que intervienen en las condiciones de salida no cambian
durante el cuerpo del bucle, la condición permanece TRUE y el bucle no termina.
Nota: Si la condición da NULL, el bucle se pasa por alto y el control pasa a la
siguiente instrucción.
Ejemplo:
DECLARE
v_countryid locations.country_id%TYPE := 'CA';
v_loc_id locations.location_id%TYPE;
v_new_city locations.city%TYPE := 'Montreal';
v_counter NUMBER := 1;
BEGIN
SELECT MAX(location_id)
INTO v_loc_id
FROM locations
WHERE country_id = v_countryid;
---
WHILE v_counter <= 3 LOOP
INSERT INTO locations(
location_id,
city,
country_id
)
VALUES(
(v_loc_id +
v_counter),
v_new_city,
v_countryid
);
v_counter := v_counter + 1;
END
LOOP;
END;
/*Vemos ahora el mismo ejemplo de la
sentencia LOOP(básico), ahora con WHILE LOOP.*/
---
FOR LOOP.
Los bucles FOR tienen la misma estructura general que el bucle básico.
Adicionalmente, tienen una instrucción de control antes de la palabra
clave LOOP la cual establece el número de iteraciones a
ejecutar.
Sintaxis:
FOR counter IN [REVERSE] lower_bound..upper_bound LOOP
statement1;
statement2;
. . .
END LOOP;
En la sintaxis:
counter |
Es un
número entero declarado implícitamente cuyo valor aumenta o disminuye
automáticamente (disminuye si se utiliza la palabra clave REVERSE) por 1 en cada iteración del bucle hasta
que el límite superior o límite inferior se alcanza. |
REVERSE |
Hace
que el contador disminuya con cada iteración
desde el límite superior hasta
el límite inferior. Nota: El límite inferior siempre es referenciado en
primer lugar. |
lower_bound upper_bound |
Especifica el límite inferior. Especifica el límite superior. |
No declare el contador(counter), ya que este se
declara implícitamente como un entero.
Nota: La secuencia de instrucciones se ejecuta cada vez que se
incrementa o disminuye el contador, de acuerdo a los dos límites. El límite
inferior y superior del bucle pueden ser literales, variables o expresiones,
pero deben evaluar a enteros. Los límites se redondean a números enteros; es
decir, 11/3 y 8/5 son límites válidos. El rango límite inferior-superior es
inclusive. Si el límite inferior es un número entero mayor que el límite
superior, la secuencia de instrucciones no se ejecuta.
Directrices de los LOOP FOR.
• Sólo hacer referencia al
contador(counter) dentro del bucle; ya que el mismo no está definido fuera.
• No es posible asignar un valor al contador.
• Ninguno de los Límites debe ser NULL.
Nota: Los límites inferior y superior de una sentencia LOOP no necesitan ser literales numéricos.
Pueden ser expresiones compatibles con valores numéricos.
Ejemplo:
SET SERVEROUTPUT ON
BEGIN
DBMS_OUTPUT.PUT_LINE('Este LOOP es creciente!!!');
FOR I IN 1..7 LOOP
DBMS_OUTPUT.PUT_LINE(I);
END LOOP;
--
DBMS_OUTPUT.PUT_LINE('Este LOOP es decreciente!!!');
FOR I IN REVERSE 1..7 LOOP
DBMS_OUTPUT.PUT_LINE(I);
END LOOP;
END;
/*Este ejemplo muestra el uso de los
FOR LOOP.*/
---OUTPUT:
____________________________________________________________________________________
Los Bucles y sus Usos.
• Utilice el bucle básico(LOOP) cuando se espera ejecutar las
sentencias por lo menos una vez.
• Utilice el bucle WHILE si la condición
debe ser evaluada al inicio de cada iteración.
• Utilice el bucle FOR si se conoce el número de
iteraciones.
Un bucle básico permite la ejecución de sus
sentencias al menos una vez, incluso si la condición de salida se cumple al
entrar en el bucle. Sin la instrucción EXIT, el bucle sería infinito.
Puede utilizar el bucle WHILE para repetir una
secuencia de instrucciones hasta que la condición de control ya no esa TRUE. La condición se evalúa al inicio de
cada iteración. El ciclo termina cuando la condición es FALSE o NULL. No se realizan iteraciones si la
condición es FALSE al del inicio del bucle.
Los bucles FOR tienen una sentencia de control antes
de la palabra clave LOOP la cual determina el número de iteraciones a
realizar. Utilice un bucle FOR si se conoce el número de iteraciones a realizar.
____________________________________________________________________________________
Los Bucles Anidados y Las Etiquetas.
Puede anidar los bucles FOR, WHILE, y básicos(LOOP) dentro de otros. La terminación de
un bucle anidado no termina el bucle exterior a no ser que se produzca una
excepción. Sin embargo, puede etiquetar bucles y salir del bucle exterior con
la instrucción EXIT.
Los nombres de etiqueta siguen las mismas reglas
que los otros identificadores. Una etiqueta se coloca antes de una sentencia,
ya sea en la misma línea o en una línea separada. Etiquete bucles básicos
colocando el nombre antes de la palabra LOOP dentro de los delimitadores de
etiqueta (<<etiqueta>>). En bucles FOR y WHILE, coloque la etiqueta antes FOR o WHILE.
Si el bucle está etiquetado, el nombre de etiqueta
puede ser incluido (opcionalmente) después de la instrucción END LOOP para mayor claridad.
Ejemplo:
SET SERVEROUTPUT ON
DECLARE
v_contador1 NUMBER;
v_contador2 NUMBER;
BEGIN
<<Bucle_LOOP>>
LOOP
v_contador1 := NVL(v_contador1,0)+1;
v_contador2 := NULL;
--
DBMS_OUTPUT.PUT_LINE('-Iteracion: '||v_contador1||' del Bucle_LOOP-');
--
<<Bucle_WHILELOOP>>
WHILE NVL(v_contador2,0)
< 2 LOOP
v_contador2 := NVL(v_contador2,0)+1;
--
DBMS_OUTPUT.PUT_LINE('--Iteracion:
'||v_contador2||' del Bucle_WHILELOOP--');
--
<<Bucle_FORLOOP>>
FOR I IN 1..2 LOOP
DBMS_OUTPUT.PUT_LINE('---Iteracion:
'||I||' del Bucle_FORLOOP---');
END LOOP Bucle_FORLOOP;
END LOOP Bucle_WHILELOOP;
--
EXIT WHEN v_contador1
> 1;
END LOOP Bucle_LOOP;
END;
/*En el anterior ejemplo tenemos
algunos bucles anidados, en los cuales se muestra en pantalla sus iteraciones
en forma de nivel.*/
---OUTPUT:
___________________________________________________________________________________
La Sentencia CONTINUE.
La sentencia CONTINUE le permite
transferir el flujo de control dentro de un bucle a una nueva iteración. A
partir de Oracle 11g, PL/SQL ofrece
esta funcionalidad. Antes de esa version, se podía codificar una solución
mediante el uso de variables Booleanas e instrucciones condicionales que
simulaban la misma funcionalidad de CONTINUE. En algunos casos, dichas soluciones
resultaban menos eficientes.
La sentencia CONTINUE le ofrece un medio
sencillo para el control de iteraciones dentro del ciclo. En el mayor de los
casos CONTINUE resulta más eficiente que las soluciones
usadas anteriormente.
La sentencia CONTINUE se utiliza
comúnmente para filtrar datos dentro del bucle antes de iniciar el
procesamiento principal.
Ejemplos:
SET SERVEROUTPUT ON
DECLARE
v_total SIMPLE_INTEGER := 0;
BEGIN
FOR i IN 1..10 LOOP
v_total
:= v_total + i;
DBMS_OUTPUT.PUT_LINE('Iteracion: '|| i||', El
Total es: '|| v_total);
CONTINUE WHEN i > 5;
v_total
:= v_total + i;
DBMS_OUTPUT.PUT_LINE('Fuera del LOOP, el
Total es:'|| v_total);
END LOOP;
END;
/*E aquí un ejemplo de la
sentencia CONTINUE dentro de un LOOP; notar que en
este SCRIPT, las sentencias debajo de CONTINUE solo
se ejecutan en las primeras 5 iteraciones.*/
---OUTPUT:
SET SERVEROUTPUT ON
DECLARE
v_total NUMBER := 0;
BEGIN
<<Top_LOOP>>
FOR i IN 1..10 LOOP
v_total
:= v_total + 1;
DBMS_OUTPUT.PUT_LINE('El Total es:
' || v_total);
FOR j IN 1..10 LOOP
CONTINUE Top_LOOP WHEN i + j > 5;
v_total := v_total + 1;
END LOOP;
END LOOP;
END;
/*En este ejemplo vemos como la
sentencia CONTINUE nos permite salir de un LOOP anidado a
otro mas externo.*/
---OUTPUT:
_____________________________________________________________________________________
Comentarios
Publicar un comentario