Day: 11 noviembre, 2015

CREATE OR REPLACE PACKAGE GeneraExcel IS debug_flag              BOOLEAN := TRUE; — constantes para los estilos definidos xTITULO                   CONSTANT VARCHAR2 (100) := ‘TITULO’; xNEGRITAPEQUEÑA           CONSTANT VARCHAR2 (100) := ‘NEGRITAPEQUENA’; xPEQUEÑABORDES            CONSTANT VARCHAR2 (100) := ‘PEQUENABORDES’; xENCABEZADO               CONSTANT VARCHAR2 (100) := ‘ENCABEZADO’;… Continue Reading →

create or replace FUNCTION pa_ObtenerValorConstante (p_constante IN VARCHAR2) RETURN VARCHAR2 IS v_Dummy PA_detalle_constantes.valor%TYPE; PROCEDURE RegistrarConstante (p_constante IN VARCHAR2, p_valor IN VARCHAR2) IS PRAGMA AUTONOMOUS_TRANSACTION; BEGIN INSERT INTO pa_detalle_constantes (des_constante, valor) VALUES (p_constante, p_valor); COMMIT; EXCEPTION WHEN DUP_VAL_ON_INDEX THEN NULL; END… Continue Reading →