USE [Vertragsverwaltung_20160404]
GO
/****** Object:  StoredProcedure [dbo].[dt_displayoaerror]    Script Date: 02.12.2016 09:08:54 ******/
DROP PROCEDURE [dbo].[dt_displayoaerror]
GO
/****** Object:  StoredProcedure [dbo].[dt_displayoaerror]    Script Date: 02.12.2016 09:08:54 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[dt_displayoaerror]
    @iObject int,
    @iresult int
as

set nocount on

declare @vchOutput      varchar(255)
declare @hr             int
declare @vchSource      varchar(255)
declare @vchDescription varchar(255)

    exec @hr = master.dbo.sp_OAGetErrorInfo @iObject, @vchSource OUT, @vchDescription OUT

    select @vchOutput = @vchSource + ': ' + @vchDescription
    raiserror (@vchOutput,16,-1)

    return


GO