Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > MySQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 11-11-2010
gen@rozug gen@rozug is offline
Registrado
NULL
 
Registrado: nov 2010
Posts: 2
Poder: 0
gen@rozug Va por buen camino
objeto parameter mal definido

hola a todos, disculpen si este hilo esta donde no deberia de ir, pues soy nuevo en esto de los foros, veran tengo un
problema con una aplicacion desarrollada en Delphi 2007, la base de datos esta en MySQL 5.4, la conexcion es por medio del
MySQL ODBC 5.1 Driver y el S.O. es Windows 7, el error que me marca es el siguiente:

"Objeto parameter mal definido. proporciono informacion incompleta o incoherente."

Lo raro de esto es que lo tengo instalado en S.O. Windows XP y funciona a la perfeccion, al igual que en vista, pero algunos
de mis clientes quieren usar Windows 7.

Lo he compilado en Windows 7 y el mensage de error me sale al ejecutar un insert de un query, de antemano muchas gracias, el
fragmento de codigo es el siguiente:

Código Delphi [-]
 
with qry_insertar do
begin
close;
sql.text:='insert into cat_factura (pk_sucursal, pk_factura, id_factura, fecha,'+
' pk_cliente, subtotal, iva, descuento, total, pk_caja, pk_usuario,'+
' pk_corte, estatus, condicion, pk_folio, num_folio, observacion, pk_dom_cl,'+
' pk_almacen, pk_tipo_cred, pk_con_xvend, entregado, pagada, dias_cred, tipo, id_sucursal, no_ticket, 
tipo_fac, referencia, hora, pk_certificado)'+
' values (:sucursal, : pk_fact, :id_fact, :fec, :cliente, :sub, :iva, :desc,'+
' :tot, :caja, :usuario, :corte, :est, :condicion, : pk_fol, :num_fol, : obs, :dom,'+
' :almacen, :credito, :comision, :entr, : pag, :dcred, :tip, :suc, :noticket, :tipofac, :refer, :hr, 
: pk_cert)';
Parameters.ParamByName('sucursal').value:=frm_md.qry_sucursalpk_sucursal.value;
Parameters.ParamByName('pk_fact').value:=xPk_factura;
Parameters.ParamByName('id_fact').value:=xId_factura;
Parameters.ParamByName('fec').value:=formatdatetime('yyyy/mm/dd',dtp_fecha.Date);
Parameters.ParamByName('cliente').value:=qry_clientespk_cliente.value;
Parameters.ParamByName('sub').value:=mm_facturasubtotal.value;
Parameters.ParamByName('iva').value:=mm_facturaiva.value;
Parameters.ParamByName('desc').value:=mm_facturadescuento.Value;
Parameters.ParamByName('tot').value:=mm_facturatotal.value;
Parameters.ParamByName('caja').value:=frm_md.qry_cajapk_caja.value;
Parameters.ParamByName('usuario').value:=dbe_usuario.KeyValue;
Parameters.ParamByName('est').value:='ACT';
Parameters.ParamByName('corte').value:=0;
if dbcb_condicion.ItemIndex = 0 then
Parameters.ParamByName('condicion').value := 'CR'
else
Parameters.ParamByName('condicion').value := 'CO';
Parameters.ParamByName('pk_fol').value:=xPk_folio;
Parameters.ParamByName('num_fol').value:=xNum_folio;
Parameters.ParamByName('obs').value:=dbe_memo.Text;
Parameters.ParamByName('dom').value:=dblcb_dom_env.KeyValue;
Parameters.ParamByName('almacen').value:=0;
Parameters.ParamByName('credito').value:=dbe_tipo_credito.KeyValue;
Parameters.ParamByName('comision').value:=0;
Parameters.ParamByName('entr').value:='NO';
Parameters.ParamByName('pag').value:='N';
Parameters.ParamByName('dcred').value:= se_dias.value;
if (frm_capt_factura_directa.tag = 0) or (frm_capt_Factura_directa.tag = 2)then
begin
Parameters.ParamByName('tip').value := 0;
case cmb_tipo.ItemIndex of
0:tipo_factura:='NR';
1:tipo_factura:='RE';
2:tipo_factura:='CO';
3:tipo_factura:='AP';
4:tipo_factura:='TI';
end;
Parameters.ParamByName('tipofac').value:=tipo_factura;
Parameters.ParamByName('noticket').value:=chk_docto.Items.count;
end;
if frm_capt_factura_directa.tag = 1 then
begin
Parameters.ParamByName('tip').value:= 1;
Parameters.ParamByName('tipofac').value:='NR';
Parameters.ParamByName('noticket').value:=0;
end;
Parameters.ParamByName('suc').value:= xId_sucursal;
Parameters.ParamByName('refer').value:='NO';
Parameters.ParamByName('hr').Value:=Null;
qry_certificado.Close;
qry_certificado.Open;
parameters.ParamByName('pk_cert').Value := qry_certificadopk_certificado.Value;
 
ExecSQL;
end;

en algunos parametros estan despegados los dos puntos, esto es porque se convierten en caritas y no me deja subir el post.

Última edición por Casimiro Notevi fecha: 11-11-2010 a las 22:41:02.
Responder Con Cita
  #2  
Antiguo 08-02-2012
Yun-i Yun-i is offline
Miembro
 
Registrado: ene 2008
Posts: 125
Poder: 17
Yun-i Va por buen camino
alguien te contesto? encontraste el error? o lo resolviste?


Saludos.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Invalid parameter Sick boy Conexión con bases de datos 7 28-03-2023 08:31:36
Invalid Parameter en query Robert SQL 6 27-10-2015 21:04:32
Invalid Parameter javicho_villa Varios 1 23-09-2005 22:55:55
Invalid Parameter javicho_villa Varios 2 23-09-2005 18:25:36
Invalid parameter en run-time pero no en IDE nefy SQL 2 18-08-2004 16:38:46


La franja horaria es GMT +2. Ahora son las 17:31:18.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi