error en una procedure de sql

Buenas a

estoy realizando un programita sobere excel que desde vba me llam a un
procedimiento de sql donde me genera un aoferta con una tabla de cabeceras

otra de lineas.

Es en esta ultima donde cada vez que ejecuto el procedure me da el
siguiente error:

SE HA PRODUCIDO EL ERROR 4002

37000 [MICROSOFT][ODBC SQL SERVER DRIVER] [SQL SEVER]

ERROR CONVERTING DATA TYPE VARCHAR TO FLOAT



por lo que he mirado la sintaxis es correcta pero si alguien puede

una mano seria estupendo

gracias



CREATE PROCEDURE CreaLinOferta

@codemp as varchar(3),

@codart as varchar(16),

@codoferta as varchar(15),

@codcli as varchar(12),

@fecha as datetime,

@descri as varchar(50),

@canti as float,

@precio as float,

@partida as varchar(20),

@horas as float,

@Observ as varchar(4096),

@NPI as varchar(255)

as

declare @Error as varchar(100), @numlin as int, @nalm as int, @cta as
varchar(15), @tcconCli as varchar(2), @tcconArt as varchar(2),

@norden as int, @umcv as varchar(6), @umpv as varchar(6)

set @Error=''

select * from faoferc where codemp=@codemp and codoferta=@codoferta

if @@rowcount = 0

begin

set @Error= 'No existe una oferta con el código ' + @codoferta

return

end

select @numlin=isnull(max(numlin),0)+1, @norden=isnull(max(norden),0)+5

faoferl where codemp=@codemp and codoferta=@codoferta

select @nalm=nalm from param2 where codemp=@codemp

select @cta=isnull(ctaconvent,''), @umcv=codunicven, @umpv=codunipven from
alart where codemp=@codemp and codart=@codart

if @cta=''

begin

select @tcconCli=isnull(tccon,'') from facli where codemp=@codemp and
codcli=@codcli

select @tcconArt=isnull(tccon,'') from alart where codemp=@codemp and
codart=@codart

select @cta=isnull(ctacon,'') from paramconta where codemp=@codemp and
ttcon=@tcconcli and tacon=@tcconart and tccon='VT'

if @cta=''

begin

select @cta=isnull(ctaven,'') from param13 where codemp=@codemp

end

end



INSERT INTO [faoferl]([codemp], [codoferta], [codcli], [numlin], [codart],
[fecentlin], [fecsolic], [descr], [canofer], [canace], [preuni],

[dtoartcli], [implin], [tcomlin], [lintfac], [pmedpon], [totex],

[seriel], [ubicac], [largo], [ancho], [grosor], [numalm], [datvar1],
[datvar2],

[datvar3], [datvar4], [datvar5], [datvar6],

[dto2], [casca2], [dto3], [casca3], [dto4], [casca4], [dto5], [casca5],
[ctaven], [coment],

[genped], [tipoalb], [sefactura], [genkit], [linkit], [genprom],

[tcomlin2], [tcomlin3], [tcomlin4], [tcomlin5], [tcomlin6], [salidas],

[npint], [norden], [uniprec], [coddep], [costeped], [impdes], [ndto],
[numcontrato], [rappel], [porprecio], [factcant], [factpre], [tipcont],

[umcv], [umpv])

VALUES(@codemp, @codoferta, @codcli, @numlin, @codart, @fecha, @fecha,
@descri, @canti, @canti, @precio,

0, @precio*@canti, 0, null, null, null,

'', '', 1,1,1,@nalm, '','',

@partida,0,0,0,0,'N',0,'N',0,'N',0,'N',@cta,@observ,

'S','0', 'S', '', 0, '', 0, 0, 0,0,0, 0, 'S',

@NPI, @norden, null, '0', 0, 0, 0, 0, 'S', 100, 1,1,0,

@umcv, @umpv)

GO

¿La has ejecutado desde el Query Analizer de SQL Server?

f.

"ALBERTO" escribió en el mensaje
news:
> Buenas a
>
> estoy realizando un programita sobere excel que desde vba me llam a un
> procedimiento de sql donde me genera un aoferta con una tabla de

y
> otra de lineas.
>
> Es en esta ultima donde cada vez que ejecuto el procedure me da el
> siguiente error:
>
> SE HA PRODUCIDO EL ERROR 4002
>
> 37000 [MICROSOFT][ODBC SQL SERVER DRIVER] [SQL SEVER]
>
> ERROR CONVERTING DATA TYPE VARCHAR TO FLOAT
>
>
>
> por lo que he mirado la sintaxis es correcta pero si alguien puede
echarme
> una mano seria estupendo
>
> gracias
>
>
>
> CREATE PROCEDURE CreaLinOferta
>
> @codemp as varchar(3),
>
> @codart as varchar(16),
>
> @codoferta as varchar(15),
>
> @codcli as varchar(12),
>
> @fecha as datetime,
>
> @descri as varchar(50),
>
> @canti as float,
>
> @precio as float,
>
> @partida as varchar(20),
>
> @horas as float,
>
> @Observ as varchar(4096),
>
> @NPI as varchar(255)
>
> as
>
> declare @Error as varchar(100), @numlin as int, @nalm as int, @cta as
> varchar(15), @tcconCli as varchar(2), @tcconArt as varchar(2),
>
> @norden as int, @umcv as varchar(6), @umpv as varchar(6)
>
> set @Error=''
>
> select * from faoferc where codemp=@codemp and codoferta=@codoferta
>
> if @@rowcount = 0
>
> begin
>
> set @Error= 'No existe una oferta con el código ' + @codoferta
>
> return
>
> end
>
> select @numlin=isnull(max(numlin),0)+1, @norden=isnull(max(norden),0)+5
from
> faoferl where codemp=@codemp and codoferta=@codoferta
>
> select @nalm=nalm from param2 where codemp=@codemp
>
> select @cta=isnull(ctaconvent,''), @umcv=codunicven, @umpv=codunipven

> alart where codemp=@codemp and codart=@codart
>
> if @cta=''
>
> begin
>
> select @tcconCli=isnull(tccon,'') from facli where codemp=@codemp and
> codcli=@codcli
>
> select @tcconArt=isnull(tccon,'') from alart where codemp=@codemp and
> codart=@codart
>
> select @cta=isnull(ctacon,'') from paramconta where codemp=@codemp and
> ttcon=@tcconcli and tacon=@tcconart and tccon='VT'
>
> if @cta=''
>
> begin
>
> select @cta=isnull(ctaven,'') from param13 where codemp=@codemp
>
> end
>
> end
>
>
>
> INSERT INTO [faoferl]([codemp], [codoferta], [codcli], [numlin],

> [fecentlin], [fecsolic], [descr], [canofer], [canace], [preuni],
>
> [dtoartcli], [implin], [tcomlin], [lintfac], [pmedpon], [totex],
>
> [seriel], [ubicac], [largo], [ancho], [grosor], [numalm], [datvar1],
> [datvar2],
>
> [datvar3], [datvar4], [datvar5], [datvar6],
>
> [dto2], [casca2], [dto3], [casca3], [dto4], [casca4], [dto5], [casca5],
> [ctaven], [coment],
>
> [genped], [tipoalb], [sefactura], [genkit], [linkit], [genprom],
[linprom],
> [tcomlin2], [tcomlin3], [tcomlin4], [tcomlin5], [tcomlin6], [salidas],
>
> [npint], [norden], [uniprec], [coddep], [costeped], [impdes], [ndto],
> [numcontrato], [rappel], [porprecio], [factcant], [factpre], [tipcont],
>
> [umcv], [umpv])
>
> VALUES(@codemp, @codoferta, @codcli, @numlin, @codart, @fecha, @fecha,
> @descri, @canti, @canti, @precio,
>
> 0, @precio*@canti, 0, null, null, null,
>
> '', '', 1,1,1,@nalm, '','',
>
> @partida,0,0,0,0,'N',0,'N',0,'N',0,'N',@cta,@observ,
>
> 'S','0', 'S', '', 0, '', 0, 0, 0,0,0, 0, 'S',
>
> @NPI, @norden, null, '0', 0, 0, 0, 0, 'S', 100, 1,1,0,
>
> @umcv, @umpv)
>
> GO
>
>

Si acabo de hacerlo y no me da ningun error


"Ferran Oriol" escribió en el mensaje
news:
> ¿La has ejecutado desde el Query Analizer de SQL Server?
>
> f.
>
> "ALBERTO" escribió en el mensaje
> news:
> > Buenas a
> >
> > estoy realizando un programita sobere excel que desde vba me llam a un
> > procedimiento de sql donde me genera un aoferta con una tabla de
cabeceras
> y
> > otra de lineas.
> >
> > Es en esta ultima donde cada vez que ejecuto el procedure me da el
> > siguiente error:
> >
> > SE HA PRODUCIDO EL ERROR 4002
> >
> > 37000 [MICROSOFT][ODBC SQL SERVER DRIVER] [SQL SEVER]
> >
> > ERROR CONVERTING DATA TYPE VARCHAR TO FLOAT
> >
> >
> >
> > por lo que he mirado la sintaxis es correcta pero si alguien puede
> echarme
> > una mano seria estupendo
> >
> > gracias
> >
> >
> >
> > CREATE PROCEDURE CreaLinOferta
> >
> > @codemp as varchar(3),
> >
> > @codart as varchar(16),
> >
> > @codoferta as varchar(15),
> >
> > @codcli as varchar(12),
> >
> > @fecha as datetime,
> >
> > @descri as varchar(50),
> >
> > @canti as float,
> >
> > @precio as float,
> >
> > @partida as varchar(20),
> >
> > @horas as float,
> >
> > @Observ as varchar(4096),
> >
> > @NPI as varchar(255)
> >
> > as
> >
> > declare @Error as varchar(100), @numlin as int, @nalm as int, @cta as
> > varchar(15), @tcconCli as varchar(2), @tcconArt as varchar(2),
> >
> > @norden as int, @umcv as varchar(6), @umpv as varchar(6)
> >
> > set @Error=''
> >
> > select * from faoferc where codemp=@codemp and codoferta=@codoferta
> >
> > if @@rowcount = 0
> >
> > begin
> >
> > set @Error= 'No existe una oferta con el código ' + @codoferta
> >
> > return
> >
> > end
> >
> > select @numlin=isnull(max(numlin),0)+1,

> from
> > faoferl where codemp=@codemp and codoferta=@codoferta
> >
> > select @nalm=nalm from param2 where codemp=@codemp
> >
> > select @cta=isnull(ctaconvent,''), @umcv=codunicven, @umpv=codunipven
from
> > alart where codemp=@codemp and codart=@codart
> >
> > if @cta=''
> >
> > begin
> >
> > select @tcconCli=isnull(tccon,'') from facli where codemp=@codemp and
> > codcli=@codcli
> >
> > select @tcconArt=isnull(tccon,'') from alart where codemp=@codemp and
> > codart=@codart
> >
> > select @cta=isnull(ctacon,'') from paramconta where codemp=@codemp and
> > ttcon=@tcconcli and tacon=@tcconart and tccon='VT'
> >
> > if @cta=''
> >
> > begin
> >
> > select @cta=isnull(ctaven,'') from param13 where codemp=@codemp
> >
> > end
> >
> > end
> >
> >
> >
> > INSERT INTO [faoferl]([codemp], [codoferta], [codcli], [numlin],
[codart],
> > [fecentlin], [fecsolic], [descr], [canofer], [canace], [preuni],
> >
> > [dtoartcli], [implin], [tcomlin], [lintfac], [pmedpon], [totex],
> >
> > [seriel], [ubicac], [largo], [ancho], [grosor], [numalm], [datvar1],
> > [datvar2],
> >
> > [datvar3], [datvar4], [datvar5], [datvar6],
> >
> > [dto2], [casca2], [dto3], [casca3], [dto4], [casca4], [dto5],

> > [ctaven], [coment],
> >
> > [genped], [tipoalb], [sefactura], [genkit], [linkit], [genprom],
> [linprom],
> > [tcomlin2], [tcomlin3], [tcomlin4], [tcomlin5], [tcomlin6], [salidas],
> >
> > [npint], [norden], [uniprec], [coddep], [costeped], [impdes], [ndto],
> > [numcontrato], [rappel], [porprecio], [factcant], [factpre],

> >
> > [umcv], [umpv])
> >
> > VALUES(@codemp, @codoferta, @codcli, @numlin, @codart, @fecha, @fecha,
> > @descri, @canti, @canti, @precio,
> >
> > 0, @precio*@canti, 0, null, null, null,
> >
> > '', '', 1,1,1,@nalm, '','',
> >
> > @partida,0,0,0,0,'N',0,'N',0,'N',0,'N',@cta,@observ,
> >
> > 'S','0', 'S', '', 0, '', 0, 0, 0,0,0, 0, 'S',
> >
> > @NPI, @norden, null, '0', 0, 0, 0, 0, 'S', 100, 1,1,0,
> >
> > @umcv, @umpv)
> >
> > GO
> >
> >
>
>

Has instalado la última versión de MDAC 2.8?

f.

"ALBERTO" escribió en el mensaje
news:
> Si acabo de hacerlo y no me da ningun error
>
>
> "Ferran Oriol" escribió en el mensaje
> news:
> > ¿La has ejecutado desde el Query Analizer de SQL Server?
> >
> > f.
> >
> > "ALBERTO" escribió en el mensaje
> > news:
> > > Buenas a
> > >
> > > estoy realizando un programita sobere excel que desde vba me llam a

> > > procedimiento de sql donde me genera un aoferta con una tabla de
> cabeceras
> > y
> > > otra de lineas.
> > >
> > > Es en esta ultima donde cada vez que ejecuto el procedure me da el
> > > siguiente error:
> > >
> > > SE HA PRODUCIDO EL ERROR 4002
> > >
> > > 37000 [MICROSOFT][ODBC SQL SERVER DRIVER] [SQL SEVER]
> > >
> > > ERROR CONVERTING DATA TYPE VARCHAR TO FLOAT
> > >
> > >
> > >
> > > por lo que he mirado la sintaxis es correcta pero si alguien puede
> > echarme
> > > una mano seria estupendo
> > >
> > > gracias
> > >
> > >
> > >
> > > CREATE PROCEDURE CreaLinOferta
> > >
> > > @codemp as varchar(3),
> > >
> > > @codart as varchar(16),
> > >
> > > @codoferta as varchar(15),
> > >
> > > @codcli as varchar(12),
> > >
> > > @fecha as datetime,
> > >
> > > @descri as varchar(50),
> > >
> > > @canti as float,
> > >
> > > @precio as float,
> > >
> > > @partida as varchar(20),
> > >
> > > @horas as float,
> > >
> > > @Observ as varchar(4096),
> > >
> > > @NPI as varchar(255)
> > >
> > > as
> > >
> > > declare @Error as varchar(100), @numlin as int, @nalm as int, @cta

> > > varchar(15), @tcconCli as varchar(2), @tcconArt as varchar(2),
> > >
> > > @norden as int, @umcv as varchar(6), @umpv as varchar(6)
> > >
> > > set @Error=''
> > >
> > > select * from faoferc where codemp=@codemp and codoferta=@codoferta
> > >
> > > if @@rowcount = 0
> > >
> > > begin
> > >
> > > set @Error= 'No existe una oferta con el código ' + @codoferta
> > >
> > > return
> > >
> > > end
> > >
> > > select @numlin=isnull(max(numlin),0)+1,
@norden=isnull(max(norden),0)+5
> > from
> > > faoferl where codemp=@codemp and codoferta=@codoferta
> > >
> > > select @nalm=nalm from param2 where codemp=@codemp
> > >
> > > select @cta=isnull(ctaconvent,''), @umcv=codunicven,

> from
> > > alart where codemp=@codemp and codart=@codart
> > >
> > > if @cta=''
> > >
> > > begin
> > >
> > > select @tcconCli=isnull(tccon,'') from facli where codemp=@codemp

> > > codcli=@codcli
> > >
> > > select @tcconArt=isnull(tccon,'') from alart where codemp=@codemp

> > > codart=@codart
> > >
> > > select @cta=isnull(ctacon,'') from paramconta where codemp=@codemp

> > > ttcon=@tcconcli and tacon=@tcconart and tccon='VT'
> > >
> > > if @cta=''
> > >
> > > begin
> > >
> > > select @cta=isnull(ctaven,'') from param13 where codemp=@codemp
> > >
> > > end
> > >
> > > end
> > >
> > >
> > >
> > > INSERT INTO [faoferl]([codemp], [codoferta], [codcli], [numlin],
> [codart],
> > > [fecentlin], [fecsolic], [descr], [canofer], [canace], [preuni],
> > >
> > > [dtoartcli], [implin], [tcomlin], [lintfac], [pmedpon], [totex],
> > >
> > > [seriel], [ubicac], [largo], [ancho], [grosor], [numalm], [datvar1],
> > > [datvar2],
> > >
> > > [datvar3], [datvar4], [datvar5], [datvar6],
> > >
> > > [dto2], [casca2], [dto3], [casca3], [dto4], [casca4], [dto5],
[casca5],
> > > [ctaven], [coment],
> > >
> > > [genped], [tipoalb], [sefactura], [genkit], [linkit], [genprom],
> > [linprom],
> > > [tcomlin2], [tcomlin3], [tcomlin4], [tcomlin5], [tcomlin6],

> > >
> > > [npint], [norden], [uniprec], [coddep], [costeped], [impdes],

> > > [numcontrato], [rappel], [porprecio], [factcant], [factpre],
[tipcont],
> > >
> > > [umcv], [umpv])
> > >
> > > VALUES(@codemp, @codoferta, @codcli, @numlin, @codart, @fecha,

> > > @descri, @canti, @canti, @precio,
> > >
> > > 0, @precio*@canti, 0, null, null, null,
> > >
> > > '', '', 1,1,1,@nalm, '','',
> > >
> > > @partida,0,0,0,0,'N',0,'N',0,'N',0,'N',@cta,@observ,
> > >
> > > 'S','0', 'S', '', 0, '', 0, 0, 0,0,0, 0, 'S',
> > >
> > > @NPI, @norden, null, '0', 0, 0, 0, 0, 'S', 100, 1,1,0,
> > >
> > > @umcv, @umpv)
> > >
> > > GO
> > >
> > >
> >
> >
>
>

ya lo he instalado y sigue dando el mismo error pero luego aaparee un
error nuevo que acontinuacion te detallo

se ha producido el error '-2147417848(80010108)' en tiempo de ejecucion

error de automatizacion
se ha perdido la conexion con labiblioteca de de tipos o con la biblioteca
de objetos para procesos remotos. haga click en aceptar para eliminar la
referencia

"Ferran Oriol" escribió en el mensaje
news:%
> Has instalado la última versión de MDAC 2.8?
>

>
> f.
>
> "ALBERTO" escribió en el mensaje
> news:
> > Si acabo de hacerlo y no me da ningun error
> >
> >
> > "Ferran Oriol" escribió en el mensaje
> > news:
> > > ¿La has ejecutado desde el Query Analizer de SQL Server?
> > >
> > > f.
> > >
> > > "ALBERTO" escribió en el mensaje
> > > news:
> > > > Buenas a
> > > >
> > > > estoy realizando un programita sobere excel que desde vba me llam

un
> > > > procedimiento de sql donde me genera un aoferta con una tabla de
> > cabeceras
> > > y
> > > > otra de lineas.
> > > >
> > > > Es en esta ultima donde cada vez que ejecuto el procedure me da

> > > > siguiente error:
> > > >
> > > > SE HA PRODUCIDO EL ERROR 4002
> > > >
> > > > 37000 [MICROSOFT][ODBC SQL SERVER DRIVER] [SQL SEVER]
> > > >
> > > > ERROR CONVERTING DATA TYPE VARCHAR TO FLOAT
> > > >
> > > >
> > > >
> > > > por lo que he mirado la sintaxis es correcta pero si alguien

> > > echarme
> > > > una mano seria estupendo
> > > >
> > > > gracias
> > > >
> > > >
> > > >
> > > > CREATE PROCEDURE CreaLinOferta
> > > >
> > > > @codemp as varchar(3),
> > > >
> > > > @codart as varchar(16),
> > > >
> > > > @codoferta as varchar(15),
> > > >
> > > > @codcli as varchar(12),
> > > >
> > > > @fecha as datetime,
> > > >
> > > > @descri as varchar(50),
> > > >
> > > > @canti as float,
> > > >
> > > > @precio as float,
> > > >
> > > > @partida as varchar(20),
> > > >
> > > > @horas as float,
> > > >
> > > > @Observ as varchar(4096),
> > > >
> > > > @NPI as varchar(255)
> > > >
> > > > as
> > > >
> > > > declare @Error as varchar(100), @numlin as int, @nalm as int, @cta
as
> > > > varchar(15), @tcconCli as varchar(2), @tcconArt as varchar(2),
> > > >
> > > > @norden as int, @umcv as varchar(6), @umpv as varchar(6)
> > > >
> > > > set @Error=''
> > > >
> > > > select * from faoferc where codemp=@codemp and

> > > >
> > > > if @@rowcount = 0
> > > >
> > > > begin
> > > >
> > > > set @Error= 'No existe una oferta con el código ' + @codoferta
> > > >
> > > > return
> > > >
> > > > end
> > > >
> > > > select @numlin=isnull(max(numlin),0)+1,
> @norden=isnull(max(norden),0)+5
> > > from
> > > > faoferl where codemp=@codemp and codoferta=@codoferta
> > > >
> > > > select @nalm=nalm from param2 where codemp=@codemp
> > > >
> > > > select @cta=isnull(ctaconvent,''), @umcv=codunicven,
@umpv=codunipven
> > from
> > > > alart where codemp=@codemp and codart=@codart
> > > >
> > > > if @cta=''
> > > >
> > > > begin
> > > >
> > > > select @tcconCli=isnull(tccon,'') from facli where codemp=@codemp
and
> > > > codcli=@codcli
> > > >
> > > > select @tcconArt=isnull(tccon,'') from alart where codemp=@codemp
and
> > > > codart=@codart
> > > >
> > > > select @cta=isnull(ctacon,'') from paramconta where codemp=@codemp
and
> > > > ttcon=@tcconcli and tacon=@tcconart and tccon='VT'
> > > >
> > > > if @cta=''
> > > >
> > > > begin
> > > >
> > > > select @cta=isnull(ctaven,'') from param13 where codemp=@codemp
> > > >
> > > > end
> > > >
> > > > end
> > > >
> > > >
> > > >
> > > > INSERT INTO [faoferl]([codemp], [codoferta], [codcli], [numlin],
> > [codart],
> > > > [fecentlin], [fecsolic], [descr], [canofer], [canace], [preuni],
> > > >
> > > > [dtoartcli], [implin], [tcomlin], [lintfac], [pmedpon], [totex],
> > > >
> > > > [seriel], [ubicac], [largo], [ancho], [grosor], [numalm],

> > > > [datvar2],
> > > >
> > > > [datvar3], [datvar4], [datvar5], [datvar6],
> > > >
> > > > [dto2], [casca2], [dto3], [casca3], [dto4], [casca4], [dto5],
> [casca5],
> > > > [ctaven], [coment],
> > > >
> > > > [genped], [tipoalb], [sefactura], [genkit], [linkit], [genprom],
> > > [linprom],
> > > > [tcomlin2], [tcomlin3], [tcomlin4], [tcomlin5], [tcomlin6],
[salidas],
> > > >
> > > > [npint], [norden], [uniprec], [coddep], [costeped], [impdes],
[ndto],
> > > > [numcontrato], [rappel], [porprecio], [factcant], [factpre],
> [tipcont],
> > > >
> > > > [umcv], [umpv])
> > > >
> > > > VALUES(@codemp, @codoferta, @codcli, @numlin, @codart, @fecha,
@fecha,
> > > > @descri, @canti, @canti, @precio,
> > > >
> > > > 0, @precio*@canti, 0, null, null, null,
> > > >
> > > > '', '', 1,1,1,@nalm, '','',
> > > >
> > > > @partida,0,0,0,0,'N',0,'N',0,'N',0,'N',@cta,@observ,
> > > >
> > > > 'S','0', 'S', '', 0, '', 0, 0, 0,0,0, 0, 'S',
> > > >
> > > > @NPI, @norden, null, '0', 0, 0, 0, 0, 'S', 100, 1,1,0,
> > > >
> > > > @umcv, @umpv)
> > > >
> > > > GO
> > > >
> > > >
> > >
> > >
> >
> >
>
>