DevTopia... DotNet, Sql Server con Hierbas varias

Efimeras

2014-02-13T08:18:00.001-08:00

Algunos preguntan ¿en esta vida que es perdurable? Ya que otros tantos aseveran... "que las palabras se las lleva el viento"
"que las promesas son solo palabras" y que "las reglas estan hechas para transgredirse"
Pero entonces, ¿que es duradero en una persona? ¿Que es aquello que se puede prender en un ser humano y permanecer en el a traves del tiempo?
!las emociones! Pequeñas o grandes generadoras de recuerdos y que despiertan y agitan las fibras mas sensibles de una persona. Eso amigos mios es lo verdaderamente inolvidable, claro esta que las hay buenas y malas por eso esforcemonos en generar en los demas solo gratos sentimientos pues podemos estar seguros que aquello que plantemos ya no se ira...

Obtener el nodo de un Xml (Cfdi) con todo y que tenga la nomenclatura ns:elemento, en 2 pataditas con LINQ. [LINQ TO XML]

2013-12-09T21:41:00.001-08:00

Que tal pues nada que como parte de mi trabajo me vi en la necesidad de obtener el nodo del complemento TimbreFiscalDigital desde una factura CFDi que como bien sabran es un XML. Pues bien tras intentarlo con XPATH, y demas… siempre obtenia un error de Espacio de Nombres, y es que estos archivos poseen una nomenclatura basada en NameSpace y aun administrandolos no conseguia mi cometido.

Sin embargo he aqui como lo solucione extremadamente facil, claro esta con LINQ.

Espero que les sea de utilidad.

   1:  Dim xdoc = XDocument.Load(pArchivoXmlCfdiGenerado)

   2:              Dim timbreFiscal = (From item In xdoc.Descendants

   3:                                  Where item.Name.LocalName = "TimbreFiscalDigital"

   4:                                  Select item).First()

5:

   6:              pHistoricoTimbreCFDi.FechaTimbrado = Convert.ToDateTime(timbreFiscal.Attribute("FechaTimbrado").Value)

   7:              pHistoricoTimbreCFDi.UUID = timbreFiscal.Attribute("UUID").Value

   8:              pHistoricoTimbreCFDi.NoCertificadoSAT = timbreFiscal.Attribute("noCertificadoSAT").Value

   9:              pHistoricoTimbreCFDi.SelloCFD = timbreFiscal.Attribute("selloCFD").Value

  10:              pHistoricoTimbreCFDi.SelloSAT = timbreFiscal.Attribute("selloSAT").Value

  11:              pHistoricoTimbreCFDi.Version = timbreFiscal.Attribute("version").Value

  12:              pHistoricoTimbreCFDi.Esquemas = timbreFiscal.Parent.ToString

Posteando desde android con soffice

2013-10-31T12:49:00.001-07:00

Pues nada, aqui probando la edicion de blogs desde android con Soffice. Que para ser desde un celular me parece sencillo en cuanto al manejo; pero con muy buenas opciones sobre todo en lo que respecta a la inserción de elementos.
La pega que le veo es que solo es posible editar las entradas agregadas desde el dispositivo por lo que olvidate de querer modificar tus demas posts.
En conclusión recomendado en definitiva, pues me parece que de las alternativas es la mejor para mobiles.

Como llamar un Constructor Base desde una clase Heredada, en Vb y C#

2013-10-30T10:00:00.000-07:00

Escribo esta entrada porque algunos colegas tal vez no estan al tanto de las diferencias que implica el lenguaje al momento de llamar un constructor Base desde la clase que la hereda.

C#

En la Firma del constructor de la clase heredada, especificamos a que constructor base debe llamar y que parametros se enviaran al mismo.

   1:          public AtmException(object pOrigen,string pMensaje)

   2:              : base(pMensaje)

   3:          {

   4:              Data.Add("ObjectSource", pOrigen);

   5:              Data.Add("Mensaje", pMensaje);

   6:          }

   7:      }

Vb.Net

En este caso utilizaremos el objeto MyBase para llamar al constructor deseado, en la linea inmediata a la firma del Constructor de la clase derivada.

   1:    Public Class ExceptionNumeroRegistrosExcedido

   2:          Inherits Exception

3:

   4:          Sub New(pMensajeExcepcion As String)

   5:              MyBase.New(pMensajeExcepcion)

   6:          End Sub

   7:      End Class

Bien pues como siempre espero que les sea de utilidad.

Happy Coding… KarlozArba

Deshabilitar que la tecla ENTER dispare el evento Button.Click

2012-10-31T17:30:00.001-07:00

Este caso aunque la solución llegue a ser sencilla en implementación, no me parece que este al alcance de quienes tenemos un conocimiento básico, intermedio de DotNet. En fin, cuando necesitemos que un botón dispare su evento click al pulsar la tecla ENTER cuando esté enfocado, deberemos forzosamente crear nuestro propio botón heredándolo de otro botón claro esta, en mi caso lo he hecho a partir de uno de DevExpress.

Una vez hecho esto, sobrescribir el método ProcessCmdKey tal como muestro más abajo.

Para mi caso muy particular se requería que si se detectara a tecla y de ser ENTER se enviara el foco al siguiente control, lo cual realice mediante un PreviewKeyDown.

Public Class iBotonDx     Inherits DevExpress.XtraEditors.SimpleButton     Protected Overrides Function ProcessCmdKey(ByRef msg As Message, ByVal keyData As Keys) As Boolean         Return keyData = Keys.Enter OrElse MyBase.ProcessCmdKey(msg, keyData)     End Function     Private Sub iBotonDx_PreviewKeyDown(sender As System.Object, e As System.Windows.Forms.PreviewKeyDownEventArgs) Handles Me.PreviewKeyDown         If e.KeyCode = Keys.Enter Then             SendKeys.Send("{TAB}")         End If     End Sub
 
End Class

Bien es todo en este entrada. Como siempre espero sea de utilidad.

Happy Coding… KarlozArba

La propiedad EditValue de un TextEdit de DevExpress devuelve error en su método GET si no se tiene un valor inicial.

2012-10-15T17:27:00.001-07:00

Bueno pues resulta que si no hemos asignado mediante código un valor inicial para la propiedad EditValue en un TextEdit de DevExpress este nos tira un error de referencia nula. Y este error se dispara aun cuando validemos el contenido de la propiedad con IsNothing o String.IsNullOrEmpty.

Bien la solución es bastante sencilla, lo único que debemos hacer es configurar en tiempo de diseño dicha propiedad, estableciendo el tipo de dato que contendrá y el valor que almacenara cuando nosotros no establezcamos nada de forma predeterminada.

Espero que les sea de utilidad.

Happy Coding…. KarlozArba

Binding de los valores de una ENUMERATION en el DataSource de un Control.

2012-10-05T17:05:00.001-07:00

El día de hoy, muy brevemente comentare que cuando nos sea necesario cargar los valores de una enumeración en el DataSource de un control [ej. Combo, List, etc] quizá nuestra primera intensión sea recorrer la enumeración sin embargo la solución que les recomiendo es la siguiente:

cbEstatus.Properties.DataSource = System.Enum.GetValues(GetType(Dominio.Enumeraciones.EnEstatus))

Con lo cual cargaran inmediatamente los valores, ahorrándonos un poco de trabajo y alguno que otra contratiempo.

Bien como dije la entrada de hoy ha pecado de breve, pero como siempre espero que sea de utilidad para la comunidad.

Happy Coding... Karloz Arba

Crear Custom Control Panel mediante un User Control.

2012-09-14T08:47:00.001-07:00

Que tal, ya después de un largo tiempo sin agregar entradas a mi modesto blog, quiero dar una pequeña aportación, pero que espero este llena de posibilidades para todos.

Bien pues ¿que tal tener nuestro propio Control Panel? ¿Porqué? o ¿Para que?, las respuestas las hay de todas, en mi caso en la consultora para la que “laburro”, tenemos un conjunto de controles de usuario a los que se les han agregado algunas funciones de dibujo que permiten simular que cada control esta dentro de un panel con bordes redondeados [ese código esta pendiente para otra entrada], bueno pues hay casos en los que necesitamos tener varios controles agrupados en un solo Panelote, así que creamos un User Control que no tiene más que las funciones de dibujo, y así conseguimos nuestro Panel con bordes redondeados para agrupar otros controles, pero nada!! que es solo un farol pues en realidad no agrupa nada. ¿Porqué?, bueno pues porque si bien en cierto que los UC implementan IContainer tambien en cierto que solo funcionan de esta forma en modo de diseño. Pero bueno después de este largo preámbulo verán que la forma de crear su control contenedor es tan fácil que raya en lo ridículo.

1. Crear un proyecto de Librería de Controles

2. Por defecto nos agrega un control de usuario denominado UserControl1, renombrarlo como mejor nos parezca.

3. Agregamos los siguientes Namespace, pues necesitaremos un atributo para nuestra clase que se encuentra en ellos:

System.ComponentModel

System.ComponentModel.Design

4. Marcamos nuestra clase con el atributo:

<Designer ("System.Windows.Forms.Design.ParentControlDesigner, System.Design", GetType(IDesigner))>

Esto proveerá la magia para que nuestro UC pueda comportarse como un control del tipo ParentControl o contenedor.

Nuestra Clase debería quedarnos más o menos así:

Bien ha sido todo por hoy, como siempre espero que les sea de utilidad.

Happy Coding... Karloz Arba

CREATE FILE encountered operating system error 5(Access is denied.)

2012-07-05T09:15:00.001-07:00

Etiquetas de Technorati: Sql Server

En el caso de que desinstales tu instancia de sql server express, y quieras realizar un Attach de las bd que tenias anteriormente, es posible que te encuentres con el siguiente mensaje, al momento de adjuntarlas:

CREATE FILE encountered operating system error 5(Access is denied.) while attempting to open or create the physical file 'C:\Program Files\Microsoft SQL Server\MSSQL10_50.MSSQLSERVER\MSSQL\DATA\MyDataBase.mdf'. (Microsoft SQL Server, Error: 5123)

Bueno pues la solución pasa simplemente por:

* En un explorador de windows abrir las propiedades de cada archivo .mdf y .ldf que necesites adjuntar, en la pestaña de seguridad agrega “Todos”, o “Everyone” según el idioma de tu SO, dale todos los permisos, y listo!! podras adjuntar sin problemas.

Happy Coding... Karloz Arba

Montículo, Pila, Tipos por Valor y por Referencia WTF??

2012-05-14T23:11:00.003-07:00

En esta ocasión comentare algunos conceptos básicos sobre programación, ya se! ya se! aquí puro experto, pero seguro que abra muchos a quienes les sea de utilidad que es precisamente la intensión de estos aportes.

Cuando declaramos una variable, antes que nada debemos estar consientes de que esta formada por tres elementos:
1. Nombre de la variable.
2. Tipo de Datos de la variable.
3. Valor de la variable,

Ahora bien, dependiendo del tipo de la variable que usemos, esta se guardara en uno u otro tipo de memoria, ya que para este fin existen dos tipos: la Pila [Stack] y el Montículo [Heap].

El compilador almacena las variables de tipos primitivos en la Pila, que es una estructura de tipo LIFO [Last InFirst Out], esta memoria es mucho mas ágil aunque Estática, que su contraparte, sin embargo tiene una limitante en cuanto al tamaño que es de 1024 kb. No obstante es posible modificarla mediante opciones de compilación, pero esa es otra historia.

Por otra parte cuando ocupamos tipos Referencia [Clases, Objetos, Interfaces, Delegados, etc.] estos son almacenados en el Heap, que es otro segmento o tipo de memoria, que se asigna de forma dinámica a través de un administrador de la misma, que en DotNet se denomina: Garbage Collector o Recolector de Basura, que hay que decir que es quien se encarga de liberar la memoria que ya no es ocupada. Es importante mencionar que aun cuando el objeto referencia se encuentra en el Heap, en el Stack se crea un Apuntador, que almacena precisamente la dirección donde puede localizar el contenido de esa variable referencia, por esa razón cuando asignamos un objeto a otro, en realidad lo que estamos haciendo es copiar a su apuntador la misma dirección de memoria donde se localiza el objeto.

Hemos dicho que los tipos primitivos se copian en el Stack, sin embargo como toda regla tiene su excepción y esta es que si estas variables son miembros o propiedades de objetos, estas se almacenan también en el Heap y solo cuando son variables locales dentro de sus métodos estas van al Stack, ¿por que? porque son variables temporales de las que el compilador solo deberá almacenar su valor de forma breve para realizar algunas operaciones, y esto ademas agilizara la ejecución de la aplicación.

Bueno de momento esto ha sido todo, espero no liarlos mucho con tantas letras, pero muchas ocaciones estos detalles que suelen ser teóricos y en apariencia muy basicos, pueden hacer la diferencia dentro de nuestros desarrollos.

Happy Coding... Karloz Arba

Imprimir pantalla y pantalla actual en vb.net

2012-05-14T09:50:00.001-07:00

Que tal. De manera breve mostraré como mandar al portapapeles la pantalla y la pantalla actual.

El como tratarla lo veremos después, aunque la solución es tan sencillo como mandarla a un Image.

' en un botón o donde queramos establecer la impresión colocamos los siguiente:

SendKeys.Send("{PRTSC}") ' para la pantalla completa

SendKeys.Send("%{PRTSC }") ' para la pantalla activa.

Espero que les sea de utilidad. karlozarba... Happy coding!

Desde Windows phone

2012-05-09T11:20:00.001-07:00

Que tal! Pues ya he dejado mi android de lado y ahora desde WP checando .si es posible bloggear decentemente. Saludos.

Activar los Comentarios XML de documentación en VB.Net cuando han dejado de trabajar.

2012-03-26T10:55:00.001-07:00

Que, tal.

En esta ocasión quiero comentar una situación que me trajo un buen rato de cabeza, y es que mientras desarrollamos generalmente documentamos nuestros métodos haciendo uso de los comentarios en XML que nos proporciona VS, sin embargo llega el momento en que esta herramienta solo esta disponible en proyectos de C# y por alguna razón en VB.Net simplemente no aparecen, aun cuando pulsemos una y otra vez ''' que es la combinación que nos permite visualizarlas.

Pues bien la solución es bastante extraña pues en las propiedades del proyecto debemos dirigirnos al apartado de compilación y CHECKEAR la opción “Generar documentación XML”. Puede suceder, como a mi me paso, que la opción estaba checkeada, pero el control se encontraba en un estado similar a deshabilitado, bueno pues simplemente desmarcar y marcar y con eso bastara.

Bueno espero como siempre, que les sea de utilidad.

Que la Fuerza del código les acompañe.

Saludos

karloz arba

Obtener el registro seleccionado en un GridLookupEdit de DevExpress

2012-03-07T09:01:00.001-08:00

Bueno ya tiene un muy buen rato que no agregaba nada al blog, espero como siempre que a todos los que ocupan la Suite de Dx para Windows Forms les sea de utilidad.

// Asignamos el valor “Visible” del Contenedor en alguna  variable aunque esto claro esta es mejorable
string valor = lueVerBd.EditValue.ToString();                  //El control tiene un método que a partir de ese valor seleccionado nos devolverá el registro al que pertenece.

// Claro que este valor lo busca en el campo identificado como Campo Llave.

DataRowView dr;
dr = (DataRowView) lueVerBd.Properties.GetDataSourceRowByKeyValue(valor);

Bien pues por el momento es todo….

Happy Coding!!

karlozarba

Parser Error Message: Could not create type

2011-11-23T13:23:00.001-08:00

Que tal, el día de hoy comentare algo que me tuvo al borde de botar la maquina y dispararle, pues si googleas el mensaje de error “Parser Error Message: Could not create type” encuentras soluciones que no necesariamente te ayudan.

En fin, el caso es el siguiente:

1. Tienes un Web Service que generalmente cuando agregas un proyecto de este tipo, esta configurado como AnyCPU

2. Corres el Ws y resulta que funciona correctamente

3. Requieres cambiar la aplicación para que se compile como x86

4. Ejecutas nueva e ingenuamente la aplicación, y… Sorpresa!!! te tira el error: “Parser Error Message: Could not create type” que como mencione, las soluciones encontradas en internet, comentan un error relacionado con un cambio de nombre o de namespace en tu clase, lo cual puede hacerte perder un buen rato tratando de decifrar, sobre todo cuando no has hecho el maldito cambio de nombre o algo parecido.

5. Para empeorar las cosas, si lo regresas como Any, resulta que si jala

Bien pues la solución es la siguiente para el caso descrito…

Resulta que cuando compilas tu WebService como ANY, el resultado se genera en la carpeta BIN\ pero cuando configuras para x86 el VS te genera una nueva estructura de directorios identificadas bajo x86\ y por alguna razón que no me explico el IIS es incapaz de leer, por lo que jamás encuentra los ensamblados para construir los objetos.

De tal suerte que la solución pasa por dirigirnos a las propiedades del proyecto, en la pestaña COMPILE en la opción “Build output path” debemos mantener el valor: “bin\”, así que si tiene otro valor deberás modificarlo.

A continuación corremos el proyecto y listo!!!

Nuestro Web Service trabaja correctamente.

Como siempre espero que les sea de utilidad.

Best regards And Happy coding.

KarlozArba

ACTUALIZAR EL @@SERVERNAME DE UNA INSTANCIA SQL SERVER

2011-11-14T18:01:00.001-08:00

Bien pues aquí un aporte más que seguro les podrá evitar mas de un dolor de cabeza.

En ocasiones contamos con un equipo sea, Pc o Servidor completamente instalado y este cuenta con una instancia de Sql Server, sin embargo por alguna causa [ej. estandarización de nombres de red, en la empresa… como es mi caso ] es posible que deba ser cambiado el nombre del equipo, tras lo cual seguramente tendremos problemas para conectarnos a nuestra servidor de Sql Server ya que para el motor de Bd el nombre registrado simplemente ya no se encuentra.

Bien pues aquí una forma de repararlo.

1. Hacer una consulta a la vista de sistema: sys.servers:

SELECT * FROM sys.servers

server_id	name	product	provider	data_source
0	JCAB\DENALIXPS	SQL Server	SQLNCLI	JCAB\DENALIXPS

como vemos el nombre registrado originalmente fue: JCAB

2. Eliminaremos el servidor registrado

EXEC sp_dropserver ‘JCAB\DENALIXPS’

3. Ahora registramos el nuevo nombre de servidor:

EXEC sp_addserver 'ABP-LAP-002\DENALIXPS','LOCAL'

Es importante notar el parametro ‘LOCAL’ pues indica si se trata de una instancia local.

4. Una vez registrado, es necesario ajustar sus opciones de Servidor para que sea accesible, lo cual conseguimos mediante:

EXEC sp_serveroption 'ABP-LAP-002\DENALIXPS','data access','true'

5. A modo de comprobación podemos consultar nuevamente sys.servers y adicionalmente @@servername

Pues espero que les sea útil, hasta aquí por el día de hoy.

Best regards And Happy coding.

KARLOZARBA

Obtener la Collation [Intercalación] del Servidor o de una Base de Datos en Sql Server

2011-10-28T10:10:00.001-07:00

Hola después de mucho tiempo estoy aquí con una nueva aportación esperando como siempre que les sea de utilidad.

En muchas ocasiones por cuestiones de Regionalización o codificación de los caracteres manejados por nuestras aplicaciones, requerimos determinar la intercalación ya sea del Servidor o de las Bases de Datos, bien pues aquí una forma muy sencilla de hacerlo.

SELECT CONVERT(sysname, SERVERPROPERTY('collation'));
GO

SELECT DATABASEPROPERTYEX('NombreBaseDatos,'collation');
GO

Bien pues por el momento es todo.

Best regards And Happy coding.

KarlozArba

Recorrer un Dictionary con C#

2011-06-20T09:32:00.001-07:00

Que tal, el día de hoy escribiré muy brevemente como realizar el recorrido de un Dictionary en C#, quizá sea algo muy básico pero hoy al tratar de hacerlo hubo un momento en el que no supe como hacerlo pues no es una lista solo de items sino de pares.

En fin espero que aun cuando se trata de algo sencillo le pueda servir a alguien.

Dictionary<string,string> ConceptosCertificado)

StringBuilder CertBuilder = new StringBuilder();

// Recorre los pares

foreach (KeyValuePair<string,string> Par in ConceptosCertificado)
{
  CertBuilder.AppendLine(string.Format("{0}:{1}",Par.Key,Par.Value));
}
 
// Recorre solo los valores

foreach (string Valor in ConceptosCertificado.Values)

CertBuilder.AppendLine(Par.Value);

Saludos

Happy coding!!!

Validación de campos XML vacíos en SqlServer 2008

2011-03-03T07:40:00.000-08:00

Saludos a todos, el día de hoy después de mucho agregare una entrada al blog, por más que me prometo a mi mismo que escribiré, bueno pues termino sin hacerlo.

En fin, entrando en materia muchas veces necesitamos validar que un campo de tipo XML en SqlServer 2008 contenga o no un valor, y en muchas más ocasiones XPATH no nos funciona o no queremos ocuparlo, bueno pues para estos casos la solución encontrada es la siguiente:

select top(500) xml_arch, * from crm.sis_arch with(nolock) where cast(xml_arch as varchar(max))=''

select top(500) xml_arch, * from crm.sis_arch with(nolock) where cast(xml_arch as varchar(max))<>''

Como verán es una solución muy sencilla pero funcional, además nos permite lógicamente realizar cualquier tipo de comparación o búsqueda en la cadena del XML, se que esta no es la forma natural de hacerlo en este tipo de campos pero seguro que se toparan con casos donde lo apliquen, como en el mío.

Como siempre espero que les sea de utilidad…

Best regards And Happy coding.

karlozarba

Acceder a Métodos, Controles o propiedades de un formulario hijo a uno padre. [Windows Forms] C# VB.Net

2010-10-18T19:15:00.001-07:00

El día de hoy comentare sobre un caso muy usual al trabajar con aplicaciones WindowsForms, por lo menos para mi en .Net 2003, 2005 y 2008.

En el caso que revisare mediante un ejemplo muy sencillo tenemos:

a) Un formulario principal, que alberga un GridControl, y un método de agregado de filas al DataTable que alimenta ese GrigControl.

b) Un formulario secundario que se crea como un objeto desde el formulario principal, y desde el cuál se invocara el método de agregado de filas del GridControl del formulario principal.

1. Como dije, tenemos un DataTable a nivel de clase:

Private dt As New DataTable()

2. Y en el Evento Load del Formulario principal, armamos la estructura de la tabla y agregamos unos registros de prueba :

Try
           dt.Columns.Add(New DataColumn("a"))
           dt.Columns.Add(New DataColumn("b"))
           dt.Columns.Add(New DataColumn("c"))

           dt.Rows.Add("1", "2", "3")
           dt.Rows.Add("4", "5", "6")
           dt.Rows.Add("7", "8", "9")
           dt.Rows.Add("10", "11", "12")

gc1.DataSource = dt

       Catch ex As Exception
           MsgBox(ex.Message)
       End Try

3. Como dije anteriormente, tenemos un método para agregar nuevos registros al DataTable:

Public Sub addRow(ByVal val1 As String, ByVal val2 As String, ByVal val3 As String)
Try
dt.Rows.Add(val1, val2, val3)

        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub

4. Ahora bien, si este método es llamado desde el formulario principal pues todo va bien, pero si instanciamos un nuevo formulario:

Dim f As New Form4
f.Owner = Me
f.Show()

lo más seguro es que estando en el formulario secundario, estemos tentados a invocar al método, de la siguiente manera:

Form2.addRow(TextBox3.Text, TextBox4.Text, TextBox5.Text)

con lo cual, en tiempo de compilación no tendremos ningún problema, sin embargo cuando realicemos el compilado de la aplicación, al ejecutar la aplicación, el método no funciona correctamente. ¿Porqué?

Bueno, pues porque no podemos acceder a los formulario y sus propiedades hacia arriba de forma directa, por lo que es necesario realizar un <casting> obteniendo el nombre del formulario principal, de la propiedad “owner”:

CType(Me.Owner, Form2).addRow(TextBox3.Text, TextBox4.Text, TextBox5.Text)

con lo cual el problema queda resuelto.

Como siempre espero que en algún momento les sea de utilidad

Best regards And Happy coding.

KarlozArba

Formateo de campos Fecha–Hora para Sql Server desde .Net

2010-10-13T08:40:00.001-07:00

Este post pretendo que sea breve ya que solo es para comentar que en ocasiones nos encontramos el problema de insertar o actualizar datos Datetime desde aplicaciones hechas con Vb.Net o C# y estos marcan error si no son recibidos como parámetros Sql debido a que llevan el formato 01-10-2010 02:30 p.m. por lo que SQL Server no puede interpretar las cadenas (a.m. | p.m.).

Esta situación la podemos solvertar de la siguiente forma:

VarriableDateTime.ToString("yyyyMMdd hh:mm:ss")

en un Ejemplo sencillo:

string sql = "UPDATE zabp_tareas_ogerp ";
sql += string.Format(" SET TIEMPO_INICIO = '{0}', TIEMPO_FIN = '{1}',HORA_LIBERACION = {2}",P_Hora_Inicio.ToString("yyyyMMdd hh:mm:ss"), P_Hora_Fin.ToString("yyyyMMdd hh:mm:ss"), P_Duracion);
sql += string.Format(" WHERE FOLIO={0}",P_Folio);

Donde podemos observar como se formatea de la forma: 20101001 14:30:00 con lo que eliminamos el problema.

Como siempre espero que les sea de utilizada.

Best regards And Happy coding.

KarlozArba

Crear tabla en sql server desde una instruccion select

2010-10-08T10:57:00.001-07:00

En esta ocasión quiero compartirles algo que suele ser muy necesario cuando queremos respaldar los datos de una tabla especifica, sin tener que hacer backup de la BD completa, o cuando necesitamos guardar solo ciertos datos pero no conocemos a priori la estructura que tendrán esos datos e incluso quizá este proceso deba hacerse de forma dinámica por lo que ni siquiera sabemos en que momento se generara.

Bueno la forma es muy sencilla y es la siguiente:

SELECT [*|| campo1, campo2, campo3… campo(n)]

INTO NombreTablaNuevaOTemporal

FROM TablaOrigen

La explicación más sencilla aún:

Realizamos un SELECT tal y como lo necesitemos pero después del listado del campos necesarios, usaremos la palabra reservada INTO que permite la creación de una tabla con el nombre que señalemos a continuación de dicha instrucción. Quizá la pregunta sea: ¿´Qué pasa cuando la tabla ya existe y contiene datos?, bueno pues, esa tabla y datos son respetados, agregando únicamente los nuevos registros.

Bien, para finalizar un ejemplo sencillo:

SELECT t.FOLIO, t.ASUNTO

INTO test_table FROM zabp_tareas_ogerp t

WHERE t.PARA='Desarrollo-Carlos Armenta'

Debido a que todo se hace desde un SELECT, podemos hacerlo tan complejo como sea necesario.

Best regards And Happy coding.

KarlozArba

Cambiar nombre a un campo, en Sql Server 2008

2010-05-06T23:04:00.001-07:00

Bueno este es mi segundo post, y en esta ocasión mencionare algo que es muy sencillo pero que no en muchas ocasiones sabemos como hacerlo, bueno me refiero a: “Cambiar el nombre de un Campo en una tabla de Sql Server 2008”.

Realmente es una trabajo muy sencillo, basta con ejecutar el siguiente Store Procedure:

sp_rename [ @objname = ] 'nombre_objeto , [ @newname = ] 'nuevo_nombre' [ ,

[ @objtype = ] 'tipo_objeto ]

Donde:

nombre_objeto: se refiere al objeto al que necesitamos cambiar el nombre.

nuevo_nombre: nuevo identificador para el objeto.

tipo_objeto: es el tipo del objeto que deseamos renombrar.

Como se pueden imaginar este SP nos es útil para cambiar el nombre de Columnas, Indices, Tipos de Datos de Usuario, Bases de Datos y cualquier cosa que este en sys.objects.

Para nuestro caso usaremos algo como:

EXEC sp_rename 'CO.tbl_chk_out_hst.id_chk_out', 'id_chk_out_hst', 'COLUMN';

Algo que les recomiendo es que aunque no sea obligatorio el uso de Schema.Tabla, ustedes lo utilizen a fin de que los nombres de objetos puedan estar bien calificados.

Finalizando y como recomendación, recordar que si modifican el nombre de una campo, deberan revisar a priori el impacto sobre otros objetos de la BD como vistas, stores, etc, así como sus aplicaciones.

Bien pues espero que les sea de utilidad.

"May the force be with you, and happy coding".

Meet to DDL Triggers

2010-04-14T15:00:00.001-07:00

En el día a día de la administración de las bases de datos, los cambios en el schema son demasiados, por lo que se vuelve sumamente necesario contar con un mecanismo de auditoria de dichos cambios, que permita dar respuesta a las preguntas ¿qué? ¿como? ¿cuando? ¿quien? WTF?, y que eventualmente también te permitirá echarle la culpa al verdadero responsable de una catástrofe en las BD.

Bueno en este y otros escenarios más o menos parecidos tienen significado los DDL (Data Definition Language) Triggers, los cuales al igual que los DML Triggers se disparan al generarseciertos eventos en ciertos objetos, es decir, nosotros crearemos un Trigger que realize "algo" en el momento que tenga lugar un suceso determinado en el objeto de la BD que nos interese.

Estos Trigger (a partir de este momento TR) tienen 2 ambitos: Servidor y Base de Datos, y como es de esperarse responden a diferentes eventos.

Tabla de Eventos para la BD. (MSDN)

CREATE_APPLICATION_ROLE (Applies to CREATE APPLICATION ROLE statement andsp_addapprole. If a new schema is created, this event also triggers a CREATE_SCHEMA event.)	ALTER_APPLICATION_ROLE (Applies to ALTER APPLICATION ROLE statement andsp_approlepassword.)	DROP_APPLICATION_ROLE (Applies to DROP APPLICATION ROLE statement andsp_dropapprole.)
CREATE_ASSEMBLY	ALTER_ASSEMBLY	DROP_ASSEMBLY
ALTER_AUTHORIZATION_DATABASE (Applies to ALTER AUTHORIZATION statement when ON DATABASE is specified, and sp_changedbowner.)
CREATE_CERTIFICATE	ALTER_CERTIFICATE	DROP_CERTIFICATE
CREATE_CONTRACT	DROP_CONTRACT
GRANT_DATABASE	DENY_DATABASE	REVOKE_DATABASE
CREATE_EVENT_NOTIFICATION	DROP_EVENT_NOTIFICATION
CREATE_FUNCTION	ALTER_FUNCTION	DROP_FUNCTION
CREATE_INDEX	ALTER_INDEX	DROP_INDEX
CREATE_MESSAGE_TYPE	ALTER_MESSAGE_TYPE	DROP_MESSAGE_TYPE
CREATE_PARTITION_FUNCTION	ALTER_PARTITION_FUNCTION	DROP_PARTITION_FUNCTION
CREATE_PARTITION_SCHEME	ALTER_PARTITION_SCHEME	DROP_PARTITION_SCHEME
CREATE_PROCEDURE	ALTER_PROCEDURE	DROP_PROCEDURE
CREATE_QUEUE	ALTER_QUEUE	DROP_QUEUE
CREATE_REMOTE_SERVICE_BINDING	ALTER_REMOTE_SERVICE_BINDING	DROP_REMOTE_SERVICE_BINDING
CREATE_ROLE (Applies to CREATE ROLE statement, sp_addrole, and sp_addgroup.)	ALTER_ROLE	DROP_ROLE (Applies to DROP ROLE statement,sp_droprole, and sp_dropgroup.)
CREATE_ROUTE	ALTER_ROUTE	DROP_ROUTE
CREATE_SCHEMA (Applies to CREATE SCHEMA statement, sp_addrole, sp_adduser,sp_addgroup, and sp_grantdbaccess.)	ALTER_SCHEMA (Applies to ALTER SCHEMA statement and sp_changeobjectowner.)	DROP_SCHEMA
CREATE_SERVICE	ALTER_SERVICE	DROP_SERVICE
CREATE_STATISTICS	DROP_STATISTICS	UPDATE_STATISTICS
CREATE_SYNONYM	DROP_SYNONYM
CREATE_TABLE	ALTER_TABLE	DROP_TABLE
CREATE_TRIGGER	ALTER_TRIGGER	DROP_TRIGGER
CREATE_TYPE (Applies to CREATE TYPE statement and sp_addtype.)	DROP_TYPE (Applies to DROP TYPE statement andsp_droptype.)
CREATE_USER (Applies to CREATE USER statement, sp_adduser, andsp_grantdbaccess.)	ALTER_USER	DROP_USER (Applies to DROP USER statement,sp_dropuser, and sp_revokedbaccess.)
CREATE_VIEW	ALTER_VIEW	DROP_VIEW
CREATE_XML_SCHEMA_COLLECTION	ALTER_XML_SCHEMA_COLLECTION	DROP_XML_SCHEMA_COLLECTION

Tabla de Eventos a nivel del Servidor. (MSDN)

ALTER_AUTHORIZATION_SERVER
CREATE_DATABASE	ALTER_DATABASE	DROP_DATABASE
CREATE_ENDPOINT	ALTER_ENDPOINT	DROP_ENDPOINT
CREATE_LOGIN (Applies to CREATE LOGIN statement, sp_addlogin,sp_grantlogin, xp_grantlogin, and sp_denylogin when used on a nonexistent login that must be implicitly created.)	ALTER_LOGIN (Applies to ALTER LOGIN statement, sp_defaultdb,sp_defaultlanguage, sp_password, and sp_change_users_loginwhen Auto_Fix is specified.)	DROP_LOGIN (Applies to DROP LOGIN statement, sp_droplogin, sp_revokelogin, and xp_revokelogin.)
GRANT_SERVER	DENY_SERVER	REVOKE_SERVER

EVENTDATA()

Bien, cuando los eventos mencionados se disparan, la información que detalla lo ocurrido es almacenada en un archivo XML y que es accesible mediante la función EVENTDATA(), a partir de ahí podemos ocupar XQUERY, para consultar la información que necesitemos de forma especifica.

A continuación les muestro un ejemplo de la información proporcionada por EVENTDATA(). (Fuente)

<EVENT_INSTANCE>
   <EventType>CREATE_TABLE</EventType>
   <PostTime>2005-07-30T10:48:52.537</PostTime>
   <SPID>55</SPID>
   <ServerName>PSE-TEST-JON1</ServerName>
   <LoginName>PSE-TEST-JON1\Administrator</LoginName>
   <UserName>dbo</UserName>
   <DatabaseName>AdventureWorks</DatabaseName>
   <SchemaName>Person</SchemaName>
   <ObjectName>Address</ObjectName>
   <ObjectType>TABLE</ObjectType>
   <TSQLCommand>
      <SetOptions ANSI_NULLS="ON"
                  ANSI_NULL_DEFAULT="ON"
                  ANSI_PADDING="ON"
                  QUOTED_IDENTIFIER="ON"
                  ENCRYPTED="FALSE" />
      <CommandText>CREATE TABLE [Person].[Address](
                                [AddressID] [int]
                                IDENTITY (1, 1)
                                NOT FOR REPLICATION NOT NULL,
      [AddressLine1] [nvarchar](60) NOT NULL,
      [AddressLine2] [nvarchar](60) NULL,
      [City] [nvarchar](30) NOT NULL,
      [StateProvinceID] [int] NOT NULL,
      [PostalCode] [nvarchar](15) NOT NULL,
      [rowguid] uniqueidentifier ROWGUIDCOL NOT NULL CONSTRAINT
         [DF_Address_rowguid] DEFAULT (NEWID()),
      [ModifiedDate] [datetime] NOT NULL CONSTRAINT
         [DF_Address_ModifiedDate] DEFAULT (GETDATE())
      ) ON [PRIMARY];</CommandText>
   </TSQLCommand>
</EVENT_INSTANCE>

Como podemos ver, la información presentada es bastante útil e importante, aunque en lo personal me gustaría que cuando realizaras una operación de modificación o de eliminación de un objeto, guardara un copia de la definición anterior. Para aquellos que crear valido recurrir a las Vistas de Sistema y buscar la definición les comento ya lo intente y desafortunadamente el trigger se ejecuta posteriormente al evento de tal forma que la definición de los objetos ya ha cambiado en las vistas de sistema.

Bien a continuación pongo un ejemplo propio del trigger que he implementado y que de momento me funciona correctamente, seguramente podrán mejorarlo y adaptarlo a sus necesidades así que ojala lo podamos comentar.

/**

* Trigger DDL para auditoria de cambios en el schema de las bd

* Version 1, Alamacena el detalle de los cambios en el schema de

* las bd, evita que se borren tablas.

* 12 de Abril de 2010.

* I.S.C. Juan Carlos Armenta Bautista

**/

GO

IF EXISTS (SELECT * FROM sys.triggers WHERE parent_class_desc = 'DATABASE' AND name = N'tr_chge_log_Db')

BEGIN

DISABLE TRIGGER [tr_chge_log_Db] ON DATABASE;

SELECT '[tr_chge_log_Db] Deshabilitado.....' AS msg;

END

GO

/****** Object: DdlTrigger [tr_chge_log_Db]    Script Date: 04/12/2010 14:45:55 ******/

IF EXISTS (SELECT * FROM sys.triggers WHERE parent_class_desc = 'DATABASE' AND name = N'tr_chge_log_Db')

BEGIN

    DROP TRIGGER [tr_chge_log_Db] ON DATABASE

    SELECT '[tr_chge_log_Db] Borrado.....' AS msg;

END

GO

create TRIGGER tr_chge_log_Db

ON DATABASE

FOR CREATE_TABLE, ALTER_TABLE, DROP_TABLE

    ,CREATE_VIEW, ALTER_VIEW, DROP_VIEW

    ,CREATE_PROCEDURE, ALTER_PROCEDURE, DROP_PROCEDURE

    ,CREATE_FUNCTION, ALTER_FUNCTION, DROP_FUNCTION

    ,CREATE_TRIGGER, ALTER_TRIGGER, DROP_TRIGGER

    ,CREATE_INDEX, ALTER_INDEX, DROP_INDEX

AS

BEGIN

    SET NOCOUNT ON;

    SET ARITHABORT ON;

BEGIN TRY

    DECLARE @evento as XML;

    SET @evento=EVENTDATA();

    INSERT INTO msdb.dbo.change_db_sch_log(sch_obj,nom_bd,tip_evt,nom_obj,tip_obj,tsql_cmd,nom_login)

    SELECT @evento.value('(/EVENT_INSTANCE/SchemaName)[1]','varchar(256)'),

           @evento.value('(/EVENT_INSTANCE/DatabaseName)[1]','varchar(256)'),

           @evento.value('(/EVENT_INSTANCE/EventType)[1]','varchar(50)'),

           @evento.value('(/EVENT_INSTANCE/ObjectName)[1]','varchar(256)'),

           @evento.value('(/EVENT_INSTANCE/ObjectType)[1]','varchar(25)'),

           @evento.value('(/EVENT_INSTANCE/TSQLCommand)[1]','varchar(max)'),

           @evento.value('(/EVENT_INSTANCE/LoginName)[1]','varchar(256)')

    -- Validacion del tipo de evento, si es un drop_table, se anula la operacion

    IF @evento.value('(/EVENT_INSTANCE/EventType)[1]','varchar(50)')='DROP_TABLE'

    BEGIN

        RAISERROR ('No se permite la eliminacion de tablas en la BD.',16,1);

        ROLLBACK;

    END

END TRY

BEGIN CATCH

    DECLARE @ErrorMessage NVARCHAR(4000);

    DECLARE @ErrorSeverity INT;

    DECLARE @ErrorState INT;

SELECT @ErrorMessage = ERROR_MESSAGE(),@ErrorSeverity = ERROR_SEVERITY(),@ErrorState = ERROR_STATE();

    RAISERROR (@ErrorMessage,@ErrorSeverity,@ErrorState);

    ROLLBACK;

END CATCH
END

GO

SELECT '[tr_chge_log_Db] Creado.....' AS msg;

…

Notas finales.

Como verán para poder borrar o modificar el trigger primero es necesario deshabilitarlo. Asi pues 2 instrucciones que seguro les serviran mucho son:

ENABLE TRIGGER tg_name ON DATABASE;

DISABLE TRIGGER tg_name ON DATABASE;

que creo no requieren mayor explicación.

Sale pues hasta aquí no más, ojala que les sea de utilidad mi primer post.

k@rloz.@rb@

Bienvenidos!!!

2008-11-18T22:53:00.000-08:00

Sean Bienvenidos a mi blog espero publicar algunos articulos propios y de la comunidad, sobre desarrollo de software asi como de redes, esto con la finalidad de recopilar una serie de tips and tricks, que en ocaciones te pasas un rato googleando y no encuentras nada, bien ya tendremos un lugar donde recurrir, ojala existan aportes porque compartir en conocimeinto es un deber y una vocacion, compartamos nuestras experiencias y ganemos juntos.
Saludos.
karloz arba