Mostrando las entradas con la etiqueta PL/SQL. Mostrar todas las entradas
Mostrando las entradas con la etiqueta PL/SQL. Mostrar todas las entradas

miércoles, 11 de mayo de 2016

Parámetro de entrada y salida – PL/SQL

Parámetro de entrada y salida – PL/SQL:
Los parámetros de entrada y salida no son los parámetros de inicialización de la base de datos ORACLE. Los parámetros de entra y salida son utilizados mayormente en implementaciones de funciones, procedimientos almacenados o bloques de código bajo el lenguaje del PL/SQL, se considera que ambos parámetros (entra y salida) puedan realizar operaciones en el mismo bloque PL/SQL, es decir, si enviamos un parámetro de entrada hará que cumpla cierta operación y retornara los valores de salida de dicha operación procesada de acuerdo al parámetro de ingresado. Es de acuerdo al caso que nos presenta en la implementación.
Algo importante al definir los parámetros, es saber y considerar cuántos tipos de parámetro existe si solo hablamos de entrada y salida, en realidad mi determinación seria 3 tipos:

Parámetros:

IN – entrada
OUT – salida
IN OUT – entrada salida

Parámetro IN – entrada:
El comportamiento común de estés tipos de parámetros es estar siempre pendiente de recibir un dato para ser procesada según él dato. Acepta valores por defectos haciendo uso del operador de asignación (:=) o utilizando la palabra reservada DEFAULT.

Parámetro OUT – salida:
Los parámetros de salida inicialmente arrancan como NULL, es decir al iniciar el proceso el parámetro estará como nulo o en todo caso, puede tomar un valor inicial y ser cambio durante la ejecución del proceso; y al finalizar el proceso se encarga de tomar o asignar el último valor al parámetro de salida.

Parámetro IN OUT – entrada salida:
Los parámetros de entra salida comúnmente cumplen las 2 funcionalidades arriba mencionadas con la diferencia de que si no defines un valor de entra te retornará el valor nulo o según la condición del proceso que está realizando (Ver el ejemplo, líneas abajo) o caso contrario mostrará el valor de entrada según definido inicialmente.

Ejemplo:

Para el siguiente ejemplo planteare el siguiente caso:
Nos piden mostrar los registros EMPLOYEE_ID, MANAGER_ID, DEPARTMENT_ID de cualquiera de los empleados según el EMPLOYEEID, así mismo, debemos mostrar el campo DEPARTMENT_NAME sólo cuando el DEPARTMENT_ID sea igual a 50; además nos piden mostrar la fecha actual de ejecución del proceso y mostrar opcionalmente el mes actual en texto o en todo caso mostrara el mensaje definido - MES NO DEFINIDO (cuando el parámetro sea vacío u otro mes diferente al actual).
/*Se recomienda leer y considerar todos los comentarios detallados, 
  para su mayor entendimiento de la solución del caso propuesto */
CREATE OR REPLACE PROCEDURE Demo_DataInOutEmployees(
  --Parámetro de 
  p_EMPLOYEEID        IN NUMBER,--Entrada
  pou_EMPLOYEE_ID     OUT EMPLOYEES.EMPLOYEE_ID%TYPE,--Salida
  pou_MANAGER_ID      OUT EMPLOYEES.MANAGER_ID%TYPE,--Salida   
  pou_DEPARTMENT_ID   OUT EMPLOYEES.DEPARTMENT_ID%TYPE,--Salida  
  pou_DEPARTMENT_NAME OUT DEPARTMENTS.DEPARTMENT_NAME%TYPE,--Salida
  pou_DAY_CONSULT     OUT DATE,--Salida
  pou_MONTH_TEXT      IN OUT VARCHAR2--Entrada Salida
)
AS
BEGIN
      --@1 Inicio primer bloque - Recuperar datos de la tabla employees
      BEGIN
        pou_EMPLOYEE_ID :=100;--Por default, pero, puede ser cambando según el 
                              --proceso (según el select que nos retorna) 
        SELECT EMPLOYEE_ID, 
              MANAGER_ID,   
              DEPARTMENT_ID,
              SYSDATE(),
              CASE 
                  --WHEN TO_CHAR(TO_DATE('11/05/2016'),'MM') = '05' THEN 'MAYO'
                  --La condición del proceso a realizar es, que sí ingresamos 05 (referencia 
                  --al mes de MAYO) nos debería pintar como respuesta MAYO, caso contrario el
                  --mensaje NO ES EL MES ACTUAL
                  WHEN TO_CHAR(TO_DATE('11/05/2016'),'MM') = pou_MONTH_TEXT THEN 'MAYO'
                  ELSE 'MES NO DEFINIDO' END MES
        INTO  pou_EMPLOYEE_ID,
              pou_MANAGER_ID,
              pou_DEPARTMENT_ID,
              pou_DAY_CONSULT,
              pou_MONTH_TEXT
        FROM EMPLOYEES WHERE EMPLOYEE_ID = p_EMPLOYEEID;
      EXCEPTION
        WHEN no_data_found THEN
          pou_EMPLOYEE_ID:=NULL;
          pou_MANAGER_ID:=NULL;
          pou_DEPARTMENT_ID:=NULL;
      END;
      --@1 Final primer bloque - Recuperar datos de la tabla employees
      
      --@2 Inicio segundo bloque - Recuperar el DEPARTMENT_NAME. 
      --Solo sí el pou_DEPARTMENT_ID sea 50, caso contrario devolver CERO (0).
      --Considerando: Que sí el pou_DEPARTMENT_ID sea 50 y no se encuentra data
      --el parametro de salida devolvera null
      BEGIN
        if (pou_DEPARTMENT_ID = 50) THEN
            BEGIN
              SELECT  DEPARTMENT_NAME
              INTO    pou_DEPARTMENT_NAME
              FROM    DEPARTMENTS WHERE DEPARTMENT_ID=pou_DEPARTMENT_ID;
            EXCEPTION
              WHEN no_data_found THEN
                pou_DEPARTMENT_NAME:=NULL;--Null, no hay data a pesar de ser pou_DEPARTMENT_ID = 50
            END;
        ELSE
          begin
            pou_DEPARTMENT_NAME:=0;--0, diferente - pou_DEPARTMENT_ID != 50
          end;
        end if;
      end;      
      --@2 Inicio segundo bloque - Recuperar el DEPARTMENT_NAME- 
      
      --Pasar los datos recuperados a los parámetros de tipo OUT - Salida
      pou_EMPLOYEE_ID     :=pou_EMPLOYEE_ID;
      pou_MANAGER_ID      :=pou_MANAGER_ID;
      pou_DEPARTMENT_ID   :=pou_DEPARTMENT_ID;
      pou_DEPARTMENT_NAME :=pou_DEPARTMENT_NAME;
      pou_DAY_CONSULT     :=pou_DAY_CONSULT;
      pou_MONTH_TEXT      :=pou_MONTH_TEXT;
END Demo _DataInOutEmployees;

Consideración:
La palabra reservada para la implementación de parámetros de entrada es IN y se declara en la cabecera o al principio de una función, procedimiento almacenado o bloque acompañado de un tipo de dato, no se considera la longitud de data (ejemplo – varchar2(50), numeric(5)… no es considerado). Las mismas consideraciones se tienen con los parámetros OUT e IN OUT.

miércoles, 4 de mayo de 2016

Convertir expresión con TO_NUMBER - PL/SQL

Función TO_NUMBER():
Se encarga de convertir una expresión (expr) en un valor de tipo de dato NUMBER. Es decir el valor de la expresión (expr) puede ser un valor de tipo de dato  CHAR, VARCHAR2, NCHAR, NVARCHAR2 o BINARY_DOUBLE.

Sintaxis.

TO_NUMBER(expr [, fmt [,nlsparam ] ])

Ejemplo:

Convertir la expresión de tipo de dato VARCHAR2, haciendo uso de la función TO_NUMBER().
DECLARE
      pVARCHAR2 VARCHAR2(50) := '59300.65';--Considerar la cantidad de enteros y decimales en la entrada de datos, es decir si
                                                    --la entrada contiene 5 enteros y 2 decimales (ejemplo - 59300.65 cincuenta y nueve mil 
                                                    --trecientos con sesenta y cinco), nuestro dato de salida debe soporta la longitud de
                                                    --5 enteros y 2 decimas (ejemplo de retorno, '99999.99')
      pNUMBER NUMBER ;
      pNUMBER2 NUMBER; 
BEGIN           
      pNUMBER := TO_NUMBER(pVARCHAR2,'999999999999999999.99');--Incluye los decimales... ejmplo 59300,65
      pNUMBER2:= TO_NUMBER(pVARCHAR2,'999999999999999999D99');--Excluye los decimales...  ejemplo 5930065       
      
      DBMS_OUTPUT.PUT_LINE('Conversion usando punto : ' || pNUMBER);
      DBMS_OUTPUT.PUT_LINE('Conversion usando la letra D : ' || pNUMBER2);
END;
Para poder convertir una expresión en cualquier parte de nuestra implementación sería lo optimo crear una función que realice todo esta conversión, y hacer referencia a dicha función creada.
CREATE OR REPLACE FUNCTION FN_FORMATEO_EXPRESION(
       pVARCHAR2 IN VARCHAR2
) 
RETURN NUMBER IS
  pNUMBER NUMBER;
BEGIN
  pNUMBER := TO_NUMBER(pVARCHAR2 ,'99999999999.99');
  
  RETURN pNUMBER ;
END FN_FORMATEO_EXPRESION;

Validar la función creada:
SELECT MI_ESQUEMA.FN_FORMATEO_EXPRESION('59300.65') FROM DUAL;
Consideraciones:
- Puedes especificar una expresión de tipo BINARY_FLOAT. Sin embargo, no tiene relevancia en hacerlo porque un tipo float solo puede ser interpretado por su presentación interna.
- No es compatible con los datos CLOB directamente. Sin embargo, CLOB se pueden pasar como argumentos a través de la conversión de datos implícita.
- El argumento nlsparam, en esta función tiene el mismo propósito que en la función TO_CHAR(). Además puedes dar el formato (fmtde la mascará haciendo uso de la función TO_CHAR().
- La función NVL() se puede utilizar a partir de Oracle 10g y Oracle 11g.

martes, 1 de diciembre de 2015

RAISE_APPLICATION_ERROR - PL/SQL

RAISE_APPLICATION_ERROR – PL/SQL:

En muchas oportunidades al implementar líneas de queries en PL/SQL se necesita controlar ciertos proceso, para ello se logra enviando mensajes de errores personalizado al producirse una excepción. La instrucción a utilizar es el RAISE_APPLICATION_ERROR:

Sintaxis:
RAISE_APPLICATION_ERROR(<error_num>,<mensaje>); 

Ejemplo:
/*Se recomienda leer y considerar todos los comentarios detallados para su mayor entendimiento del pequeño ejemplo*/
DECLARE
   count_rows NUMBER;
BEGIN
   SELECT COUNT(*) INTO count_rows FROM employees;
   IF count_rows > 200 THEN--Si la condición no se cumpliera
      /* Generamos nuestro propio error(ORA -20101) con nuestro mensaje personalizado*/
      raise_application_error(-20101, 'Debe existrir como mínimo 200 registros');
   ELSE
      --Generamos el proceso si cumple la condición < 200
      null;
   END IF;

END;

Con estos detalles quiero dar por iniciado sobre el tema de las excepciones - Exception:

sábado, 7 de noviembre de 2015

Pivot PL/SQL - ORACLE 11G

En Oracle 11g una de las muchas funcionalidades incorporada en dicha versión es la solución a muchos de nuestro problemas, que en versiones anteriores teníamos que recurrir a la expresión CASE.

Recordemos que el operador Pivot se encarga de presentar información en un informe con referencias cruzadas con formato de planilla de cálculo a partir de cualquier tabla relacional usando código PL/SQL intermedio (dependiendo el caso que se presente), y almacena dichos datos en una tabla con referencias cruzadas de un determinado almacén (base de datos).

Además en el mundo de BI o OLAP un pivot es conocido como tablas de doble entrada, multidimensionales o simplemente conocidos con cross table (tablas cruzadas).

Consideracioness:
Son utilizadas asociadas a funciones de agrupamiento tales como SUM, COUNT, MIN, MAX, entre otros.
Se recomienda usar alias cuando se va a realizar más de una función agregada.
El título de la columna corresponderá a la lista de valores o alias de cada valor que agrega en el operador FOR.
Además se recomienda especificar el alias para que el valor tomará el alias.
No se recomienda usar funciones de agregación en el operador FOR, para esto se recomienda hacer uso de vistas.

Sintaxis:
Select * from nombre_tabla  -- Origen de datos
Pivot  --Operador Pivot
( fn_agregada_1() Alias_1,  -- Funciones agrupadas a mostrar
  Fn_agregada_2() Alias_2,
 For (campo_1 Alias_1 ,
      Campo_2 Alias_2  -- Campos donde se genera el pivot)
      In(Lista de valores)  -- Filtros para generar las columnas

 )
Para el siguiente ejemplo de nuestra implementación haciendo uso del operador Pivot haremos uso de la tabla employees de la Schema HR.

1. Construir query de origen de datos.


SELECT  DEPARTMENT_ID, TO_CHAR(HIRE_DATE,'YYYY'), SUM(SALARY)
FROM    EMPLOYEES
WHERE   DEPARTMENT_ID IS NOT NULL
AND     SALARY IS NOT NULL
AND     DEPARTMENT_ID BETWEEN 50 AND 100
GROUP BY DEPARTMENT_ID, TO_CHAR(HIRE_DATE,'YYYY')
ORDER BY DEPARTMENT_ID, TO_CHAR(HIRE_DATE,'YYYY');




Lo que nuestro query hace es mostrar los departamentos que se encuentra en el rango del 50 al 100 en determinados años y agrupados en ambos, así mismo muestra la suma del salario según los principales datos. En el siguiente caso nos pide mostrar la suma del salario por todos los año según el DEPARTMENT_ID. Para este caso, lo primero que se nos ocurre es transponer las filas a columnas.  

2. Recordemos a la implementa con la expresión CASE.


SELECT  DEPARTMENT_ID,
          SUM( CASE TO_CHAR(HIRE_DATE,'YYYY')
               WHEN '2001' THEN SALARY ELSE 0 END) AS "AÑO-2001",
          SUM( CASE TO_CHAR(HIRE_DATE,'YYYY')
               WHEN '2002' THEN SALARY ELSE 0 END) AS "AÑO-2002",
          SUM( CASE TO_CHAR(HIRE_DATE,'YYYY')
               WHEN '2003' THEN SALARY ELSE 0 END) AS "AÑO-2003",
          SUM( CASE TO_CHAR(HIRE_DATE,'YYYY')
               WHEN '2004' THEN SALARY ELSE 0 END) AS "AÑO-2004",
          SUM( CASE TO_CHAR(HIRE_DATE,'YYYY')
               WHEN '2005' THEN SALARY ELSE 0 END) AS "AÑO-2005",
          SUM( CASE TO_CHAR(HIRE_DATE,'YYYY')
               WHEN '2006' THEN SALARY ELSE 0 END) AS "AÑO-2006",
          SUM( CASE TO_CHAR(HIRE_DATE,'YYYY')
               WHEN '2007' THEN SALARY ELSE 0 END) AS "AÑO-2007",
          SUM( CASE TO_CHAR(HIRE_DATE,'YYYY')
               WHEN '2008' THEN SALARY ELSE 0 END) AS "AÑO-2008"
FROM    EMPLOYEES
WHERE   DEPARTMENT_ID IS NOT NULL
AND     SALARY IS NOT NULL
AND     DEPARTMENT_ID BETWEEN 50 AND 100
GROUP BY DEPARTMENT_ID
ORDER BY DEPARTMENT_ID;



Todo bien hasta ahora, se logró lo que nos solicitaron, pero, que pasa sí es que tenemos muchos años más de lo que hasta ahora mostramos, es decir los años desde el 1980 al 2015, tendríamos que replica 35 veces nuestra función de agrupamiento de nuestra expresión CASE. 
   
3. Crear la vista con el query de origen de datos (no siempre es necesario crear vistas).


CREATE OR REPLACE VIEW V_EMPLOYEES_HIRE_DATE
AS
SELECT  DEPARTMENT_ID, TO_CHAR(HIRE_DATE,'YYYY') AS HIRE_DATE, SALARY
FROM    EMPLOYEES
WHERE   DEPARTMENT_ID IS NOT NULL
AND     SALARY IS NOT NULL
AND     DEPARTMENT_ID BETWEEN 50 AND 100;

4. Ahora veremos la implementación con el Operador Pivot, lograremos el mismo resultado pero con menos línea de código.

SELECT * FROM (SELECT  DEPARTMENT_ID, HIRE_DATE, SALARY
                FROM    V_EMPLOYEES_HIRE_DATE )
                PIVOT
                (SUM(SALARY)
                      FOR HIRE_DATE IN (2001,2002,2003,2004,2005,2006,2007,2008)
                      )
ORDER BY 2 DESC;

Lo que se logra con el operador Pivot es que los filtros para la construcción de las columnas, solo será cuestión de agregar nuevos valores (FOR HIRE_DATE IN (2001,...., nuevo_filtros)) en el operador FOR.

sábado, 5 de abril de 2014

Función Decode - ORACLE

Función DECODE():
Esta función hace aveces de la sentencia CASE o IF-THEN-ELSE, para facilitar consultas condicionales. Basicamente se encarga de descifra una expresión después de compararla con cada valor de búsqueda. Considerando si la expresión es la misma que la búsqueda, se devuelve el resultado. Si se omite el valor por defecto, se devolverá un valor nulo donde una búsqueda no coincida con ninguno de los valores resultantes

Sintaxis.

DECODE(campo,valor_comprobar1,valor_devuelto_si_coincide1,valor_comprobar2,valor_devuelto_si_coincide2, ..., valor_caso_contrario_por_defecto)

Ejemplo - Caso:

Necesitamos mostrar el last_name, salary, commission_pct + salary, especificar en texto si comiciona o no, y mostrar la descripción de los departamentos solicitados 10, 20, 60, 70 y 100 entre el rango del 10 al 100, considerando que los departamentos que no se solicitan y se encuentra en dicho rango se debe especificar como - Depart. no especificado.
--Considere los comentarios
select last_name,
      salary,
      (salary * nvl(commission_pct,0))+salary add_commi_salary,
      case 
          when nvl(commission_pct,0) = 0 then 'No comisiona' else 'comisiona' end text_commi_salary,
      decode(department_id,--campo que condiciona
                           --Las busquedas de los valores resultantes que se necesita encontrar
                           10,'Administration',--si la condición es 10 = Administration,la misma función se considera con 20,60,70 y 100
                           20,'Marketing', 
                           60,'IT', 
                           70,'Public Relations',
                           100,'Finance',
                                'Depart. no especificado'--en caso no se cunpliera ninguna de las condiciones se mostrará - Depart. no especificado
                                ) as department
from  employees
where department_id between 10 and 100
order by salary;

--Si se omite el valor por defecto nos mostrara como nulos (campo - department)
select last_name,
      salary,
      (salary * nvl(commission_pct,0))+salary add_commi_salary,
      case 
          when nvl(commission_pct,0) = 0 then 'No comisiona' else 'comisiona' end text_commi_salary,
      decode(department_id,--campo que condiciona
                           --Las busquedas de los valores resultantes que se necesita encontrar
                           10,'Administration',--si la condición es 10 = Administration,la misma función se considera con 20,60,70 y 100
                           20,'Marketing', 
                           60,'IT', 
                           70,'Public Relations',
                           100,'Finance'
                                ) as department
from  employees
where department_id between 10 and 100
order by salary;
La base de datos para ejecutar los ejemplos es de RRHH oracle express.