jorotren
21 de Octubre del 2004

Hola foreros, como va? Tengo un problemilla. Necesito ejecutar un paquete DTS cuando se inserta un registro en una tabla, y asi mantener sincronizadas 2 base de datos ubicadas en diferentes servidores SQL Server. Tengo generado el paquete que realiza la exportacion pero no se como hacer para que se ejecute cuando se inserte un registro. Alguien sabe como hacerlo?
He mirado por ahi, y he visto articulos en los que se utilizan procedimientos almacenado OLE para hacerlo, pero me da errores.

A continuacion os pongo el codigo para ver si veis algo mal:

CREATE PROC spExecutePKG
@Server varchar(255) = 'srv',
@PkgName varchar(255) = 'SincronizacionBD', -- Package Name (Defaults to most recent version)
@ServerPWD varchar(255) = Null, -- Server Password if using SQL Security to load Package (UID is SUSER_NAME())
@IntSecurity bit = 0, -- 0 = SQL Server Security, 1 = Integrated Security
@PkgPWD varchar(255) = '' -- Package Password
AS
SET NOCOUNT ON
/*
Return Values
- 0 Successfull execution of Package
- 1 OLE Error
- 9 Failure of Package
*/
DECLARE @hr int, @ret int, @oPKG int, @Cmd varchar(1000)

-- Create a Pkg Object
EXEC @hr = sp_OACreate 'DTS.Package', @oPKG OUTPUT
IF @hr <> 0
BEGIN
PRINT '*** Create Package object failed'
EXEC sp_displayoaerrorinfo @oPKG, @hr
RETURN 1
END

-- Evaluate Security and Build LoadFromSQLServer Statement
IF @IntSecurity = 0
SET @Cmd = 'LoadFromSQLServer("' + @Server +'", "' + SUSER_SNAME() + '", "' + @ServerPWD + '", 0, "' + @PkgPWD + '", , , "' + @PkgName + '")'
ELSE
SET @Cmd = 'LoadFromSQLServer("' + @Server +'", "", "", 256, "' + @PkgPWD + '", , , "' + @PkgName + '")'

EXEC @hr = sp_OAMethod @oPKG, @Cmd, NULL

IF @hr <> 0
BEGIN
PRINT '*** LoadFromSQLServer failed'
EXEC sp_displayoaerrorinfo @oPKG , @hr
RETURN 1
END

-- Execute Pkg
EXEC @hr = sp_OAMethod @oPKG, 'Execute'
IF @hr <> 0
BEGIN
PRINT '*** Execute failed'
EXEC sp_displayoaerrorinfo @oPKG , @hr
RETURN 1
END

-- Check Pkg Errors
EXEC @ret=spDisplayPkgErrors @oPKG

-- Unitialize the Pkg
EXEC @hr = sp_OAMethod @oPKG, 'UnInitialize'
IF @hr <> 0
BEGIN
PRINT '*** UnInitialize failed'
EXEC sp_displayoaerrorinfo @oPKG , @hr
RETURN 1
END

-- Clean Up
EXEC @hr = sp_OADestroy @oPKG
IF @hr <> 0
BEGIN
EXEC sp_displayoaerrorinfo @oPKG , @hr
RETURN 1
END

RETURN @ret
GO

Ejecuto este procedimiento y me da el siguiente error:
Los objetos de automatizacion OLE no son compatibles con el modo de intraprocesos.

Alguien puede echarme una manita?
Muchas gracias por anticipado.

jmsoria
21 de Octubre del 2004

Hola, yo lo hago desta manera:

DECLARE ExecCmd INT
EXEC @ExecCmd = master..XP_CMDSHELL 'DTSRUN /S<nombre_servidor> /N<nombre_DTS> /E'

IF @ExecCmd <> 0 ...