sábado, 21 de julio de 2012

SQL Server trunca divisiones de enteros

Pues eso, revisando una función que entre otras acciones divide dos números enteros (entiéndase dos datos de tipo int)descubrí que sql server trunca el resultado. Aunque esto está claramente documentado en los libros en pantalla me tomó por asalto. Esto puede resultar una verdadera catástrofe para aquellos novatos o algunos con un poquito mas de experiencia que nos descuidamos.
DECLARE @dividendo int, @divisor int

set @dividendo = 50;
set @divisor = 12;

SELECT (@dividendo/@divisor)
GO
El resultado para esta simple operación no es el deseado, puesto que retorna 4 en lugar de 4.166
DECLARE @dividendo int, @divisor int

set @dividendo = 50;
set @divisor = 12;

SELECT (cast(@dividendo as decimal(18,6))/cast(@divisor as decimal(18,6)))
GO
Ahora si obtenemos el dato que realmente necesitamos.
Saludos.

domingo, 17 de junio de 2012

Como Hacer Reporte Crystal Reports y Asp .Net

Recientemente una amiga me pidio ayuda para hacer un reporte rápido con crystal reports y asp .net.

El ejemplo que hice para ella y que hoy comparto con usted hace uso del wizard de visual studio válido para las versiones 2005 y 2008. Sé que habrá quienes digan que esta no es la mejor manera de hacerlo, quienes lo hagan seguramente ya tienen experiencia en esto, sin embargo el ejemplo está dirigido para principiantes. En otra ocasión compartiré otro método. Por lo pronto acá les dejo el enlace del video en youtube y el código fuente:

Imports CrystalDecisions.Shared
Imports CrystalDecisions.CrystalReports.Engine
Partial Class _Default
    Inherits System.Web.UI.Page
    Private Sub configureCRYSTALREPORT()

        Dim myConnectionInfo As New ConnectionInfo()
        myConnectionInfo.ServerName = "NOMBRE_O_IP_DEL_SERVIDOR"
        myConnectionInfo.DatabaseName = "Northwind"
        myConnectionInfo.UserID = "sa"
        myConnectionInfo.Password = "myserver"
        setDBLOGONforREPORT(myConnectionInfo)

    End Sub

    Private Sub setDBLOGONforREPORT(ByVal myconnectioninfo As ConnectionInfo)

        Dim mytableloginfos As New TableLogOnInfos()
        mytableloginfos = CrystalReportViewer1.LogOnInfo

        For Each myTableLogOnInfo As TableLogOnInfo In mytableloginfos
            myTableLogOnInfo.ConnectionInfo = myconnectioninfo
        Next

    End Sub

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        configureCRYSTALREPORT()
    End Sub
End Class

Me han solicitado el código en c#. Acá se los dejo.
using CrystalDecisions.Shared;
using CrystalDecisions.CrystalReports.Engine;
using CrystalDecisions.Web;

public partial class _Default : System.Web.UI.Page 
{
    protected void Page_Load(object sender, EventArgs e)
    {
        configureCRYSTALREPORT();
    }

    private void configureCRYSTALREPORT()
    {
        ConnectionInfo myConnectionInfo = new ConnectionInfo();
        myConnectionInfo.ServerName = "NOMBRE_O_IP_DEL_SERVIDOR";
        myConnectionInfo.DatabaseName = "Northwind";
        myConnectionInfo.UserID = "sa";
        myConnectionInfo.Password = "mipassword";
        setDBLOGONforREPORT(myConnectionInfo);
 
    }
 
    private void setDBLOGONforREPORT(ConnectionInfo myconnectioninfo)
    {
        TableLogOnInfos mytableloginfos = new TableLogOnInfos();
        mytableloginfos = CrystalReportViewer1.LogOnInfo;
     
        foreach (TableLogOnInfo myTableLogOnInfo  in mytableloginfos)
        {
            myTableLogOnInfo.ConnectionInfo = myconnectioninfo;
        }
     
    }

}
Si desean usar la autenticacion de windows en lugar de autenticacion de sql server cambian las lineas correspondientes al UserID y Password por lo siguiente:
myConnectionInfo.IntegratedSecurity = true;
Para evitar que durante la publicación recuerde los datos de prueba deben activar la opción Discard Saved Data When Loading Reports en las imagenes siguientes muestro como hacerlo

Actualización:
Para Visual Studio 2010 y versiones posteriores es necesario descargar e instalar SAP Crystal Reports, developer version for Microsoft Visual Studio, despues de la instalación el procedimiento a seguir es el mismo.

Saludos.

domingo, 4 de marzo de 2012

Como fijar el precio de tu trabajo?

Ayer tuve una experiencia que me hizo recordar una historia que leí en la universidad hace algunos años. La historia dice así:

"Algunas veces es un error juzgar el valor de una actividad simplemente por el tiempo que toma realizarla… Un buen ejemplo es el caso del ingeniero que fue llamado a arreglar una computadora muy grande y extremadamente compleja… una computadora que valía 12 millones de dólares.
Sentado frente a la pantalla, oprimió unas cuantas teclas, asintió con la cabeza, murmuró algo para sí mismo y apagó el aparato. Procedió a sacar un pequeño destornillador de su bolsillo y dio vuelta y media a un minúsculo tornillo. Entonces encendió de nuevo la computadora y comprobó que estaba trabajando perfectamente. El presidente de la compañía se mostró encantado y se ofreció a pagar la cuenta en el acto. - ¿Cuánto le debo? -preguntó. - Son mil dólares, si me hace el favor. - ¿Mil dólares? ¿Mil dólares por unos momentos de trabajo? ¿Mil dólares por apretar un simple tornillito? ¡Ya sé que mi computadora cuesta 12 millones de dólares, pero mil dólares es una cantidad disparatada! La pagaré sólo si me manda una factura perfectamente detallada que lo justifique. El ingeniero asintió con la cabeza y se fue. A la mañana siguiente, el presidente recibió la factura, la leyó con cuidado, sacudió la cabeza y procedió a pagarla en el acto, sin chistar.
La factura decía:
Servicios prestados:
Apretar un tornillo:…………. 1 dólar 
Saber qué tornillo apretar: 999 dólares
Total:………………………… 1.000 dólares"


Por qué lo recordé? Pues porque me sucedió lo mismo. Fui llamado de emergencia para atender un problema con un servidor de una empresa X. Hice mi trabajo en un tiempo relativamente corto. Desafortunadamente al momento de cobrar mis clientes no fueron tan comprensivos como el presidente de la compañía de la historia. El mundo real es así, existen empresarios a los que poco les importa el tiempo, dinero y esfuerzo invertido en tu preparación profesional, ellos quieren poner precio a tu trabajo.

Todo aquel que, al igual que yo, realiza trabajos como FreeLancer enfrenta este tipo situaciones. Y nos hacemos la pregunta ¿Como debemos fijar el precio de nuestro trabajo? Personalmente escojo de entre las siguientes opciones:

  • Fijar el precio antes de hacer el trabajo. Es recomendable cuando realizas un trabajo "mecánico". Es decir tareas para las que las soluciones son obvias, o que no necesariamente involucran solucionar algún problema. Ejemplo de esto pueden ser el mantenimiento preventivo de pc, instalación y/o actualización de software, configuraciones básicas del s.o, instalación de hardware, cableado de red, etc. 
    • Ventaja: Si el cliente no acepta tu precio puedes dar media vuelta e irte sin mover un solo dedo.
    • Desventaja: Corres el riesgo de encontrarte con una situación imprevista  que demande mucho mas tiempo y esfuerzo que no serán remunerados.
  • Realizar un diagnostico, luego fijar el precio. Aconsejo este método para casos en los que "hay un problema" y según nuestra experiencia sabemos de manera precisa las posibles soluciones a aplicar.
    • Ventaja: Fijarás un precio con el que al final estarás satisfecho.
    • Desventaja: El diagnostico "ya es trabajo", es esfuerzo y tiempo que no será remunerado si el cliente decide no hacer uso de tus servicios.
Personalmente esta es la opción que uso cuando el encargo es el desarrollo de alguna aplicación o diseño de sitio web. Ustedes ya sabrán que primero es el análisis de requerimientos. En este ultimo ejemplo lo ideal es dejar el acuerdo por escrito.
  • Realizar todo el trabajo luego fijar el precio. Si, si... está ultima opción es la que llevo a escribir este artículo. Sin embargo hay ocasiones en las que el pc o servidor presenta comportamiento  tipo poltergeist. Esas ocasiones en las que toda tu experiencia acumulada no es suficiente para explicar de forma precisa el mal funcionamiento del hardware o software. Entonces tienes que recurrir a probar múltiples opciones de solución o invocar al CHapulin Colorado, jeje. Al final lo justo es cobrar por todo el esfuerzo y tiempo invertido y no solo por la solución que a fin cuentas funcionó.
Cualquiera de estas opciones las aplico considerando los precios en el mercado para cada servicio procurando siempre un precio justo para el cliente y para mí.

Esta es una humilde apreciación, y tu que opinas?

P.D.: Agradezco los comentarios constructivos.

domingo, 19 de febrero de 2012

Cerrar Todas Las Conexiones A Base De Datos SQL Server

Hola amigos. Hace algún tiempo un amigo me compartió este script que encontró en SQLServerCentral. Su finalidad es cerrar todas las conexiones existentes a una base de datos SQL Server. Solamente necesitas pasarle como parámetro el nombre de la base de datos. Lo he aplicado en SQL Server 2005 y funciona sin problemas.
Aunque no he trabajado como DBA en mi trabajo como desarrollador me ha sido de mucha utilidad. Espero le s sea útil a ustedes también.


/*

* Author Rafal Skotak

* Purpose Procedure tries to kill all connections to the specified database

*

* Date 2011.02.18

*

******************************************************************************************************/

USE [master]

GO

CREATE PROCEDURE proc_kill_dbconnections

@dbname SYSNAME

with encryption

as

begin

set nocount on



------- prepare temporary tables

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

create table #temp_processes_table

(

spid int primary key,

ecid int,

status sysname,

loginame sysname null,

hostname sysname null,

blk int,

dbname sysname null,

cmd sysname null,

request_id int null,

mod int not null default 0

);



-- get processes list

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

insert into #temp_processes_table (spid, ecid, status, loginame, hostname, blk, dbname, cmd, request_id)

exec sp_who



declare @count int

declare @process_id int

declare @cmd varchar(8000)



select @count = count(*) from #temp_processes_table where mod = 0



while @count > 0

begin

set @process_id = NULL



select top 1 @process_id = spid from #temp_processes_table where mod = 0 and dbname = @dbname



if @process_id is NULL

break



print @process_id



set @cmd = 'kill ' + cast(@process_id as varchar)



exec (@cmd)



update #temp_processes_table set mod = 1 where spid = @process_id



select @count = count(*) from #temp_processes_table where mod = 0 and dbname = @dbname

end



-- cleanup - drop temporary tables

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

drop table #temp_processes_table

end

go



-- example



-- exec dbo.proc_kill_dbconnections 'dbCuentasxCobrar'