Templarios de San Oracle » Paquetes de utilidad

Paquete DBMS_STATS (II)

Sir Ragnar — Wed, 10 Oct 2007 18:19:27 +0000

Delfino ya ha publicado la segunda parte de la guía sobre DBMS_STATS. No sé cuántas horas le habrá llevado pero está mejor si cabe que la anterior. Estilo Tom pero en español, que queda como más clarito. Por si a alguien le interesa: DBMS_STATS Parte 2. Habrá que estar atentos porque ha prometido una tercera parte…

Paquete DBMS_STATS

Sir Ragnar — Wed, 03 Oct 2007 15:54:17 +0000

No fue hasta los tres años de andadura bajo las alas de Oracle que supe de la existencia de las estadísticas y del amigo optimizer. Desde ese día no deja de sorprenderme el hecho de que al 100% de las bases de datos (Oracle) de producción con las que me cruzo nunca jamás se les haya hecho un analyze en condiciones.

Cuando tuve conocimiento, lo que se estilaba era usar el comando ANALYZE. Más tarde nació DBMS_STATS. Comencé a usarlo pero la base de datos empezó a dar algunos errores internos. Creo que el problema radicaba en que esa base de datos nació de un import en el que ya viajaban estadísticas generadas con ANALYZE. De todas formas, como ANALYZE me funcionaba al pelo y con él la base de datos no petaba pues hice caso omiso de la recomendación de Oracle y me olvidé de momento de DBMS_STATS.

El caso es que ahora estoy en otra base de datos con un esquema que está limpio de estadísticas y me disponía a recordar todo esto cuando me he cruzado con una guía muy clara en castellano sobre DBMS_STATS: DBMS_STATS. Parte 1.

Para el que no sepa nada de las estadísticas de Oracle o quiera refrescar conocimientos esta guía es la caña y está muy currada: Estadísticas, estadísticas y más estadísticas Parte 1.

DDL de FKs que apuntan a una tabla

Sir Ragnar — Thu, 26 Jul 2007 17:08:32 +0000

Uniendo el script que obtiene las tablas que apuntan a una con la utilidad del todopoderoso paquete DMBS_METADATA me he hecho otro script que me obtiene el ddl de las claves foráneas que apuntan a una tabla determinada. No sé si me volverá a hacer falta algún día pero por si acaso o por si a alguien más le interesa, aquí está el script:

-- Script para obtener el ddl de la lista de claves foráneas que
-- referencian a una tabla
-- http://www.tsoracle.com
---------------
-- Sets varios
--------------
SET VERIFY OFF
SET LONG 5000
------------
-- Parámetros
------------
ACCEPT propi PROMPT "Propietario (enter para usuario conectado): "
ACCEPT tabla PROMPT "Nombre de la tabla: "
BREAK ON TABLE_NAME
COLUMN DEFI FORMAT A120
------------
-- Select
------------
PROMPT Tablas que referencian a &&tabla
SELECT DBMS_METADATA.get_DDL( 'REF_CONSTRAINT', 
                              r.CONSTRAINT_NAME, 
                              r.OWNER ) 
       DEFI
FROM   ALL_CONSTRAINTS T, ALL_CONSTRAINTS R
WHERE  T.OWNER      = NVL( UPPER( '&&propi' ), USER )
  AND  T.TABLE_NAME = UPPER( '&&tabla' )
  AND  T.CONSTRAINT_TYPE IN ( 'P', 'U' ) -- Que sean pk o uk
  AND  R.R_OWNER           = T.OWNER
  AND  R.R_CONSTRAINT_NAME = T.CONSTRAINT_NAME
  AND  R.CONSTRAINT_TYPE   = 'R'         -- Que sea una fk
ORDER BY R.TABLE_NAME, R.CONSTRAINT_NAME
/
---------------------
-- Restauro el verify
---------------------
SET VERIFY ON

Sé que se nota que estoy flipao con el dbms_metadata pero es que no puedo creer que haya podido vivir tanto tiempo sin él. La de ríos de código que me podría haber ahorrado.

Obtener ddl de permisos

Sir Ragnar — Tue, 24 Jul 2007 14:04:53 +0000

Otra función interesante del paquete DBMS_METADATA es get_Granted_DDL. Tal como su nombre sugiere, te devuelve el código ddl de los permisos que tenga el usuario que le pasas como parámetro. En este caso le pasaríamos dos parámetros, el primero de los cuales es el tipo(a elegir entre AUDIT, DEFAULT_ROLE, OBJECT_GRANT, PROXY, ROLE_GRANT, SYSTEM_GRANT y TABLESPACE_QUOTA), el segundo es el usuario. Los otros parámetros pueden tomar los valores por defecto. Por ejemplo, la siguiente select nos daría el ddl de creación de permisos de sistema para el viejo Scott

SET LONG 5000
SELECT DBMS_METADATA.GET_GRANTED_DDL( 'SYSTEM_GRANT', 'SCOTT' )
FROM   DUAL
/

Esta nos daría la de los objetos a los que tiene privilegios directamente, sin pasar por un rol:

SET LONG 5000
SELECT DBMS_METADATA.GET_GRANTED_DDL( 'OBJECT_GRANT', USER ) AS CPRIVILEGIO
FROM   DUAL
/

Para los otros posibles valores para el tipo, no he conseguido hacerlo funcionar. No sé si es que me faltan privilegios o que estoy haciendo algo mal (o las dos cosas a la vez).

Obtener ddl de objetos

Sir Ragnar — Mon, 23 Jul 2007 14:16:44 +0000

Para aquellos que utilizan el Toad(el lado oscuro de la fuerza) o similares nunca es un problema recuperar de la base de datos el ddl de una tabla o un paquete. Para los fanáticos del plus como yo puede ser algo tedioso. El código de los paquetes, funciones y procedimientos puedes obtenerlo de la vista ALL_SOURCE, el de las vistas de ALL_VIEWS y el de los triggers de ALL_TRIGGERS. A partir de la Oracle 9i hay una función que nos puede sacar el código ddl de cualquier objeto de tu esquema: DBMS_METADATA.get_DDL. Tiene varios parámetros, pero sólo los tres primeros son obligatorios. Los otros toman valores por defecto. El primer parámetro se refiere al tipo de objeto, el segundo al nombre del objeto y el tercero al esquema al que pertenece. El paquete pertenece a SYS pero, como es lógico, sólo te deja consultar objetos para los que tengas permiso.
Por ejemplo, si creamos esta tabla:

CREATE TABLE PRUEBA(
  A VARCHAR2(1) PRIMARY KEY,
  B DATE        NOT NULL,
  C VARCHAR2(3) )
/

Asumiendo que el esquema propietario fuese TSORACLE, el resultado del get_ddl sería este:

SQL> SET LONG 5000
SQL> SELECT DBMS_METADATA.get_DDL('TABLE','PRUEBA','TSORACLE') FROM DUAL;
 
DBMS_METADATA.GET_DDL('TABLE','PRUEBA','TSORACLE')
--------------------------------------------------------------------------------
 
  CREATE TABLE "TSORACLE"."PRUEBA"
   (    "A" VARCHAR2(1),
        "B" DATE NOT NULL ENABLE,
        "C" VARCHAR2(3),
         PRIMARY KEY ("A")
  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255
  STORAGE(INITIAL 131072 NEXT 131072 MINEXTENTS 1 MAXEXTENTS 2147483645
  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT)
  TABLESPACE "TSORACLE"  ENABLE
   ) PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
  STORAGE(INITIAL 131072 NEXT 131072 MINEXTENTS 1 MAXEXTENTS 2147483645
  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT)
  TABLESPACE "TSORACLE"

El SET LONG es importante porque el valor por defecto del plus es bajo. Habría que ajustarlo según la salida esperada.
Otro ejemplo podría ser cómo obtener el ddl de creación de todos los sinónimos del esquema:

SET LONG 5000
SELECT DBMS_METADATA.get_DDL( 'SYNONYM', SYNONYM_NAME, USER ) 
FROM   ALL_SYNONYMS 
ORDER  BY SYNONYM_NAME;

No sé, me ha parecido una utilidad molona.

Paquete UTL_INADDR

Sir Ragnar — Wed, 18 Jul 2007 22:43:09 +0000

¡Qué caña!. Me acabo de enterar de la existencia del paquete UTL_INADDR que sirve para obtener información de direcciones de internet. Hasta ahora, la única forma que conocía era utilizando las vistas v$session y compañía. Y siempre tenía que andar pidiendo al dba de turno que me diese permiso. Este artículo ilustra sobre el uso del paquete: Oracle Database 11g Old Feature: Internet Addressing. La lista de enlaces asociados es también muy interesante. La documentación oficial está aquí.