Apaga y vámonos

Eliminar la vista de módulos de la página de entrada de Scarab

2011-09-03T16:34:00.000+01:00

Entre la infinidad de parámetros que nos proporciona Scarab, resulta a veces complicado encontrar el modo de modificar el comportamiento de alguna funcionalidad.

En este caso, trataba de buscar la forma que no me apareciesen los módulos dados de alta en la aplicación en la pantalla de bienvenida (y que fueran visibles para cualquier persona que accediese a la página).

Para ello basta con modificar la siguiente propiedad desde el apartado 'Configuración de la aplicación':

scarab.anonymous.enable => false

De esta forma tan sencilla, eliminamos de la 'home' de Scarab la lista de nuestros módulos.

Algunos comandos útiles en Microsoft Windows

2008-09-22T12:38:00.002+01:00

En ocasiones hay algunas aplicaciones de Windows que por un motivo u otro desaparecen y resulta complicado encontrarlas.

Para acceder a estas herramientas, se pueden ejecutar los siguientes comandos (Inicio - Ejecutar...):

Herramienta de restauración del sistema: %systemroot%\system32\restore\rstrui.exe
Hotplug (desconexión de dispositivos externos, usb...): %systemroot%\system32\Rundll32.exe shell32.dll,Control_RunDLL hotplug.dll
Microsoft Word: winword
Microsoft Excel: excel
Escritorio Remoto: mstsc

Importar certificados en Java

2008-07-01T09:55:00.002+01:00

Cuando desarrollamos una aplicación en Java que va ha hacer uso de un recurso seguro (mediante un certificado), debemos asegurarnos que este certificado podrá ser validado por una entidad certificadora que reconozca Java. Debido a que Java es un lenguaje multi-plataforma, no utiliza la información de certificados alojada en el Sistema Operativo.

Por defecto, la máquina virtual de Java dispone de las Entidades Certificadoras (CA) más comunes, como Verisign o Thawte. Sin embargo, suele darse el caso, sobretodo en entornos de desarrollo, que necesitemos utilizar una Entidad Certificadora "de prueba". En este caso, debemos importar esta CA en el almacén de claves de la máquina virtual que estemos utilizando.

Importar Certificado en el almacén de certificados (keystore)

La máquina virtual de Java (JVM) cuenta con un almacén de claves (keystore) que incorpora las entidades más habituales y la posibilidad de agregar aquellas que nos sean necesarias. El keystore se encuentra en la ruta: JVM_PATH\lib\security\cacerts. Por ejemplo:

C:\Archivos de programa\Java\jre1.6.0_05\lib\security\cacerts
C:\Archivos de programa\Java\jdk1.5.0_15\jre\lib\security

Para añadir una nueva entidad certificadora a la JVM que estemos utilizando, debemos utilizar el comando keytool (JVM_PATH\bin\keytool):

keytool -import -keystore "C:\Archivos de
programa\Java\jre1.6.0_05\lib\security\cacerts" -file
c:\NuevaEntidadCertificadora.cer -alias CA_SwitchOffAndLetsGo -storepass
changeit

Puede observarse que el almacén de certificados contiene la contraseña por defecto 'changeit'. El nombre que especifiquemos en el alias, debe ser único en el keystore y servirá de referencia futura en el almacén. Podemos listar los certificados instalados utilizando la opción list del keytool:

keytool -list -keystore "C:\Archivos de
programa\Java\jre1.6.0_05\lib\security\cacerts" -storepass changeit

Importar Certificado utilizando el panel de control de Java (Windows)

Atención: con esta opción únicamente se añadirán los certificados a la instalación activa de la JVM en Windows.

Para añadir la nueva entidad, se accederá al Panel de Control de Windows, y se seleccionará la opción "Java". Seguidamente se marcará la pestaña "Seguridad" y se pulsará sobre el botón "Certificados".

En el apartado de Certificados, se seleccionará la opción "Importar" y se localizará el archivo que contiene el certificado (si el certificado tiene extensión .cer se tendrá que seleccionar la opción 'Todos los archivos'). El nuevo certificado aparecerá en la pestaña "Usuario".

Modificar un mensaje SOAP desde Java

2008-06-10T21:46:00.002+01:00

El propósito del siguiente artículo, es explicar el modo en que se puede modificar un mensaje SOAP en una llamada a un Web Service desde NetBeans. Esto es muy útil en aquellos casos en que consumimos un WebService generado en otro lenguaje de programación, y no encontramos la forma de acceder a algún objeto que se encuentra dentro del mensaje.

Imaginemos que tenemos el siguiente mensaje SOAP para la llamada a un WebService:

<?xml version="1.0" encoding="utf-8"?>
<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
<soap:Header>
<cabeceraSOAP xmlns="http://switchoffandletsgo.blogspot.com/">
<ipOrigen>string</ipOrigen>
</cabeceraSOAP>
</soap:Header>
<soap:Body>
<SumaNumeros xmlns="http://switchoffandletsgo.blogspot.com/">
<intNum1>int</intNum1>
<intNum2>int</intNum2>
</SumaNumeros >
</soap:Body>
</soap:Envelope>

Se puede observar que el WebService tiene un método SumaNumeros que recibe dos enteros y devolvería la suma de ambos. Además contiene una cabecera SOAP en la que se debe enviar la dirección IP de origen.

Al generar las clases necesarias para realizar la llamada utilizando el WSDL del WebService, NetBeans no es capaz de reconocer la cabecera del mensaje SOAP, con lo que no podemos establecer directamente la variable cabeceraSOAP. Por lo tanto, tendremos que agregar un Handler que intervenga antes de realizar la llamada, y añada al mensaje la cabecera que necesitemos.

Para ello creamos una nueva clase, por ejemplo SumaNumerosHandler y pedimos que implemente la clase SOAPHandler<SOAPMessageContext>:

public class SumaNumerosHandler implements SOAPHandler<SOAPMessageContext> {

}

Después le pedimos a NetBeans que realice los imports necesarios y que implemente los métodos abstractos, con lo que nos aparecerá la definición de los métodos que tenemos que implementar:

public Set<QName> getHeaders() {
throw new UnsupportedOperationException("Not supported yet.");
}

public boolean handleMessage(SOAPMessageContext arg0) {
throw new UnsupportedOperationException("Not supported yet.");
}

public boolean handleFault(SOAPMessageContext arg0) {
throw new UnsupportedOperationException("Not supported yet.");
}

public void close(MessageContext arg0) {
throw new UnsupportedOperationException("Not supported yet.");
}

En concreto vamos a centrarnos en el método handleMessage, que se ocupará de capturar la salida o entrada del mensaje SOAP. Para el resto de métodos que no nos ocupan, vamos a definir una serie de valores de retorno por defecto:

public Set<QName> getHeaders() {
return Collections.EMPTY_SET;
}

public boolean handleFault(SOAPMessageContext messageContext) {
return true;
}

public void close(MessageContext context) {
}

Método handleMessage

Como se puede observar, este método recibe un parámetro SOAPMessageContext. Esta interface da acceso al mensaje SOAP en cada petición o respuesta que se realiza en la comunicación, pudiendo modificar el contenido de este mensaje.

Para obtener el mensaje, llamamos al método getMessage():

SOAPMessage msg = messageContext.getMessage();

También necesitaremos conocer la dirección en la que viaja el mensaje, esto es, si se trata de un mensaje de salida o de entrada. En nuestro caso, necesitaremos modificar únicamente el mensaje de salida (petición). Podemos obtener esta información mediante el método get(), tal como se ilustra en el siguiente fragmento de código:

boolean bolMsgSalida= (Boolean) messageContext.get(MessageContext.MESSAGE_OUTBOUND_PROPERTY);

Por último, para añadir la cabecera a nuestro mensaje de salida, vamos a hacer uso de una serie de objetos que nos permitirán editar y modificar el mensaje SOAP:

// Obtenemos el contenedor del mensaje SOAP
SOAPPart sp = msg.getSOAPPart();

// A partir del contendor, obtenemos el nodo "Envelope"
SOAPEnvelope env = sp.getEnvelope();

// Instanciamos un objeto SOAPFactory para crear cualquier elemento perteneciente a un mensaje SOAP, en nuestro caso, los nodos que formarán la cabecera
SOAPFactory soapFactory = SOAPFactory.newInstance();

// Definimos los elementos a incluir en el mensaje
SOAPElement soapElementoCabecera = soapFactory.createElement("cabeceraSOAP","","http://switchoffandletsgo.blogspot.com/");

SOAPElement soapIpOrigen= soapFactory.createElement("ipOrigen","", "http://switchoffandletsgo.blogspot.com/");

// Rellenamos la información del nodo ipOrigen
soapIpOrigen.addTextNode("192.168.0.1");

// Incluimos los elementos dentro de los objetos correspondientes
soapElementoCabecera.addChildElement(soapIpOrigen);

SOAPHeader soapHeader = env.addHeader(); // Crea un elemento cabecera SOAP

soapHeader.addChildElement(soapElementoCabecera);

Si no se ha producido ninguna excepción, el método devolverá true.

Este manejador de mensajes SOAP, debería generar el siguiente nodo dentro del mensaje que se enviará al servidor:

<soap:Header>
<cabeceraSOAP xmlns="http://switchoffandletsgo.blogspot.com/">
<ipOrigen>1921.168.0.1</ipOrigen>
</cabeceraSOAP>
</soap:Header>

Finalmente, debemos asignar el nuevo manejador al Web Service que queremos consumir. Para ello, accederemos a la carpeta "Web Service References" de nuestro proyecto de NetBeans, y pulsaremos con el botón derecho sobre el Web Service que queremos asignar. En el menú desplegable aparecerá la opción "Configure Handlers...".

Únicamente tendremos que añadir "Add..." nuestra clase SumaNumerosHandler y aceptar.

A partir de este ejemplo, las opciones son infinitas, podemos modificar cualquier parte del mensaje SOAP, entrante o saliente, según sean nuestras necesidades. En todo caso, siempre que sea posible, la mejor opción reside en utilizar las clases y métodos que genera NetBeans a partir del WSDL del Web Service.

Wish List

2008-05-06T15:30:00.007+01:00

Siguiendo la línea del post en el que enumero los libros que he leído últimamente, he decidido crear una pequeña lista de aquellos libros que me gustaría leer.

	Junot Díaz
	La maravillosa vida breve de Oscar Wao (Premio Pulitzer 2008). Las tribulaciones de un joven latino en Nueva Jersey. La esperada primera novela de Junot Díaz. La vida nunca ha sido fácil para Oscar Wao, un dominicano dulce, obeso y algo desastroso que vive con su madre y su hermana en un gueto de Nueva Jersey. Oscar sueña con convertirse en un J.R.R. Tolkien dominicano y, por encima de todo, con encontrar el amor de su vida. Pero puede que nunca alcance sus metas debido a una extraña maldición presente en su familia desde hace generaciones; enviando a los Wao a prisión, predisponiéndolos a accidentes trágicos y, ante todo, al desamor. Después del éxito internacional de Los Boys (Mondadori, 1996), Junot Díaz recrea, con humor, la experiencia de los dominicanos en Estados Unidos y la capacidad de perseverar en medio del desengaño amoroso y la pérdida.

	José Saramago
	Ensayo sobre la ceguera.La novela relata cómo una extraña epidemia de ceguera asola todo un país. Un pobre hombre que espera en su coche frente a un semáforo es el primero en padecerla y a partir de entonces se extiende cada vez más rápidamente entre la población. Los afectados son puestos en cuarentena, pero resulta imposible contener la enfermedad y las calles acaban llenándose de ciegos que son víctimas de este inexplicable mal consistente en una infinita ceguera blanca, como un mar de leche. A medida que aumenta el temor y la crisis en el país, gradualmente las personas se convierten en presa de los más bajos instintos del ser humano, llegando a los extremos más miserables. El profundo egoísmo que marca a los distintos personajes en la lucha por la supervivencia, se convierte en una parábola de la sociedad actual, trascendiendo así el significado de ceguera más allá de la propia enfermedad física.

SQL Server: Metadatos (III) - Aplicación práctica - Buscar una palabra en BBDD

2008-05-01T10:58:00.003+01:00

Siguiendo la línea de los últimos artículos acerca de la utilidad práctica de los metadatos del SQL Server, vamos a crear un script para buscar una cadena de texto en nuestra base de datos. Con unas pocas modificaciones, nos serviría también para buscar números u otro tipo de datos que admita el SQL Server.

Para buscar la cadena en nuestra base de datos, vamos a seguir los siguientes pasos:

Recorrer las tablas de la base de datos. Para cada tabla:

Crear consulta de búsqueda sql = "Select count(*) From " + NOM_TABLA + " Where 1=0"
Recorrer los campos de la tabla actual. Para cada campo del tipo "char", "varchar" o "nvarchar":

Agregar una condición de búsqueda a la cadena SQL (concatenada con OR):

sql = sql + ' OR ' + NOM_COLUMNA + ' like ''%' + CADENA_BUSCAR + '%'''

Continuar con el siguiente campo.

Ejecutar la sentencia sql resultante de recorrer los campos de la tabla.

Si el resultado de la ejecución (count(*)) es mayor que cero, se ha encontrado el valor buscado.

Continuar con la siguiente tabla.

Se puede observar que en la SQL que vamos a crear, se añade como condición WHERE la sentencia 1=0. Esto se hace porque se puede dar el caso que una tabla no tenga campos de texto, en ese caso, la única condición sería 1=0 que no se cumple nunca, y que no nos devolvería ningún registro (count = 0).
En caso que la tabla contenga algún campo de tipo texto, se añadiría a la condición WHERE con el operador OR, y si se cumple que el campo contiene la cadena a buscar, el resultado de la condición WHERE sería true, con lo que el count(*) devolvería uno o más registros. Por ej.:

Select count(*) From Usuarios Where 1=0 OR Nombre like '%Pablo%'.

En este caso, el texto coloreado en verde es añadido por el script como un literal, mientras que el texto rojo se añade en función de los campos que tiene cada tabla. Si la condición marcada en rojo se cumple, toda la condición WHERE será verdadera.

Como siempre, debemos incluir al inicio del script, la instrucción Use, con tal de seleccionar la BBDD en la que queremos trabajar:

Use [miBaseDeDatos]

1. Recorrer las tablas de la Base de datos.

Para recorrer las tablas de nuestra base de datos, vamos a hacer uso de la información de Metadatos contenida en information_schema.tables. Podemos añadir una condición WHERE para filtrar las tablas en las que queremos buscar.

DECLARE CURSOR_SELECT

CURSOR FOR

SELECT TABLE_NAME

FROM information_schema.tables

OPEN CURSOR_SELECT FETCH NEXT FROM CURSOR_SELECT INTO @NOM_TABLA

-- Recorre las tablas de la base de datos

WHILE @@FETCH_STATUS = 0

BEGIN

/* Realiza las operaciones necesarias */

FETCH NEXT FROM CURSOR_SELECT INTO @NOM_TABLA

END

/* Libera la memoria */

CLOSE CURSOR_SELECT

DEALLOCATE CURSOR_SELECT

1.1. Crear consulta de búsqueda.

Por cada tabla, vamos a crear una consulta SQL que servirá para localizar la palabra que estamos buscando dentro de la tabla actual. Para ello constuiremos una cadena que se compone de una parte fija #Select count(*) From NOM_TABLA Where 1=0 # y a la que añadiremos los distintos campos de la base de datos.

print '-----------------------'

print 'TABLA: ' + @NOM_TABLA

print '-----------------------'

-- Crea la cadena de búsqueda

SET @PROXIMA_SENTENCIA = 'SELECT Count(*) FROM ' + @NOM_TABLA + ' WHERE 1=0'

Además aprovechamos para imprimir por consola el nombre de la tabla.

1.2. Recorrer los campos de la tabla actual.

Para recorrer los campos de una tabla, vamos a hacer uso de la información contenida en information_schema.columns. Por simplificar, vamos a limitar la búsqueda a campos de tipo texto (nvarchar, varchar y char).
En cada iteración, se añade una condición de búsqueda del tipo " OR Nombre_Columna like '%Cadena a buscar%' ".

-- Crea el cursor de campos de búsqueda

DECLARE CURSOR_CAMPOS

CURSOR FOR

SELECT COLUMN_NAME

FROM information_schema.columns

WHERE TABLE_NAME like @NOM_TABLA

AND (DATA_TYPE = 'nvarchar' OR DATA_TYPE = 'varchar' OR DATA_TYPE = 'char')

OPEN CURSOR_CAMPOS FETCH NEXT FROM CURSOR_CAMPOS INTO @NOM_COLUMNA

WHILE @@FETCH_STATUS = 0

BEGIN

SET @PROXIMA_SENTENCIA = @PROXIMA_SENTENCIA + ' OR ' + @NOM_COLUMNA + ' like ''%' + @CADENA_BUSCAR + '%'''

FETCH NEXT FROM CURSOR_CAMPOS INTO @NOM_COLUMNA

END

-- Libera memoria

CLOSE CURSOR_CAMPOS

DEALLOCATE CURSOR_CAMPOS

1.3. Ejecutar sentencia.

El siguiente paso, será ejecutar la sentencia que se ha construido para la tabla actual. Se imprimirá el resultado de registros obtenidos, si el resultado es mayor de cero, se habrá encontrado la palabra buscada.

-- Ejecuta la sentencia para comprobar si obtiene algún resultado

SELECT @sql = 'DECLARE CURSOR_SENTENCIA CURSOR FOR ' + @PROXIMA_SENTENCIA

EXEC sp_executesql @sql

OPEN CURSOR_SENTENCIA FETCH NEXT FROM CURSOR_SENTENCIA INTO @REGISTROS

WHILE @@FETCH_STATUS = 0

BEGIN

print 'Registros ' + str(@REGISTROS)

FETCH NEXT FROM CURSOR_SENTENCIA INTO @REGISTROS

END

-- Libera memoria

CLOSE CURSOR_SENTENCIA

DEALLOCATE CURSOR_SENTENCIA

1.4. Continuar con la siguiente tabla.

Continuará con la siguiente tabla, repitiendo los pasos 1.1., 1.2. y 1.3.

Este ejemplo puede completarse con otros tipos de datos, seleccionando la manera adecuada para compararlos con el tipo de datos buscado.

Espero que os sea de utilidad!!

Código completo:

Use [miBaseDeDatos]

DECLARE @SQL NVARCHAR(4000)
DECLARE @PROXIMA_SENTENCIA NVARCHAR(3500)
DECLARE @NOM_TABLA NVARCHAR(255)
DECLARE @NOM_COLUMNA NVARCHAR(255)
DECLARE @REGISTROS int
DECLARE @CADENA_BUSCAR NVARCHAR(255)
SET @CADENA_BUSCAR = 'prueba'

DECLARE CURSOR_SELECT
CURSOR FOR
SELECT TABLE_NAME
FROM information_schema.tables

OPEN CURSOR_SELECT FETCH NEXT FROM CURSOR_SELECT INTO @NOM_TABLA
-- Recorre las tablas de la base de datos
WHILE @@FETCH_STATUS = 0
BEGIN
print '-----------------------'
print 'TABLA: ' + @NOM_TABLA
print '-----------------------'
-- Crea la cadena de búsqueda
SET @PROXIMA_SENTENCIA = 'SELECT Count(*) FROM ' + @NOM_TABLA + ' WHERE 1=0'
-- Crea el cursor de campos de búsqueda
DECLARE CURSOR_CAMPOS
CURSOR FOR
SELECT COLUMN_NAME
FROM information_schema.columns
WHERE TABLE_NAME like @NOM_TABLA
AND (DATA_TYPE = 'nvarchar' OR DATA_TYPE = 'varchar' OR DATA_TYPE = 'char')
OPEN CURSOR_CAMPOS FETCH NEXT FROM CURSOR_CAMPOS INTO @NOM_COLUMNA
WHILE @@FETCH_STATUS = 0
BEGIN
SET @PROXIMA_SENTENCIA = @PROXIMA_SENTENCIA + ' OR ' + @NOM_COLUMNA + ' like ''%' + @CADENA_BUSCAR + '%'''
FETCH NEXT FROM CURSOR_CAMPOS INTO @NOM_COLUMNA
END
-- Libera memoria
CLOSE CURSOR_CAMPOS
DEALLOCATE CURSOR_CAMPOS
print @PROXIMA_SENTENCIA
-- Ejecuta la sentencia para comprobar si obtiene algún resultado
SELECT @sql = 'DECLARE CURSOR_SENTENCIA CURSOR FOR ' + @PROXIMA_SENTENCIA
EXEC sp_executesql @sql
OPEN CURSOR_SENTENCIA FETCH NEXT FROM CURSOR_SENTENCIA INTO @REGISTROS
WHILE @@FETCH_STATUS = 0
BEGIN
print 'Registros ' + str(@REGISTROS)
FETCH NEXT FROM CURSOR_SENTENCIA INTO @REGISTROS
END
-- Libera memoria
CLOSE CURSOR_SENTENCIA
DEALLOCATE CURSOR_SENTENCIA
FETCH NEXT FROM CURSOR_SELECT INTO @NOM_TABLA
END

/* Libera la memoria */
CLOSE CURSOR_SELECT
DEALLOCATE CURSOR_SELECT

SQL Server: Metadatos (II) - Aplicación práctica - Vaciar base de datos

2008-04-02T21:50:00.001+01:00

Continuando con el artículo en el que hablaba de la utilidad de los Metadatos para obtener información de nuestra base de datos, vamos a escribir un procedimiento almacenado cuya finalidad será la de vaciar todo el contenido (datos) de nuestra base de datos.

Este procedimiento resultará muy útil en aquellas bases de datos que contengan multitud de tablas relacionadas entre si. En estos casos, nos vemos obligados a ir eliminando los datos tabla a tabla, respetando las reglas de integridad, lo cual se convierte en una tarea muy complicada. Para automatizar este proceso seguiremos los siguientes pasos:

Deshabilitar las restricciones de cada tabla de la base de datos.
Vaciar los registros de las distintas tablas de la base de datos.
Volver a habilitar las restricciones definidas en las tablas de la base de datos.

Y por supuesto, realizar una copia de seguridad de nuestra base de datos antes de ejecutar el script, por si algo fuese mal. Además como medida de seguridad adicional, podemos incluir al inicio del script, la instrucción Use, con tal de seleccionar la BBDD en la que queremos trabajar:

Use [miBaseDeDatos]

1. Deshabilitar restricciones de las tablas de la BBDD.

Para ello vamos a recorrer todas las restricciones de nuestra base de datos con la ayuda de la información contenida en information_schema.table_constraints. Además vamos a aprovechar para deshabilitar cada restricción a medida que vamos recorriendo el cursor.

DECLARE CURSOR_ALTER

CURSOR FOR

SELECT 'ALTER TABLE ' + TABLE_NAME + ' NOCHECK CONSTRAINT ' + CONSTRAINT_NAME, TABLE_NAME, CONSTRAINT_NAME

FROM information_schema.table_constraints

ORDER BY TABLE_NAME, CONSTRAINT_NAME

OPEN CURSOR_ALTER FETCH NEXT FROM CURSOR_ALTER INTO @PROXIMA_SENTENCIA, @NOM_TABLA, @NOM_CONSTRAINT

WHILE @@FETCH_STATUS = 0

BEGIN

exec (@PROXIMA_SENTENCIA)

FETCH NEXT FROM CURSOR_ALTER INTO @PROXIMA_SENTENCIA , @NOM_TABLA, @NOM_CONSTRAINT

END

/* Libera la memoria */

CLOSE CURSOR_ALTER

DEALLOCATE CURSOR_ALTER

2. Vaciar los registros de las distintas tablas de la base de datos.

De igual forma que en el paso anterior, vamos a recorrer todas las tablas de nuestra base de datos y eliminar sus registros. Para ello, utilizaremos la información que nos brinda information_schema.tables. Es muy importante que limitemos de alguna forma las tablas que se van a vaciar, por ejemplo, si las tablas de nuestra aplicación empiezan por TBL_ podríamos especificar en la condición WHERE que filtre por aquellas tablas que empiezan con este nombre. En el código que tenemos a continuación, se eliminarán los registros de todas las tablas excepto de sysdiagrams.

DECLARE CURSOR_DELETE

CURSOR FOR

SELECT 'DELETE FROM ' + TABLE_NAME, TABLE_NAME

FROM information_schema.tables

WHERE TABLE_NAME not like 'sysdiagrams'

ORDER BY TABLE_NAME

OPEN CURSOR_DELETE FETCH NEXT FROM CURSOR_DELETE INTO @SQL_DELETE, @NOM_TABLA

WHILE @@FETCH_STATUS = 0

BEGIN

exec (@SQL_DELETE)

FETCH NEXT FROM CURSOR_DELETE INTO @SQL_DELETE, @NOM_TABLA

END

/* Libera la memoria */

CLOSE CURSOR_DELETE

DEALLOCATE CURSOR_DELETE

3. Habilitar restricciones de las tablas de la BBDD.

Vamos a realizar el proceso inverso al seguido en el paso 1. De nuevo, haremos uso de la información contenida en information_schema.table_constraints. En este caso, utilizaremos la instrucción CHECK CONSTRAINT, que vuelve a activar la restricción.

DECLARE CURSOR_ALTER

CURSOR FOR

SELECT 'ALTER TABLE ' + TABLE_NAME + ' CHECK CONSTRAINT ' + CONSTRAINT_NAME, TABLE_NAME, CONSTRAINT_NAME

FROM information_schema.table_constraints

ORDER BY TABLE_NAME, CONSTRAINT_NAME

OPEN CURSOR_ALTER FETCH NEXT FROM CURSOR_ALTER INTO @PROXIMA_SENTENCIA, @NOM_TABLA, @NOM_CONSTRAINT

WHILE @@FETCH_STATUS = 0

BEGIN

exec (@PROXIMA_SENTENCIA)

FETCH NEXT FROM CURSOR_ALTER INTO @PROXIMA_SENTENCIA , @NOM_TABLA, @NOM_CONSTRAINT

END

/* Libera la memoria */

CLOSE CURSOR_ALTER

DEALLOCATE CURSOR_ALTER

Una vez ejecutados los tres pasos, habremos vaciado toda la información de nuestra base de datos. Como recomendación, se deberían limitar aquellas tablas de las que vamos a borrar los registros mediante la correspondiente instrucción dentro de la clausula WHERE (en el paso 2). También es interesante incluir comentarios y sentencias print que nos den una idea de la acción que esta realizando en cada momento el script, y de aquellas tablas que han sufrido cambios.

Libros

2008-01-22T13:12:00.007+01:00

No todo iba a ser programación... Aprovecho este blog para añadir algunos libros que he leído, así como una valoración (muy personal) del mismo. Que nadie piense que quiero hacer critica literaria, simplemente quiero reflejar si me ha gustado.

	Juan Eslava Galán
	En busca del Unicornio. La novela, ambientada a fines del siglo XV, narra la historia de un personaje ficticio a quien se envía en busca del cuerno del unicornio, que se supone aumentará la virilidad del rey Enrique IV de Castilla, llamado el Impotente. En la trama argumental, habilísima y muy amena, dentro de una escrupulosa fidelidad a la ambientación histórica, se suceden las más curiosas e inesperadas peripecias, siempre con un fondo emotivo y poético que da fuerza y encanto mítico al relato. El autor ha logrado un estilo que es un maravilloso equilibrio entre la soltura y agilidad narrativa y el sabor arcaico que requería el tema. En suma, una deliciosa novela de aventuras en donde coexisten lo fantástico, lo humorístico y lo dramático.	10/10

	Ken Follet
	Los pilares de la Tierra. El gran maestro de la narrativa y el suspense nos transporta a la Edad Media, a un fascinante mundo de reyes, damas, caballeros, pugnas feudales, castillos y ciudades amuralladas. El amor y la muerte se entrecruzan vibrantemente en este magistral tapiz cuyo centro es la construcción de una catedral gótica. La historia se inicia con el ahorcamiento público de un inocente y finaliza con la humillación de un rey. Los pilares de la tierra es la obra maestra de Ken Follett y constituye una excepcional evocación de una época de violentas pasiones.	10/10

	Matilde Asensi
	Iacobus. Galcerán de Born; monje de una orden militar, es enviado por el papa Juan XXII a investirgar la misteriosa muerte de su antecesor Clemente V y la del rey Feliope IV de Francia, tras la ejecución del Gran Maestre de la Orden del Temple. a partir de aquí se inicia una vertiginosa aventura que nos conducirá de la sede papal de Aviñon a París y de allí, a lo largo del Camino de santiago, hasta el confín del mundo, Finisterre.	9/10
	El último Catón. Tras el éxito de El salón de ámbar e Iacobus, Matilde Asensi nos presenta una nueva novela tan impactante como aquellas. Todo comienza cuando una científica que trabaja para el Vaticano es llamada para descifrar las extrañas señales aparecidas en el cuerpo de un etíope fallecido en extrañas circunstancias. A partir de aquí se desplegará una trama trepidante y que pondrá al descubierto una siniestra conspiración para atentar contra las reliquias más sagradas de la Iglesia.	9/10
	Todo bajo el cielo. Elvira, una pintora española afincada en el París de las vanguardias, recibe la noticia de que su marido, con el que está casada por amistad, ha muerto en su casa de Shanghai en extrañas circunstancias. Acompañada por su sobrina, zarpa desde Marsella en barco para recuperar el cadáver de Remy sin saber que éste es sólo el principio de una gran aventura por China en busca del tesoro del Primer Emperador. Sin tiempo para reaccionar se verá perseguida por los mafiosos de la Banda Verde y los eunucos imperiales, y contará con la ayuda del anticuario Lao Jiang y su sabiduría oriental en un gran recorrido que les llevará desde Shangai hasta Xián.	8/10

	John Boyne
	El niño con el pijama de rayas. Aunque el uso habitual de un texto como éste es describir las características de la obra, por una vez nos tomaremos la libertad de hacer una excepción a la norma establecida. No sólo porque el libro que tienes en tus manos es muy difícil de definir, sino porque estamos convencidos de que explicar su contenido estropearía la experiencia de la lectura. Creemos que es importante empezar esta novela sin saber de qué trata. No obstante, si decides embarcarte en la aventura, debes saber que acompañarás a Bruno, un niño de nueve años, cuando se muda con su familia a una casa junto a una cerca. Cercas como ésa existen en muchos sitios del mundo, sólo deseamos que no te encuentres nunca con una. Por último, cabe aclarar que este libro no es sólo para adultos; también lo pueden leer, y sería recomendable que lo hicieran, niños a partir de los trece años de edad.	7/10

	Eduardo Mendoza
	El asombroso viaje de Pomponio Flato En el siglo I de nuestra era, Pomponio Flato viaja por los confines del Imperio romano en busca de unas aguas de efectos portentosos. El azar y la precariedad de su fortuna lo llevan a Nazaret, donde va a ser ejecutado el carpintero del pueblo, convicto del brutal asesinato de un rico ciudadano. Muy a su pesar, Pomponio se ve inmerso en la solución del crimen, contratado por el más extraordinario de los clientes: el hijo del carpintero, un niño candoroso y singular, convencido de la inocencia de su padre, hombre en apariencia pacífico y taciturno, que oculta, sin embargo, un gran secreto. Cruce de novela histórica, novela policíaca, hagiografía y parodia de todas ellas, 'El asombroso viaje de Pomponio Flato' es la obra más insólita e inesperada de Eduardo Mendoza, y también una de las más ferozmente divertidas. Como en el Quijote se ponían en solfa los libros de caballerías, aquí se ajustan las cuentas a muchas novelas de consumo, y se construye, al mismo tiempo, una nueva modalidad del género más característico de Eduardo Mendoza: la trama detectivesca original e irónica, que desemboca en una sátira literaria y en una desternillante creación de inagotable vitalidad novelesca.	8/10

	Hermann Hesse
	Siddharta. Novela de aprendizaje espiritual del hijo de un brahman. Se trata más de una novela de evolución interior que de una novela de acción. A través del encuentro con diferentes personajes, asistimos al desarrollo personal del protagonista hacia la pureza espiritual y la paz interior.	8/10

	Flann O'Brien
	La vida dura. Una exégesis de lo escuálido. A la casa del disputador señor Collopy arriban dos niños huérfanos. Mientras el señor Collopy se dedica a una misteriosa y humanitaria labor en favor de las mujeres, los chicos crecen entre los aromas del buen whisky y de la mala cocina. Manus, el hermano, pronto demuestra ser un maestro en los negocios. Con virtuoso y cruel ingenio, Flann O' Brien nos ofrece un argumento a escala clásica; su economía es incomparable, su inventiva desbordante.	6/10

Fuente comentarios:http://www.lecturalia.com/

Reflection con VB.Net (I): Instanciar objetos

2007-09-25T13:13:00.001+01:00

En algunas ocasiones, podemos querer crear objetos de forma dinámica, de forma que no necesitemos conocer el nombre de la clase a instanciar durante el desarrollo. Para ello, podemos utilizar las clases del namespace Reflection.

Vamos a realizar un ejemplo en el que queremos instanciar una clase de la que no conocemos el nombre, y que dicha clase tiene que ejecutar un método X que devolverá un resultado en una propiedad Y. Definimos un formulario web con 5 textBox y un botón:

txtLibreria: dónde se encuentra la clase.
txtClase: nombre de la clase a instanciar
txtMetodo: nombre del método a ejecutar
txtPropiedad: propiedad que contiene el resultado
txtResultado: mostrará el resultado obtenido
btnEjecutar: ejecuta el método

Para simplificar el ejemplo, consideramos las siguientes restricciones:

El método no tiene parámetros
La propiedad que contiene el resultado es de tipo String

En el evento onClick del botón, insertamos el siguiente código:

Dim
objectType As Type = Type.GetType(txtLibreria.Text + "." + txtClase.Text + ", " + txtLibreria.Text, True)
Dim myObject As Object = Activator.CreateInstance(objectType) ' Crea la instancia del objeto
Dim mi As Reflection.MethodInfo = myObject.GetType().GetMethod( txtMetodo.Text)
mi.Invoke(myObject,
Nothing) ' Invoca al método (sin parámetros)
Dim pi As Reflection.PropertyInfo = myObject.GetType.GetProperty( txtPropiedad)
Dim strResultado As String = pi.GetValue(myObject, Nothing) ' Recupera el valor de la propiedad
txtResultado.Text = strResultado

En siguientes entregas, veremos la forma de llamar a un método con parámetros, y de obtener toda la información de una clase.

Referencias:

SQL Server: Metadatos (I) - Procedimientos Almacenados

2007-07-12T12:47:00.001+01:00

Cuando una base de datos alcanza un tamaño significativo en lo relativo a procedimientos almacenados, se hace muy complicado tener una visión general de dichos procedimientos junto con los parámetros que aceptan. Es por ello que sería muy interesante obtener todos los procedimientos junto con sus parámetros y tipos de datos en una consulta SQL, con el fin de poder tratar esta información desde una aplicación externa, por ej. desde Excel o Access.

SQL Server nos brinda esta información en lo que se suele denominar metadata. Dentro del espacio INFORMATION_SCHEMA encontramos información relativa a los objetos de la base de datos. Para el caso que nos ocupa, utilizaremos la tabla PARAMETERS:

SELECT SPECIFIC_SCHEMA, SPECIFIC_NAME, PARAMETER_NAME, DATA_TYPE, PARAMETER_MODE

FROM INFORMATION_SCHEMA.PARAMETERS

WHERE

OBJECTPROPERTY ( OBJECT_ID ( QUOTENAME(SPECIFIC_SCHEMA) + '.' + QUOTENAME(SPECIFIC_NAME) ), 'IsMsShipped' ) = 0

Ejecutando la SQL en nuestra base de datos, obtendremos todos los procedimientos almacenados del sistema ordenados por la fecha de última modificación (descendente).

Regenerar identity en SQL Server

2007-05-25T08:14:00.001+01:00

En ocasiones nos encontramos con una tabla que contiene datos y queremos vaciarla y volverla a rellenar por algún motivo. Si la tabla tiene una columna identity, al rellenarla de nuevo, empezará por el último identificador que tenía asignado. Para inicializar de nuevo la columna identity ejecutaremos la siguiente instrucción desde una consola de SQL:

dbcc checkident (nombre_tabla, reseed , 0)

Eligiendo un cliente de publicación

2007-03-27T13:51:00.001+01:00

Casi me vuelvo loco para encontrar un programa que me permita publicar artículos de una manera sencilla. Parece ser que los más utlizados son:

Qumana
w.bloggar

Los he descargado, pero por lo que he podido observar w.bloggar funciona muy bien con Wordpress y Qumana me falla al arrancar (excepción de Java) y no hay forma de probarlo. Así que buscando por del.icio.us he encontrado Bleezer. No puedo comparar con los otros, pero aparentemente es muy fácil de utilizar, que a fin de cuentas, es lo que interesa.

He estado tentado de pasar el blog a Wordpress, pero no he podido porque no permite código javascript, lo que es necesario para los ejemplos que he realizado con Google Maps. Así que, de momento, a continuar con Blogger...

Gráficos ABC

2007-03-07T13:32:00.001+01:00

Los gráficos ABC se pueden utilizar para obtener una información clara de aquellos elementos a los que necesitamos prestar una mayor atención dentro de un conjunto de datos. Para aclarar un poco este tema, pongamos un ejemplo. Supongamos que tenemos una lista de fallos que se producen en la cadena de producción:

Fallo de color
Fallo de dibujo
Fallo de tela
Fallo de presentación

Estos fallos queremos clasificarlos dentro de tres grupos:

Grupo A: los que más nos interesa controlar. Son aquellos que representarán el 75% de los fallos que tiene nuestra empresa y que debemos solucionar urgentemente.
Grupo B: aquellos defectos que tienen una importancia secundaria.
Grupo C: son defectos que podemos despreciar, ya que ocurren ocasionalmente.

Pongamos que tenemos la siguiente clasificación:

Defecto	Cantidad
Color	4
Dibujo	3
Presentación	1
Color	1
Tela	8
Presentación	1

Para obtener el gráfico necesitamos dos columnas más, una que representará el tanto por cien del número de fallos sobre el total y otra que contendrá el tanto por cien acumulado:

Defecto	Cantidad	Porcentaje	Acumulado
Tela	8	44.4	44.4
Color	5	27.7	72.1
Dibujo	3	16.6	88.7
Presentación	2	11.1	100
	18	100

Como se puede observar, hemos ordenado la tabla con la cantidad Porcentaje en orden descendente.

Los dos primeros defectos (tela y color) serían los que entrarían en el grupo A, ya que se encuentran por debajo del 75% de la columna acumulado.

El segundo grupo (grupo B), lo formarían aquellos defecto del 75% al 90% (dibujo) y el grupo C aquellos que estén por encima del 90%.

Por lo tanto controlando los defectos de tela y color, estamos controlando el 75% de los defectos de nuestra empresa.

Si aplicamos este concepto con más datos, los resultados son más claros. En el siguiente gráfico se han introducido 20 defectos. Como se puede ver en la gráfica, controlando 4 de los 20 defectos (linea azul), podemos solucionar el 75% de los defectos de nuestra empresa.

En conclusión, podemos utilizar los gráficos ABC en multitud de escenarios, dedicando el esfuerzo de control a un grupo reducido de elementos.

El autor de esta teoría es Vilfredo Pareto (http://es.wikipedia.org/wiki/Pareto), por lo que, en ocasiones, se puede referir a este gráfico como Pareto de Defectos, etc.

Por último, agradecer a mi amigo José Martín Ferre que fue quien me introdujo este concepto que en su día aplicamos en tantas y tantas empresas.

Google Maps (III)

2007-02-28T12:13:00.001+01:00

Crear imágenes para las flechas de dirección

Las flechas de dirección que hemos puesto sobre el mapa, son un conjunto de imágenes cuya rotación varia en 3º a la derecha. La creación de estas imágenes nos llevaría mucho tiempo, pero, por suerte, existen programas como el Photoshop que permiten automatizar tareas con programación en Visual Basic.

Para este caso, he utilizado las librerías que ofrece Photoshop CS2, pero supongo que la sintaxis es muy parecida en versiones anteriores. La especificación de los objetos la podéis encontrar en la web de Adobe. También se podría haber hecho algo parecido con CorelDraw o AutoCad.

Se podría utilizar cualquier programa que admita la programación VBA, en mi caso utilicé Microsoft Excel porque era lo que tenía más a mano. Simplemente creo un botón y le asigno el siguiente código:

Public Sub generaImagen()
Dim appRef, doc, opciones

Set appRef = CreateObject("Photoshop.Application")

Set opciones = CreateObject("Photoshop.ExportOptionsSaveForWeb")
opciones.PNG8 = False
opciones.Format = psPNGSave

For i = 1 To 119
doc = "C:\dir\dir_0.psd"
appRef.Open doc
appRef.ActiveDocument.ActiveLayer.Rotate (i * 3), psMiddleCenter ' Rotar 3º con bloqueo en el centro
appRef.ActiveDocument.Export "C:\dir\dir_" & (i * 3) & ".png", psSaveForWeb, opciones
appRef.ActiveDocument.Close psDoNotSaveChanges
Next

Set opciones = Nothing
Set appRef = Nothing
End Sub

Además es muy importante añadir las referencias a las bibliotecas de Photoshop. Para ello accedo al menú Herramientas, Referencias desde el editor de código y selecciono:

Adobe Photoshop 9.0 Object Library.

En este caso se crearán imagenes png de 24 bits a partir de una imagen en formato Photoshop (PSD) dir_0.psd. Las imágenes se irán nombrando como dir_XX.png, siendo XX el grado de rotación hasta llegar a 357.

Google Maps (II)

2007-02-28T09:57:00.000+01:00

Crear ruta

Para crear la ruta codificada utilizaremos una herramienta de Google llamada "Interactive Polyline Encoder Utility" en la que podemos dibujar la ruta directamente sobre el mapa.

Esta utilidad nos proporciona dos cadenas de texto que deberemos incluir en nuestro código. En el mapa que tenemos debajo, se ha creado la siguiente ruta (ver points y levels):


function barranc(){
limpiaMapa();

var infoInicio = [ new GInfoWindowTab("Tab #1", "Inicio del recorrido") ];
var infoFin = [ new GInfoWindowTab("Tab #1", "Fin del recorrido") ];

var ePoly = new GPolyline.fromEncoded({
color: "#FF0000",
weight: 10,
points: "ggekFnm{AIbAmDfDuMjM|CjDcKpPyPaTwH~@g@bU~@~IrBjFJpAy@hGwApAyCE?xB",
levels: "BBBBBBBBBBBBBBBB",
zoomFactor: 32,
numLevels: 4

});

map.addOverlay(ePoly);

// Inicio
var inicio = new GMarker(new GLatLng(38.69828857, -0.4733562469));

GEvent.addListener(inicio, "click", function()
{ inicio.openInfoWindowTabsHtml(infoInicio); });
map.addOverlay(inicio);

// Fin

var fin= new GMarker(new GLatLng(38.707850253909, -0.4866600036621094));

GEvent.addListener(fin, "click", function()
{ fin.openInfoWindowTabsHtml(infoFin); });
map.addOverlay(fin);
}

También hemos marcado en la ruta el punto de partida y el punto de llegada. Para ello, hemos utilizado el objeto GMarker, al que le pasaremos las coordenadas del punto. Posteriormente, añadimos un listener, para que al pinchar sobre el marcador, nos muestre un diálogo con la información del punto. Este diálogo lo hemos creado con GInfoWindowTab.

Marcar la dirección de la ruta

Por desgracia, la API de Google no permite crear las flechas de dirección para que quede más clara la ruta. Buscando por internet, encontré algunas funciones que me han ayudado para esta tarea.
Para marcar la ruta vamos a necesitar un conjunto de imágenes que marquen cierto grado respecto al norte, una función que nos calcule el grado adecuado entre dos puntos y otra que ponga la imagen sobre el mapa.

Empecemos con la función que nos calcula el grado de rotación que debemos aplicar entre dos puntos del mapa:


// === Returns the bearing in degrees between two points. ===
// North = 0, East = 90, South = 180, West = 270.
var degreesPerRadian = 180.0 / Math.PI;

function bearing( from, to ) {
// See T. Vincenty, Survey Review, 23, No 176, p 88-93,1975.
// Convert to radians.
var lat1 = from.latRadians();

var lon1 = from.lngRadians();
var lat2 = to.latRadians();

var lon2 = to.lngRadians();

// Compute the angle.
var angle = - Math.atan2( Math.sin( lon1 - lon2 ) * Math.cos( lat2 ), Math.cos( lat1 ) * Math.sin( lat2 ) - Math.sin( lat1 ) * Math.cos( lat2 ) * Math.cos( lon1 - lon2 ) );

if ( angle &lt; 0.0 )
angle  += Math.PI * 2.0;

// And convert result to degrees.
angle = angle * degreesPerRadian;
angle = angle.toFixed(1);

return angle;
}

Encontré esta función en un foro, por lo que no puedo poner ninguna referencia a su autor. Se puede observar la siguiente referencia en los comentarios: See T. Vincenty, Survey Review, 23, No 176, p 88-93,1975.

También necesitamos una función que seleccione la imagen a utilizar dependiendo del grado que nos devuelva la función anterior:


       var arrowIcon = new GIcon();

 arrowIcon.iconSize = new GSize(21,21);
 arrowIcon.shadowSize = new GSize(1,1);

 arrowIcon.iconAnchor = new GPoint(12,12);
 arrowIcon.infoWindowAnchor = new GPoint(0,0);

 function direccion(points) {       
       var p1=points[0];

       var p2=points[1];
      
  // Obtiene la direccion de la flecha (bearing) entre los dos puntos
  var dir = bearing(p1,p2);

       // lo redondea para que sea multiplo de 3 ya que las imagenes se han creado en diferenciales de 3 grados
       var dir = Math.round(dir/3) * 3;
  
  if (dir==360) { dir = 0; }

  // Busca el punto medio entre los dos puntos
  var p1x, p1y, p2x, p2y, pmidxy, pmid;
  p1x=map.fromLatLngToDivPixel(p1).x;
  p1y=map.fromLatLngToDivPixel(p1).y;

  p2x=map.fromLatLngToDivPixel(p2).x;
  p2y=map.fromLatLngToDivPixel(p2).y;
  // busca el punto medio
  pmidxy=new GPoint((p1x+p2x)/2,(p1y+p2y)/2);  
  // convierte la posición en pixel a geo-coordenadas

  pmid=map.fromDivPixelToLatLng(pmidxy);

       // selecciona la imagen correspondiente
       arrowIcon.image = "img/gmaps/dir_"+dir+".png";

       map.addOverlay(new GMarker(pmid, arrowIcon));
     }

Para ello se busca el punto medio de los puntos pasados como parámetros y obtiene el grado de rotación de la flecha a mostrar en el mapa. Por último crea un GMarker (un marcador) con la imagen y el punto medio obtenidos.

En el ejemplo, se puede observar que las imágenes se encuentran en /img/gmaps/ y se han nombrado siguiendo el patrón dir_XXX.png, dónde XXX es el grado de rotación. Para crear estas imágenes, podéis consultar el siguiente artículo del blog 'Google Maps(III)'.

Google Maps (I)

2007-02-27T12:51:00.000+01:00

Ya se que está muy visto el incluir mapas en las web, y que hay mucha documentación al respecto, pero me costó bastante encontrar ciertas funcionalidades en lo que se refiere a marcar rutas sobre el mapa. Así que aquí tenéis un pequeño resumen en varias entregas.

Crear mapa

Lo primero que necesitamos, es un mapa, para ello necesitamos registrarnos en la API de Google en http://www.google.com/apis/maps/signup.html

Incluiremos el enlace a la API en la cabecera (head) con la clave que nos han proporcionado:


<script src="http://maps.google.com/maps?file=api&v=2&key=PONER_AQUI_LA_CLAVE" type="text/javascript"></script>

Después añadiremos el código
javascript para mostar el mapa:


<script type="text/javascript">

//<![CDATA[
var map;

function load() {
  if (GBrowserIsCompatible()) {           
    map = new GMap2(document.getElementById("map"));

    map.addControl(new GSmallMapControl());
    map.addControl(new GMapTypeControl());   

    basico();
  }
}javascript:void(0)
Publicar

function basico() {
    map.setCenter(new GLatLng(38.697789, -0.473302), 15);
}
//]]>

Sólo nos falta crear un div en nuestra página para que pueda contener el mapa y llamar a los métodos de inicialización de la API de Google Maps:


<body onload="load()" onunload="GUnload()">
  <div id="map" style="width: 27em; height: 27em"></div>
</body>

Aquí tendríamos el resultado, un mapa centrado en Alcoi a una altura definida (15):

Primer post

2007-02-27T12:39:00.000+01:00

Más pronto o más tarde esto tenia que pasar... Siempre he pensado que crear un blog era algo muy interesante, sobretodo desde el punto de vista de ayudar a otras personas en el desarrollo de aplicaciones (a mi desde luego me ha venido muy bien), aunque temía no darle una continuidad.
En fin, allá vamos, a ver si hay suerte...