si existe (seleccione * de dbo.sysobjects donde id = object_id(N'[dbo].[s_LoadPackageToServer]') y OBJECTPROPERTY(id, N'IsProcedure') = 1)
procedimiento de caída [dbo].[s_LoadPackageToServer]
GO
Crear procedimiento s_LoadPackageToServer
@NombrePaquete varchar(128),
@NombreDeArchivo varchar(500),
@Nombre de usuario varchar(100),
@Contraseña varchar(100)
como
/*
ejecutivo s_LoadPackageToServer
@PackageName = 'mipaquete',
@FileName = 'c:dtspckgsmipaquete.dts' ,
@Nombre de usuario = 'sa',
@Contraseña = 'contraseña'
*/
declarar @objPackage int
declarar @rc int
exec @rc = sp_OACreate 'DTS.Package', salida @objPackage
si @rc <> 0
comenzar
riserror('no se pudo crear el paquete rc = %d', 16, -1, @rc)
devolver
end
exec @rc = sp_OAMethod @objPackage, 'LoadFromStorageFile', nulo,
@UncFile = @FileName, @contraseña = nulo
si @rc <> 0
comenzar
riserror('no se pudo cargar el paquete rc = %d, paquete = %s', 16, -1, @rc, @PackageName)
devolver
fin
ejecutivo @rc = sp_OAMethod @objPackage, 'SaveToSQLServerAs', nulo,
@NewName = @PackageName, @ServerName = @@ServerName, @ServerUserName = @Username, @ServerPassword = @Contraseña
si @rc <> 0
comenzar
riserror('no se pudo cargar el paquete rc = %d, paquete = %s', 16, -1, @rc, @PackageName)
devolver
fin
ir
ejecutivo s_LoadPackageToServer
'mi paquete',
'c:DTS_AN2CP_DIC.dts',
'sa',
'sa'