miércoles, 1 de junio de 2011

2. Realice la implementación de un programa que utilice IF/THEN/ELSE/END IF
Almacene el programa con nombre = consulta_if_then_else_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);

else

dbms_output.put_line('Contador es igual a = '||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