Ver Mensaje Individual
  #1  
Antiguo 26-05-2008
Avatar de look
look look is offline
Miembro
 
Registrado: sep 2007
Ubicación: The Shire
Posts: 656
Reputación: 17
look Va camino a la fama
Problema con consulta,'no se puede convertir tipo string a doble'

buenas compañeros tengo la siguiente query , y no se porq me da este error :

[img=http://img210.imageshack.us/img210/3533/errorfh8.th.jpg]

la misma consulta la tengo en otro formulario y no me da el error , ya busq y busq y no encuantro el problema,.... el error lo muestra en la primera linea de la consulta ,me parece muy extraño , porq la query niciquiera llega a ejecutarce ....,y los chequee los campos y todos estan correctos, no tengo idea de q pueda ser
Código Delphi [-]
Q_save.SQL.Text:='DECLARE @NUM INT ; SET @NUM =(SELECT NUM_REGS FROM MI0V01)+1 ; '+
' insert into MINV01 (NUM_REG,CLV_ART,TIPO_MOV,FECHA_DOCU,REFER,CLAVE_CLPV,CANT,CANT_COST,PRECIO,COSTO,ALMACEN,REG_SERIE,  UNI_VENTA,U4SEC' +',DB8EXIST,TIPO_PROD,FACTOR_CON,FECHAELAB,USUARIO,M_FLETE)' +'VALUES(@NUM,'+QUOTEDSTR(Q_Ainventarios.FieldBYNAME('CLV_ART').Text)+',58,'+QUOTEDSTR(fecha.text)
+','+QUOTEDSTR(INICIAL)+','+QUOTEDSTR('')+','+QUOTEDSTR(Q_Ainventarios.FieldBYNAME('CANT').Value)+',  '+INTTOSTR(0)
+','+FLOATTOSTR(Q_Ainventarios.FieldBYNAME('PRECIOU').Value)+','+FLOATTOSTR(Q_Ainventarios.FieldBYNA  ME('COSTO').Value)+','+Q_Ainventarios.FieldBYNAME('almacen').Value
+','+INTTOSTR(0)+','+QUOTEDSTR(Q_Ainventarios.FieldBYNAME('UNI_MED').Text)+','+INTTOSTR(0)+','+FLOAT  TOSTR(MULT.FieldBYNAME('EXIST').Value+Q_Ainventarios.FieldBYNAME('CANT').Value)
+','+QUOTEDSTR('I')+','+INTTOSTR(1)+','+QUOTEDSTR(fecha.text)+','+QUOTEDSTR(FORM1.Table1.FieldBYNAME  ('USSAAE').Value)+',0)' +' UPDATE MI0V01 SET NUM_REGS=@NUM ';
Q_SAVE.ExecSQL;
Responder Con Cita