3. Realice la implementación de un programa que utilice IF/THEN/ELSIF/…/END IF
Almacene el programa con nombre = consulta_if_then_elsif_end_if.sql
declare
l_contador number:=10; ---inicializa valor en 0
l_fecha date:=sysdate; ---asigna fecha del sistema
l_nombre varchar2(50); ---variable sin valor inicial
--Seccion de ejecucion del prograqma
begin
l_contador :=l_contador + 1; --sumar 1 al valor actual del contador
if l_contador = 1 then
dbms_output.put_line('Contador es igual a = '||l_contador);
elsif l_contador = 2 then
dbms_output.put_line('Contador es igual a = '||l_contador);
elsif l_contador = 3 then
dbms_output.put_line('Contador es igual a = '||l_contador);
elsif l_contador = 4 then
dbms_output.put_line('Contador es igual a = '||l_contador);
else
dbms_output.put_line('Contador tiene otro valor = '||l_contador);
end if;
l_nombre :='PEDRO RIVERA'; --asigna valor a la variable nombre
dbms_output.put_line(l_nombre);
--seccion de tratamientos de errores del programa
exception
--rutina generica de tratamiento d cualquier tipo de error
when others then
--imprimir un mensaje de error si existe
raise_application_error(-20100,'Error : '||sqlcode||'desc : '||sqlerrm);
end;
No hay comentarios:
Publicar un comentario