CUBOS SQL SERVER

para todos aquellos que escuchaban hablar de los cubos pero temian preguntar...
http://technet.microsoft.com/es-es/library/ms175680%28SQL.90%29.aspx

Triggers Transact SQL

Un trigger( o desencadenador) es una clase especial de procedimiento almacenado que se ejecuta automáticamente cuando se produce un evento en el servidor de bases de datos.

SQL Server proporciona los siguientes tipos de triggers:

*
Trigger DML, se ejecutan cuando un usuario intenta modificar datos mediante un evento de lenguaje de manipulación de datos (DML). Los eventos DML son instrucciones INSERT, UPDATE o DELETE de una tabla o vista.
*
Trigger DDL, se ejecutan en respuesta a una variedad de eventos de lenguaje de definición de datos (DDL). Estos eventos corresponden principalmente a instrucciones CREATE, ALTER y DROP de Transact-SQL, y a determinados procedimientos almacenados del sistema que ejecutan operaciones de tipo DDL.

Trigger DML.

Los trigger DML se ejecutan cuando un usuario intenta modificar datos mediante un evento de lenguaje de manipulación de datos (DML). Los eventos DML son instrucciones INSERT, UPDATE o DELETE de una tabla o vista.

La sintaxis general de un trigger es la siguiente.


CREATE TRIGGER

ON

AFTER

AS

BEGIN

-- SET NOCOUNT ON added to prevent extra result sets from

-- interfering with SELECT statements.

SET NOCOUNT ON;

-- Insert statements for trigger here

END

Antes de ver un ejemplo es necesario conocer las tablas inserted y deleted.

Las instrucciones de triggers DML utilizan dos tablas especiales denominadas inserted y deleted. SQL Server 2005 crea y administra automáticamente ambas tablas. La estructura de las tablas inserted y deleted es la misma que tiene la tabla que ha desencadenado la ejecución del trigger.

La primera tabla (inserted) solo está disponible en las operaciones INSERT y UPDATE y en ella están los valores resultantes despues de la inserción o actualización. Es decir, los datos insertados. Inserted estará vacia en una operación DELETE.

En la segunda (deleted), disponible en las operaciones UPDATE y DELETE, están los valores anteriores a la ejecución de la actualización o borrado. Es decir, los datos que serán borrados. Deleted estará vacia en una operacion INSERT.

¿No existe una tabla UPDATED? No, hacer una actualización es lo mismo que borrar (deleted) e insertar los nuevos (inserted). La sentencia UPDATE es la única en la que inserted y deleted tienen datos simultaneamente.

No puede se modificar directamente los datos de estas tablas.

El siguiente ejemplo, graba un historico de saldos cada vez que se modifica un saldo de la tabla cuentas.


CREATE TRIGGER TR_CUENTAS

ON CUENTAS

AFTER UPDATE

AS

BEGIN

-- SET NOCOUNT ON impide que se generen mensajes de texto

-- con cada instrucción

SET NOCOUNT ON;

INSERT INTO HCO_SALDOS

(IDCUENTA, SALDO, FXSALDO)

SELECT IDCUENTA, SALDO, getdate()

FROM INSERTED

END

La siguiente instrucción provocará que el trigger se ejecute:


UPDATE CUENTAS

SET SALDO = SALDO + 10

WHERE IDCUENTA = 1

Una consideración a tener en cuenta es que el trigger se ejecutará aunque la instruccion DML (UPDATE, INSERT o DELETE ) no haya afectado a ninguna fila. En este caso inserted y deleted devolveran un conjunto de datos vacio.

Podemos especificar a que columnas de la tabla debe afectar el trigger.


ALTER TRIGGER TR_CUENTAS

ON CUENTAS

AFTER UPDATE

AS

BEGIN

-- SET NOCOUNT ON impide que se generen mensajes de texto

-- con cada instrucción

SET NOCOUNT ON;



IF UPDATE(SALDO) -- Solo si se actualiza SALDO

BEGIN

INSERT INTO HCO_SALDOS

(IDCUENTA, SALDO, FXSALDO)

SELECT IDCUENTA, SALDO, getdate()

FROM INSERTED

END

END

Los trigger están dentro de la transacción original (Insert, Delete o Update) por lo cual si dentro de nuestro trigger hacemos un RollBack Tran, no solo estaremos echando atrás nuestro trigger sino también toda la transacción; en otras palabras si en un trigger ponemos un RollBack Tran, la transacción de Insert, Delete o Update volverá toda hacia atrás.


ALTER TRIGGER TR_CUENTAS

ON CUENTAS

AFTER UPDATE

AS

BEGIN

-- SET NOCOUNT ON impide que se generen mensajes de texto

-- con cada instrucción

SET NOCOUNT ON;

INSERT INTO HCO_SALDOS

(IDCUENTA, SALDO, FXSALDO)

SELECT IDCUENTA, SALDO, getdate()

FROM INSERTED



ROLLBACK

END

En este caso obtendremos el siguiente mensaje de error:

La transacción terminó en el desencadenador. Se anuló el lote.

Podemos activar y desactivar Triggers a tarvés de las siguientes instrucciones.



-- Desactiva el trigger TR_CUENTAS

DISABLE TRIGGER TR_CUENTAS ON CUENTAS

GO

-- activa el trigger TR_CUENTAS

ENABLE TRIGGER TR_CUENTAS ON CUENTAS

GO

-- Desactiva todos los trigger de la tabla CUENTAS

ALTER TABLE CUENTAS DISABLE TRIGGER ALL

GO

-- Activa todos los trigger de la tabla CUENTAS

ALTER TABLE CUENTAS ENABLE TRIGGER ALL


Trigger DDL

Los trigger DDL se ejecutan en respuesta a una variedad de eventos de lenguaje de definición de datos (DDL). Estos eventos corresponden principalmente a instrucciones CREATE, ALTER y DROP de Transact-SQL, y a determinados procedimientos almacenados del sistema que ejecutan operaciones de tipo DDL.

La sintaxis general de un trigger es la siguiente.


CREATE TRIGGER

ON DATABASE

FOR

AS

BEGIN

...

END

La siguiente instrucción impide que se ejecuten sentencias DROP TABLE y ALTER TABLE en la base de datos.


CREATE TRIGGER TR_SEGURIDAD

ON DATABASE FOR DROP_TABLE, ALTER_TABLE

AS

BEGIN

RAISERROR ('No está permitido borrar ni modificar tablas !' , 16, 1)

ROLLBACK TRANSACTION

END

GOD MODE WINDOWS 7

Este es un bug del sistema operativo windows 7
crear una carpeta nueva donde sea
renombrarla con:
GodMode.{ED7BA470-8E54-465E-825C-99712043E01C}
Que lo disfruten

formato monetario en tsql

con esta funcion podemos recibir cualquier cadena numerica y ponerla con formato monetario es decir dos digitos para los centavos, y comas cada 3 digitos de derecha a izquierda


create function stringToMoney(@numero as varchar(100))
returns varchar(100)
as
begin
declare @partes as varchar(100)
set @partes =''
if LEN(@numero)>3
begin
--esta parte puede omitirse para el caso de numeros sin centavos
set @partes = '.'+SUBSTRING (@numero,LEN(@numero)-1,2)
set @numero = SUBSTRING (@numero,1,LEN(@numero)-2)
----------------------------------------------------------------
while (LEN(@numero)>3)
begin
set @partes = ','+SUBSTRING (@numero,LEN(@numero)-2,3)+@partes
set @numero = SUBSTRING (@numero,1,LEN(@numero)-3)
end
set @partes = @numero + @partes
end
return @partes
end
--asi se ejecutaria
select dbo.stringToMoney('463743497786') as [numero como dato], 'tus otros datos' as datos

Ajax con .net

http://www.asp.net/ajax/ajaxcontroltoolkit/samples/

poner eventos de javascript en un boton de .net

Con este sencillo comando es posible poner eventos de javascript e incluso mandar a llamar funciones como se hacia en los buenos tiempos, en botones de .net


Button1.Attributes.Add("onclick", "history.back(-1);");

convertir numeros en letras tsql

Para realizar este proceso se utilizan 4 funciones que detallo a continuacion:
1.
CREATE FUNCTION Convi_FindNum( @Cual Int )
RETURNS nVarChar(Max)
AS BEGIN
Declare @Resu nVarChar(Max)
Set @Resu = Case @Cual
When 1 Then 'uno'
When 2 Then 'dos'
When 3 Then 'tres'
When 4 Then 'cuatro'
When 5 Then 'cinco'
When 6 Then 'seis'
When 7 Then 'siete'
When 8 Then 'ocho'
When 9 Then 'nueve'
When 10 Then 'diez'
When 11 Then 'once'
When 12 Then 'doce'
When 13 Then 'trece'
When 14 Then 'catorce'
When 15 Then 'quince'
When 16 Then 'dieciseis'
When 17 Then 'diecisiete'
When 18 Then 'dieciocho'
When 19 Then 'diecinueve'
When 20 Then 'veinte'
When 30 Then 'treinta'
When 40 Then 'cuarenta'
When 50 Then 'cincuenta'
When 60 Then 'sesenta'
When 70 Then 'setenta'
When 80 Then 'ochenta'
When 90 Then 'noventa'
When 100 Then 'cien'
Else Case
When @Cual <= 29 Then 'veinti*'
When @Cual <= 39 Then 'treinta y *'
When @Cual <= 49 Then 'cuarenta y *'
When @Cual <= 59 Then 'cincuenta y *'
When @Cual <= 69 Then 'sesenta y *'
When @Cual <= 79 Then 'setenta y *'
When @Cual <= 89 Then 'ochenta y *'
When @Cual <= 99 Then 'noventa y *'
When @Cual <= 199 Then 'ciento *'
When @Cual <= 299 Then 'doscientos *'
When @Cual <= 399 Then 'trescientos *'
When @Cual <= 499 Then 'cuatrocientos *'
When @Cual <= 599 Then 'quinientos *'
When @Cual <= 699 Then 'seiscientos *'
When @Cual <= 799 Then 'setecientos *'
When @Cual <= 899 Then 'ochocientos *'
When @Cual <= 999 Then 'novecientos *'
When @Cual <= 1999 Then 'un mil *'
When @Cual <= 9999 Then '# mil *'
When @Cual <= 99999 Then '## mil *'
When @Cual <= 999999 Then '### mil *'
When @Cual <= 1999999 Then 'un millón *'
When @Cual <= 9999999 Then '# millones *'
When @Cual <= 99999999 Then '## millones *'
When @Cual <= 999999999 Then '### millones *'
When @Cual <= 999999999 Then '### millones *'
Else ''
End
End
RETURN @Resu
END
2.
CREATE FUNCTION Convi_PreConvierte
( @Cual Int )
RETURNS nVarChar(Max)
AS BEGIN
Declare @Resu nVarChar(Max)
Set @Resu = ''
If @Cual <= 0 Return @Resu
Set @Resu = dbo.Convi_FindNum(@Cual)
Declare @TmpPre Int
Set @TmpPre = 0
Declare @TmpSuf Int
Set @TmpSuf = @Cual
Declare @i Int
Declare @TmpNum nVarChar(Max)
Set @i = Case
When CharIndex('###',@Resu) > 0 Then 3
When CharIndex('##',@Resu) > 0 Then 2
When CharIndex('#',@Resu) > 0 Then 1
Else 0
End
If @i > 0 Begin
Set @TmpNum = Convert(nVarChar(Max),@Cual)
Set @TmpPre = Convert(Int,Left(@TmpNum,@i))
Set @Resu = Right(@Resu,Len(@Resu)-@i)
Set @TmpSuf = Convert(Int,Right(@TmpNum,Len(@TmpNum)-@i))
End
If CharIndex('*',@Resu) > 0 Begin
If @TmpPre > 0
Set @Resu = dbo.Convi_PreConvierte(@TmpPre) + Left(@Resu,Len(@Resu)-1) + dbo.Convi_PreConvierte(@TmpSuf)
Else Begin
Set @TmpNum = Convert(nVarChar(Max),@TmpSuf)
Set @TmpSuf = Convert(Int,Right(@TmpNum,Len(@TmpNum)-1))
Set @Resu = Left(@Resu,Len(@Resu)-1) + dbo.Convi_PreConvierte(@TmpSuf)
End
End Else
If @TmpPre > 0
Set @Resu = dbo.Convi_PreConvierte(@TmpPre) + @Resu
RETURN @Resu
END
3.
CREATE FUNCTION Convi_Convierte
( @Cual Int )
RETURNS nVarChar(Max)
AS BEGIN
Declare @Resu nVarChar(Max)
Set @Resu = dbo.Convi_PreConvierte(@Cual)
If Right(@Resu,4) = 'uno'
Set @Resu = Left(@Resu,Len(@Resu)-4) + 'uno'
Set @Resu = Replace(@Resu,'uno','un')
RETURN @Resu
END
4.
CREATE FUNCTION Convi_EnLetras
( @Cual Float )
RETURNS nVarChar(Max)
AS BEGIN
Declare @TmpFloat Float
Set @TmpFloat = Round(@Cual,2)
Declare @Decs nVarChar(Max)
Set @Decs = Right('00' + Convert(nVarChar(Max),Round((@TmpFloat - Floor(@TmpFloat))*100,0)),2)
Declare @Resu nVarChar(Max)
Set @Resu = dbo.Convi_Convierte(Floor(@TmpFloat)) + ' con ' + @Decs + '/100'
RETURN @Resu
END
Al ejecutar estas funciones en un Enterprise Manager de sql server estas se generan en la base de datos en la que las ejecutamos, y asi nos da la posibilidad de ejecutarlas de la siguiente manera:
select dbo.Convi_convierte(9146654)
select dbo.Convi_EnLetras(94.57845)
Con los siguientes resultados:
nueve millones ciento cuarenta y seis mil seiscientos cincuenta y cuatro
noventa y cuatro con 58/100