PLSQL Basico

PL/SQL Bsico
Manual del Alumno
INNOVA Desarrollos Informticos, SL
INNOVA Desarrollos Informticos, SL Paseo Mallorca, 34 Entlo. C 07012 Palma de Mallorca Tel. 971 72 14 04
Ttulo: Versin: Fecha Edicin: Autores:
PL/SQL Bsico 1.0 Junio de 2004 Javier Jofre Gonzlez-Granda
INTRODUCCIN
Prlogo
PL/SQL, bajo este nombre se esconde el Lenguaje de manipulacin de datos propietario de Oracle. Conceptualmente, Oracle lo define como una extensin procedimental del SQL en realidad, y para entenderlo mejor, se trata de un potente lenguaje de acceso a Bbdd, mediante el cual podemos estructurar y controlar las sentencias SQL que definamos para nuestra Bbdd. PL/SQL sigue la filosofa de los modernos lenguajes de programacin, es decir, permite definir y manipular distintos tipos de datos, crear procedimientos, funciones, contempla recursividad, etc Quizs la diferencia ms importante, y algo que debemos tener siempre muy en cuenta, es que la eficiencia de un programa en PL/SQL se mide sobre todo por la eficiencia de los accesos a Bbdd. La consecuencia ms inmediata de lo dicho anteriormente, es que para poder programar de manera ptima en PL/SQL, se debe tener un dominio notable del propio SQL; cumpliendo esta premisa, y algunas otras que veremos ms adelante, obtendremos una mejora sustancial en nuestras aplicaciones que interactuen con Bbdd.
NDICE
INTRODUCCIN ................................................................. 3
Prlogo............................................................................................................... 3
NDICE .............................................................................. 4 FICHA INFORMATIVA DEL MDULO. .................................. 6

Nombre .............................................................................................................. 6 Meta .................................................................................................................... 6 Requisitos del alumno ...................................................................................... 6 Bibliografa......................................................................................................... 6
1 UNIDAD 4:INTRODUCCIN A PL/SQL ............................ 7

Objetivo general de la unidad ......................................................................... 7 Objetivos especficos........................................................................................ 7 Contenidos......................................................................................................... 7 Cuaderno de notas............................................................................................ 8 1.1 Introduccin............................................................................................... 10 1.2 Tipos de Datos........................................................................................... 16 1.3 Declaraciones ............................................................................................. 22 1.4 mbito y Visibilidad.................................................................................. 32 1.5 Asignaciones............................................................................................... 34 1.6 Expresiones y Comparaciones................................................................. 35 1.7 Funciones Soportadas ............................................................................... 39
2 UNIDAD 5:ESTRUCTURAS DE CONTROL ......................... 41

Objetivo general de la unidad ....................................................................... 41 Objetivos especficos...................................................................................... 41 Contenidos....................................................................................................... 41 Cuaderno de notas.......................................................................................... 42 2.1 Introduccin............................................................................................... 44 2.2 Control Condicional.................................................................................. 44 2.3 Control Iterativo ........................................................................................ 47 2.4 Control Secuencial..................................................................................... 54
3 UNIDAD 6:INTERACCIN CON ORACLE ......................... 58

Objetivo general de la unidad ....................................................................... 58
Pg. 4
Objetivos especficos...................................................................................... 58 Contenidos....................................................................................................... 58 Cuaderno de notas.......................................................................................... 59 3.1 Soporte SQL............................................................................................... 61 3.2 Manejando Cursores.................................................................................. 66 3.3 Empaquetando Cursores .......................................................................... 71 3.4 Utilizacin de Cursores con bucles FOR............................................... 73
4 UNIDAD 7: MANEJO DE ERRORES .................................. 75

Objetivo general de la unidad ....................................................................... 75 Objetivos especficos...................................................................................... 75 Contenidos....................................................................................................... 75 Cuaderno de notas.......................................................................................... 76 4.1 Introduccin............................................................................................... 78 4.2 Ventajas de las excepciones...................................................................... 79 4.3 Excepciones Predefinidas......................................................................... 80 4.4 Excepciones definidas por el usuario ..................................................... 82
5 UNIDAD 8: SUBPROGRAMAS Y PACKAGES ........................ 88

Objetivo general de la unidad ....................................................................... 88 Objetivos especficos...................................................................................... 88 Contenidos....................................................................................................... 88 Cuaderno de notas.......................................................................................... 89 5.1 Ventajas de los subprogramas.................................................................. 91 5.2 Procedimientos y Funciones .................................................................... 92 5.3 Recursividad en PL/SQL ......................................................................... 93 5.4 Concepto de Package y definicin .......................................................... 93 5.5 Ventajas de los Packages........................................................................... 96
6 ANEXO 3:EJERCICIOS..................................................... 98
6.1 Ejercicios de la Unidad 4 .......................................................................... 98 6.2 Ejercicios de la Unidad 5 ........................................................................ 104 6.3 Ejercicios de la Unidad 6 ........................................................................ 106 6.4 Ejercicios de la Unidad 7 ........................................................................ 108 6.5 Ejercicios de la Unidad 8 ........................................................................ 108
Pg. 5
FICHA INFORMATIVA DEL MDULO.

Nombre
PL/SQL Bsico
Meta
Que el Alumno adquiera los conocimientos bsicos sobre estructuras de datos y sentencias, necesarios para el desarrollo de aplicaciones que llamen a subprogramas PL/SQL en el acceso a Bbdd.
Requisitos del alumno

Poseer conocimientos de Bbdd, as como del lenguaje SQL utilizado por la plataforma Oracle. Tambin es necesario conocer mnimamente los fundamentos de la Programacin estructurada.
Bibliografa
PL/SQL Users Guide and Reference, y varios artculos sobre PL/SQL obtenidos de Internet.
UNIDAD 4:INTRODUCCIN A PL/SQL

Objetivo general de la unidad
Asimilar los conceptos bsicos que se manejan dentro de la programacin en PL/SQL.
Objetivos especficos
Conocer los tipos de datos soportados por PL/SQL, as como la sintaxis bsica de las sentencias que utiliza.
Contenidos
Introduccin Tipos de Datos Declaraciones mbito y Visibilidad Asignaciones Expresiones y Comparaciones Funciones Soportadas
Cuaderno de notas
PL/SQL Bsico Unidad 4: Introduccin a PL/SQL
Pg. 9
1.1
Introduccin
Cuando escribimos un programa en PL/SQL, utilizamos un conjunto especfico de caracteres. El conjunto de caracteres soportado es el siguiente: Los caracteres maysculas y minsculas A Z, a z Los nmeros 0 9 Tabulaciones, espacios y retornos de carro Los smbolos ( ) + - * / < > = ~ ; : . @ % , # $ ^ & _ | {}[]
PL/SQL no es case sensitive, por lo tanto no distingue entre maysculas y minsculas, excepto para un par de casos que comentaremos ms adelante. 1.1.1
Unidades Lxicas
Una sentencia de PL/SQL contiene grupos de caracteres, llamados Unidades Lxicas, las cuales se clasifican de la siguiente forma: Delimitadores (Smbolos simples y compuestos) Identificadores, los cuales incluyen a las palabras reservadas Literales Comentarios bonificacion := salario * 0.10; -- Clculo de Bonus contiene las siguientes unidades lxicas: identificadores: bonificacion y salario smbolo compuesto: := smbolos simples: * y ; literal numrico: 0.10 comentario: -- Clculo de Bonus
Por ejemplo, la siguiente sentencia:
Para mejorar la lectura de un cdigo fuente, podemos (y de hecho debemos) separar las unidades lxicas por Espacios o Retornos de Carro, siempre manteniendo las reglas bsicas del lenguaje. Por ejemplo, la siguiente sentencia es vlida: IF x>y THEN max:=x;ELSE max:=y;END IF; Sin embargo, deberamos escribirla as para facilitar su lectura:
IF x>y THEN max:=x; ELSE max:=y; END IF; Vamos a ver en detalle cada una de las Unidades Lxicas.
1.1.2
Delimitadores
Un delimitador es un smbolo simple o compuesto, que tiene un significado especial en PL/SQL. Veamos cada uno de los tipos.
1.1.2.1
Smbolos simples
La lista y significado de los smbolos simples son los siguientes: + % . / ( ) : , * = < > @ ; Operador de suma Indicador de Atributo Carcter delimitador de String Selector Operador de divisin Expresin o delimitador de lista Expresin o delimitador de lista Indicador de variable host Separador de Items Operador de multiplicacin Delimitador de identificadores Operador relacional Operador relacional Operador relacional Indicador de acceso remoto Terminador de sentencia Resta/Operador de negacin
Pg. 11
1.1.2.2
Smbolos compuestos
La lista y significado de smbolos compuestos son los siguientes: ** != Operador de exponenciacin Operador relacional <> Operador relacional ~= Operador relacional <= Operador relacional >= Operador relacional := .. || Operador de Asignacin Operador de rango Operador de concatenacin => Operador de asociacin
<< (Comienzo) delimitador de etiqueta >> (Fin) delimitador de etiqueta -/* */ Indicador de comentario para una sola lnea (Comienzo) delimitador de comentario de varias lneas (Fin) delimitador de comentario de varias lneas
1.1.3
Identificadores
Los identificadores se utilizan para dar nomenclatura a unidades e items de un programa PL/SQL, el cual puede incluir constantes, variables, excepciones, cursores, cursores con variables, subprogramas y packages. Un identificador consiste en una letra seguida, de manera opcional, de ms letras, nmeros, signos de dlar, underscores, y signos numricos. Algunos caracteres como % - / y espacios son ilegales. Ejemplo: mi_variable mi variable mi-variable -- Identificador legal -- Identificador Ilegal -- Identificador Ilegal
Se pueden usar maysculas, minsculas, o mezcla de ambas ya hemos comentado que PL/SQL no es case sensitive, con lo cual no las diferenciar, exceptuando el caso en que estemos ante tratamiento de Strings, o bien literales de un solo carcter.
Pg. 12
Veamos algn ejemplo: minombre MiNombre MINOMBRE -- Igual que minombre -- Igual que minombre
La longitud de un identificador no puede exceder los 30 caracteres. Por supuesto, y esto casi obvia decirlo, puesto que sigue las reglas bsicas de la programacin, los identificadores deben ser siempre descriptivos. 1.1.3.1
Palabras Reservadas
Algunos identificadores, llamados Palabras Reservadas, tienen un significado sintctico especial para PL/SQL, y no pueden ser redefinidas; un claro ejemplo son las palabras BEGIN y END. DECLARE end BOOLEAN; DECLARE end_film BOOLEAN; -- Legal -- Ilegal
Las palabras reservadas se suelen poner en maysculas, para facilitar la lectura del cdigo fuente. 1.1.3.2
Identificadores Predefinidos
Los identificadores globales declarados en el package STANDAR, como por ejemplo la excepcin INVALID_NUMBER, pueden ser redeclarados sin embargo, la declaracin de identificadores predefinidos es un error, puesto que las declaraciones locales prevalecen sobre las globales.
1.1.3.3
Identificadores con Comillas Dobles

Por Flexibilidad, PL/SQL permite incluir identificadores con dobles comillas. Estos identificadores no son necesarios muy a menudo, pero a veces pueden ser de gran ayuda. Pueden contener cualquier secuencia de caracteres, incluyendo espacios, pero excluyendo las comillas dobles. Veamos algunos ejemplos:
Pg. 13
X+Y ultimo nombre switch on/off La longitud mxima para este tipo de identificadores es de 30 caracteres. Aunque se permite, la utilizacin de palabras reservadas por PL/SQL como identificadores con doble comillas, es una mala prctica. Hemos dicho, no obstante, que en algunas ocasiones nos puede venir muy bien su uso veamos un ejemplo: Algunas palabras reservadas en PL/SQL no son palabras reservadas en SQL. Por ejemplo, podemos usar la palabra reservada en PL/SQL TYPE en un CREATE TABLE para llamar as a una columna de la tabla. Pero si definimos una sentencia de acceso a dicha tabla en PL/SQL de la siguiente forma: SELECT nom,type,bal INTO Nos provocar un error de compilacin para evitar esto podemos definir la sentencia de la siguiente manera: SELECT nom,TYPE,bal INTO As nos funcionar es importante hacer notar que siempre, en un caso como el del ejemplo, deberemos poner el identificador en maysculas.
1.1.4
Literales
Un literal es un valor explcito de tipo numrico, carcter, string o booleano, no representado por un identificador. El literal numrico 147, y el literal booleano FALSE, son ejemplos de esto.
1.1.4.1
Literales Numricos
Podemos utilizar dos clases de literales numricos en expresiones aritmticas: enteros y reales. Un literal Entero, es un nmero Entero, al que podemos opcionalmente poner signo. Ejemplos: 30, 6, -14, 0, +32000, Un literal Real, es un nmero Entero o fraccional, con un punto decimal. Ejemplos son: 6.667, 0.0, -12.0, +86.55,
Pg. 14
PL/SQL considera como reales a los nmeros de este tipo 12.0, 25. , aunque tengan valores enteros. Es muy importante tener esto en cuenta, bsicamente porque debemos evitar al mximo trabajar con reales si podemos hacerlo con enteros, ya que eso disminuye la eficiencia de nuestro programa. Los literales numricos no pueden tener los signos dlar o coma, sin embargo, pueden ser escritos en notacin cientfica. Ejemplo: 2E5, 1.0E-7, 1.1.4.2
Literales de tipo Carcter

Un literal de tipo Carcter, es un carcter individual entre comillas simples. Por ejemplo: Z, %, 7, Los literales de tipo Carcter, incluyen todo el conjunto de caracteres vlidos en PL/SQL. PL/SQL es case sensitive con los literales de tipo carcter. Por ejemplo Z y z son diferentes. Los literales de tipo carcter 0 9, no son equivalentes a literales numricos.. sin embargo, pueden ser utilizados en expresiones aritmticas gracias a la conversin de tipos implcita de PL/SQL.
1.1.4.3
Literales de tipo String

Un valor de tipo carcter puede ser representado por un identificador, o de forma explcita escrito como un literal de tipo String, el cual es una secuencia de cero o ms caracteres delimitados por comillas simples. Ejemplos: Mi nombre es Pepe, 10-ENE-2000, $100000, Si deseamos que la cadena de caracteres tenga una comilla simple, lo que debemos hacer es repetir la comilla simple. Ejemplo: Dont leave without saving your work PL/SQL es case sensitive para los literales de tipo String.
1.1.4.4
Literales de tipo Booleano

Los literales de tipo Booleano son los valores predeterminados TRUE, FALSE, y NULL en el caso de no tener ningn valor. Recordemos siempre que los literales de tipo Booleano son valores y no Strings.
Pg. 15
1.1.5
Comentarios
El compilador de PL/SQL ignora los comentarios, sin embargo nosotros no debemos hacerlo. La insercin de comentarios es muy til a la hora de entender un programa. PL/SQL soporta dos tipos de comentarios: los de una lnea, y los de mltiples lneas.
1.1.5.1
Comentarios de una lnea

Se definen mediante dos signos menos consecutivos (--), que se ponen al principio de la lnea a comentar a partir de ah, y hasta la lnea siguiente, se ignora todo. Ejemplo: -- Comienzo mi Select SELECT * FROM mitabla WHERE mit_mitkey=p_codigo ; -- Solo los de mi cdigo
1.1.5.2
Comentarios de mltiples lneas

Se define el comienzo mediante un slash y un asterisco (/*), y el fin mediante un asterisco y un slash (*/); todo lo incluido entre comienzo y fin comentario, ser ignorado. Ejemplo: BEGIN SELECT COUNT(*) INTO contador FROM PERSONAS; /* Si el resultado es mayor que cero, actualizaremos el histrico de personas */ IF contador>0 THEN .
1.2
Tipos de Datos
En este apartado, nos limitaremos a dar una tabla con todos los tipos existentes en PL/SQL, y explicaremos algunos que sean de inters. La razn es que los tipos ms utilizados coinciden al 100% con los del SQL de Oracle, y por tanto son conocidos por los asistentes a este curso. Adems, aquellos tipos que sean especficos para alguna funcionalidad concreta que soporte PL/SQL, sern vistos en detalle cuando abordemos cada una de esas funcionalidades. Los tipos soportados por PL/SQL son los siguientes:
Pg. 16
Tipos de Datos en PL/SQL
Tipos Simples BINARY_INTEGER DEC DECIMAL DOUBLE PRECISION FLOAT INT INTEGER NATURAL NATURALN NUMBER NUMERIC PLS_INTEGER POSITIVE POSITIVEN REAL SIGNTYPE SMALLINT CHAR CHARACTER LONG LONG RAW NCHAR NVARCHAR2 RAW ROWID STRING VARCHAR VARCHAR2
Tipos Compuestos RECORD TABLE VARRAY
Tipos Referencia REF CURSOR REF object_type
BOOLEAN DATE
Tipos LOB BFILE BLOB CLOB NCLOB
Como notas de Inters, decir que los tipos NATURAL y POSITIVE permiten la restriccin a valores que sean tan solo positivos, mientras que NATURALN y POSITIVEN, evitan la asignacin de valores NULL. El tipo SIGNTYPE permite la restriccin de una variable a los valores 1, 0, y 1, lo cual es til a la hora de programar lgica. NUMBER es un tipo que tiene el siguiente rango: 1.0E-130 9.99E125 INTEGER tiene una precisin de 38 dgitos decimales. PLS_INTEGER es un tipo especial de PL/SQL, equivalente a INTEGER, pero que nos da una eficiencia mucho mayor, por tanto es importante utilizarlo siempre que tratemos enteros en nuestros programas. El tipo LONG, aunque pretende ser equivalente al tipo LONG de SQL, en realidad solo admite hasta 32.760 caracteres, si queremos trabajar con columnas de tipo LONG, deberemos utilizar otro tipo de tcnicas como SQL Dinmico. El tipo VARCHAR2 tambin admite hasta 32.760 caracteres.
Pg. 17
1.2.1
Subtipos definidos por el usuario

Cada tipo bsico de PL/SQL, especifica un conjunto de valores, as como un conjunto de operaciones aplicables sobre los mismos. Los subtipos, nos permitirn especificar las mismas operaciones que las aplicables a los tipos bsicos, pero tan solo sobre un subconjunto de valores.
1.2.2
Definicin de Subtipos
Podemos definir nuestros propios Subtipos en la parte de declaraciones de cualquier bloque PL/SQL, subprograma o package, utilizando la sintaxis: SUBTYPE nombre_subtipo IS tipo_base; Donde nombre_subtipo es el nombre que se desee darle, y tipo_base es cualquier tipo de PL/SQL predefinido o definido por el usuario. Para especificar el tipo_base, podemos usar %TYPE, el cual proporciona el tipo de datos de una variable, o una columna de Bbdd, o tambin %ROWTYPE, que nos proporciona el tipo ROW de un cursor, cursor de variables, o tabla de Bbdd. Veamos algunos ejemplos de definicin: DECLARE SUBTYPE FechaEmp IS DATE; SUBTYPE Contador IS NATURAL; NATURAL SUBTYPE NomEmp IS ListaNombres; SUBTYPE Time IS TimeRec; RECORD -- Basado en un Tipo DATE -- Basado en un subtipo
TYPE ListaNombres IS TABLE OF VARCHAR2(10); -- Basado en un tipo TABLE -Basado en un tipo TYPE TimeRec IS RECORD(minutos INTEGER,horas INTEGER);
SUBTYPE Id_Num IS emp.numemp%TYPE; columna CURSOR c1 IS SELECT * FROM dep;
-- Basado en un tipo
SUBTYPE Depsub IS c1%ROWTYPE; -- Basado en una Row de un Cursor Sin embargo, no podemos especificar constraints sobre el tipo base. Veamos algunas declaraciones ilegales: DECLARE SUBTYPE Acumulacion IS NUMBER(7,2); SUBTYPE Palabra IS VARCHAR2(15); -- Ilegal -- Ilegal
Pg. 18
Aunque no podamos especificar constraints de forma directa, en realidad podemos hacerlo de manera indirecta de la siguiente manera: DECLARE temp VARCHAR2(15); SUBTYPE Palabra IS temp%TYPE; Palabra ser 15 -- La longitud mxima de
Tambin debe mencionarse, que si se define un subtipo utilizando %TYPE para proporcionar el tipo de dato de una columna de Bbdd, el subtipo adopta la constraint de longitud de la columna, sin embargo, el subtipo no adoptar otro tipo de constraints como NOT NULL. 1.2.3
Utilizando Subtipos
Una vez que se ha declarado un subtipo, podemos declarar items de ese tipo. Veamos un par de ejemplos: DECLARE SUBTYPE Contador IS NATURAL; rows Contador; Contador; empleados
SUBTYPE Acumulador IS NUMBER; total Acumulador(7,2); Los subtipos pueden ayudar en determinados casos al tratamiento de errores, si se definen adecuadamente dentro de algn rango. Por ejemplo si tenemos una variable y sabemos que su rango ser 9 9, podemos hacer la definicin de la siguiente forma. DECLARE temp NUMBER(1,0); SUBTYPE Escala IS temp%TYPE; eje_x Escala; eje_y Escala; BEGIN eje_x := 10; 1.2.3.1 -- Esto nos provocar un VALUE_ERROR -- El rango ser entre 9 y 9
Compatibilidad de Tipos
Un Subtipo siempre es compatible con su tipo base. Por ejemplo, en las siguientes lneas de cdigo, no es necesaria ninguna conversin:
Pg. 19
DECLARE SUBTYPE Acumulador IS NUMBER; cantidad NUMBER(7,2); total Acumulador; BEGIN total := cantidad; Tambin son compatibles diferentes subtipos, siempre y cuando tengan el mismo tipo base. Ejemplo: DECLARE SUBTYPE Verdad IS BOOLEAN; SUBTYPE Cierto IS BOOLEAN; miverdad Verdad; micierto Cierto; BEGIN micierto := miverdad; Por ltimo, subtipos diferentes tambin son compatibles en el supuesto de que sus tipos base sean de la misma familia de tipos de dato. Ejemplo: DECLARE SUBTYPE Palabra IS CHAR; SUBTYPE Texto IS VARCHAR2; verbo Palabra; sentencia Texto; BEGIN sentencia := verbo;
Pg. 20
1.2.4
Conversiones de Tipos
A veces es necesario realizar la conversin de un valor, de un tipo de dato a otro. Por ejemplo, si se desea comprobar el valor de un ROWID, debemos convertirlo a un string de caracteres. PL/SQL soporta tanto la conversin explcita de datos, como la implcita (automtica).
1.2.5
Conversin Explcita
Para convertir valores de un tipo de datos a otro, se debe usar funciones predefinidas. Por ejemplo, para convertir un CHAR a un tipo DATE o NUMBER, debemos utilizar las funciones TO_DATE o TO_NUMBER, respectivamente. De forma anloga, para convertir un tipo DATE o NUMBER a CHAR, debemos utilizar la funcin TO_CHAR.
1.2.6
Conversin Implcita
Cuando tiene sentido, PL/SQL puede convertir de forma implcita un tipo de dato a otro. Esto nos permite utilizar literales, variables y parmetros de un tipo, en lugares donde se espera otro tipo. Veamos un ejemplo: DECLARE tiempo_comienzo CHAR(5); tiempo_fin CHAR(5); tiempo_transcurrido NUMBER(5); BEGIN /* Obtenemos la hora del sistema como segundos */ SELECT TO_CHAR(SYSDATE,SSSSS) INTO tiempo_comienzo FROM sys.dual; /* Volvemos a obtenerla */ SELECT TO_CHAR(SYSDATE,SSSSS) INTO tiempo_fin FROM sys.dual; /* Calculamos el tiempo transcurrido en segundos */ tiempo_transcurrido := tiempo_fin tiempo_comienzo; END; Antes de asignar el valor de una columna seleccionada a una variable, PL/SQL convertir, si es necesario, el tipo de dato de la variable al tipo
Pg. 21
de dato de la columna. Esto ocurre, por ejemplo, cuando se selecciona una columna tipo DATE en una variable tipo VARCHAR2. En cualquier caso, y aunque PL/SQL lo permita y haga, debemos tener cuidado y evitarlas al mximo, puesto que la conversin implcita ralentizar nuestro programa. Las conversiones explcitas son mejores, y adems nos aseguran un mantenimiento ms sencillo del programa. Veamos una tabla con todas las conversiones posibles:
Bin_Int Bin_Int Char Date Long Number Pls_Int Raw Rowid Varchar2 X X X X
Char X
Date
Long X
Number X X
Pls_Int X X
Raw
Rowid
Varchar2 X
X X X X X X X X X
X X
X X
X X X X X X
X X X X X
Es responsabilidad del programador, asegurarse que los valores son convertibles, por ejemplo, PL/SQL puede convertir el valor CHAR '02JUN-92' a un tipo DATE, pero no puede convertir el valor CHAR 'YESTERDAY' a un valor DATE. De forma similar, PL/SQL no puede convertir un valor VARCHAR2 que contenga caracteres alfabticos a un valor de tipo NUMBER.
1.3
Declaraciones
En PL/SQL se pueden declarar tanto constantes como variables; recordemos que las variables pueden cambiar en tiempo de ejecucin, mientras que las constantes permanecen con el mismo valor de forma continua. Se pueden declarar constantes y variables en la parte de declaracin de cualquier bloque PL/SQL, subprograma, o package. Las declaraciones reservan espacio para un valor en funcin de su tipo.
Pg. 22
Al hacer la declaracin, daremos un nombre a la variable o constante, para de esta forma poder referenciarla a lo largo de la ejecucin del Programa. Veamos un par de ejemplos de declaraciones: Cumple DATE; Cuenta SMALLINT := 0; Como vemos, al declarar una variable o constante, podemos darle un valor inicial. Incluso podemos asignarle expresiones, como en el siguiente ejemplo: pi REAL := 3.14159; radio REAL := 1; area REAL := pi*radio*2; Por defecto, las variables se inicializan a NULL, as que las siguientes dos declaraciones seran equivalentes: cumple DATE; cumple DATE := NULL; Cuando declaremos una constante, la palabra clave CONSTANT debe preceder a la especificacin del tipo. Veamos un ejemplo: limite_de_credito CONSTANT REAL := 250.000;
1.3.1
Utilizando DEFAULT
Se puede utilizar la palabra clave DEFAULT, en lugar del operador de asignacin, para inicializar variables. Por ejemplo, las siguientes declaraciones: tipo_sangre CHAR := 'O'; valido BOOLEAN := FALSE; Pueden ser escritas de la siguiente manera: tipo_sangre CHAR DEFAULT 'O'; valido BOOLEAN DEFAULT FALSE; Se utiliza DEFAULT para las variables que tienen un valor tpico, mientras que el operador de asignacin, se usa en aquellos casos en que las variables no tienen dicho valor, como por ejemplo en contadores y acumuladores. Veamos un ejemplo: horas_trabajo INTEGER DEFAULT 40; contador INTEGER:=0;
Pg. 23
1.3.2
Utilizando NOT NULL

Adems de asignar un valor inicial, en una declaracin se puede imponer la constraint de NOT NULL. Veamos un ejemplo: id_acc INTEGER(4) NOT NULL := 9999; Evidentemente, no se pueden asignar valores NULL a variables que se han definido como NOT NULL, de hecho, si intentamos hacerlo, PL/SQL dar la excepcin predefinida VALUE_ERROR. La constraint NOT NULL, debe estar seguida por una clasula de inicializacin. Por ejemplo, la siguiente declaracin no es vlida: id_acc INTEGER(4) NOT NULL; -- Falta la inicializacin Recordemos que los subtipos NATURALN y POSITIVEN, ya estn predefinidos como NOT NULL. cont_emp NATURAL NOT NULL := 0; cont_emp NATURALN := 0; -- La sentencia de arriba y esta, son equivalentes cont_emp NATURALN; -- Declaracin Ilegal, falta la inicializacin
1.3.3
Utilizando %TYPE
El atributo %TYPE, proporciona el tipo de dato de una variable o de una columna de la Bbdd. En el siguiente ejemplo, %TYPE asigna el tipo de dato de una variable: credito REAL(7,2); debito credito%TYPE; La declaracin utilizando %TYPE, puede incluir una clasula de inicializacin. Veamos un ejemplo: balance NUMBER(7,2); balance_minimo balance%TYPE := 10.00; De todas formas, el uso de %TYPE es especialmente til en el caso de definir variables que sean del tipo de una columna de la Bbdd. Veamos un ejemplo: el_nombre globalweb.usuarios.usu_nomusu%TYPE; Fijmonos en que la utilizacin de este tipo de declaracin tiene dos claras ventajas: por un lado no es necesario conocer el tipo de dato que tiene la columna de la tabla, y por otro, si cambiamos el tipo de dato de la columna, no deberemos modificar el PL/SQL.
Pg. 24
En cuanto a los inconvenientes, debe mencionarse el hecho de que la utilizacin de este tipo de declaraciones ralentiza un poco la ejecucin del PL/SQL. Por tanto su uso debe estar siempre justificado, como por ejemplo en el caso de una columna que pueda ser susceptible de modificacin. Como ltimo apunte, decir que el hecho de asignar a una variable el tipo de dato de una columna que tenga la constraint de NOT NULL utilizando %TYPE, NO nos aplicar dicha constraint a la variable. Veamos un ejemplo: DECLARE num_emp emp.id_emp%TYPE; BEGIN num_emp := NULL; -- No nos dar ningun error END;
1.3.4
Utilizando %ROWTYPE
El atributo %ROWTYPE proporciona un tipo 'registro', que representa una fila de una tabla (o una vista). El registro puede almacenar toda la fila de una tabla (o de un cursor sobre esa tabla), o bien una serie de campos recuperados mediante un cursor. Veamos un par de ejemplos que ilustren esto: DECLARE emp_rec emp%ROWTYPE; CURSOR c1 IS SELECT num_dept, nom_dept, dir_dept FROM dept; dept_rec c1%ROWTYPE; Las columnas de una fila, y los correspondientes campos del registro, tienen los mismos nombres y tipos de dato. En el siguiente ejemplo, vamos a seleccionar los valores de una fila en un registro llamado emp_rec:
Pg. 25
DECLARE emp_rec emp%ROWTYPE; BEGIN SELECT * INTO emp_rec FROM emp WHERE ROWNUM=1; END; Para referenciar los valores almacenados en un registro, utilizaremos la notacin siguiente: nombre_registro.nombre_campo Por ejemplo, en el caso anterior referenciaramos al campo nombre de la siguiente manera: IF emp_rec.emp_nomemp='Perico' THEN 1.3.4.1
Asignaciones entre registros

Una declaracin del tipo %ROWTYPE, no puede incluir una clasula de inicializacin, sin embargo, existen dos maneras de asignar valores a todos los campos de un registro a la vez. En primer lugar, PL/SQL permite la asignacin entre registros de forma completa, siempre y cuando su declaracin referencie a la misma tabla o cursor. Veamos un ejemplo: DECLARE dept_rec1 dept%ROWTYPE; dept_rec2 dept%ROWTYPE; CURSOR c1 IS SELECT num_dept, nom_dept, dir_dept FROM dept; dept_rec3 c1%ROWTYPE; BEGIN dept_rec1 := dept_rec2;
Pg. 26
Esto que hemos hecho es vlido, sin embargo y debido a que dept_rec2 se basa en una tabla, y dept_rec3 se basa en un cursor, la siguiente sentencia no sera vlida: dept_rec2 := dept_rec3; -- Asignacin no Vlida Otra forma de realizar la asignacin de una lista de valores de columnas a un registro, sera mediante la utilizacin de las sentencias SELECT o FETCH. Los nombres de las columnas deben aparecer en el orden en el que fueron definidas por las sentencias CREATE TABLE, o CREATE VIEW. Veamos un ejemplo: DECLARE dept_rec dept%ROWTYPE; BEGIN SELECT num_dept, nom_dept, dir_dept INTO dept_rec FROM dept WHERE num_dept=30; END; Sin embargo, no se puede asignar una lista de valores de columnas a un registro utilizando una sentencia de asignacin. Por lo tanto, la siguiente sentencia no es vlida: nombre_registro := (valor1, valor2, valor3, ); -- No Vlido Por ltimo, decir que aunque podemos recuperar registros de forma completa, no podemos realizar inserts o updates utilizando los mismos. Veamos un ejemplo: INSERT INTO dept VALUES (dept_rec); -- No Vlido 1.3.4.2
Utilizando Alias
Los elementos de una lista de tipo select, recuperada mediante un cursor que tiene asociado un %ROWTYPE, deben tener nombres simples o, en el caso de ser expresiones, deben tener un alias. Veamos un ejemplo en el cual utilizaremos un alias llamado wages: DECLARE CURSOR mi_cursor IS SELECT salario + NVL(comm,0) wages, nom_emp FROM emp;
Pg. 27
mi_rec mi_cursor%ROWTYPE; BEGIN OPEN mi_cursor; LOOP FETCH mi_cursor INTO mi_rec; EXIT WHEN mi_cursor%NOTFOUND; IF mi_rec.wages>2000 THEN INSERT INTO mi_rec.nom_emp); END IF; END LOOP; CLOSE mi_cursor; END; temp VALUES (NULL, mi_rec.wages,
1.3.5
Restricciones
PL/SQL no permite referencias de tipo forward, es decir, se debe crear una variable o constante antes de referenciarla en otras sentencias, incluyendo las sentencias de tipo declaracin. Veamos un ejemplo: maxi INTEGER := 2*mini; -- No vlido mini INTEGER := 15; Sin embargo, PL/SQL s que permite la declaracin de tipo
forward para subprogramas.
Otra restriccin de PL/SQL, es que no permite una declaracin de este tipo: i, j, k SMALLINT; -- No vlido Debemos declararlo de la siguiente manera: i SMALLINT; j SMALLINT; k SMALLINT;
Pg. 28
1.3.6
Convenciones de Nomenclatura
En PL/SQL se aplican las mismas convenciones de nomenclatura tanto para los items de los programas como para las unidades, incluyendo esto a las constantes, variables, cursores, cursores con variables, exceptiones, procedimientos, funciones y packages. Los nombres pueden ser: simples, referenciando a un usuario o package (lo llamaremos qualified), remotos, o bien uniendo qualified y el hecho de que sea remoto. Por ejemplo, podemos usar el procedimiento llamado calcular_salario, de cualquiera de las siguientes formas: calcular_salario( ); -- Simple acciones_emp.calcular_salario( ); -- Qualified calcular_salario@bbdd_remota( ); -- Remota acciones_emp.calcular_salario@bbdd_remota( ); -- Qualified y Remota En el primer caso, simplemente llamamos al procedimiento que se encuentra en nuestro usuario. En el segundo, utilizamos la notacin del punto, puesto que el procedimiento se encuentra almacenado en el Package llamado acciones_emp. En el tercero, llamamos al procedimiento que se encuentra almacenado en una Bbdd remota, a la que hemos llamado bbdd_remota. En ltimo lugar, llamamos a un procedimiento que se encuentra en la bbdd_remota, y adems contenido en el package acciones_emp.
1.3.7
Sinnimos
Se pueden crear sinnimos para proporcionar transparencia en el acceso a un esquema remoto de sus tablas, secuencias, vistas, subprogramas y packages. Sin embargo, y como es lgico, no podemos crear sinnimos para los objetos declarados en subprogramas o packages; esto incluye constantes, variables, cursores, cursores con variables, excepciones y procedures de un package (de forma individual).
1.3.8
mbito
En el mismo mbito, todos los identificadores que se declaren deben ser nicos. Por lo tanto, e incluso aunque sus tipos difieran, las variables y parmetros no pueden tener el mismo nombre. Veamos un par de ejemplos:
Pg. 29
DECLARE id_valido BOOLEAN; id_valido VARCHAR2(5); -- No vlido, nombre repetido FUNCTION bonus (id_valido IN INTEGER) RETURN REAL IS -- No vlido, nombre repetido dos veces.. Veremos en profundidad todo este tema en el apartado dedicado a Visibilidad.
1.3.9
Case Sensitivity
Al igual que para los otros identificadores, los nombres de las constantes, variables y parmetros, no son case sensitive. Por ejemplo, PL/SQL considerar iguales a los siguientes nombres: DECLARE codigo_postal INTEGER; Codigo_postal INTEGER; -- Igual que el anterior CODIGO_POSTAL INTEGER; -- Igual que los dos anteriores
1.3.10
Resolucin de Nombres
Para evitar posibles ambigedades en sentencias SQL, los nombres de las variables locales y de los parmetros, toman prioridad sobre los nombres de las tablas de Bbdd. Por ejemplo, la siguiente sentencia de UPDATE fallara, ya que PL/SQL supone que emp referencia al contador del loop: FOR emp IN 1..5 LOOP UPDATE emp SET bonus = 500 WHERE END LOOP; De igual forma, la siguiente sentencia SELECT tambin fallara, ya que PL/SQL cree que emp referencia al parmetro definido: PROCEDURE calcula_bonus (emp NUMBER, bonus OUT REAL) IS media_sal REAL; BEGIN SELECT AVG(sal) INTO media_sal
Pg. 30
FROM emp WHERE En estos casos, se debe poner el nombre del usuario de Bbdd antes de la tabla y un punto despus aunque siempre ser ms eficiente llamar a la variable o parmetro de otra forma. Veamos un ejemplo: PROCEDURE calcula_bonus (emp NUMBER, bonus OUT REAL) IS media_sal REAL; BEGIN SELECT AVG(sal) INTO media_sal FROM usuario.emp WHERE Al contrario que para el nombre de las tablas, el nombre de las columnas toma prioridad sobre los nombres de las variables locales y parmetros. Por ejemplo, la siguiente sentencia DELETE borrar todos los empleados de la tabla emp, y no tan slo aquellos que se llamen Pedro (que es lo que se pretende), ya que Oracle creer que los dos nom_emp que aparecen en la sentencia WHERE, referencian a la columna de la Bbdd. DECLARE nom_emp VARCHAR2(10) := Pedro; BEGIN DELETE FROM emp WHERE nom_emp = nom_emp; En estos casos, tenemos dos posibilidades: o bien cambiamos el nombre de la variable (es lo mejor): DECLARE mi_nom_emp VARCHAR2(10) := Pedro; , o bien utilizamos una label para el bloque: <<main>> DECLARE nom_emp VARCHAR2(10) := Pedro; BEGIN DELETE FROM emp WHERE nom_emp = main.nom_emp;
Pg. 31
1.4
mbito y Visibilidad
En PL/SQL, las referencias a un identificador son resueltas acorde con su mbito y su visibilidad. El mbito de un identificador es aquella parte de una unidad de programa (bloque, subprograma o package), desde la cual se puede referenciar al identificador. Un identificador es visible solo en las partes desde las que se puede referenciar al identificador, utilizando un nombre adecuado. Los identificadores declarados en un bloque PL/SQL, se consideran locales a ese bloque, y globales para todos sus sub-bloques. Si un identificador global es re-declarado en un sub-bloque, ambos identificadores pertenecen al mismo mbito sin embargo, en el subbloque, tan solo el identificador local es visible porque se debe utilizar un nombre adecuado (qualified), para referenciar al global. Con el siguiente grfico, se entender bien el concepto:
mbito DECLARE X REAL; BEGIN ... DECLARE X REAL; BEGIN ... END; ... END; DECLARE X REAL; BEGIN ... DECLARE X REAL; BEGIN ... END; ... END; Visibilidad DECLARE X REAL; BEGIN ... DECLARE X REAL; BEGIN ... END; ... END; DECLARE X REAL; BEGIN ... DECLARE X REAL; BEGIN ... END; ... END;
X Exterior
X Interior
Veamos ahora un ejemplo utilizando unas lneas de cdigo, e indicando que variables son accesibles en cada momento:
Pg. 32
DECLARE a CHAR; b REAL; BEGIN -- Identificadores accesibles aqu: a (CHAR), b DECLARE a INTEGER; c REAL; BEGIN -- Identificadores accesibles aqu: a (INTEGER), b, c END; END; Si quisiramos referenciar a identificadores del mismo mbito, pero ms externos, deberamos utilizar etiquetas. Veamos un ejemplo de esto: <<externo>> DECLARE cumple DATE; BEGIN DECLARE cumple DATE; BEGIN IF cumple = exterior.cumple THEN
Pg. 33
1.5
Asignaciones
Las variables y constantes se inicializan cada vez que se entra en un bloque o subprograma. Por defecto, las variables se inicializan a NULL, por lo tanto, a menos que se le asigne expresamente, el valor de una variable es indefinido. Veamos un caso curioso: DECLARE contador INTEGER; BEGIN contador := contador+1; -- Contador sigue valiendo NULL END; Efectivamente, la suma de NULL+1 es siempre NULL, la asignacin debe realizarse de manera expresa. En general, cualquier operacin en la cual uno de los operandos sea NULL, nos devolver un NULL es algo que deberemos tener muy en cuenta. Lo que siga al operador de asignacin, puede ser tanto un valor simple (literal numrico), como una expresin compleja lo nico que debemos tener siempre en cuenta es que debe tratarse de un valor del mismo tipo, o por lo menos convertible de forma implcita.
1.5.1
Valores Booleanos
A una variable de tipo booleano, tan slo le podemos asignar tres valores: TRUE, FALSE y NULL. Por ejemplo, dada la siguiente declaracin: DECLARE realizado BOOLEAN; las siguientes sentencias son vlidas: BEGIN realizado := FALSE; WHILE NOT realizado LOOP END LOOP;
Pg. 34
Cuando se aplica a una expresin, los operadores relacionales, devolvern un valor Booleano. Por tanto, la siguiente asignacin ser vlida: realizado := (cuenta>500);
1.5.2
Valores de Base de Datos

De forma alternativa, podemos utilizar la sentencia SELECT INTO para asignar valores a una variable. Para cada elemento de la lista select, debe existir un tipo compatible en la lista INTO. Veamos un ejemplo: DECLARE mi_numemp emp.num_emp%TYPE; mi_nomemp emp.nom_emp%TYPE; variable NUMBER(7,2); BEGIN SELECT nom_emp, sal+com INTO mi_nomemp, variable FROM emp WHERE num_emp=mi_numemp; Sin embargo, no podemos seleccionar valores de una columna en una variable de tipo BOOLEAN.
1.6
Expresiones y Comparaciones
Las expresiones se construyen utilizando operandos y operadores. Un operando es una variable, constante, literal, o una llamada a una funcin, que contribuye con un valor a la expresin. Un ejemplo de una expresin aritmtica simple sera: -x / 2 + 3 Los operadores unarios, como por ejemplo la negacin (-), actan sobre un operando, mientras que los binarios, como la divisin, lo hacen sobre dos operandos. PL/SQL no soporta operadores ternarios. PL/SQL evala una expresin mediante la combinacin de los valores de los operandos, y la prioridad de los operadores. Veremos esto ms en detalle en los siguientes apartados.
Pg. 35
1.6.1
Precedencia de los Operadores

Las operaciones en una expresin, son realizadas en un orden particular, dependiendo de la precedencia de los Operadores. Veamos la tabla de Orden de las Operaciones: Operador **, NOT +, *, / +, -, || Operacin Exponenciacin, negacin lgica Identidad, negacin Multiplicacin, divisin Suma, resta, concatenacin
=, !=, <, >, <=, >=, IS NULL, Comparacin LIKE, BETWEEN, IN AND OR Conjuncin Disyuncin
Los operadores que tienen ms prioridad se ejecutan en primer lugar. Cuando los operadores tienen la misma prioridad, se ejecutan en cualquier orden. Si se desea controlar el orden de ejecucin, se deber utilizar parntesis para indicarlo. 1.6.2
Operadores Lgicos
Veamos la tabla de verdad de los operadores lgicos, para entender como se evalan: x TRUE TRUE TRUE FALSE FALSE FALSE NULL NULL NULL y TRUE FALSE NULL TRUE FALSE NULL TRUE FALSE NULL x AND y TRUE FALSE NULL FALSE FALSE FALSE NULL FALSE NULL x OR y TRUE TRUE TRUE TRUE FALSE NULL TRUE NULL NULL NULL TRUE NOT x FALSE
Pg. 36
Probablemente, lo que ms llamar la atencin de esta tabla es que vemos que existen determinadas operaciones entre un valor NULL y otro que no lo es, que sin embargo no dan como resultado NULL, lo cual contradice algo que dijimos en un apartado anterior... esto es cierto, sin embargo Oracle recomienda que jams se evale una expresin con un operando NULL, ya que potencialmente puede dar un valor indefinido, y eso debemos tenerlo en cuenta a pesar de esta tabla lgica de verdad.
1.6.3
Operadores de Comparacin
Los operadores de comparacin, comparan una expresin con otra; el resultado es siempre TRUE, FALSE, o NULL. Normalmente, se utilizarn operadores de comparacin en las clasulas WHERE de una sentencia SQL, y en las sentencias de control condicional.
1.6.3.1
Operadores Relacionales
Los operadores relacionales, nos permitirn comparar expresiones. Veamos la tabla que tiene el significado de cada operador: Operador = <>, !=, ~= < > <= >= Significado Igual a Diferente a Menor que Mayor que Menor o igual a Mayor o igual a
Es conveniente la utilizacin del Operador <>, en lugar de los otros dos para la operacin de Diferente a. 1.6.3.2
Operador IS NULL
El operador IS NULL, devuelve el valor booleano TRUE, si el operando es nulo, o FALSE si no lo es. Es muy importante utilizar siempre este operador cuando evaluemos si una expresin en nula, ya que la utilizacin de una comparacin normal, nos dara un valor errneo. Ejemplo:
Pg. 37
IF variable = NULL THEN -- Jams debemos utilizarlo En lugar de esto, debemos escribir IF variable IS NULL THEN 1.6.3.3
Operador LIKE
El operador LIKE se utiliza para comparar un valor alfanumrico con un patrn. En este caso s que se distinguen las maysculas y las minsculas. LIKE devuelve el valor booleano TRUE, si se produce un match con el patrn, y FALSE si no es as. Los patrones que podemos matchear con el operador LIKE, pueden incluir dos caracteres especiales llamados wildcards. Estos dos caracteres son el underscore (_), y el tanto por ciento (%). El primero nos permitir que el match devuelva TRUE para un solo carcter cualquiera, mientras que el segundo nos lo permitir para varios. Lo entenderemos mejor con un ejemplo: JUAN LIKE J_AN; Devuelve TRUE ANTONIO LIKE AN_IO; -- Devuelve FALSE ANTONIO LIKE AN%IO; -- Devuelve TRUE
1.6.3.4
Operador BETWEEN
El operador BETWEEN, testea si un valor se encuentra en un rango especificado. Su significado literal es mayor o igual al valor menor, y menor o igual al valor mayor. Por ejemplo, la siguiente expresin nos devolvera FALSE: 45 BETWEEN 38 AND 44;
1.6.3.5
Operador IN
El operador IN, comprueba si un valor pertenece a un conjunto. El significado literal sera igual a cualquier miembro de. El conjunto de valores puede contener nulos, pero son ignorados. Por ejemplo, la siguiente sentencia no borrara los registros de la tabla que tuvieran la columna nom_emp a null. DELETE FROM emp WHERE nom_emp IN (NULL, PEPE, PEDRO); Es ms, expresiones del tipo valor NOT IN conjunto
Pg. 38
devolveran FALSE si el conjunto contuviese un NULL. Por ejemplo, en lugar de borrar los registros en los cuales la columna nom_emp fuese distinta de NULL, y diferente de PEPE, la siguiente sentencia no borrara nada: DELETE FROM emp WHERE nom_emp NOT IN (NULL, PEPE);
1.6.4
Operador de Concatenacin
El operador de concatenacin son las dos barras verticales (||), el cual aade un string a otro. Veamos un ejemplo: moto || sierra = motosierra; Si ambos operandos son del tipo CHAR, el operador de concatenacin devuelve un valor CHAR en cualquier otro caso devolver un valor tipo VARCHAR2.
1.7
Funciones Soportadas
PL/SQL proporciona un gran nmero de funciones bastante potentes para ayudar a manipular la informacin. Estas funciones pre-definidas se agrupan en las siguientes categorias: error-reporting numricas carcter conversin fecha miscelneas
Se pueden usar todas las funciones en sentencias SQL excepto las de error-reporting SQLCODE y SQLERRM. Tambin se pueden usar todas las funciones en sentencias de los procedimientos excepto las miscelneas DECODE, DUMP, y VSIZE. Las funciones de agrupacin de SQL: AVG, MIN, MAX, COUNT, SUM, STDDEV, y VARIANCE, no estn implementadas en PL/SQL, sin embargo se pueden usar en sentencias SQL (pero no en sentencias de procedimientos). Veamos una tabla con todas las funciones soportadas por PL/SQL; para una descripcin en detalle de cada una de ellas, se puede mirar el Oracle8 SQL Reference.
Pg. 39
Error
SQLCODE SQLERRM
Numricas
ABS ACOS ASIN ATAN ATAN2 CEIL COS COSH EXP FLOOR LN LOG MOD POWER ROUND SIGN SIN SINH SQRT TAN TANH TRUNC
Carcter
ASCII CHR CONCAT INITCAP INSTR INSTRB LENGTH LENGTHB LOWER LPAD LTRIM NLS_INITCAP NLS_LOWER NLS_UPPER NLSSORT REPLACE RPAD RTRIM SOUNDEX SUBSTR SUBSTRB TRANSLATE UPPER
Conversin
CHARTOROWID CONVERT HEXTORAW NLS_CHARSET_ID NLS_CHARSET_NAME RAWTOHEX ROWIDTOCHAR TO_CHAR TO_DATE TO_LABEL TO_MULTI_BYTE TO_NUMBER TO_SINGLE_BYTE
Fecha
ADD_MONTHS LAST_DAY MONTHS_BETWEEN NEW_TIME NEXT_DAY ROUND SYSDATE TRUNC
Misc.
DECODE DUMP GREATEST GREATEST_LB LEAST LEAST_UB NVL UID USER USERENV VSIZE
Pg. 40
UNIDAD 5:ESTRUCTURAS DE CONTROL

Esta unidad mostrar como estructurar el flujo de control en un programa PL/SQL.
Que el alumno conozca y sepa utilizar en el momento adecuado, todas las estructuras de control aportadas por PL/SQL.
Contenidos
Introduccin Control Condicional Control Iterativo Control Secuencial
Cuaderno de notas
PL/SQL Bsico Unidad 5 Estructuras de Control
Pg. 43
2.1
Introduccin
Cualquier programa puede ser escrito utilizando las siguientes estructuras de control bsicas.
Seleccin T F T Iteracin F Secuencia
Se pueden combinar entre s, para obtener la solucin a cualquier problema que se plantee.
2.2
Control Condicional
A menudo, es necesario ejecutar acciones distintas, dependiendo de las circunstancias. Las sentencias IF, nos permiten ejecutar una secuencia de acciones de forma condicional, es decir, el hecho de que se ejecute o no la accin, depende del valor de la condicin. Hay tres variedades de sentencias IF: IF-THEN, IF-THEN-ELSE, y IF-THEN-ELSIF.
2.2.1
IF-THEN
Es la forma ms sencilla de una sentencia IF. Asocia una secuencia de sentencias a una condicin. Veamos un ejemplo: IF condicion THEN secuencia_de_sentencias; END IF;
PL/SQL Bsico Unidad 5: Estructuras de Control
La secuencia de sentencias se ejecuta tan slo si la condicin es TRUE. Se pueden escribir las sentencias IF de forma completa en una sola lnea IF x > y THEN mayor := x; END IF; Sin embargo, esto no es bueno ya que no facilita una lectura posterior del cdigo fuente.
2.2.2
IF-THEN-ELSE
Esta segunda variedad aade la palabra clave ELSE, seguida de un conjunto de sentencias. Veamos un ejemplo: IF condicion THEN secuencia_1; ELSE secuencia_2; END IF; Si la condicin es TRUE, se ejecutar la secuencia de instrucciones 1, en caso contrario se ejecutar la 2. Las clasulas THEN y ELSE pueden incluir sentencias IF, es decir, podemos agrupar sentencias de tipo IF. Veamos un ejemplo: IF tipo_transaccion = CR THEN UPDATE cuentas SET balance=balance+credito WHERE ELSE IF nuevo_balance >= balance_minimo THEN UPDATE cuentas SET balance=balance-debito WHERE ELSE RAISE fondos_insuficientes; END IF; END IF;
2.2.3
IF-THEN-ELSIF
Como hemos visto, podemos agrupar sentencias de tipo IF sin embargo, nos podemos encontrar el caso en que existan muchas posibles alternativas a evaluar, y para cada ELSE tendramos que abrir una
Pg. 45
sentencia de tipo IF-THEN-ELSE, y cerrarla posteriormente para evitar esto tenemos la palabra clave ELSIF. Veamos un ejemplo: IF condicion1 THEN secuencia_1; ELSIF condicion2 THEN secuencia_2; ELSE secuencia_3; END IF; De esta manera, podemos evaluar tantas como queramos, y slo deberemos cerrar una sentencia IF con el END IF correspondiente. La ltima sentencia ELSE se ejecutar cuando no se cumpla ninguna de las anteriores, aunque si no queremos ponerla, pues no pasa nada. Podemos agrupar tantos ELSIF como deseemos si ningn tipo de problema. Para entender mejor la utilidad de ELSIF, vamos a ver dos ejemplos, en el primero programaramos las condiciones utilizando sentencias IFTHEN-ELSE normales, mientras que en el segundo utilizaramos ELSIF as podremos apreciar realmente lo que ganamos en cuanto a comodidad y a facilidad de lectura e interpretacin posterior. IF condicion1 THEN Sentencia1; ELSE IF condicion2 THEN Sentencia2; ELSE IF condicion3 THEN Sentencia3; END IF; END IF; END IF; IF condicion1 THEN Sentencia1; ELSIF condicion2 THEN Sentencia2; ELSIF condicion3 THEN Sentencia3; END IF;
Pg. 46
2.3
Control Iterativo
Las sentencias de tipo LOOP, permiten ejecutar una secuencia de sentencias mltiples veces. Existen tres variedades de sentencias LOOP: LOOP, WHILE-LOOP, y FOR-LOOP.
2.3.1
LOOP
Se trata de la variedad ms simple de la sentencia LOOP, y se corresponde con el bucle bsico (o infinito), el cual incluye una secuencia de sentencias entre las palabras claves LOOP y END LOOP. Veamos un ejemplo LOOP secuencia_de_sentencias; END LOOP; En cada iteracin del bucle, se ejecutan todas las sentencias de forma secuencial. Evidentemente es raro que deseemos tener un bucle infinito en un programa, por tanto existe una manera de forzar la salida, y es la utilizacin de la palabra clave EXIT. Para esta palabra tambin tenemos dos variedades posibles: EXIT y EXIT-WHEN. Vamos a verlas en detalle.
2.3.1.1
EXIT
La sentencia EXIT provoca la salida de un bucle de forma incondicional. Cuando se encuentra un EXIT, el bucle acaba inmediatamente y el control pasa a la siguiente instruccin que est fuera del bucle. Veamos un ejemplo: LOOP IF limite_credito < 3 THEN EXIT; -- Fuerza la salida inmediata END IF; END LOOP; -- El control pasara a esta instruccin
Pg. 47
Veamos ahora un ejemplo donde no podemos utilizar EXIT: BEGIN IF limite_credito < 3 THEN EXIT; -- Sentencia no vlida aqu END IF; END; La sentencia EXIT siempre debe encontrarse dentro de un bucle LOOP. Para salir de un bloque PL/SQL que no sea un bucle antes de su finalizacin normal, podemos usar la sentencia RETURN. 2.3.1.2
EXIT-WHEN
La sentencia EXIT-WHEN, nos va a permitir salir de un bucle de forma condicional. Cuando PL/SQL encuentra una sentencia de este tipo, la condicin del WHEN ser evaluada en caso de devolver TRUE, se provocar la salida del bucle en caso contrario, se continuar la iteracin. Veamos un ejemplo: LOOP FETCH c1 INTO EXIT WHEN c1%NOTFOUND; -- Salir si se cumple la condicin END LOOP; CLOSE c1; De forma parecida a lo que ocurra con los IF y los ELSIF, tambin podramos controlar la salida de un bucle de otra forma, y no mediante un EXIT-WHEN lo que ocurre es que, al igual que en el caso anterior, la utilizacin de esta sentencia facilitar la programacin y lectura de nuestro cdigo. Veamos un ejemplo: IF contador>100 THEN EXIT; END IF; EXIT WHEN contador>100;
Pg. 48
2.3.1.3
Etiquetas de los bucles

Al igual que los bloques de PL/SQL, los bucles pueden ser etiquetados. La etiqueta es un identificador no declarado que se escribe entre los smbolos << y >>; deben aparecer al principio de las sentencias LOOP. Veamos un ejemplo: <<nombre_etiqueta>> LOOP secuencia_de_sentencias; END LOOP; De forma opcional, y para facilitar la lectura del cdigo, el nombre de la etiqueta puede aparecer tambin al final de la sentencia LOOP. Veamos el ejemplo: <<mi_loop>> LOOP secuencia_de_sentencias; END LOOP mi_loop; Utilizando etiquetas y la sentencia EXIT, podemos forzar la salida no slo de un bucle, sino de cualquiera que est incluido en el etiquetado. Veamos un ejemplo de esto: <<exterior>> LOOP LOOP EXIT exterior WHEN -- Sale de los dos bucles LOOP END LOOP; END LOOP exterior; De manera general, saldra de cualquier bucle que fuera interior al bucle etiquetado. Esto puede ser muy til en determinadas circunstancias.
Pg. 49
2.3.2
WHILE-LOOP
La sentencia WHILE-LOOP, asocia una condicin a una secuencia de instrucciones que se encuentran entre las palabras claves LOOP y END LOOP. Veamos un ejemplo: WHILE condicion LOOP secuencia_de_instrucciones; END LOOP; Antes de cada iteracin del LOOP, la condicin se evala si devuelve TRUE se contina iterando, en caso de que devuelva FALSE o NULL, se forzar la salida del bucle. El nmero de iteraciones depende de la condicin, y es desconocido hasta que el bucle termina. Puede haber 0 o N iteraciones hasta que la condicin sea FALSE. Algunos lenguajes tienen estructuras como LOOP UNTIL, o REPEAT UNTIL, las cuales evalan la condicin al final y no al principio de todo. PL/SQL no tiene esta estructura, sin embargo sera muy fcil simularla. Veamos un ejemplo: LOOP secuencia_de_instrucciones; EXIT WHEN expresion_booleana; END LOOP; Para asegurarnos que un bucle de tipo WHILE se ejecuta por lo menos una vez, podemos implementarlo mediante una variable booleana de la siguiente forma: hecho:=FALSE; WHILE NOT hecho LOOP secuencia_de_instrucciones; hecho:=expresion_booleana; END LOOP;
Pg. 50
2.3.3
FOR-LOOP
Al contrario que en el caso de un bucle WHILE, en el cual recordemos que el nmero de iteraciones era desconocido a priori, en un bucle FOR este nmero es conocido antes de comenzar la iteracin. Los bucles FOR iteran un nmero de veces que est comprendido en un rango. Veamos la sintaxis mediante un ejemplo: FOR contador IN [REVERSE] valor_minimo..valor_maximo LOOP secuencia_de_instrucciones; END LOOP; El rango es evaluado cuando se entra por primera vez en el bucle, y nunca ms se vuelve a evaluar. Vemos unos cuantos ejemplos que pongan de manifiesto la utilizacin del bucle FOR: FOR i IN 1..3 LOOP -- Asigna los valores 1, 2, 3 a i secuencia_de_instrucciones; -- Se ejecutan tres veces END LOOP; FOR i IN 3..3 LOOP Asigna el valor 3 a i secuencia_de_instrucciones; -- Se ejecutan una vez END LOOP; FOR i IN REVERSE 1..3 LOOP -- Asigna los valores 3, 2, 1 a i secuencia_de_instrucciones; -- Se ejecutan tres veces END LOOP; Dentro de un bucle FOR, el contador del bucle puede ser referenciado como una constante por lo tanto, el contador puede aparecer en expresiones, pero no se le puede asignar ningn valor. Veamos un ejemplo de esto: FOR ctr IN 1..10 LOOP IF NOT fin THEN INSERT INTO VALUES (ctr, ); -- Vlido factor:=ctr*2; -- Vlido ELSE ctr:=10; -- No vlido END IF; END LOOP;
Pg. 51
2.3.3.1
Esquemas de Iteracin
Los rangos de un bucle FOR pueden ser literales, variables, o expresiones, pero deben poder ser siempre evaluadas como enteros. Por ejemplo, los siguientes esquemas de iteracin son legales: j IN 5..5 k IN REVERSE primero..ultimo step IN 0..TRUNC(mayor/menor)*2 codigo IN ASCII(A)..ASCII(J) Como podemos apreciar, el valor menor no es necesario que sea 1; sin embargo, el incremento (o decremento) del contador del bucle debe ser 1. Algunos lenguajes proporcionan una clasula STEP, la cual permite especificar un incremento diferente. Veamos un ejemplo codificado en BASIC: FOR J = 5 TO 15 STEP 5 :REM Asigna valores 5,10,15 a J secuencia_de_instrucciones -- J tiene valores 5,10,15 NEXT J PL/SQL no soporta ninguna estructura de este tipo, sin embargo podemos simular una de manera muy sencilla. Veamos como haramos lo anterior utilizando PL/SQL: FOR j IN 5..15 LOOP -- Asigna los valores 5,6,7,.. a j IF MOD(j,5)=0 THEN -- Solo pasan los mltiplos de 5 secuencia_de_instrucciones; -- j tiene valores 5,10,15 END IF; END LOOP;
2.3.3.2
Rangos dinmicos
PL/SQL permite determinar el rango del LOOP de forma dinmica en tiempo de ejecucin. Veamos un ejemplo: SELECT COUNT(num_emp) INTO cont_emp FROM emp; FOR i IN 1..num_emp LOOP END LOOP; El valor de num_emp es desconocido cuando se compila es en tiempo de ejecucin cuando se le asigna un valor.
Pg. 52
Cuando el valor mnimo es mayor al mximo existente en un bucle FOR, lo que ocurre es que el bucle no se ejecutar ninguna vez. Ejemplo: -- limite vale 1 FOR i IN 2..limite LOOP secuencia_de_instrucciones; -- Se ejecutan 0 veces END LOOP; -- El control pasa aqu 2.3.3.3
Reglas de mbito y Visibilidad

El contador de un bucle se define tan slo para el bucle, no se puede referenciar desde fuera del mismo. Despus de terminar el bucle, el contador es indefinido. Veamos un ejemplo: FOR ctr IN 1..10 LOOP END LOOP; sum:=ctr-1; -- Sentencia No Vlida No es necesario declarar de forma explcita el contador de un bucle, ya que al utilizarlo se declara de forma implcita como una variable local de tipo INTEGER. En el siguiente ejemplo veremos como la declaracin local anula cualquier declaracin global: DECLARE ctr INTEGER; BEGIN FOR ctr IN 1..25 LOOP IF ctr>10 THEN -- Referenciar al contador del bucle END LOOP; END; Para referenciar a la variable global en el ejemplo anterior, se debe usar una etiqueta. Veamos como hacerlo:
Pg. 53
<<principal>> DECLARE ctr INTEGER; BEGIN FOR ctr IN 1..25 LOOP IF principal.ctr>10 THEN -- Referenciar a la variable global END LOOP; END principal;
2.4
Control Secuencial
Al contrario que las sentencias IF y LOOP, las instrucciones GOTO y NULL (que son las asociadas al control secuencial), no son cruciales ni imprescindibles dentro de la programacin en PL/SQL. La estructura del PL/SQL es tal, que la sentencia GOTO no es necesaria de forma obligatoria. De todas formas, en algunas ocasiones, puede estar justificado su uso para simplificar un problema. El uso de la sentencia NULL, puede ayudar a la comprensin de un programa, puesto que en una sentencia de tipo condicional indicara que en un determinado caso no hay que hacer nada. Sin embargo, el uso de sentencias GOTO si que puede ser ms catastrfico, ya que pueden provocar un cdigo complejo, y no estructurado, que es difcil de entender y mantener. Por lo tanto, solo hay que emplear GOTO cuando est fuertemente justificado. Por ejemplo, cuando se desee salir de una estructura profunda (agrupacin de bucles) a una rutina de manejo de errores, entonces se podra utilizar la sentencia GOTO.
2.4.1
Sentencia GOTO
La sentencia GOTO salta a una etiqueta de forma incondicional; la etiqueta debe ser nica en su mbito, y debe preceder a una sentencia ejecutable, o a un bloque PL/SQL. Cuando se ejecuta, la sentencia GOTO transfiere el control a la sentencia o bloque etiquetados. Veamos un ejemplo:
Pg. 54
BEGIN GOTO insercion_fila; <<insercion_fila>> INSERT INTO emp VALUES END; En el ejemplo anterior, hemos visto un salto hacia abajo veamos ahora un salto hacia arriba: BEGIN <<actualizar_fila>> BEGIN UPDATE emp SET END; GOTO actualizar_fila; END; Como hemos dicho, una etiqueta debe preceder a una sentencia ejecutable; veamos un ejemplo que no funcionara debido a esta circunstancia: DECLARE hecho BOOLEAN; BEGIN FOR i IN 1..50 LOOP IF hecho THEN GOTO fin_loop; END IF;
Pg. 55
<<fin_loop>> -- No vlido END LOOP; -- Sentencia No ejecutable END; Podramos solucionarlo tan slo incluyendo una sentencia ejecutable despus de la etiqueta, como por ejemplo NULL. Vamos a ver como lo haramos: DECLARE hecho BOOLEAN; BEGIN FOR i IN 1..50 LOOP IF hecho THEN GOTO fin_loop; END IF; <<fin_loop>> NULL; -- Sentencia ejecutable END LOOP; END; 2.4.1.1
Restricciones
Algunos destinos en un salto de tipo GOTO no estn permitidos. De forma especfica, una sentencia GOTO no puede saltar a: Una sentencia IF Una sentencia LOOP Un Sub-Bloque Fuera de un Sub-Programa
Pg. 56
2.4.2
Sentencia NULL
La sentencia NULL, cuando se emplea sola, sin asignarla a nada, especifica literalmente ninguna accin. Tiene dos utilidades principalmente, una es la de clarificar el cdigo fuente para aquellos casos en los que el programa no debe hacer nada, como por ejemplo en una sentencia IF-THEN-ELSE. Veamos un ejemplo: IF contador>0 THEN -- Hacemos algo ELSE NULL; END IF; Otra utilidad es cuando queramos hacer un debug de alguna parte del programa, ya que podemos compilar una parte del mismo, y en la parte que no hayamos programado todava, podemos poner un NULL de hecho debemos hacerlo, ya que sino no funcionara. Veamos un ejemplo: IF num_emp>500 THEN -- Parte grande que queremos probar ELSE END IF; Si intentamos compilar esto, no funcionara deberamos poner lo siguiente: IF num_emp>500 THEN -- Parte grande que queremos probar ELSE NULL; END IF; As si que ira bien.
Pg. 57
UNIDAD 6:INTERACCIN CON ORACLE

Clarificar como PL/SQL interactua con la Bbdd Oracle, permitiendo que el lenguaje sea una extensin procedimental del SQL propietario de Oracle.
Que el alumno conozca como PL/SQL soporta las funciones de SQL, permite SQL dinmico, y que adems sepa definir y controlar cursores sobre Bbdd.
Contenidos
Soporte SQL Manejando Cursores Empaquetando Cursores Utilizacin de Cursores con bucles FOR
Cuaderno de notas
PL/SQL Bsico Unidad 6: Interaccin con Oracle
Pg. 60
3.1
Soporte SQL
Al ser una extensin del SQL, PL/SQL ofrece una combinacin nica de potencia y facilidad de uso. Se puede tratar toda la informacin de Oracle con una gran flexibilidad y seguridad, ya que PL/SQL soporta todos los comandos de manipulacin de datos, de control de transacciones, funciones, pseudocolumnas, y operadores. PL/SQL tambin cumple los estndares SQL92, y ANSI/ISO. PL/SQL no soporta comandos de definicin de datos, como ALTER y CREATE.
3.1.1
Manipulacin de datos
Para manipular datos en Oracle, utilizaremos los comandos ya conocidos de INSERT, UPDATE, DELETE, SELECT y LOCK TABLE.
3.1.2
Control de transacciones
Oracle est orientado a la transaccin, es decir, Oracle utiliza las transacciones para asegurar la integridad de la Bbdd. Una transaccin es un conjunto de sentencias de manipulacin de datos que se comportan como una sola unidad lgica de trabajo. No entraremos a fondo en el concepto de transacciones, ni de las sentencias que se utilizan, ya que deben ser conceptos conocidos por los alumnos de este curso. Sin embargo, s diremos que PL/SQL utiliza los comandos COMMIT, ROLLBACK, SAVEPOINT y SET TRANSACTION, para realizar el control de las transacciones.
3.1.3
Funciones SQL
PL/SQL permite utilizar todas las funciones de SQL, incluyendo las siguientes funciones de agrupacin: AVG, COUNT, MAX, MIN, STDDEV, SUM, y VARIANCE. Se pueden utilizar las funciones de agrupacin en sentencias SQL, pero no como sentencias individuales en los procedimientos.
Al igual que en el apartado anterior, no vamos a entrar en detalle acerca del uso que tienen las funciones, puesto que se sale del objetivo del curso.
3.1.4
Pseudocolumnas de SQL
PL/SQL reconoce las siguientes pseudocolumnas de SQL, las cuales devuelven una determinada informacin especfica de los datos: CURRVAL, LEVEL, NEXTVAL, ROWID, y ROWNUM. Las pseudocolumnas no son columnas reales de las tablas de la Bbdd, pero se comportan como tales. Por ejemplo, se pueden seleccionar valores de una pseudocolumna, pero no se pueden insertar, actualizar o borrar valores de la misma. Adems, estas pseudocolumnas son comunes a todas las tablas de la Bbdd son columnas lgicas. Se pueden utilizar pseudocolumnas en sentencias SQL, pero no como elementos individuales de un programa PL/SQL. Vamos a dar una breve descripcin de las pseudocolumnas.
3.1.4.1
CURRVAL y NEXTVAL
Como ya sabemos, una secuencia es un objeto de un esquema, que genera nmeros secuenciales. Cuando se crea una secuencia, se puede especificar su valor inicial y su incremento. CURRVAL devuelve el valor actual de la secuencia que se especifique. Veamos un ejemplo: SELECT nombre_secuencia.CURRVAL FROM sys.dual; NEXTVAL devuelve el siguiente valor de una secuencia que se le especifique hay que tener en cuenta que adems de hacerlo, actualizar el nuevo valor dentro de la secuencia, ya que se trata de una sentencia que realiza el COMMIT de forma implcita. Esto es debido a que de esta forma soluciona el problema del acceso concurrente a la secuencia. Veamos un ejemplo: Valor actual de mi_secuencia=3 SELECT mi_secuencia.NEXTVAL FROM sys.dual; Devuelve 4, y adems el valor actual de mi_secuencia=4.
Pg. 62
3.1.4.2
LEVEL
Se utiliza LEVEL con la sentencia SELECT CONNECT BY, para organizar los registros de una tabla de Bbdd en una estructura tipo rbol. LEVEL devuelve el nmero de nivel de un nodo en una estructura tipo rbol. El nivel raz es 1, sus hijos son de nivel 2, sus nietos de nivel 3, y as sucesivamente
3.1.4.3
ROWID
ROWID devuelve el rowid (direccin binaria fsica) de una fila en una tabla de la Bbdd. Recordemos que PL/SQL tiene un tipo de datos llamado ROWID; se puede utilizar variables de este tipo, para almacenar los rowids en un formato legible. Cuando se selecciona una rowid dentro de un tipo ROWID, se debe usar la funcin ROWIDTOCHAR, la cual convertir el valor binario a un string de caracteres de 18-bytes. Una vez hecho esto, podremos comparar el valor de una variable ROWID con la pseudocolumna ROWID en una clasula WHERE de una sentencia UPDATE o DELETE, para identificar el ltimo registro recuperado en un cursor (Es un ejemplo).
3.1.4.4
ROWNUM
ROWNUM devuelve el nmero lgico que nos indica el orden en el cual una fila ha sido recuperada de una tabla por una sentencia SELECT.
3.1.5
Operadores SQL
PL/SQL permite utilizar todos los comandos de comparacin, conjunto, y operaciones sobre filas de SQL. No vamos a entrar en detalle en ellos, puesto que su funcionamiento es idntico al ya conocido en SQL. Entre estos operadores podemos mencionar: ALL, ANY, SOME, BETWEEN, EXISTS, IN, IS NULL, LIKE, etc
Pg. 63
3.1.6
Utilizando DDL y SQL Dinmico

En este apartado explicaremos el por qu PL/SQL no acepta el lenguaje de definicin de datos de SQL, y daremos un apunte de cmo resolverlo utilizando SQL Dinmico.
3.1.7
Eficiencia versus Flexibilidad

Antes de que un programa PL/SQL sea ejecutado, ste debe ser compilado. El compilador de PL/SQL resuelve las referencias a objetos de un esquema de Oracle, mirando sus definiciones en el diccionario de datos; una vez hecho esto, el compilador asigna el espacio necesario a las variables del programa, de forma que ste pueda ejecutarse posteriormente. Este proceso se llama binding. La forma en que un lenguaje de acceso a Bbdd implementa el binding, afecta a la eficiencia en tiempo de ejecucin y a la flexibilidad. Hacer el binding en tiempo de compilacin (llamado binding esttico o early binding), incrementa la eficiencia, ya que las definiciones de los objetos de los esquemas son comprobadas en ese momento, y no en tiempo de ejecucin. Por otro lado, hacer el binding en tiempo de ejecucin (llamado binding dinmico o late binding), incrementa la flexibilidad ya que las definiciones de los objetos del esquema son desconocidas hasta el momento de la ejecucin. PL/SQL fue diseado para el procesamiento de transacciones a alta velocidad, y por ello incrementa el rendimiento mediante la utilizacin del early binding. Al contrario que el SQL, el cual es compilado y ejecutado sentencia a sentencia en tiempo de ejecucin (late binding), PL/SQL se procesa obteniendo un cdigo compilado llamado p_code (esta es la tcnica de early binding). En tiempo de ejecucin, el motor de PL/SQL simplemente ejecuta este cdigo compilado.
3.1.8
Algunas Limitaciones
La tcnica escogida por los diseadores del PL/SQL, tiene asociada algunas limitaciones. Por ejemplo, el p_code incluye referencias a objetos de esquema como tablas y procedimientos almacenados; el compilador de PL/SQL puede resolver las referencias a dichos objetos tan slo en el caso de que sean conocidos en tiempo de compilacin. En el siguiente ejemplo, el compilador no puede procesar el procedimiento, porque la tabla no est definida hasta que el procedimiento se ejecuta.
Pg. 64
CREATE PROCEDURE crear_tabla AS BEGIN CREATE TABLE dept (num_dept NUMBER(2), ); -- No vlido END; Veamos otro ejemplo en el que el compilador tampoco puede hacer un bind de la referencia a la tabla en la sentencia DROP TABLE, ya que el nombre de la tabla es desconocido hasta que el procedimiento se ejecuta: CREATE PROCEDURE drop_tabla (nombre_tabla IN VARCHAR2) AS BEGIN DROP TABLE nombre_tabla; -- No vlido END;
3.1.9
Evitando las limitaciones

Sin embargo, el package DBMS_SQL, proporcionado por Oracle, permite a PL/SQL ejecutar sentencias de definicin y manipulacin de datos de forma dinmica en tiempo de ejecucin. Veamos un ejemplo en el cual definimos un procedimiento almacenado que cuando sea llamado, efectuar un drop de una tabla de la Bbdd que se le especifique: CREATE PROCEDURE VARCHAR2) AS id_cursor INTEGER; BEGIN /* Abrimos un nuevo cursor y devuelve su identificador */ id_cursor := DBMS_SQL.OPEN_CURSOR; /* Efectuamos un Parse de la sentencia, en la cual concatenaremos un DROP TABLE, con el nombre de la tabla */ DBMS_SQL.PARSE(id_cursor, 'DROP TABLE '||nombre_tabla, dbms_sql.native); /* La ejecutamos */ DBMS_SQL.EXECUTE; /* Cerramos el Cursor */ drop_tabla (nombre_tabla IN
Pg. 65
DBMS_SQL.CLOSE_CURSOR(id_cursor); EXCEPTION /* Si se ejecuta la excepcin, cerramos el cursor antes de salir */ WHEN OTHERS THEN DBMS_SQL.CLOSE_CURSOR(id_cursor); END drop table; El SQL dinmico tiene mucha ms potencia, y permite la ejecucin de sentencias que pueden ser simples, o incluso funciones y procedimientos parametrizados. No es el objetivo del curso entrar en detalle sobre el funcionamiento del SQL dinmico, puesto que es un tema bastante ms extenso y complicado. Una buena referencia sobre su funcionamiento lo podemos encontrar en el libro Oracle 8 Application Developer's Guide.
3.2
Manejando Cursores
El conjunto de filas que devuelve una consulta, puede ser 0, 1 o N, dependiendo de a cuantas filas afecte la condicin de bsqueda. Cuando una consulta devuelve mltiples filas, se debe declarar un cursor para procesarlas. Se puede declarar un cursor en la parte de declaraciones de cualquier bloque, subprograma o package PL/SQL. Se utilizan tres instrucciones para controlar un cursor: OPEN, FETCH, y CLOSE. En primer lugar, se inicializa el cursor con la sentencia OPEN, la cual identifica al conjunto resultante. Entonces, se usa la sentencia FETCH para recuperar la primera fila; se puede ejecutar FETCH de manera repetida hasta que todas las filas han sido tratadas, cuando se procesa la ltima, se debe cerrar el cursor con la sentencia CLOSE. Se pueden procesar varias consultas de forma paralela, declarando y abriendo mltiples cursores.
3.2.1
Declaracin de un Cursor
Las declaraciones de tipo forward no se permiten en PL/SQL, por lo tanto, se debe declarar un cursor antes de referenciarlo en otras sentencias. Cuando se declara un cursor, se debe ponerle un nombre y asociarlo con una consulta especfica utilizando la siguiente sintaxis: CURSOR nombre_cursor [ (parametro[, parametro] )] [RETURN tipo_que_devuelve] IS sentencia_select; donde tipo_que_devuelve, representa un registro o fila de una tabla de Bbdd, y parametro tiene la siguiente sintaxis:
Pg. 66
nombre_parametro_cursor [IN] tipo_de_dato [{:= | DEFAULT} expresion ] Por ejemplo, podemos declarar dos cursores llamados c1 y c2, de la siguiente forma: DECLARE CURSOR c1 IS SELECT num_emp, nom_emp, trab_emp, sal_emp FROM emp WHERE sal_emp>2000; CURSOR c2 RETURN dept%ROWTYPE IS SELECT * FROM dept WHERE num_dept=10; El nombre de un cursor, es un identificador que no debe ser declarado, no el nombre de una variable de PL/SQL. No se pueden asignar valores a un nombre de un cursor, ni usarlo en una expresin. Sin embargo, los cursores y las variables siguen las mismas reglas de mbito y visibilidad. Se permite dar a un cursor el mismo nombre que una tabla de Bbdd sin embargo se recomienda no hacerlo. Un cursor puede tener parmetros, los cuales deben aparecer en la consulta asociada. Los parmetros son de tipo IN, ya que no pueden devolver ningn valor. Tampoco podemos imponer la constraint de NOT NULL a un parmetro de un cursor. Veamos un ejemplo de definicin de un cursor, en la cual asignamos valores por defecto a los parmetros de dicho cursor: DECLARE CURSOR c1 (Minimo INTEGER DEFAULT 0, Maximo INTEGER DEFAULT 99) IS SELECT El mbito de los parmetros de un cursor es local al cursor, es decir, que pueden ser referenciados solo en la consulta especificada en la declaracin del cursor. Los valores de los parmetros del cursor son usados por la consulta asociada cuando se abre el cursor.
3.2.2
Apertura de un Cursor
Cuando se abre un cursor, se ejecuta la consulta que tiene asociada, la cual recupera todas las filas que se ven incluidas en su condicin de bsqueda. Para aquellos cursores que han sido declarados utilizando la clasula FOR UPDATE, la sentencia OPEN tambin se encarga de bloquear las filas. Veamos un ejemplo de sentencia OPEN:
Pg. 67
DECLARE CURSOR c1 IS SELECT nom_emp, trab_emp FROM emp WHERE sal_emp<3000; BEGIN OPEN c1; END; Las filas del conjunto resultante no son recuperadas cuando se ejecuta la sentencia OPEN, sino que lo sern ms tarde cuando se ejecute la sentencia FETCH. 3.2.2.1
Paso de parmetros
Tambin se utiliza la sentencia OPEN para pasar parmetros a un cursor. A menos que se deseen aceptar los valores establecidos por defecto, cada parmetro formal del cursor debe tener un parmetro correspondiente en la sentencia OPEN. Veamos un ejemplo: DECLARE nombre emp.nom_emp%TYPE; salario emp.sal_emp%TYPE; CURSOR c1 (nom VARCHAR2, sueldo NUMBER) IS SELECT Cualquiera de las siguientes sentencias abrira el cursor: OPEN c1 (nombre, 3000); OPEN c1 ('FRANCISCO', 4000); OPEN c1 (nombre, salario);
Pg. 68
3.2.3
Recuperacin de valores de un Cursor

La sentencia FETCH recupera una a una, las filas resultantes de la apertura del cursor. Despus de cada fetch, el cursor avanza a la siguiente fila de la consulta. Veamos un ejemplo: FETCH c1 INTO mi_numemp, mi_nomemp, mi_numdept; Para cada valor de columna devuelto por la consulta asociada al cursor, debe existir su correspondiente variable en la lista INTO. Obviamente, sus tipos de datos deben ser compatibles. Normalmente, se emplea la sentencia FETCH de la siguiente manera: LOOP FETCH c1 INTO mi_record; EXIT WHEN c1%NOTFOUND; -- Procesa la informacin del record END LOOP; La consulta puede referenciar a variables de PL/SQL que estn en su mbito. Sin embargo, algunas variables de la consulta se evalan tan slo cuando se abre el cursor. En el siguiente ejemplo que veremos, cada salario recuperado se multiplica por 2, aunque factor se vaya incrementando despus de cada fetch: DECLARE mi_sal emp.sal_emp%TYPE; mi_trabajo emp.trab_emp%TYPE; factor INTEGER:=2; CURSOR c1 IS SELECT factor*sal_emp FROM emp WHERE trab_emp=mi_trabajo; BEGIN OPEN c1; -- Aqu factor vale 2 LOOP FETCH c1 INTO mi_sal; EXIT WHEN c1%NOTFOUND; factor:=factor+1; -- No Afecta al Fetch END LOOP;
Pg. 69
END; Para cambiar el resultado del conjunto, o los valores de las variables de la consulta, se debe cerrar y abrir el cursor con las variables conteniendo los nuevos valores. Se puede utilizar un lista INTO diferente en fetches separados para el mismo cursor. Veamos un ejemplo: DECLARE CURSOR c1 IS SELECT nom_emp FROM emp; nombre1 emp.nom_emp%TYPE; nombre2 emp.nom_emp%TYPE; nombre2 emp.nom_emp%TYPE; BEGIN OPEN c1; FETCH c1 INTO nombre1; -- Recupera la primera fila FETCH c1 INTO nombre2; -- Recupera la segunda fila FETCH c1 INTO nombre3; -- Recupera la tercera fila CLOSE c1; END; Si se realiza un fetch despus de haber recuperado la ltima fila de la consulta, los valores de las variables son indeterminados.
3.2.4
Cierre de un Cursor
La sentencia CLOSE deshabilita el cursor, y el resultado del mismo pasa a ser indefinido. Un ejemplo de la sentencia CLOSE sera: CLOSE c1; Una vez que un cursor se cierra, se puede volver a abrir sin problemas. Cualquier otra operacin sobre un cursor cerrado, provoca una excepcin que se llama INVALID_CURSOR.
Pg. 70
3.2.5
Utilizacin de Subconsultas
Una subconsulta es una consulta (normalmente entre parntesis), que aparece dentro de otra sentencia de manipulacin de datos. Cuando la subconsulta se evala, proporciona un conjunto de valores a la otra sentencia. Normalmente, las subconsultas se utilizan en las clasulas WHERE. En el siguiente ejemplo, la consulta devuelve los empleados que no viven en Burgos: DECLARE CURSOR c1 IS SELECT num_emp, nom_emp FROM emp WHERE num_dept IN (SELECT num_dept FROM dept WHERE loc_dept<>'BURGOS'); Utilizando una subconsulta en la clasula FROM, la siguiente consulta devolver el nmero y nombre de cada departamento que tenga cinco o ms empleados: DECLARE CURSOR c1 IS SELECT t1.num_dept, nom_dept, "STAFF" FROM dept t1, (SELECT num_dept, COUNT(*) "STAFF" FROM emp GROUP BY num_dept) t2 WHERE t1.num_dept = t2.num_dept AND "STAFF">=5;
3.3
Empaquetando Cursores
Es posible separar la especificacin del cursor de su cuerpo en un Package. De esta forma, se puede cambiar el cuerpo del cursor sin tener que cambiar la especificacin. Se codifica la especificacin del cursor en la parte declarativa del package utilizando la siguiente sintaxis: CURSOR nombre_cursor [ (parametro [, parametro] ) ] RETURN tipo_de_retorno; En el siguiente ejemplo, utilizamos el atributo %ROWTYPE para proporcionar un tipo registro, que representa a una fila en la tabla de Bbdd emp:
Pg. 71
CREATE PACKAGE acciones_emp AS /* Declaramos la especificacin del Cursor */ CURSOR c1 RETURN emp%ROWTYPE; END acciones_emp; CREATE PACKAGE BODY acciones_emp AS /* Definimos el cuerpo del Cursor */ CURSOR c1 RETURN emp%ROWTYPE IS SELECT * FROM emp WHERE sal_emp>3000; END acciones_emp; La especificacin del cursor no tiene sentencia SELECT, ya que la clasula RETURN define el tipo de dato del valor resultante. Sin embargo, el cuerpo del cursor debe tener la sentencia SELECT, y la misma clasula RETURN que la de su especificacin. Tambin deben coincidir el nmero y tipos de datos de los elementos seleccionados con el SELECT, con la clasula RETURN. Los cursores empaquetados incrementan la flexibilidad, ya que se puede cambiar el cuerpo del cursor, sin tener que modificar su definicin.
Pg. 72
3.4
Utilizacin de Cursores con bucles FOR

En la mayora de los casos prcticos, podemos sustituir las instrucciones de manejo de cursores: OPEN, FETCH y CLOSE, por la utilizacin de bucles FOR. Esto simplifica mucho el funcionamiento ya que no es necesario abrir el cursor, ni realizar el fetch, ni cerrarlo posteriormente, ya que todas estas operaciones van implcitas cuando se usa el bucle FOR. Veamos un ejemplo: DECLARE resultado temp.col1%TYPE; CURSOR c1 IS SELECT n1, n2, n3 FROM tabla_datos WHERE num_exper=1; BEGIN FOR c1_rec IN c1 LOOP /* Calculamos y almacenamos los resultados */ resultado:=c1_rec.n2 / (c1_rec.n1+c1_rec.n3); INSERT INTO temp VALUES (resultado, NULL, NULL); END LOOP; COMMIT; END; Cada Iteracin del bucle, lleva implcito un fetch de la consulta asociada a un cursor. Al entrar en el bucle se abre el cursor, y al salir se cierra. La manera de referenciar a los elementos del cursor, es mediante el nombre del identificador que hemos asociado al bucle FOR, y despus un punto y el nombre del campo de la consulta que queramos referenciar.
3.4.1
Utilizacin de Subconsultas
No es necesario declarar un cursor si no se desea, puesto que PL/SQL permite sustituir la referencia a un cursor por una subconsulta. Veamos un ejemplo en el cual un bucle FOR calcula un bonus, e inserta los resultados en una tabla de Bbdd:
Pg. 73
DECLARE bonus REAL; BEGIN FOR emp_rec IN (SELECT num_emp, sal_emp, com_emp FROM emp) LOOP bonus:=(emp_rec.sal_emp*0.05) + (emp_rec.com_emp*0.25); INSERT INTO bonus_emp VALUES (emp_rec.num_emp, bonus); END LOOP; COMMIT; END; De todas formas, y aunque esto en ocasiones puede ser prctico para evitarnos definir el cursor, se debe tener mucho cuidado al utilizarlo, puesto que puede dificultar mucho la lectura del cdigo fuente, e incluso su mantenimiento posterior.
Pg. 74
UNIDAD 7: MANEJO DE ERRORES

Explicar como PL/SQL resuelve los temas relacionados con el manejo de errores y excepciones.
Que el alumno conozca las excepciones predefinidas por PL/SQL, y sepa a su vez, crear excepciones nuevas para el tratamiento de errores en sus programas.
Contenidos
Introduccin Ventajas de la Excepciones Excepciones Predefinidas Excepciones definidas por el usuario
Cuaderno de notas
PL/SQL Bsico Unidad 7: Manejo de Errores
Pg. 77
4.1
Introduccin
En PL/SQL, a un warning o una condicin de error, se le llama excepcin. Las excepciones pueden ser Internas (definidas por el propio sistema), o definidas por el usuario. Ejemplos de excepciones definidas de forma interna son division by zero y out of memory. Las excepciones internas ms comunes tienen nombres predefinidos, como por ejemplo ZERO_DIVIDE y STORAGE ERROR. De todas formas a las excepciones internas que no lo tienen, se les puede dar uno sin problemas. El usuario puede definir excepciones propias en la parte declarativa del cualquier bloque, subprograma o package PL/SQL. Por ejemplo, podramos definir una excepcin llamada fondos_insuficientes para controlar las transacciones de un banco. Al contrario que el caso de las excepciones internas, a las excepciones definidas por el usuario se les debe dar un nombre. Cuando ocurre un error, la excepcin se dispara (is raised), es decir, la ejecucin normal se detiene, y se transfiere el control a la parte de tratamiento de errores del bloque PL/SQL o subprograma. Las excepciones internas son disparadas de forma implcita (automtica) por el propio sistema, sin embargo las excepciones definidas por el usuario deben ser disparadas de forma explcita mediante sentencias RAISE, las cuales pueden disparar tambin excepciones predefinidas. Para el manejo de excepciones que se disparan, se deben escribir rutinas separadas que tienen el nombre de exception handlers. Cuando una rutina de este tipo de ejecuta, se detiene el funcionamiento del bloque que la ha disparado, y posteriormente el control pasa al bloque de nivel superior en caso de no existir, el control pasara al sistema (es decir, terminara la ejecucin del programa PL/SQL). Veamos un ejemplo ahora, en el cual se calcula y almacena el ratio de los precios para que existan ganancias. Si la compaa tiene cero ganancias, se disparar la excepcin ZERO_DIVIDE; esto dentendr la ejecucin normal del bloque, y transferir el control a las rutinas de manejo de errores. El handler opcional OTHERS, agrupar todas las excepciones que el bloque no llama especficamente.
DECLARE pe_ratio NUMBER(3,1); BEGIN SELECT precio/ganancias INTO pe_ratio FROM stocks WHERE simbolo=XYZ; -- Esto puede causar el error de divisin entre cero INSERT INTO estadis (simbolo,ratio) VALUES (XYZ,pe_ratio); COMMIT; EXCEPTION WHEN ZERO_DIVIDE THEN -- Controla la excepcin INSERT INTO estadis (simbolo,ratio) VALUES (XYZ,NULL); COMMIT; WHEN OTHERS THEN -- Controla el resto de excepciones ROLLBACK; END; -- El manejador de errores y el bloque acaban aqu Este ltimo ejemplo ilustra el manejo de errores, no la ptima utilizacin del INSERT, puesto que nos podramos haber ahorrado la excepcin simplemente escribiendo la sentencia de la siguiente forma: INSERT INTO estadis (simbolo,ratio) SELECT simbolo, DECODE(ganancias,0,NULL,precio/ganancias) FROM stocks WHERE simbolo=XYZ;
4.2
Ventajas de las excepciones

La utilizacin de las excepciones para el control de errores tiene muchas ventajas. Sin utilizarla, cada vez que ejecutamos ciertos comandos, debemos comprobar los errores Veamos un ejemplo prctico de esto: BEGIN SELECT -- Controlamos el error no data found SELECT -- Controlamos el error no data found
Pg. 79
SELECT -- Controlamos el error no data found El procesamiento de errores no est claramente diferenciado del proceso normal no es una programacin robusta. Veamos como deberan escribirse estas lneas de cdigo BEGIN SELECT SELECT SELECT EXCEPTION WHEN NO_DATA_FOUND THEN -- Controla el error END; Las excepciones mejoran la lectura del cdigo, ya que las rutinas principales no se ven mezcladas con las rutinas de manejo de errores. Adems el hecho de utilizar excepciones nos asegura que si se dispara alguna excepcin de ese tipo, nuestro programa en PL/SQL la tratar.
4.3
Excepciones Predefinidas
Una excepcin interna se dispara cuando un programa PL/SQL viola una regla de Oracle, o excede un lmite dependiente del sistema. Cada error de Oracle tiene un nmero, pero las excepciones pueden tener adems un nombre. Por lo tanto, PL/SQL tiene predefinidos algunos errores de Oracle como excepciones. Por ejemplo, PL/SQL dispara la excepcin predefinida NO_DATA_FOUND, si una sentencia SELECT no devuelve ninguna columna. Para controlar otros errores de Oracle, se puede usar el manejador OTHERS. Las funciones de informacin de errores SQLCODE y SQLERRM, son especialmente tiles con el manejador OTHERS, puesto que devuelven el nmero y texto asociados a cualquier error que trate Oracle. Se puede utilizar el pragma EXCEPTION_INIT, para asociar nombres de excepciones a nmeros de error de Oracle. PL/SQL declara excepciones predefinidas de forma global en el package STANDARD, el cual est asociado al entorno PL/SQL. Veamos la tabla completa de errores.
Pg. 80
Excepcin ACCESS_INTO_NULL COLLECTION_IS_NULL CURSOR_ALREADY_OPEN DUP_VAL_ON_INDEX INVALID_CURSOR INVALID_NUMBER LOGIN_DENIED NO_DATA_FOUND NOT_LOGGED_ON PROGRAM_ERROR ROWTYPE_MISMATCH STORAGE_ERROR SUBSCRIPT_BEYOND_COUNT SUBSCRIPT_OUTSIDE_LIMIT TIMEOUT_ON_RESOURCE TOO_MANY_ROWS VALUE_ERROR ZERO_DIVIDE
Error de Oracle ORA-06530 ORA-06531 ORA-06511 ORA-00001 ORA-01001 ORA-01722 ORA-01017 ORA-01403 ORA-01012 ORA-06501 ORA-06504 ORA-06500 ORA-06533 ORA-06532 ORA-00051 ORA-01422 ORA-06502 ORA-01476
Valor SQLCODE -6530 -6531 -6511 -1 -1001 -1722 -1017 +100 -1012 -6501 -6504 -6500 -6533 -6532 -51 -1422 -6502 -1476
Veamos ahora una breve descripcin para las excepciones predefinidas:
Excepcin ACCESS_INTO_NULL COLLECTION_IS_NULL
Disparada cuando Se intenta asignar valores a los atributos de un Objeto no inicializado. Se intenta aplicar mtodos predefinidos (exceptuando EXISTS), sobre colecciones de Objetos como varrays o tablas de memoria no inicializados; o tambin cuando se intenta asignar valores a los elementos de una coleccin de Objetos que no ha sido inicializada.
CURSOR_ALREADY_OPEN DUP_VAL_ON_INDEX
Se intenta abrir un cursor que ya est abierto. Se intenta almacenar valores duplicados en una columna de Bbdd que tiene una constraint tipo Unique sobre esa columna.
Pg. 81
INVALID_CURSOR
Se intenta realizar una operacin no vlida sobre un cursor, como por ejemplo cerrar un cursor que no ha sido abierto.
INVALID_NUMBER
En una sentencia SQL, la conversin de un string de caracteres a un nmero falla, porque el string no representa un nmero vlido. En sentencias aisladas dentro de un procedimiento PL/SQL, se dispara la excepcin VALUE_ERROR para este mismo caso.
LOGIN_DENIED NO_DATA_FOUND
Se intenta entrar en Oracle con un username o password no vlidos. Una sentencia SELECT INTO no devuelve valores, o bien se referencia a un elemento borrado en una tabla de memoria, o bien se referencia a un elemento no inicializado en una tabla de memoria.
NOT_LOGGED_ON
El programa PL/SQL realiza una llamada a Bbdd sin estar conectado a Oracle.
PROGRAM_ERROR ROWTYPE_MISMATCH
PL/SQL tiene un problema interno. La variable del cursor del host, y la variable del cursor de PL/SQL, implicados en una sentencia de asignacin, tienen tipos incompatibles.
STORAGE_ERROR SUBSCRIPT_BEYOND_COUNT
PL/SQL se queda sin memoria, o la memoria est estropeada. Se referencia a un elemento de un varray o tabla de memoria, utilizando un ndice mayor que el nmero ms largo que tiene como ndice el varray o tabla de memoria.
SUBSCRIPT_OUTSIDE_LIMIT
Se referencia a un elemento de un varray o tabla de memoria, utilizando un ndice que est fuera del rango legal (Por ejemplo 1)
TIMEOUT_ON_RESOURCE
Se produce un time-out cuando Oracle est esperando por un recurso.
TOO_MANY_ROWS VALUE_ERROR
Una sentencia SELECT INTO devuelve ms de una fila. Se produce algn error de tipo aritmtico, conversin, truncate, o constraint de tipo size.
ZERO_DIVIDE
Se intenta dividir entre cero.
4.4
Excepciones definidas por el usuario

PL/SQL permite la definicin de excepciones por el usuario. Al contrario que la excepciones predefinidas, las excepciones definidas por el usuario deben ser declaradas y disparadas de forma explcita mediante sentencias RAISE.
Pg. 82
4.4.1
Declaracin de excepciones
Las excepciones se pueden declarar tan slo en la parte declarativa de un bloque, subprograma o package PL/SQL. Se declara la excepcin introduciendo su nombre, y seguidamente la palabra clave EXCEPTION. Veamos un ejemplo: DECLARE mi_excepcion EXCEPTION; Las declaraciones de variables y excepciones son muy parecidas, pero se debe recordar que una excepcin es una condicin de error, y no un elemento destinado a contener informacin. Al contrario que las variables, las excepciones no pueden aparecer en sentencias de asignacin o sentencias SQL. Sin embargo, se aplican las mismas reglas de mbito y visibilidad que en el caso de las variables.
4.4.2
Reglas de mbito y visibilidad

No se puede declarar la misma excepcin dos veces en el mismo bloque, sin embargo s que se puede declarar la misma excepcin en dos bloques distintos. Las excepciones declaradas en un bloque se consideran locales a ese bloque, y globales para todos sus subbloques. Debido a que un bloque puede referenciar tan solo a excepciones locales o globales, los bloques incluidos en otros no pueden referenciar a excepciones declaradas en un subbloque. Si se vuelve a declarar una excepcin global en un subbloque, la declaracin local prevalecer sobre la global, por lo tanto el subbloque no podr referenciar a la excepcin global a menos que sea declarado en un bloque etiquetado en ese caso la siguiente sintaxis ser vlida: Etiqueta_bloque.nombre_excepcion Vemos un ejemplo que ilustra las reglas de mbito y visibilidad. DECLARE excepcion1 EXCEPTION; num_acct NUMBER; BEGIN DECLARE -- Empieza el subbloque
Pg. 83
excepcion1 EXCEPTION; -- Esta declaracin prevalece num_acct NUMBER; BEGIN IF THEN RAISE excepcion1; -- Si se dispara no se tratar END IF; END; -- Fin del subbloque EXCEPTION WHEN excepcion1 THEN -- No tratar a la excepcin interior END; La excepcin interior al subbloque que se dispara nunca se tratar, puesto que la definicin local prevalece sobre la global. Debemos tener cuidado en ese aspecto.
4.4.3
Utilizacin de EXCEPTION_INIT
Para controlar excepciones internas que no tienen nombre, se debe usar el manejador OTHERS, o el pragma EXCEPTION_INIT. Un pragma es una directiva de compilacin, la cual puede ser interpretada como una marca para el compilador. Los pragmas (tambin llamados pseudoinstrucciones), se procesan en tiempo de compilacin, no en tiempo de ejecucin. Por ejemplo, en el lenguaje Ada, el siguiente pragma le dir al compilador que optimice el uso de espacio: pragma OPTIMIZE(SPACE); En PL/SQL, el pragma EXCEPTION_INIT le dice al compilador que asocie un nombre de excepcin con un nmero de error de Oracle. Esto permitir referenciar a cualquier excepcin interna por el nombre, y escribir un cdigo adecuado para su tratamiento. Se incluye el pragma EXCEPTION_INIT en la parte declarativa de un bloque, subprograma, o package PL/SQL, utilizando la siguiente sintaxis: PRAGMA EXCEPTION_INIT Nmero_de_error_de_Oracle); (nombre_excepcion,
Pg. 84
Donde nombre_excepcion es el nombre de una excepcin previamente declarada. El pragma debe aparecer en algn lugar despus de la declaracin de la excepcin y siempre en la misma parte declarativa, como se muestra en el siguiente ejemplo: DECLARE deadlock_detectado EXCEPTION; PRAGMA EXCEPTION_INIT(deadlock_detectado, -60); BEGIN EXCEPTION WHEN deadlock_detectado THEN -- Tratamiento del Error END;
4.4.4
Uso del RAISE_APPLICATION_ERROR

El package DBMS_STANDARD, el cual se proporciona con Oracle, proporciona algunas facilidades para ayudar a nuestras aplicaciones a interactuar con Oracle. Por ejemplo, el procedimiento RAISE_APPLICATION_ERROR nos permite dar mensajes de error definidos por el usuario en procedimientos almacenados. De esta forma, podemos informar de errores en la aplicacin y evitar la devolucin de excepciones indefinidas. Para llamar al procedimiento RAISE_APPLICATION_ERROR, se utiliza la siguiente sintaxis: RAISE_APPLICATION_ERROR(numero_de_error, {TRUE | FALSE}]); mensaje[,
Donde numero_de_error es un entero negativo comprendido entre el siguiente rango: 20000 -20999, y mensaje es un string de caracteres de hasta 2048 bytes de longitud. Si el tercer parmetro opcional es TRUE, el error se almacena en la pila de errores previos, sin embargo cuando este parmetro es FALSE (es el valor por defecto), el error sustituye a todos los errores previos en la pila. El package DBMS_STANDARD es una extensin del package STANDARD, por lo tanto no tenemos que referenciarlo al llamar a una funcin de ese package.
Pg. 85
Una aplicacin puede llamar a RAISE_APPLICATION_ERROR solo desde un procedimiento almacenado; cuando es llamado, se finaliza la ejecucin del procedimiento, y devuelve a la aplicacin un nmero de error y mensaje definidos por el usuario. El nmero de error y el mensaje puede ser capturado como un error de Oracle. Veamos un ejemplo en el que llamaremos a RAISE_APPLICATION_ERROR si el salario de un empleado se pierde: CREATE PROCEDURE incremento NUMBER) AS salario_actual NUMBER; BEGIN SELECT emp_sal INTO salario_actual FROM emp WHERE num_emp=id_emp; IF salario_actual IS NULL THEN /* Damos el mensaje definido por el usuario */ RAISE_APPLICATION_ERROR(-20101, Falta Salario); ELSE UPDATE emp SET emp_sal=salario_actual+incremento WHERE num_emp=id_emp; COMMIT; END IF; END trata_salario; La llamada a este procedimiento provocar una excepcin de PL/SQL, la cual se puede procesar utilizando las funciones de informacin de errores SQLCODE y SQLERRM en un manejador OTHERS. Tambin se puede utilizar el pragma EXCEPTION_INIT para asociar los nmeros de error especficos que devuelve el procedimiento a excepciones propias Veamos un ejemplo: DECLARE salario_nulo EXCEPTION; /* Asociamos el nmero de error que devuelve el procedimiento a la excepcin definida arriba */ PRAGMA EXCEPTION_INIT(salario_nulo, -20101); BEGIN trata_salario (id_emp NUMBER,
Pg. 86
trata_salario(numero_empleado, incremento); EXCEPTION WHEN salario_nulo THEN INSERT INTO auditoria_emp VALUES (numero_empleado,); COMMIT; END;
Pg. 87
UNIDAD 8: SUBPROGRAMAS Y
PACKAGES

Explicar como trata PL/SQL los conceptos de Subprogramas y Packages.
Que el alumno sepa definir Procedimientos y Funciones, as como agruparlos posteriormente en Packages para mejorar la eficiencia y modularidad del aplicativo.
Contenidos
Ventajas de los Subprogramas Procedimientos y Funciones Recursividad en PL/SQL Concepto de Package Ventajas de los Packages
Cuaderno de notas
PL/SQL Bsico Unidad 8: Subprogramas y Packages
Pg. 90
5.1
Ventajas de los subprogramas

Los subprogramas en PL/SQL, son bloques de PL/SQL con un determinado nombre, que pueden tener parmetros asociados, y ser llamados en cualquier momento. PL/SQL tiene dos tipos de subprogramas llamados procedimientos (procedures), y funciones (functions). Normalmente se utiliza un procedimiento para ejecutar una accin, y una funcin para calcular un valor. Al igual que los bloques de PL/SQL sin nombre o annimos, los subprogramas tienen una parte declarativa, en la cual se declaran las variables, tipos, cursores, constantes, excepciones, etc una parte ejecutable, que contiene el cdigo, y una parte opcional de tratamiento de excepciones.
5.1.1
Lista de las ventajas

Los subprogramas proporcionan extensibilidad, es decir, nos permiten aprovechar el lenguaje PL/SQL para cubrir todas las necesidades. Por ejemplo, si necesitamos un procedimiento que cree nuevos departamentos, podemos escribirlo de manera muy sencilla: PROCEDURE crear_departamento (nuevo_nombre CHAR, nueva_dir CHAR) IS BEGIN INSERT INTO nuevo_nombre, nueva_dir); END crear_departamento; Los subprogramas tambin proporcionan modularidad, es decir permiten dividir el cdigo en unidades lgicas bien estructuradas. Los subprogramas facilitan la reutilizacin de cdigo y el mantenimiento de las aplicaciones. Una vez validado, un subprograma puede ser utilizado por muchas aplicaciones diferentes es ms, el subprograma solo cambia si se modifica su definicin, lo cual simplifica el mantenimiento. Por ltimo, los subprogramas proporcionan abstraccin, ya que se debe realizar la divisin en unidades lgicas, lo cual implica pensar qu es lo que debe hacer un subprograma (rea del programa), y no solo como debe hacerlo. dep VALUES (seq_dept.NEXTVAL,
5.2
Procedimientos y Funciones
Un procedimiento es un subprograma que implementa una determinada accin. La sintaxis general de un procedimiento es la siguiente: PROCEDURE nombre [ (parametro[, parametro, ])] IS [declaraciones_locales] BEGIN sentencias_ejecutables [EXCEPTION manejadores de excepciones] END [nombre]; Donde parametro sigue la siguiente sintaxis: nombre_parametro [IN | OUT | IN OUT] tipo_de_dato [{:= | DEFAULT} expresion] No se le puede poner la constraint de NOT NULL a un parmetro.
5.2.1
Funciones
Una funcin es un subprograma que calcula un valor. Las funciones y los procedimientos se estructuran igual, excepto que las funciones deben tener una clasula RETURN, es decir, deben devolver un valor. La sintaxis general de una funcin es la siguiente: FUNCTION nombre [ (parametro[, parametro, ])] RETURN tipo_de_dato IS [declaraciones_locales] BEGIN sentencias_ejecutables [EXCEPTION manejadores de excepciones] END [nombre]; Donde parametro sigue la siguiente sintaxis: nombre_parametro [IN | OUT | IN OUT] tipo_de_dato [{:= | DEFAULT} expresion] Al igual que en el caso de los procedimientos, no se le puede poner la constraint de NOT NULL a un parmetro.
Pg. 92
5.3
Recursividad en PL/SQL
Un programa recursivo es aquel que se llama a s mismo. Hay que pensar en las llamadas recursivas como llamadas a otros programas que realizan la misma tareas, pero en ejecuciones diferentes, y con parmetros distintos. Cada llamada recursiva crea tantas nuevas instancias de elementos, como elementos haya declarados en el programa. Hay que tener cuidado en donde ponemos las llamadas recursivas, puesto que si las ponemos en un bucle FOR, o entre sentencias OPEN y CLOSE, se abre un nuevo cursor para cada llamada, con la consiguiente degradacin del sistema. Hay que especificar siempre y de manera directa cual es la condicin de salida de un programa recursivo, puesto que si no se hace generar un bucle infinito que acabar con una extincin de la memoria disponible, y por consiguiente se disparar la excepcin STORAGE_ERROR. Veamos un ejemplo sencillo de recursividad implementada en PL/SQL; resolveremos el problema por excelencia asociado a la recursividad, es decir, la obtencin del factorial de un nmero. FUNCTION fac (n POSITIVE) RETURN INTEGER IS BEGIN IF n=1 THEN -- Condicin de salida RETURN 1; ELSE RETURN n*fac(N-1); -- Llamada recursiva END IF; END fac;
5.4
Concepto de Package y definicin

Un package es un objeto del esquema que agrupa de manera lgica tipos, elementos y subprogramas PL/SQL. Los packages tienen dos partes: una especificacin y un cuerpo. La especificacin es el interface para nuestras aplicaciones; all se declaran los tipos, variables, constantes, excepciones, cursores y subprogramas que se pueden utilizar. El cuerpo define de forma completa los cursores y subprogramas por lo tanto implementa la especificacin.
Pg. 93
Al contrario que los subprogramas, los packages no pueden ser llamados ni parametrizados. En cualquier caso, el formato de un package es parecido al de un subprograma: CREATE PACKAGE nombre AS -- Especificacin (parte visible) -- Tipos pblicos y declaracin de Objetos -- Especificacin de subprogramas END [nombre]; CREATE PACKAGE BODY nombre AS -- Cuerpo (parte oculta) -- Tipos privados y declaracin de Objetos -- Cuerpos de los subprogramas [BEGIN -- Sentencias de inicializacin] END [nombre]; En la especificacin encontramos declaraciones pblicas, las cuales son visibles para nuestra aplicacin, mientras que el cuerpo tiene la implementacin y declaraciones privadas, que no son visibles para nuestra aplicacin. Veamos un esquema grfico:
Aplicacin
Package Especificacin
Bbdd
Cuerpo
5.4.1
Definir un package
Como ya hemos comentado, los packages tienen una especificacin en la que se define la parte pblica, y un cuerpo en la que se realiza la implementacin de la parte pblica, y si se desea, se aade alguna parte privada. La estructura est bastante clara, as que veamos un ejemplo de definicin de package con una funcin y un procedimiento pblicos, y dentro del cuerpo pondremos uno privado.
Pg. 94
PACKAGE mi_package IS -- Declaraciones pblicas PROCEDURE proc1(); FUNCTION fun1() RETURN tipo_de_dato; END mi_package; PACKAGE BODY mi_package IS BEGIN PROCEDURE proc2() IS -- Procedimiento privado BEGIN END proc2; PROCEDURE proc1() IS BEGIN proc2(); -- Este ser privado END proc1; FUNCTION fun1() RETURN tipo_de_dato IS BEGIN RETURN END fun1; END mi_package;
Pg. 95
5.5
Ventajas de los Packages

La utilizacin de packages tiene numerosas ventajas: modularidad, un diseo de las aplicaciones ms sencillo, oculta informacin, aade funcionalidad, y proporciona un mejor rendimiento.
5.5.1
Modularidad
Los packages permiten encapsular de manera lgica tipos, objetos y subprogramas relacionados, en modulos PL/SQL con un mismo nombre. Cada package es sencillo de entender, y los interfaces entre los packages son simples, transparentes y bien definidos. Esto mejora el desarrollo de la aplicacin.
5.5.2
Diseo de aplicaciones ms sencillo

Cuando se disea una aplicacin, se debe inicializar toda la informacin del interface en la especificacin sin embargo no es necesario implementar todo el cuerpo, se puede ir haciendo poco a poco. Esto facilita mucho las cosas a la hora de realizar el diseo de aplicaciones.
5.5.3
Oculta informacin
Con los packages se puede especificar que tipos, objetos y subprogramas son pblicos (visibles y accesibles) o privados. Por ejemplo, en un cuerpo de package podemos tener procedimientos que hayan sido declarados en la especificacin, lo cual implica que son pblicos, y otros que no que son para uso interno, y por lo tanto no accesibles desde el exterior.
5.5.4
Aade funcionalidad
Las variables y cursores pblicos persisten durante la duracin de una sesin, por lo tanto pueden ser accesibles por todos los subprogramas que se ejecuten en el entorno. Tambin permiten mantener datos a travs de las transacciones, sin tener que almacenarla en la Bbdd.
Pg. 96
5.5.5
Mejor rendimiento
Cuando se llama a un subprograma de un package, se almacena en memoria todo el package, por lo tanto cualquier llamada a un subprograma de dicho package que se efecte en un espacio de tiempo relativamente corto, se ejecutar mucho ms rpido.
Pg. 97
PL/SQL Bsico Anexo 3: Ejercicios
ANEXO 3:EJERCICIOS
6.1
Ejercicios de la Unidad 4
1.- Determinar cuales de los siguiente Identificadores son equivalentes en PL/SQL DECLARE Identificador1 INTEGER; Identificador_1 INTEGER; identificador1 INTEGER; IdEntificador_1 INTEGER; IDENTIFICADOR1 INTEGER; 2.- Determinar cual de los siguientes identificadores en PL/SQL es el vlido: DECLARE Primera variable VARCHAR2(40); end BOOLEAN; Una_variable VARCHAR2(40); Otra-variable VARCHAR2(40); 3.- Funcionara la siguiente sentencia en PL/SQL?. En caso negativo proponer como resolverlo. DECLARE nombre VARCHAR2(80); direccion VARCHAR2(80); tipo empleado VARCHAR2(4); BEGIN SELECT name, address, type INTO nombre, direccion, tipo empleado FROM emp;
END; 4.- Qu resultado nos dara la siguiente comparacin? DECLARE identificador1 VARCHAR2(10):='Hola Pepe'; identificador2 VARCHAR2(10):='Hola pepe'; BEGIN IF identificador1<>identificador2 THEN RETURN TRUE; ELSE RETURN FALSE; END IF; END; 5.- Indicar que errores existen en el siguiente cdigo fuente: DECLARE a PLS_INTEGER:=1; b PLS_INTEGER:=6; salida_bucle BOOLEAN; BEGIN salida_bucle:='FALSE'; WHILE NOT salida_bucle LOOP BEGIN IF a>=b THEN salida_bucle:='TRUE'; ELSE a:=(a+1); END IF; END LOOP; END;
Pg. 99
6.- En las siguientes sentencias de definicin de Subtipos, hay una que no es vlida... Indicar cual es, y como solucionarlo. DECLARE SUBTYPE numero1 IS NUMBER; SUBTYPE cadena IS VARCHAR2(10); total numero1(6,2); 7.- Qu resultado dar la ejecucin del siguiente cdigo? DECLARE temp NUMBER(1,0); SUBTYPE numero IS temp%TYPE; valor numero; BEGIN WHILE valor<20 LOOP valor:=valor+1; END LOOP; END; 8.- En la siguiente frase, hay una serie de afirmaciones ciertas y otras que no lo son. Indicar cuales son ciertas y cuales falsas, y para stas ltimas razonar el por qu. * PL/SQL es capaz de realizar conversiones entre tipos de datos, de hecho puede convertir cualquier tipo de dato en otro diferente. Existen dos tipos de conversiones en PL/SQL: las conversiones Implcitas y las conversiones Explcitas; por ejemplo la funcin predefinida TO_DATE realiza una conversin implcita de un tipo STRING a un tipo DATE. Las conversiones son muy eficientes (sobre todo las implcitas), y debemos aprovechar al mximo esta funcionalidad soportada por PL/SQL. 9.- Indicar del siguiente juego de declaraciones, cuales son correctas y cuales no, indicando adems por qu no son correctas. DECLARE cierto BOOLEAN:=FALSE;
Pg. 100
id_externo INTEGER(4) NOT NULL; cosa PLS_INTEGER:=2; producto PLS_INTEGER:=2*cosa; suma PLS_INTEGER:=cosa + la_otra; la_otra PLS_INTEGER:=2; tipo_uno NUMBER(7,2) NOT NULL:=3; tipo_otro tipo_uno%TYPE; 10.- Suponiendo que tenemos una tabla llamada EMP, en la cual existen tres campos: nombre VARCHAR2(40), direccion VARCHAR2(255), telefono INTEGER(10)... Qu valores podrn tomar las variables que definimos en la siguiente declaracin? DECLARE valor1 emp%ROWTYPE; valor2 emp.nombre%TYPE; valor3 emp.telefono%TYPE; CURSOR c1 IS SELECT nombre,direccion FROM emp; valor4 c1%ROWTYPE; valor5 emp%ROWTYPE; 11.- En base al enunciado anterior... Sera correcta la siguiente asignacin? valor1:=valor5; y esta? valor4:=valor1; Razonar el por qu en ambos casos. 12.- Es esta declaracin correcta en PL/SQL? DECLARE i, j INTEGER; Y si la escribieramos as? DECLARE
Pg. 101
i, j INTEGER, INTEGER; 13.- Supongamos que tenemos un procedimiento llamado calculo_integral, el cual est incluido en un package llamado el_package_de_los_calculos, que su vez se encuentra en la instancia de Bbdd llamada ORCL. Como se hara para llamar a dicho procedimiento en el caso de encontrarse conectado a la Bbdd ORCL con un usuario que tuviera acceso al procedimiento?, Y en el caso de no estar en ORCL? 14.- Funcionaria el siguiente cdigo?. Explicar por qu y como solucionarlo (si se os ocurren varias formas de arreglarlo, explicarlas todas). DECLARE base PLS_INTEGER:=100; BEGIN FOR dept IN 1..10 LOOP UPDATE dept SET nom_dept=base+dept WHERE cod_dept=base+dept; END LOOP; END; 15.- Qu ocurrira al ejecutar el siguiente cdigo?, Por qu?, Cmo arreglarlo? (Si existen varias posibilidades, comentarlas e indicar cual sera ms eficiente). DECLARE ap1_emp VARCHAR2(40):='Fernandez'; BEGIN DELETE FROM emp WHERE ap1_emp=ap1_emp; COMMIT; END; 16.- Definir brevemente los conceptos de mbito y visibilidad. Explicar como los interpreta PL/SQL para el caso de los objetos definidos, y cual es el mtodo ms habitual para solucionar los problemas de visibilidad para variables con el mismo nombre en bloques diferentes.
Pg. 102
17.- Qu valor contendr la variable 'sumador' al salir del bucle?, Por qu? DECLARE sumador PLS_INTEGER; BEGIN FOR i IN 1..100 LOOP sumador:=sumador+i; END LOOP; END; 18.- Funcionara el siguiente trozo de cdigo?, Por qu?, Cmo arreglarlo? DECLARE mi_valor PLS_INTEGER; cierto BOOLEAN:=FALSE; BEGIN WHILE NOT cierto LOOP IF mi_valor=NULL THEN mi_valor:=1; ELSE mi_valor:=mi_valor+1; END IF; IF mi_valor>100 THEN cierto:=TRUE; END IF; EXIT WHEN cierto; END LOOP; END; 19.- En la utilizacin del Operador LIKE, qu dos caracteres especiales tenemos?, para que se utilizan?
Pg. 103
6.2
1.- Es correcta la siguiente sintaxis General de la sentencia IF-THENELSE?, Por qu?, Cmo la escribiras?. BEGIN IF condicion1 THEN BEGIN secuencia_de_instrucciones1; ELSE secuencia_de_instrucciones2; ENDIF; END; 2.- Escribir la sintaxis General de un cdigo que evale si se cumple una condicin, en caso de cumplirse que ejecute una serie de sentencias, en caso contrario que evale otra, que de cumplirse ejecute otras instrucciones, si sta no se cumple que evale una tercera condicin.. y as N veces. En caso de existir varias soluciones, comentarlas y escribir la ms ptima o clara. 3.- Implementar en PL/SQL un bucle infinito que vaya sumando valores en una variable de tipo PLS_INTEGER. 4.- En base al bucle anterior, aadirle la condicin de que salga cuando la variable sea mayor que 10.000. 5.- Implementar un bucle en PL/SQL mediante la sentencia WHILE, en el cual vayamos sumando valores a una variable mientras sta sea menor que 10, y asegurndonos de que el bucle se ejecuta por lo menos una vez. 6.- Implementar en PL/SQL, el cdigo necesario de un programa que al final de su ejecucin haya almacenado en una variable llamada 'cadena', el siguiente valor:
Pg. 104
cadena:='10*9*8*7*6*5*4*3*2*1' No es necesario definirlo como un procedimiento o funcin, pero s declarar todas las variables necesarias para su correcto funcionamiento. 7.- Es correcto el siguiente cdigo en PL/SQL?, Por qu? Nota: Ignorar el funcionamiento del cdigo (no hace nada), ceirse exclusivamente a la sintaxis vlida en PL/SQL. FOR ctr IN 1..10 LOOP IF NOT fin THEN INSERT INTO temp VALUES (ctr, 'Hola'); COMMIT; factor:=ctr*2; ELSE ctr:=10; END IF; END LOOP; 8.- Qu resultado provoca la ejecucin del siguiente cdigo PL/SQL? DECLARE variable PLS_INTEGER:=1; almacenamos PLS_INTEGER:=1; BEGIN FOR i IN 5..variable LOOP almacenamos:=almacenamos+i; END LOOP; INSERT INTO traza VALUES(TO_CHAR(almacenamos)); COMMIT; END; 9.- Dnde tienen valor las variables de control de un bucle FOR?, Hay alguna excepcin?.
Pg. 105
10.- Qu ocurre cuando ejecutamos una sentencia NULL?, Qu utilidad tiene? 11.- Cundo es especialmente til la sentencia GOTO?, Cundo debemos usarla? 12.- Qu resultado provocara la ejecucin del siguiente cdigo? BEGIN IF 2>3 THEN INSERT INTO TRAZA VALUES('Pongo un valor'); ELSE NULL; INSERT INTO TRAZA VALUES('Pongo otro valor'); END IF; COMMIT; END;
6.3
1.- Es correcta la siguiente asignacin en PL/SQL?, Por qu? DECLARE numero1 PLS_INTEGER; numero2 PLS_INTEGER; BEGIN ... numero1:=MAX(numero2); ... END; 2.- Qu pseudocolumna de SQL nos proporciona el identificador fsico de una fila en una tabla de la Bbdd?. Y el nmero de columna
Pg. 106
asociado a una consulta?. Qu pseudocolumnas nos facilitan trabajar con secuencias? 3.- Qu tipo de binding para las variables utiliza PL/SQL?, Qu limitaciones tiene?, Cmo las soluciona?. 4.- Qu dos mtodos generales tenemos para trabajar con Cursores en PL/SQL?, Cual es ms cmodo? 5.- Suponer que tenemos una tabla de empleados llamada 'emp' en la cual tenemos definidos entre otros los siguientes campos: emp_idemp, emp_nombre, emp_apellidos, emp_sexo, emp_colorpelo... donde emp_sexo ser 'H' para los hombres y 'M' para las mujeres, y emp_colorpelo ser un identificador del color de su pelo. Suponer que tenemos otra tabla llamada colorpelo_perfil_psico en la cual tenemos entre otras campos los siguientes cpp_colorpelo, cpp_nombrecolor, cpp_caractperf... el primero se refiere al identificador del color, el segundo a su nombre vulgar, y el tercero es una de las caractersticas psicolgicas de ese perfil. Podemos tener N caractersticas para cada color de Pelo... sin embargo hay una que es preocupante y es la que pone 'Tendencias homicidas'. Bueno, bajo estos supuestos se pide la codificacin de un algoritmo en PL/SQL que sea capaz de escribir en una tabla llamada TRAZA compuesta de un solo campo VARCHAR2(2000), a los sujetos que tengan esta caracterstica... indicando adems su nombre, apellidos y sexo. Nota: Para simplificar, supondremos todos los campos de las tablas como tipo VARCHAR2(500). 6.- Explicar y definir los tipos de datos necesarios para realizar un programa en PL/SQL que recorra un cursor cualquiera, pero que deba en cada iteracin referenciar a los valores que tena el cursor en la anterior iteracin.
Pg. 107
6.4
1.- Qu diferencias principales existen entre las excepciones internas y las excepciones definidas por el usuario? 2.- Cmo se declaran las excepciones que puede definir un usuario?, Cmo se disparan?, Qu reglas de mbito y visibilidad siguien las excepciones?... 3.- Pra que sirve el pragma EXCEPTION_INIT?, Y qu es un pragma?
6.5
1.- Qu tipo de Subprogramas soporta PL/SQL?, Qu diferencias existen entre ellos? 2.- Explicar el concepto de Package. Qu ventajas ofrece?.. 3.- Implementar de manera recursiva un subprograma en PL/SQL que calcule un nmero real 'x' elevado a un nmero entero 'n'.
Pg. 108

PLSQL Basico

Cargado por

Copyright:

Formatos disponibles

PLSQL Basico

Cargado por

Información del documento

Título original

Derechos de autor

Formatos disponibles

Compartir este documento

Compartir o incrustar documentos

Opciones para compartir

¿Le pareció útil este documento?

¿Este contenido es inapropiado?

Copyright:

Formatos disponibles

PLSQL Basico

Cargado por

Copyright:

Formatos disponibles

PL/SQL Bsico

Manual del Alumno

INNOVA Desarrollos Informticos, SL

Ttulo: Versin: Fecha Edicin: Autores:

PL/SQL Bsico 1.0 Junio de 2004 Javier Jofre Gonzlez-Granda

NDICE .............................................................................. 4 FICHA INFORMATIVA DEL MDULO. .................................. 6

1 UNIDAD 4:INTRODUCCIN A PL/SQL ............................ 7

2 UNIDAD 5:ESTRUCTURAS DE CONTROL ......................... 41

3 UNIDAD 6:INTERACCIN CON ORACLE ......................... 58

INNOVA Desarrollos Informticos, SL

4 UNIDAD 7: MANEJO DE ERRORES .................................. 75

5 UNIDAD 8: SUBPROGRAMAS Y PACKAGES ........................ 88

INNOVA Desarrollos Informticos, SL

FICHA INFORMATIVA DEL MDULO.

Requisitos del alumno

UNIDAD 4:INTRODUCCIN A PL/SQL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

Por ejemplo, la siguiente sentencia:

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

Identificadores con Comillas Dobles

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

Literales de tipo Carcter

Literales de tipo String

Literales de tipo Booleano

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

Comentarios de una lnea

Comentarios de mltiples lneas

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

Tipos de Datos en PL/SQL

Tipos Compuestos RECORD TABLE VARRAY

Tipos Referencia REF CURSOR REF object_type

Tipos LOB BFILE BLOB CLOB NCLOB

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

Subtipos definidos por el usuario

SUBTYPE Id_Num IS emp.numemp%TYPE; columna CURSOR c1 IS SELECT * FROM dep;

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL

INNOVA Desarrollos Informticos, SL

PL/SQL Bsico Unidad 4: Introduccin a PL/SQL