Softtlan

Eliminar todas las gemas de ruby instaladas

2022-04-07T10:29:00.000-05:00

En mas de una ocasión, mientras desarrollas en ruby, te topas con problemas con tus aplicaciones que se deben más que nada a incompatibilidad o errores de instalación de las gemas. En el afán de resolver el problema terminas instalando gemas que no querías y no ocupas para nada.

Una solución radical es eliminar todas las gemas de un solo golpe.

He aquí la sentencia salvadora:


  
  ruby -e "`gem list`.split(/$/).each { |line| puts `gem uninstall -Iax #{line.split(' ')[0]}` unless line.empty? }"

Configurar MySQL para aplicaciones Rails.

2016-11-27T19:50:00.000-06:00

Mas de una ocasión he tenido problemas para configurar mysql en aplicaciones Rails. Dejo un breve instructivo para hacerlo en Windows.

1. Copiar la configuración actual de la aplicación en un archivo que nos pueda servir como respaldo.


copy database.yml database.yml.sqlite3

2. Respaldar la base de datos y su información.


bundle exec rake db:dump

3. Instalar la gema mysql2 en modo de compilación desde los fuentes.

gem install mysql2 -s http://rubygems.org -- '--with-mysql-lib="c:\Program Files\MySQL\MySQL Server 5.5\lib" --with-mysql-include="c:\Program Files\MySQL\MySQL Server 5.5\include"'

Nota: es importante señalar que para ello debe estar instalado DevKit para poder compilar desde los fuentes cualquier gema.

Pogramadores Copy-Paste from Google "apestan"

2013-08-01T23:35:00.002-05:00

Ah! Como me caen mal los programadores que piensan que ya todo está hecho en cuanto a temas de programación. Que "San Google" todo se los va a resolver, va a pensar por ellos y con un màgico "copy-paste" ya va a jalar todo el pe...

Y luego presumen sus programas que solo son "pegotes" de algo que encontraron en la web. Lo cual no se dieron a la tarea de investigar si realmente servia. Hacen dos pruebas ped... luego dicen "si jala, ..." y posteriormente se dan a la tarea de seudo-explicar diciendo: "se debe a la transición de la espiroqueta cuántica del Spring en combinación con la inyección de dependencias del Struts". Y yo pongo cara de "AY NO MA....mmmacita, no los dejes así, explícales ... por fa'"

Neta que se pasan de presumidos y men... s ... ok ya.

No mis niños, no todo se resuelve con copy-paste. San Google si ayuda, pero hay cosas que debes pensar bien, diseñarlas, estructurarlas bien. Luego implementarlas y PROBAR. No hacer las cosas al ch... "ahi se va."

He dicho.

Instalar Ruby on Rails con MySql

2013-07-26T23:10:00.001-05:00

Para instalar Ruby on Rails preparado para conectarse con MySQL como base de datos, en Fedora 17+, sigue los pasos que se describen a continuación:

* Despues de haber instalado el paquete para lenguaje Ruby, abre una terminal y ejecuta los siguientes comandos yum como root ...

# yum install rubygem-rails ruby-mysql

# yum install rubygem-mongrel*

# yum install rubygem-json

# yum install rubygem-git

# yum install rubygem-actionmailer rubygem-activerecord rubygem-activesupport         
                                                                                      
# yum install ruby-devel

ahora puedes crear una aplicación rails para probar tu instalación

rails new demo

create                                                                 
      create  README
      create  Rakefile
      create  config.ru
      create  .gitignore
      create  Gemfile
      create  app
      create  app/controllers/application_controller.rb
      create  app/helpers/application_helper.rb
      create  app/mailers
      create  app/models
      create  app/views/layouts/application.html.erb
      create  config
      create  config/routes.rb
      create  config/application.rb
      create  config/environment.rb
      create  config/environments
      create  config/environments/development.rb
      create  config/environments/production.rb
      create  config/environments/test.rb
      create  config/initializers
      create  config/initializers/backtrace_silencers.rb
      create  config/initializers/inflections.rb
      create  config/initializers/mime_types.rb
      create  config/initializers/secret_token.rb
      create  config/initializers/session_store.rb
      create  config/locales
      create  config/locales/en.yml
      create  config/boot.rb
      create  config/database.yml
      create  db
      create  db/seeds.rb
      create  doc
      create  doc/README_FOR_APP
      create  lib
      create  lib/tasks
      create  lib/tasks/.gitkeep
      create  log
      create  log/server.log
      create  log/production.log
      create  log/development.log
      create  log/test.log
      create  public
      create  public/404.html
      create  public/422.html
      create  public/500.html
      create  public/favicon.ico
      create  public/index.html
      create  public/robots.txt
      create  public/images
      create  public/images/rails.png
      create  public/stylesheets
      create  public/stylesheets/.gitkeep
      create  public/javascripts
      create  public/javascripts/application.js
      create  public/javascripts/controls.js
      create  public/javascripts/dragdrop.js
      create  public/javascripts/effects.js
      create  public/javascripts/prototype.js
      create  public/javascripts/rails.js
      create  script
      create  script/rails
      create  test
      create  test/fixtures
      create  test/functional
      create  test/integration
      create  test/performance/browsing_test.rb
      create  test/test_helper.rb
      create  test/unit
      create  tmp
      create  tmp/sessions
      create  tmp/sockets
      create  tmp/cache
      create  tmp/pids
      create  vendor/plugins
      create  vendor/plugins/.gitkeep

por ultimo ejecutas la aplicación

# rails server

De regreso

2013-07-26T22:32:00.005-05:00

Hola a todos, amables lectores.

Despues de una larga ausencia, por necesidad de tener una "memoria" de tips y trucos. Y viendo que este humilde y "descuidado" blog tiene una buena cantidad de visitantes. Me siento entusiasmado en regresar. Comenzare a publicar artículos de todo lo relacionado con el desarrollo de software y temas afines, con la esperanza que sean de utilidad.

Gracias a todos.

Reciban un afectuoso saludo desde Monterrey, NL,. Mexico.

Instalar JDK en Linux Ubuntu (7.04) Feisty Fawn

2007-12-10T15:28:00.000-06:00

Estoy adentrandome en el fabuloso mundo de linux, después de conocer Windows Vista y experimentar la frustración que produce usar un sistema operativo altamente inestable, pas a experimentar con otro tambien inestable, pero un poco mas seguro. Ubuntu 7.04 Festy Fawn, francamente me ha gustado, asi que de aqui para adelante me considero un fanático Linuxero.

Para empezar comparto mis frustraciones con la instalacion de Java en Ubuntu 7.04, que despues de visitar decenas de paginas y leer no se cuantas instrucciones, la mas efectiva en mi caso fue: Usar Synaptics, el instalador de paquetes de Ubuntu. Solo basta elegir los paquetes sun, para que todo funcione a la perfeccion.

Lo que se tiene que hacer es:

1.- Entrar al menu Sistema-->Administracion-->Gestor de Paquetes Synaptic.

2.- Luego seleccione el boton de Buscar y escriba: sun-java, presione enter.

3.- Seleccione los paquetes de java a instalar, comenzando con sun-java5-jdk y sun-java6-bin.

4.- Haga click en el boton de aplicar, y espere. !Listo¡

5.- En la linea de comando de una Terminal, verifique a versión de java para comprobar que todo se haya instalado correctamente, con el comando: java -version

La vista debe ser similar a la siguiente:

Si desea algo diferente, hechele un vistazo a este enlace. Installar JDK en ubuntu

Recolector de emails sencillo en Ruby

2007-05-16T11:26:00.000-05:00

Estudiando un poco para desenpolvar las neuronas, aqui publico un ejercicio en Ruby, el cual básicamente lo que hace es leer el directorio actual, filtrar archivos que no sean .txt, .htm, o .html. Luego busca linea por linea que haya una cuenta de correo electrónico por medio de una sencilla expresión regular. Y luego lo imprime la(s) cuenta(s) encontrada(s). Con unas pequeñas modificaciones se pueden hacer que en automatico cheque una página, evalue el contenido y se vaya buscando. Rayos, por eso siempre les insistí a mis amigos y contactos de hotmail, que nunca reenvien (forward) las malditas cadenas, porque solo sirven para recolectar cuentas de correo que luego se usan para el maldito spam.
Aqui esta una prueba contundente:



puts "email harvester..."
dirp = Dir.open(".")
for fn in dirp
        case fn
        when /^.*\.txt/,/^.*\.htm./

                f = File.open(fn)
                f.each do  line
                        re = /[A-z0-9_\.\[]*@[A-z0-9\.]*/
                        if line =~ /[A-z0-9_\.]*@[A-z0-9\.]*/
                                while re.match(line)
                                        puts re.match(line)
                                        line = line.sub(re,"*")
                                end
                        end
                end
        end
end
dirp.close

Technorati : Ruby, email email harvester

Prueba automatica de aplicaciones web con Ruby

2007-03-26T10:06:00.000-06:00

Es increible lo que se puede hacer con los lenguajes de programación nuevos. En este caso gracias a Ruby nos es posible automatizar la prueba de nuestras aplicaciones web, mientras vamos desarrollando. Todo sin necesidar de comprar herramientas costosas, como winrun, testrobot, o cualquiera.
WATIR es el nombre de esta nueva herramienta basada en ruby y con un script tan sencillo como el siguiente, podemos hacer cosas geniales.


  require 'watir'   # the watir controller

  # set a variable
  test_site = 'http://localhost/Sorteo'

  # open the IE browser
  ie = Watir::IE.new

  # print some comments
  puts "## Beginning of test: Abrir la aplicacion"
  puts "  "

  puts "Step 1: go to the test site: " + test_site
  ie.goto(test_site)
  puts "  Action: login " + test_site + " in the address bar."
  ie.text_field(:name, "txtUserName").set("admin")
  ie.text_field(:name, "txtUserPass").set("admin")
  ie.button(:name, "btnLogin").click

  if ie.contains_text("Documentos")
     ie.goto("http://localhost/Sorteo/AsignacionesABC.aspx")
  else
     puts "error al intentar loggearse"
  end

El emplo anterior abre una pantalla de entrada (Login) y captura usuario y password, ademas valida que se haya logrado firmar. Simplemente fabuloso... :-)

Python morphing o Pythonizando programas

2007-03-23T14:49:00.000-06:00

Estoy llevando una clase de programación orientada a objetos con python, y bueno al igual que en muchos otros lenguajes, se nos esta pidiendo que procuremos aprovechar las ventajas o el poder de python; se usa el termino pythonizar para entender que usando las caracteristicas propias del lenguaje podemos ahorrar pasos y hacer las cosas mas rapido.

Yo no comparto para nada esa idea, sin embargo me parece muy interesante el fenómeno que se observa al pythonizar.

Ejemplo: Tenemos un programa que calcula la diferencia en dias, entre dos fechas. Lo que hago es cambiar la fecha a dias, para hacer la resta. Mi estrategia es un poco rudimentaria, cambiar la fecha de formato dd/mm/aaaa al formato aaaammdd. Luego para calcular los dias multiplico aaaa por 365 el mes hago la suma de dias correspondientes hasta el mes actual menos uno y a continuación le sumo el dia. Por ultimo calculo los años bisiestos y le agrego un dia por cada uno. El programa queda como sigue.


dias_mes = [31,28,31,30,31,30,31,31,30,31,30,31]

def calcDias(fecha):
    year = int(fecha[1:4])
    _mes = int(fecha[4:6])-1
    mes = 0
    for i in range(_mes):
        mes += dias_mes[i];

    dias = year * 365 + mes + int(fecha[6:8])


    for i in range(year):
         if i % 4 == 0:
              dias = dias + 1

    return dias

#fec1 = raw_input("Fecha1:")
fec1 = "01/01/2007"
#fec2 = raw_input("Fecha2:")
fec2 = "15/03/2007"

def dateToSAAAAMMDD(fecha):
    return fecha[6:10] + fecha[3:5] + fecha[0:2]


f1 = dateToSAAAAMMDD(fec1)
f2 = dateToSAAAAMMDD(fec2)

print "Entre " + fec1 + "y " + fec2 + "hay " + str(calcDias(f2) - calcDias(f1)) + "dias"

Esta solución es al mas puro estilo del programador cavernícola, que todo lo quiere resolver desde cero y por si mismo, aunque redescubra el hilo negro (asi como yo). Sin embargo, buscando un poco en nivel de ayuda, nos encontramos con una funcion llamada toordinal() que forma parte de la case date, la cual pasa la fecha a dias en el calendario gregoriano. Con ella el programa se comprime considerablemente.


#fec1 = raw_input("Fecha1:")
fec1 = "01/01/2007"
#fec2 = raw_input("Fecha2:")
fec2 = "15/03/2007"

def strToDate(fecha):
    return date(int(fecha[6:10]) , int(fecha[3:5]) , int(fecha[0:2]))

f1 = strToDate(fec1)
f2 = strToDate(fec2)

print "Entre " + fec1 + "y " + fec2 + "hay " + str(f2.toordinal() - f1.toordinal()) + "dias"

En fin, esto lo podemos hacer en la mayoria de los lenguajes que consideramos "decentes", y no necesariamente es una ventaja. Además de que con un sencillo "refactoring" tal vez lleguemos a una solucion mas elegante, visible, o porque no decirlo, artistica. Como dice Kernighan en "La práctica de la programación" un programa debe estar tan bien escrito que debe dar gusto leerlo. Para este caso, en aplicaciones mas complejas el ahorro de cientos de lineas de código puede tener un impacto considerable en el desempeño de los programas. Eso es innegable.

Technorati : oop, programming, python, python programming

Manejo alternativo de Ventanas Emergentes en ASPX y C#

2007-03-22T09:59:00.000-06:00

Cuantas veces no te has visto en la necesidad de que tus aplicaciones web, envien pequeños mensajes al viejo estilo de las aplicaciones desktop, y ¿cual alternativa nos da dotNet? ninguna, o por lo menos eso parece. Sin embargo, con la experiencia en otras plataformas de desarrollo se van descubriendo alternativas. Tenemos por ejemplo, la facilidad de usar el recurso clásico: JavaScript, pero ¿que sucede si no queremos usar JavaScript? ¿Existe algún otro recurso? La respuesta es siempre si, hay componentes, sin embargo dichos componentes lo que hacen es tambien producir codigo javascript. Tal parece que es imposible deshacerse de él.

Que sucede si queremos que nuestra ventana emergente (popup window) se vea como en la siguiente imagen:

La respuesta puede venir igualmente desde el paradigma que plantea javascript (ante el cual no estoy en contra, en lo absoluto, al contrario); agregar un DIV en mi HTML de la ASPX y ocultarlo o mostrarlo via JavaScript. Sin embargo esto mismo puede hacerse desde dotNet, C# en este caso. ¿como? simple, cambiar los tags de HTML a componentes dotNet via usar la propiedad RUNAT="SERVER". Este sencillisimo truco puede agregar funcionalidad muy util a los tags de HTML al volverlos componentes manejables desde el servidor. Como el manejo de eventos por decir algo.

En este caso basta con crear un DIV o una simple Tabla y añadirle runat=server para extener la funcionalidad y de esa forma cubrir nuestras necesidades. Ejemplo.- Si queremos que despues de guardar los datos de nuestra pantalla de clientes, (figura de arriba), se muestre la ventana de mensaje indicando el resultado, ya haya sido un error o un resultado favorable, debemos hacer lo siguiente:

Añadir el DIV o la Tabla en nuestra pagina ASPX.

Añadir la propiedad runat=server

Cambiar establecer la propiedad visible en false. Nota: dicha propiedad no es considerada por defecto en html, pero al extenderlo a control dotnet ya es posible usarla. de otra forma se tendria que modificar la propiedad style.

Añadir el codigo de activación de la ventana en los eventos de servidor, en este caso en el on_click del boton "guardar".

Si nuestra ventana la queremos eliminar despues de hacer click, agregamos el codigo de servidor para el evento indicando que ahora la ventana estara invisible.

Technorati : C#, Popup Windows, dotNet

Tutorial de Casos de Uso (Paso a 'pasito')

2007-03-16T10:39:00.000-06:00

Si quisieramos aprender a modelar sistemas orientados a objetos por medio de Casos de Uso, ¿cuales serían los pasos a seguir? es decir, ¿existe una forma generalmente aceptada que nos diga el 'como', para realizarlos?

Bien, efectivamente existe, pero tampoco no es un dogma, son solo guias generales. Dichos pasos son:

Identificar actores. Los actores son mejor dicho, los roles que un usuario o usuarios del sistema llevan a cabo en algun momento del tiempo. Tambien pueden ser otros sistemas con los que el 'sistema' en proceso de modelado tiene interacción. Ejemplo: Para un sistema de ventas (directas y por catalogo), nuestros actores pueden ser: Vendedor, Cliente, Supervisor de Ventas.

Identificar Metas (Metas, objetivos generales o responsabilidades). Todos los actores en el entorno a modelar tienen metas u objetivos, o en su defecto responsabilidades, o en su defecto, acciones que desean realizar u obtener del sistema. Por ejemplo: Para el sistema de Ventas, el Vendedor tiene como meta, objetivo o responsabilidad (Ofrecer productos, Cerrar Venta, Ganar mucho dinero via Cobrar comisiones).

Obtener o identificar los Casos de Uso a partir de las Metas. Las metas son importantes porque a partir de su identificación pasamos a realizarlas y estas se convierten en los Casos de Uso, de esta forma tan sencilla obtenemos la información de funcionalidad que requiere nuestro sistema.

Especificar cada Caso de Uso. Una vez identificados seguimos a especificarlos uno a uno, es probable que en el inter, de esos sencillos pasos algunos casos de uso desaparezcan o se fusionen con otros, por ambiguedades detectadas o por detalles que se hayan escapado durante el proceso. Es importante recordar que de eso se trata el modelado, no es indispensable que quede al cien por ciento el modelo desde la primera vez, por eso hay que hacerlo en iteraciones o ciclos. La especificación de los casos de uso contiene varias partes, las fundamentales son Nombre, Descripcion, Actores, Flujo Principal y Flujos Alternos. Este grupo de elementos constituyen lo que se conoce como plantilla (Template), y nos podemos encontrar un sinnumero de plantillas en la red. Por ejemplo ésta:

1. Id. Clave o numero de control del Caso de Uso
2. Nombre. Es el Caso de Uso en si
3. Descripción. Aqui detallamos lo que el caso de uso resuelve con base a su objetivo primordial.
4. Actores. En esta sección especificamos el actor o actores principales y los actores secundarios o auxiliares en el caso de uso. Podemos detallar su nombre, una breve descripción y en que otros casos de uso intervienen si se desea. Aunque preferentemente esta especificacion se puede hacer por separado en otro documento.
5. Pre-condiciones. Las reglas o condiciones que se deben cumplir antes de que sea iniciado el caso de uso. Por ejemplo, usuario firmado (logged), pago realizado, etc.
6. Post-condiciones. Condiciones que se deben cumplir cuando termine el caso de uso.
7. Flujo Principal En la secuencia de pasos del flujo principal, podemos usar texto solamente numerando cada paso, podemos usar un diagrama de flujo, un diagrama de secuencia, o una grafica de estados para efectos de dar claridad.
8. Variaciones. Aqui listamos los pasos
9. Extensiones.
10. Requerimientos no funcionales.Cualquier elemento indispensable para la realizacion del caso de uso, que no tenga impacto en la funcionalidad.
11. Diagrama de Contexto. Nos ilustra el alcance del caso de uso, entradas y salidas generales.
12. Diagrama de Navegación. Este diagrama nos ayuda a ilustrar el flujo entre las pantallas (prototipo) que tendra el sistema para el caso de uso.
13. Prototipos de Pantallas.

Technorati : UML, UML Tutorials, Use Cases

Use Cases

Casos de Uso - Ejemplos

2007-02-22T11:13:00.000-06:00

Sistema de Gestion para un Laboratorio de Analisis Fisico-Quimicos y Microbiologicos

Diagrama de Casos de Uso

Detalle del Caso de uso: Registro de Muestras

Descripcion
Este caso de uso documenta el proceso de recepción y registro de muestras. Tanto para clientes comunes como para clientes-convenio.
Los clientes comunes entregan la muestra al auxiliar tecnico administrativo, quien llena el formato F-CAL-030-1 con la información de las muestras y los estudios a realizar.
Un cliente convenio puede tener su propio formulario (Hoja de Custodia) para llenado de las muestras recibidas tanto como su manejo.

Detalles
Prioridad: Normal
Estatdo: Casual
Autor: Isidro Leos Viscencio

Pre condiciones
· Los usuarios deben estar firmados (logged)

Post condiciones
Success end condition

· La muestra es registrada y se puede conocer su estatus (Registro, Almacen, Analisis, Aprobación de Resultados, Informe Listo, Entregado al Cliente, Disposicion, Liberado)
· Se imprime la copia de custodia para cliente, entregable y para-archivo
· Se efectua el registro de entradas y salidas de Almacenamiento:; Anaquel o Refrigerador
· Se efectua el registro de resultados
· Se efectua la autorizacion o rechazo
· Se controlan las modificaciones a custodia - estudios
· Se elabora en automatico el informe de resultados
· Se realiza la generacion y el control de bitácora

Condicion de fallo
El ATA no puede capturar la muestra y no se altera lo anterior
El Responsable de Laboratorio no autoriza los resultados se queda pendiente de autorizacion

Minimos requisitos
-
Equipo funcionando

Actores Principales
Auxiliar Tecnico Administrativo

Actores Secundarios
Analista de Area Microbiologia

Escenario principal
1. El cliente entrega la muestra al Auxiliar Tecnico Administrativo
2. El Auxiliar Tecnico Administrativo Captura los datos de la muestra (Formato F-CAL-030-1)
3. El Auxiliar Tecnico Administrativo Imprime copia de la Custodia y la entrega al Cliente.
4. El Auxiliar Tecnico Administrativo envía la custodia al Analista de Area Fisico-Quimica y al Analista de Area Microbiologia para realizar analisis.
5. El Auxiliar Tecnico Administrativo lleva las muestras al almacen
6. El Auxiliar Tecnico Administrativo elabora la bitacora

Extensiones

1a. Se requiere FAX

1. If ( Hay fax ) then
1.1. Recibir y llenar custodia en base a FAX
2. Else
2.1. Esperar a recibir FAX

2a. Existe el Cliente <¿Es cliente nuevo?>
1. Dar de alta al Cliente

Variaciones

~2a. Cliente Convenio
1. Capturar los datos de la muestra utilizando el formato 001 para registrar la muestra

Diagrama de Flujo

Diagrama de Contexto

¿Como almacenar una imagen JPG dentro de una Base de Datos con ASPX y C#?

2007-02-20T15:47:00.000-06:00

Hace algunos meses escribí un pequeño artículo sobre como leer una imagen que se encuentra guardada en una base de datos, para desplegarla en una página web ASPX. Ahora, si nos hacemos la pregunta ¿como fue grabada esa imagen? Bueno, despues de un buen tiempo, aqui subo la respuesta:

¿como guardar una imagen en una base de datos?


public void btnSave_Click(object sender, System.EventArgs e)
{
       Int32 iFileLength = System.Convert.ToInt32(fileUpload.PostedFile.InputStream.Length);
       string sContentType = fileUpload.PostedFile.ContentType;
       string sFileName = fileUpload.PostedFile.FileName.Substring(fileUpload.PostedFile.FileName.LastIndexOf("\\") + 1);
       byte[] bFileDataBuffer = new byte[iFileLength + 1];
       fileUpload.PostedFile.InputStream.Read(bFileDataBuffer, 0, iFileLength);

       SqlTransaction trans=null;

       con.Open();

       try
       {
               trans = con.BeginTransaction();

               spUploadInsertNew.Transaction = trans;
               spUploadInsertNew.Parameters["@DocumentID"].Value = iDocumentID;
               spUploadInsertNew.Parameters["@UserID"].Value = txtAuthor.Text;
               spUploadInsertNew.Parameters["@Title"].Value = txtTitle.Text;
               spUploadInsertNew.Parameters["@FileName"].Value = sFileName;
               spUploadInsertNew.Parameters["@FileData"].Value = bFileDataBuffer;
               spUploadInsertNew.Parameters["@ContentType"].Value = sContentType;
               spUploadInsertNew.Parameters["@DatePosted"].Value = txtDatePosted.SelectedDate;
               spUploadInsertNew.Parameters["@FileLength"].Value = iFileLength;

               spUploadInsertNew.ExecuteNonQuery();

               trans.Commit();

       }
       catch (Exception ex)
       {
               System.Console.WriteLine(ex.ToString());
               trans.Rollback();
       }
       finally
       {
               con.Close();
       }
}

Necesitamos un Stored Procedure como el siguiente:




/****** Object:  Stored Procedure dbo.Uploads_I    Script Date: 14/11/2006 03:49:32 p.m. ******/
CREATE PROCEDURE dbo.Uploads_I(
        @DocumentID Integer,
        @UserID CHAR(15),
        @Title VARCHAR(45),
        @FileName VARCHAR(85),
        @FileData Image,
        @ContentType VARCHAR(50),
        @DatePosted DateTime,
        @FileLength Integer)
AS
BEGIN
        DECLARE @UploadID Integer

        SELECT @UploadID = ISNULL(MAX(UploadID),0) + 1 FROM Uploads

       INSERT INTO Uploads
               ([UploadID] ,[DocumentID] ,[UserID] ,[Title] ,[FileName] ,[FileData] ,[ContentType] ,[DatePosted] ,[FileLength] )
               VALUES (@UploadID,@DocumentID,@UserID,@Title,@FileName,@FileData,@ContentType,@DatePosted,@FileLength)
END

Diferencia [Casos de Uso] y [Diagramas de Casos de Uso]

2007-02-09T12:17:00.000-06:00

Es importante diferenciar casos de uso con diagrama de casos de uso. Tal vez suene un poco confuso, y quizá lo sea. Sin embargo vamos a tratar de hacer la distinción y precisar en que consisten ambos.

Casos de Uso

El caso de uso es una serie de cosas, es una técnica de analisis de sistemas, es una tecnica para recopilar requerimientos, puede ser usada como estrategia de desarrollo o conduccion de proyectos de sistemas (Use case driving proyects), y su aplicación se ha vuelto muy importante. El creador de los Casos de uso Ivar Jackobson se unió a Grady Booch y James Rambaugh en Rational Rose, para trabajar en lo que hoy conocemos como UML.

Un caso de uso se forma de varios elementos, tiene una estructura, aunque no estandarizada oficialmente, el uso repetitivo en diferentes ambitos, nos permite conocer algunos de esos formatos o plantillas, las cuales por lo general cuentan de lo siguiente:

Nombre del Caso de Uso

Objetivo o Meta General

Descripcion

Actores

Pre-Condiciones

Post-Condiciones

Diagrama de Caso de Uso

Flujo de Eventos
- Flujo Principal
- Flujos Alternos

Extensiones

Diagrama de Contexto

Diagrama de Navegacion (Entre Pantallas)

Prototipos de Pantallas

Nota: Algunas plantillas presentan manejo de información adicional como control de versiones, autor, fechas, etc.

Diagrama de Casos de uso

El diagrama de casos de uso forma parte del conjunto de herramientas del UML y es muy simple elaborar un diagrama de este tipo. Básicamente se conforma de dos figuras elementales el actor y el caso de uso.
Un actor que puede ser una persona, pero en particular el rol que desempeña dentro del sistema o entorno que estemos analizando, se representa con un muñequito.
Un caso de uso, que es una meta, accion, funcion, o tarea que desarrolla uno o varios actores y se representa con un elipse.

Nota:Diagramas generados con Visual Paradigm Community Edition

Technorati : UML, Use Case Diagram, Use Cases
Flickr : UML, Use Case Diagram, Use Cases

Casos de Uso - Introducción

2007-01-16T11:33:00.000-06:00

Un caso de uso es una herramienta que sirve para representar la forma como un cliente (Actor) opera con el sistema en desarrollo, además de la forma, tipo y orden en la cual, los elementos interactuan, a estas acciones se les llama operaciones o Casos de uso.

Los casos de uso se utilizan básicamente en el proceso de modelado de sistemas, partiendo de una percepción o perspectiva que nos plantea el paradigma de la orientación a objetos, y en este caso el analisis y diseño orientados a objetos.

Los casos de uso forman parte del Lenguaje Unificado de Modelado UML por sus siglas en ingles (Unified Modeling Languaje) el cual a su vez se compone de muchas otras herramientas, básicamente diagramas como: Diagramas de Clase, Diagramas de Secuencia, Colaboracíón, Transición de Estados, Diagramas de Actividad, Componentes, Deployment, entre otros. Todas ellas usadas a lo largo de las etapas o ciclo de vida del proceso de desarrollo.

La aplicación principal de los casos de uso es en el proceso de análisis y diseño pero de manera particular en la definición de requerimientos del usuario. Es una excelente herramienta de comunicación debido a la sencillez de su elaboración asi como su comprensión. En teoría los usuarios deberían conocer como hacer sus propios casos de uso, pero eso solo es en "teoría".

Un diagrama de casos de uso consta de los siguientes elementos: Actor, Casos de Uso y Relaciones.

Elementos

l Actor:

Una definición previa, es que un Actor es un rol que un usuario juega con respecto al sistema. Es importante destacar el uso de la palabra rol, pues con esto se especifica que un Actor no necesariamente representa a una persona en particular, sino más bien la labor que realiza frente al sistema.Como ejemplo para ilustrar la definición anterior, tenemos el caso de un sistema de ventas en que el rol de Vendedor con respecto al sistema puede ser realizado por un Vendedor o bien por el Jefe de Local.

l Caso de Uso:

Es una operación/tarea específica que se realiza tras una orden de algún agente externo, sea desde una petición de un actor o bien desde la invocación desde otro caso de uso.

l Relaciones:

¡ Asociación. Es el tipo de relación más básica que indica la invocación desde un actor o caso de uso a otra operación (caso de uso). Dicha relación se denota con una flecha simple.

¡ Dependencia o Instanciación. Es una forma muy particular de relación entre clases, en la cual una clase depende de otra, es decir, se instancia (se crea). Dicha relación se denota con una flecha punteada.

¡ Generalización. Este tipo de relación es uno de los más utilizados, cumple una doble función dependiendo de su estereotipo, que puede ser de:

Uso (<<uses>>) o de Herencia (<<extends>>). Este tipo de relación esta orientado exclusivamente para casos de uso (y no para actores).

extends. Se recomienda utilizar cuando un caso de uso es similar a otro (características).

uses. Se recomienda utilizar cuando se tiene un conjunto de características que son similares en más de un caso de uso y no se desea mantener copiada la descripción de la característica. De lo anterior cabe mencionar que tiene el mismo paradigma en diseño y modelamiento de clases, en donde esta la duda clásica de usar o heredar.

Technorati : Casos de Uso, Use Cases
Del.icio.us : Casos de Uso, Use Cases

Tutorial ultra express de Casos de Uso

2007-01-11T16:14:00.000-06:00

He estado evaluando varias herramientas para modelado y me he encontrado con esta que esta genial. ¿Quieres aprender rapidamente a hacer Casos de Uso? Visual Use Case es la respuesta:

Technorati : Casos de Uso, Tutorials, UML, Use Cases

De vuelta

2007-01-09T08:57:00.002-06:00

Bueno, pues aqui reportandome despues de unas ligeras vacaciones, volvemos a la rutina: levantarse temprano, dirigirse al trabajo, llegar a la oficina, tomar un delicioso cafecito, darle una visitada rapida a los diferentes sitios de internet ya cotidianos, y a repsasar el itinerario. En fin, volvemos a la rutina, a darle duro al trabajo, no hay de otra.

El mejor IDE ahora en versión Open Source - JBuilder2007

2006-12-18T09:21:00.000-06:00

Esto me ha llegado a mi buzón de correo, es una excelente noticia. JBuilder 2007 es ahora un producto de código abierto. Cuídense eclipse y netbeans. :-)

------------

Estimado Desarrollador de Java:

¿Cómo puede Usted avanzar hacia la meta del código abierto sin sacrificar su productividad, la eficiencia del equipo y la confiabilidad de su ambiente de desarrollo? ¡Con un IDE diseñado exclusivamente para alcanzar este objetivo!

El nuevo JBuilder 2007, compatible con versiones anteriores de JBuilder, integra las reconocidas herramientas de desarrollo rápido de aplicaciones (RAD) y los frameworks de colaboración de JBuilder con la plataforma abierta Eclipse. Ahora Usted puede crear aplicaciones empresariales sólidas y poderosas - en forma individual y en equipo - ¡más rápido que nunca! ¡También recibe una copia de JBuilder 2006 en la misma caja! Todo esto, más un descuento especial de actualización, si actúa con rapidez y hace clic aquí. ¡Solo JBuilder 2007 le ofrece la combinación de factores de éxito que son actualmente indispensables para todo desarrollador de Java!

Velocidad
¡Ábrase camino a través de Java, el código abierto y
el desarrollo Web a velocidad warp!

JBuilder 2007 viene con una paleta de herramientas JBuilder de productividad comprobada, especialmente mejoradas para brindar más ventajas que nunca. La completa estación de trabajo para desarrollo gráfico ahora brinda Servicios Web SOA visuales de dos vías y desarrollo EJB, soporte para las tecnologías Java y plataformas AppServer más recientes, además de modelado completo en UML 2.0 para Java, con ingeniería LiveSource en ambos sentidos. También tiene al JBuilder Optimizeit ™, para realizar la optimización del rendimiento y la depuración avanzada de defectos.

Balance
Administración eficiente de sus proyectos complejos, integrando
diversos equipos de desarrollo y diferentes husos horarios.

JBuilder TeamInsight mantiene sincronizados y al día a los equipos involucrados en el proyecto. Viene con un "stack" (acervo) integrado y configurable de las mejores soluciones de código abierto - para el control colaborativo del código, requerimientos de proyectos, seguimiento de defectos y administración de proyectos.

Seguridad
Componentes y herramientas de código abierto con la
garantía de un ambiente comercial de desarrollo.

Ahora Usted puede aprovechar los cientos de mejoras que se encuentran disponibles, ya sea de parte de la plataforma de código abierto Eclipse como de parte de los "plug-ins" comerciales. Al ser una solución comercial reconocida, JBuilder 2007 le brinda a los desarrolladores la confianza de que podrán expandir sus capacidades a través de un solo punto de descarga e integración de código abierto y tecnologías comerciales, permaneciendo en un ambiente controlado.

Atentamente,

El Equipo JBuilder 2007 de Borland

Componente para ventanas emergentes (PopUp Windows en dotNet)

2006-11-03T14:04:00.000-06:00

Componente para ventanas emergentes (PopUpWindows) estílo MSN Messenger.

http://www.codeproject.com/aspnet/asppopup.asp

Menu de árbol - TreeView en ASPX y C#

2006-10-25T10:43:00.000-05:00

--- ASPX ---


<%@ Page language="c#" Codebehind="Menu.aspx.cs" AutoEventWireup="false" Inherits="Sorteo.Menu" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" >
<HTML>
        <HEAD>
                <TITLE>Menu</TITLE>
                <META content="Microsoft Visual Studio .NET 7.1" name="GENERATOR">
                <META content="C#" name="CODE_LANGUAGE">
                <META content="JavaScript" name="vs_defaultClientScript">
                <META content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema">
                <LINK href="default.css" type="text/css" rel="stylesheet">
        </HEAD>
        <BODY ms_positioning="GridLayout">
                <!--<FORM runat="server">
                        <TABLE width="100%">
                                <TR>
                                        <TD colspan="3">
                                                <DIV style="BACKGROUND-IMAGE: url(http://localhost/Sorteo/images/logo sorteo jaguar ur - watermark 1.jpg);WIDTH: 783px;POSITION: relative;HEIGHT: 144px"
                                                        ms_positioning="GridLayout">
                                                        <ASP:IMAGE id="Image1" style="Z-INDEX: 101; LEFT: 8px; POSITION: absolute; TOP: 8px" runat="server"
                                                                height="128px" width="128px" imageurl="images/logo sorteo jaguar ur.jpg"></ASP:IMAGE>
                                                        <ASP:LABEL id="Label1" style="Z-INDEX: 102; LEFT: 152px; POSITION: absolute; TOP: 24px" runat="server"
                                                                width="352px" font-size="XX-Large" font-names="Times New Roman">Sorteo Jaguar UR</ASP:LABEL>
                                                        <ASP:LABEL id="lblSorteo" style="Z-INDEX: 103; LEFT: 512px; POSITION: absolute; TOP: 24px"
                                                                runat="server" font-size="XX-Large" font-names="Times New Roman">2006</ASP:LABEL></DIV>
                                        </TD>
                                </TR>
                                <TR>
                                        <TD width="209" style="WIDTH: 209px">
                                                <DIV style="MARGIN: 0px; OVERFLOW: scroll; WIDTH: 208px; CLIP: rect(0px auto auto 0px); POSITION: static; HEIGHT: 500px">-->
                <DIV>
                        <SCRIPT languaje="javascript">
                        classPath = "class.tree";
                        ftv2blank = "ftv2/ftv2blank.gif";
                        ftv2doc = "ftv2/ftv2doc.gif";
                        ftv2folderclosed = "ftv2/ftv2folderclosed.gif";
                        ftv2folderopen = "ftv2/ftv2folderopen.gif";
                        ftv2lastnode = "ftv2/ftv2lastnode.gif";
                        ftv2link = "ftv2/ftv2link.gif";
                        ftv2mlastnode = "ftv2/ftv2mlastnode.gif";
                        ftv2mnode = "ftv2/ftv2mnode.gif";
                        ftv2node = "ftv2/ftv2node.gif";
                        ftv2plastnode = "ftv2/ftv2plastnode.gif";
                        ftv2pnode = "ftv2/ftv2pnode.gif";
                        ftv2vertline = "ftv2/ftv2vertline.gif";
                        basefrm = "main";
                        </SCRIPT>
                        <SCRIPT src="class.tree/ftiens4.js" type="text/javascript">
                        </SCRIPT>
                        <SPAN id="spnJavaScript" runat="server"></SPAN>
                </DIV>
                <!--</TD>
                                        <TD width="60%" align="center" valign="middle"><IMG height="400" alt="" src="images/logo sorteo jaguar ur - fondo.jpg" width="425">
                                        </TD>
                                        <TD width="25%"></TD>
                                </TR>
                        </TABLE>
                </FORM>-->
        </BODY>
</HTML>

--- C# ---


using System;
using System.Collections;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Web;
using System.Web.SessionState;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.HtmlControls;
using Sorteo;

namespace Sorteo
{
        /// <summary>
        /// Summary description for Menu.
        /// </summary>
        public class Menu : System.Web.UI.Page
        {
                protected System.Web.UI.HtmlControls.HtmlGenericControl spnJavaScript;

                void Page_Load(Object sender, EventArgs e)
                {

                        buildMenu();


                }

                protected void buildMenu()
                {
                        MenuWS ws = new MenuWS();

                        DataSet menuDS = ws.getMenu();
                        DataTable menuDT = menuDS.Tables["Menu"];
                        string varName="";
                        string papaVarName="";
                        string treeCommand = "";
                        string hayHijos;
                        string caption;
                        string url;

                        spnJavaScript.Controls.Add(new LiteralControl("<scr" + "ipt languaje=\"javascript\">\n"));

                        foreach(DataRow opcion in menuDT.Rows)
                        {
                                varName = "aux" + opcion["Nivel"];
                                papaVarName = "aux" + Convert.ToString(Convert.ToInt32(opcion["Nivel"])-1);
                                caption = Convert.ToString(opcion["Opcion"]).Trim();
                                url = Convert.ToString(opcion["URL"]).Trim();

                                if (Convert.ToInt32(opcion["Nivel"]) == 0)
                                {
                                        treeCommand = varName + "= gFld(\"" + caption + "\", \"" + url + "\")\n";
                                }
                                else
                                {
                                        hayHijos = Convert.ToString(opcion["hayHijos"]);
                                        if (hayHijos.Equals("Y"))
                                        {
                                                treeCommand = varName + "= insFld(" + papaVarName + ", gFld(\"" + caption + "\", \"" + url + "\"))\n";
                                        }
                                        else
                                        {
                                                treeCommand = "insDoc(" + papaVarName + ", gLnk(" + papaVarName + ", \"" + caption + "\", \"" + url + "\"))\n";
                                        }
                                }

                                treeCommand = treeCommand.Replace("aux0","foldersTree");
                                spnJavaScript.Controls.Add(new LiteralControl(treeCommand));
                        }
                        spnJavaScript.Controls.Add(new LiteralControl("initializeDocument()\n"));
                        spnJavaScript.Controls.Add(new LiteralControl("</scr" + "ipt>\n"));
                }
                #region Web Form Designer generated code
                override protected void OnInit(EventArgs e)
                {
                        //
                        // CODEGEN: This call is required by the ASP.NET Web Form Designer.
                        //
                        InitializeComponent();
                        base.OnInit(e);
                }

                /// <summary>
                /// Required method for Designer support - do not modify
                /// the contents of this method with the code editor.
                /// </summary>
                private void InitializeComponent()
                {
                        this.Load += new System.EventHandler(this.Page_Load);

                }
                #endregion
        }
}

--- WebService ---


<%@ WebService Language="c#" Codebehind="MenuWS.asmx.cs" Class="Sorteo.MenuWS" %>

--- WebService C# ---


using System;
using System.Collections;
using System.ComponentModel;
using System.Data;
using System.Diagnostics;
using System.Web;
using System.Web.Services;

namespace Sorteo
{
        /// <summary>
        /// Summary description for CartasWS.
        /// </summary>
        public class MenuWS : System.Web.Services.WebService
        {
                public MenuWS()
                {
                        //CODEGEN: This call is required by the ASP.NET Web Services Designer
                        InitializeComponent();
                }

                private System.Data.SqlClient.SqlConnection con;
                private System.Data.SqlClient.SqlDataAdapter spGetMenuDA;
                private System.Data.SqlClient.SqlCommand spGetMenu;

                #region Component Designer generated code

                //Required by the Web Services Designer 
                private IContainer components = null;

                /// <summary>
                /// Required method for Designer support - do not modify
                /// the contents of this method with the code editor.
                /// </summary>
                private void InitializeComponent()
                {
                        System.Configuration.AppSettingsReader configurationAppSettings = new System.Configuration.AppSettingsReader();
                        this.con = new System.Data.SqlClient.SqlConnection();
                        this.spGetMenuDA = new System.Data.SqlClient.SqlDataAdapter();
                        this.spGetMenu = new System.Data.SqlClient.SqlCommand();
                        // 
                        // con
                        // 
                        this.con.ConnectionString = ((string)(configurationAppSettings.GetValue("con.ConnectionString", typeof(string))));
                        this.con.InfoMessage += new System.Data.SqlClient.SqlInfoMessageEventHandler(this.con_InfoMessage);
                        // 
                        // spGetMenuDA
                        // 
                        this.spGetMenuDA.SelectCommand = this.spGetMenu;
                        this.spGetMenuDA.TableMappings.AddRange(new System.Data.Common.DataTableMapping[] {
                                                                                                                                                                                                  new System.Data.Common.DataTableMapping("Table", "Menu", new System.Data.Common.DataColumnMapping[0])});
                        // 
                        // spGetMenu
                        // 
                        this.spGetMenu.CommandText = "dbo.[spGetMenu]";
                        this.spGetMenu.CommandType = System.Data.CommandType.StoredProcedure;
                        this.spGetMenu.Connection = this.con;
                        this.spGetMenu.Parameters.Add(new System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, false, ((System.Byte)(0)), ((System.Byte)(0)), "", System.Data.DataRowVersion.Current, null));
                        this.spGetMenu.Parameters.Add(new System.Data.SqlClient.SqlParameter("@iIDMenu", System.Data.SqlDbType.Int, 4));

                }

                /// <summary>
                /// Clean up any resources being used.
                /// </summary>
                protected override void Dispose( bool disposing )
                {
                        if(disposing && components != null)
                        {
                                components.Dispose();
                        }
                        base.Dispose(disposing);
                }

                #endregion

                /// <summary>
                /// Regresa el arbol del menu ordenado ... por default el menu 1
                /// </summary>
                /// <returns>Regresa un DataSet con los datos del menu, ya ordenado, en forma de arbol.</returns>
                [WebMethod]
                public DataSet getMenu()
                {
                         DataSet ds = new DataSet();

                        con.Open();
                        spGetMenu.Parameters["@iIDMenu"].Value = 1; // Cargar el menu por default
                        spGetMenuDA.Fill(ds,"Menu");
                        con.Close();

                        return ds;
                }

                private void con_InfoMessage(object sender, System.Data.SqlClient.SqlInfoMessageEventArgs e)
                {

                }
        }
}

Desplegar una imagen JPG dinámicamente desde una Base de Datos SQL en Delphi

2006-10-25T09:51:00.000-05:00

Hace algunos años tuve la necesidad en mi trabajo de hacer un aplicación que desplegara dinámicamente una imagen JPG que se encontraba almacenada en una base de datos MS SQL, y otra imagen identica almacenada en una base de datos DB2. Indagando entre los ejemplos y tutoriales de Delphi me encontre un ejercicio para generar "on-the-fly" una imagen BMP, de ahi me surgio la idea de hacer eso mismo para la imagen JPG.

La solución es una aplicación web ISAPI/DLL, la cual puede ser utilizada desde cualquier archivo HTML usando el tag <IMG..> indicando en la propiedad src el url donde se encuentra la imagen, en este caso no seria una dirección aboluta sino relativa, una llamada a la ISAPI que había creado. Esto me dió la ventaja de poder utilizar dicha DLL tanto en ASP, como en JSP, dándome una enorme ventaja sobre otras alternativas. Además de que la DLL se ejecuta muy rápidamente en comparación con algun servlet o una ASP simple.

La estructura de la solución se ilustra en el siguiente diagrama de clase:

Y la lógica básica en este diagrama de secuencia:

A continuación escribimos el código fuente de Delphi, para la versión 6 y 7:
----



library ShowSignImage;

uses
  ActiveX,
  ComObj,
  WebBroker,
  ISAPIThreadPool,
  ISAPIApp,
  uShowSignImage in 'uShowSignImage.pas' {WebModule1: TWebModule};

{$R *.res}

exports
  GetExtensionVersion,
  HttpExtensionProc,
  TerminateExtension;

begin
  CoInitFlags := COINIT_MULTITHREADED;
  Application.Initialize;
  Application.CreateForm(TWebModule1, WebModule1);
  Application.Run;
end.

----

----



unit uShowSignImage;

interface

uses
  SysUtils, Classes, HTTPApp, DB, ADODB;

type
  TWebModule1 = class(TWebModule)
    con: TADOConnection;
    q: TADOQuery;
    qSUCURSAL: TFloatField;
    qACCOUNT: TStringField;
    qNUMIMAG: TStringField;
    qIMAGE: TBlobField;
    procedure WebModule1WebActionItem1Action(Sender: TObject;
      Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  WebModule1: TWebModule1;

implementation

uses
  Windows, ShellAPI;

const
  MAX_PATH = 255;
{$R *.dfm}

procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);


var
  S: TMemoryStream;
  sucursal, cuenta, numfirma: string;

begin
  try
    S := TMemoryStream.Create;
    try
      // get url parameters
      sucursal := Request.QueryFields.Values['sucursal'];
      cuenta := Request.QueryFields.Values['cuenta'];
      numfirma := Request.QueryFields.Values['numimag'];

      q.Parameters[0].Value := StrToFloat(sucursal);
      q.Parameters[1].Value := StrToFloat(cuenta);
      q.Parameters[2].Value := StrToFloat(numfirma);
      q.Open;
      try
        S.Position := 0;

        qIMAGE.SaveToStream(S);

        S.Position := 0;
        Response.ContentType := 'image/jpeg';

        Response.ContentStream := S;
        Response.SendResponse;
      finally
        q.Close;
      end;
    finally
      S.Free;
   end;
  except
    on E: Exception do
      Response.Content := '<html><body>Ocurrio un error (' +
        E.ClassName + ': ' + E.Message + ')</body></html>';
  end;
end;

end.

----

Technorati : Delphi, ISAPI, JPG to SQL Data

Web Services para Flex en java y FDS (jrun)

2006-10-20T14:07:00.000-05:00


/*
 * BalanceGeneral.java
 *
 * Created on 20 de abril de 2005, 05:07 PM
 */

package sinapsys.contabilidad.ws;


import java.sql.*;
import java.util.ArrayList;
import java.util.Properties;
import sinapsys.acceso.ws.*;

/**
 *
 * @author Administrator
 */
public class BalanceGeneral {

    private String JDBC2ODBC_DRIVER = "sun.jdbc.odbc.JdbcOdbcDriver"; // Driver de JDBC a utilizar, en este caso JDBC2ODBC

    /** Creates a new instance of BalanceGeneral */
    public BalanceGeneral() {
    }

    protected String getUrl(UserDSNEmpresa dsn) {
        return "jdbc:odbc:" + dsn.getDSN();
    }

    public ArrayList getBalanceGeneral(UserDSNEmpresa dsn, String fechaInicio, String fechaFin) {

        // get UserDSNEmpresa
        String urlEmpresa = getUrl(dsn);
        String DB_USER = dsn.getDB_USER();
        String DB_PSW = dsn.getDB_PSW();

        String strSQL = "SELECT * FROM CON_BALANCE ("+fechaInicio+","+fechaFin+")";

        Connection con;
        Statement stmt;


        try {
            Class.forName(JDBC2ODBC_DRIVER);

            try {
                con = DriverManager.getConnection(urlEmpresa, DB_USER, DB_PSW);

                stmt = con.createStatement();

                ResultSet rs = stmt.executeQuery(strSQL);

                ArrayList balanceList = new ArrayList();

                while (rs.next()) {
                    int ID = rs.getInt("ID");
                    String CUENTA = rs.getString("CUENTA");
                    String DESCRIPCION = rs.getString("DESCRIPCION");
                    String T1 = rs.getString("T1");
                    String T2 = rs.getString("T2");
                    String T3 = rs.getString("T3");
                    String T4 = rs.getString("T4");
                    String T5 = rs.getString("T5");
                    String T6 = rs.getString("T6");
                    String TIPO = rs.getString("TIPO");
                    String HIJO = rs.getString("HIJO");

                    BalanceRow balancerow = new BalanceRow(ID,CUENTA,DESCRIPCION,T1,T2,T3,T4,T5,T6,TIPO,HIJO);
                    balanceList.add(balanceList);
                }

                stmt.close();
                con.close();

                return balanceList;

            } catch(SQLException ex) {
                String COD_ERROR = "SQLException: " + ex.getMessage();
                System.err.println(COD_ERROR);
                return null;
            }

        } catch(java.lang.ClassNotFoundException e) {
            System.err.print("ClassNotFoundException: ");
            System.err.println(e.getMessage());
            return null;
        }
    }
}

Cantidad con letra en MS SQL

2006-10-18T11:04:00.000-05:00

Siempre es necesario convertir una cantidad a su expresion literal. Y para aportar algo a la comunidad, comparto esta funcion de MS SQL, gracias a la aportacion de mi camarada el Checo y con algunas pequeñas modificaciones que le hice, aqui la tenemos: Funcion Cantidad con letra en pesos mexicanos.

---



CREATE FUNCTION [dbo].[CantidadConLetra]
(
    @Numero             Decimal(18,2)
)
RETURNS Varchar(180)
AS
BEGIN
    DECLARE @ImpLetra Varchar(180)
        DECLARE @lnEntero INT,
                        @lcRetorno VARCHAR(512),
                        @lnTerna INT,
                        @lcMiles VARCHAR(512),
                        @lcCadena VARCHAR(512),
                        @lnUnidades INT,
                        @lnDecenas INT,
                        @lnCentenas INT,
                        @lnFraccion INT
        SELECT  @lnEntero = CAST(@Numero AS INT),
                        @lnFraccion = (@Numero - @lnEntero) * 100,
                        @lcRetorno = '',
                        @lnTerna = 1
  WHILE @lnEntero > 0
  BEGIN /* WHILE */
            -- Recorro terna por terna
            SELECT @lcCadena = ''
            SELECT @lnUnidades = @lnEntero % 10
            SELECT @lnEntero = CAST(@lnEntero/10 AS INT)
            SELECT @lnDecenas = @lnEntero % 10
            SELECT @lnEntero = CAST(@lnEntero/10 AS INT)
            SELECT @lnCentenas = @lnEntero % 10
            SELECT @lnEntero = CAST(@lnEntero/10 AS INT)
            -- Analizo las unidades
            SELECT @lcCadena =
            CASE /* UNIDADES */
              WHEN @lnUnidades = 1 THEN 'UN ' + @lcCadena
              WHEN @lnUnidades = 2 THEN 'DOS ' + @lcCadena
              WHEN @lnUnidades = 3 THEN 'TRES ' + @lcCadena
              WHEN @lnUnidades = 4 THEN 'CUATRO ' + @lcCadena
              WHEN @lnUnidades = 5 THEN 'CINCO ' + @lcCadena
              WHEN @lnUnidades = 6 THEN 'SEIS ' + @lcCadena
              WHEN @lnUnidades = 7 THEN 'SIETE ' + @lcCadena
              WHEN @lnUnidades = 8 THEN 'OCHO ' + @lcCadena
              WHEN @lnUnidades = 9 THEN 'NUEVE ' + @lcCadena
              ELSE @lcCadena
            END /* UNIDADES */
            -- Analizo las decenas
            SELECT @lcCadena =
            CASE /* DECENAS */
              WHEN @lnDecenas = 1 THEN
                CASE @lnUnidades
                  WHEN 0 THEN 'DIEZ '
                  WHEN 1 THEN 'ONCE '
                  WHEN 2 THEN 'DOCE '
                  WHEN 3 THEN 'TRECE '
                  WHEN 4 THEN 'CATORCE '
                  WHEN 5 THEN 'QUINCE '
                  WHEN 6 THEN 'DIEZ Y SEIS '
                  WHEN 7 THEN 'DIEZ Y SIETE '
                  WHEN 8 THEN 'DIEZ Y OCHO '
                  WHEN 9 THEN 'DIEZ Y NUEVE '
                END
              WHEN @lnDecenas = 2 THEN
              CASE @lnUnidades
                WHEN 0 THEN 'VEINTE '
                ELSE 'VEINTI' + @lcCadena
              END
              WHEN @lnDecenas = 3 THEN
              CASE @lnUnidades
                WHEN 0 THEN 'TREINTA '
                ELSE 'TREINTA Y ' + @lcCadena
              END
              WHEN @lnDecenas = 4 THEN
                CASE @lnUnidades
                    WHEN 0 THEN 'CUARENTA'
                    ELSE 'CUARENTA Y ' + @lcCadena
                END
              WHEN @lnDecenas = 5 THEN
                CASE @lnUnidades
                    WHEN 0 THEN 'CINCUENTA '
                    ELSE 'CINCUENTA Y ' + @lcCadena
                END
              WHEN @lnDecenas = 6 THEN
                CASE @lnUnidades
                    WHEN 0 THEN 'SESENTA '
                    ELSE 'SESENTA Y ' + @lcCadena
                END
              WHEN @lnDecenas = 7 THEN
                 CASE @lnUnidades
                    WHEN 0 THEN 'SETENTA '
                    ELSE 'SETENTA Y ' + @lcCadena
                 END
              WHEN @lnDecenas = 8 THEN
                CASE @lnUnidades
                    WHEN 0 THEN 'OCHENTA '
                    ELSE  'OCHENTA Y ' + @lcCadena
                END
              WHEN @lnDecenas = 9 THEN
                CASE @lnUnidades
                    WHEN 0 THEN 'NOVENTA '
                    ELSE 'NOVENTA Y ' + @lcCadena
                END
              ELSE @lcCadena
            END /* DECENAS */
            -- Analizo las centenas
            SELECT @lcCadena =
            CASE /* CENTENAS */
              WHEN @lnCentenas = 1 THEN 'CIENTO ' + @lcCadena
              WHEN @lnCentenas = 2 THEN 'DOSCIENTOS ' + @lcCadena
              WHEN @lnCentenas = 3 THEN 'TRESCIENTOS ' + @lcCadena
              WHEN @lnCentenas = 4 THEN 'CUATROCIENTOS ' + @lcCadena
              WHEN @lnCentenas = 5 THEN 'QUINIENTOS ' + @lcCadena
              WHEN @lnCentenas = 6 THEN 'SEISCIENTOS ' + @lcCadena
              WHEN @lnCentenas = 7 THEN 'SETECIENTOS ' + @lcCadena
              WHEN @lnCentenas = 8 THEN 'OCHOCIENTOS ' + @lcCadena
              WHEN @lnCentenas = 9 THEN 'NOVECIENTOS ' + @lcCadena
              ELSE @lcCadena
            END /* CENTENAS */
            -- Analizo la terna
            SELECT @lcCadena =
            CASE /* TERNA */
              WHEN @lnTerna = 1 THEN @lcCadena
              WHEN @lnTerna = 2 THEN @lcCadena + 'MIL '
              WHEN @lnTerna = 3 THEN @lcCadena + 'MILLONES '
              WHEN @lnTerna = 4 THEN @lcCadena + 'MIL '
              ELSE ''
            END /* TERNA */
            -- Armo el retorno terna a terna
            SELECT @lcRetorno = @lcCadena  + @lcRetorno
            SELECT @lnTerna = @lnTerna + 1
   END /* WHILE */
   IF @lnTerna = 1
       SELECT @lcRetorno = 'CERO'
   DECLARE @sFraccion VARCHAR(15)
   SET @sFraccion = '00' + LTRIM(CAST(@lnFraccion AS varchar))
   SELECT @ImpLetra = RTRIM(@lcRetorno) + ' PESOS ' + SUBSTRING(@sFraccion,LEN(@sFraccion)-1,2) + '/100 M.N.'

   RETURN @ImpLetra
END

GO

----

Como ejemplo puedo crear una vista que contenga totales con numero y letra, es obvio que cada quien le dara el uso que le venga en su regalada gana. jejeje.


CREATE VIEW [dbo].[Totales]
AS
SELECT     TC.IDColaborador, TC.IDAsignacion, SUM(T.Monto) AS MontoTotal, dbo.CantidadConLetra(SUM(T.Monto)) AS MontoConLetra
FROM         dbo.Colabora C INNER JOIN
                      dbo.Talonario_Colabora TC ON C.IDColaborador = TC.IDColaborador INNER JOIN
                      dbo.Talonarios T ON TC.IDTalonario = T.IDTalonario
GROUP BY TC.IDColaborador, TC.IDAsignacion

---

Al consultar el View con un simple SELECT se ve bien bonito:



SELECT [MontoTotal], [MontoConLetra]
    FROM [dbo].[Totales]
GO


 MontoTotal  MontoConLetra
 ----------  ------------------------------------
 25000       VEINTICINCO MIL PESOS 00/100 M.N.
 2500        DOS MIL QUINIENTOS PESOS 00/100 M.N.
 5000        CINCO MIL PESOS 00/100 M.N.
 2500        DOS MIL QUINIENTOS PESOS 00/100 M.N.
 2500        DOS MIL QUINIENTOS PESOS 00/100 M.N.
 5000        CINCO MIL PESOS 00/100 M.N.
 2500        DOS MIL QUINIENTOS PESOS 00/100 M.N.
 2500        DOS MIL QUINIENTOS PESOS 00/100 M.N.
 2500        DOS MIL QUINIENTOS PESOS 00/100 M.N.
 5000        CINCO MIL PESOS 00/100 M.N.
 2500        DOS MIL QUINIENTOS PESOS 00/100 M.N.

¿Como desplegar una imagen JPG desde una Base de Datos con ASPX y C#?

2006-10-13T10:48:00.000-05:00

Siempre es necesario tener guardadas imagenes de fotografías, firmas, o documentos en una base de datos. Actualmente ha proliferado la necesidad de digitalización de documentos y su uso desde aplicaciones Web. Lo tradicional es que las imagenes se guarden en disco duro, en el file system, lo cual conlleva problemas para el programador y para los sitemas, si no se tiene un esquema robusto para su correlacion con datos generalmente provenientes de un servidor SQL. Por ello es muy útil poder almacenar dichas imágenes en una BD, pero lo mas importante poderlas mostrar posteriormente.
La técnica común de lectura de imágenes consiste en leer la imagen de desde un campo tipo BLOB, (Image si se trata de MS SQL), después guardarla en el disco duro y accederla desde ahí con HTML, asp's y similares. Esto impacta en el desempeño de la aplicación de manera significativa a pesar de ser una técnica relativamente sencilla y de fácil implementación.
Sin embargo es posible mostrar la imagén al vuelo, es decir desde que se lee de la base de datos, mandarla al web, sin tener que dar el paso intermedio de grabación en disco. La técnica es mucho mas sencilla. Con una aplicación asp o aspx basta con leer la imagen de la BD y mandarla al Reponse, únacamente cambiando el tipo de respuesta Response.ContentType, asignando el valor 'image/JPEG'. Esto es súmamente fácil de implementar en cualquier lenguaje. Un ejemplo en ASPX con C# lo mostramos a continuación. (También publicaremos el ejemplo en Delphi, PHP y Java para ilustrarlo mas ampliamente)



<%@ Page language="c#" Codebehind="ViewImage.aspx.cs" AutoEventWireup="false" Inherits="Sorteo.ViewImage" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" >
<HTML>
        <HEAD>
<TITLE>ViewImage</TITLE>
<METAname="GENERATOR"content="Microsoft Visual Studio .NET 7.1">
<METAname="CODE_LANGUAGE"content="C#">
<METAname="vs_defaultClientScript"content="JavaScript">
<METAname="vs_targetSchema"content="http://schemas.microsoft.com/intellisense/ie5">
</HEAD>
        <BODYms_positioning="GridLayout">
                <FORMid="Form1"method="post"runat="server">
                </FORM>
        </BODY>
</HTML>

--- C# ---



using System;
using System.Data.SqlClient;
using System.Web.UI;

namespace Sorteo
{
        ///<summary>
        ///Devuelve una imagen almacenada en una BD
        ///</summary>
        public class ViewImage : System.Web.UI.Page
        {
                protected System.Data.SqlClient.SqlConnection con;
                protected SqlCommand cmdImage;

                private void Page_Load(object sender, EventArgs e)
                {
                        try
                        {
                                con.Open();
                                int iIDPremio = Convert.ToInt32(Request.QueryString["IDPremio"]);
                                cmdImage.Parameters["@IDPremio"].Value = iIDPremio;
                                object o=cmdImage.ExecuteScalar();
                                byte[] bufr=(byte[])o;
                                Response.ContentType="image/JPEG";
                                Response.OutputStream.Write(bufr,0,bufr.Length);
                        }
                        catch(Exception except)
                        {
                                Response.Write(cmdImage.CommandText + "\n" + except.ToString()) ;
                        }
                        finally
                        {
                                con.Close();
                        }
                }


#region Web Form Designer generated code
                override protected void OnInit(EventArgs e)
                {
                        //
                        // CODEGEN: This call is required by the ASP.NET Web Form Designer.
                        //
                        InitializeComponent();
                        base.OnInit(e);
                }

                ///<summary>
                ///Required method for Designer support - do not modify
                ///the contents of this method with the code editor.
                ///</summary>
                private void InitializeComponent()
                {
                        System.Configuration.AppSettingsReader configurationAppSettings = new System.Configuration.AppSettingsReader();
                        this.cmdImage = new System.Data.SqlClient.SqlCommand();
                        this.con = new System.Data.SqlClient.SqlConnection();
                        // 
                        // cmdImage
                        // 
                        this.cmdImage.CommandText = "SELECT Imagen FROM Premios WHERE (IDPremio = @IDPremio)";
                        this.cmdImage.Connection = this.con;
                        this.cmdImage.Parameters.Add(new System.Data.SqlClient.SqlParameter("@IDPremio", System.Data.SqlDbType.VarChar, 4, "IDPremio"));
                        // 
                        // con
                        // 
                        this.con.ConnectionString = ((string)(configurationAppSettings.GetValue("con.ConnectionString", typeof(string))));
                        this.Load += new System.EventHandler(this.Page_Load);

                }
#endregion
        }
}

----------

Para ejecutar el programa basta llamarlo desde el browser para que muestre directamente la imagen almacenada en la base de datos.

http://localhost/MyImageApp/ViewImage.aspx?IDPremio=1

El campo IDPremio es el ID del registro que contiene la imagen, para este ejemplo es un listado de premios de un sorteo. Este se puede modificar segun la necesidad. Y se puede hacer mas generico o parametrizable.

Explicación Tecnica:

El programa utiliza una sencilla llamada SELECT a una Tabla Premios en la cual hay un campo Image que guarda imagenes tipo JPG. Basicamente el resultado es leido en forma de un arreglo de bytes y enviado a la respuesta de la aplicacion, especificando el ContentType como 'image/JPEG' para que sea identificado por el browser.

Si la necesidad es mostrar la imagen dentro de una pagina o en una tabla, o dentro de un DataGrid, se debe hacer uso del tag <IMG src...> y en la propiedad src (source) indicar la url de la aplicación en cuestión. Por ejemplo:



<imgsrc="ViewImage?IDPremio=1">

Esta sencilla llamada hara que se muestre la imagen desde cualquier pagina HTML. Por otro lado, si se quiere llamar desde una aplicacion asp, el código quedaría mas o menos asi:



<imgsrc="ViewImage?IDPremio=<%=NumPremio%>">

Donde se sobreentiende que NumPremio es una variable cuyo valor dependera del programa asp, esto es puede venir de una base de datos o de un ciclo for.

Technorati : BLOB, Image, JPG

BackBase AJAX for Java

2006-10-13T09:27:00.000-05:00

BackBase es un producto AJAX para Java muy interesante, podemos conocerlo en este sitio http://www.backbase.com/