Incorrect values within SQLDA structure

[Casimiro Notevi]

Haz una instalación limpia de firebird.
Ejecuta tu programa y copia aquí el error.

[mRoman]

Ok...casimiro. Hice lo q me dijiste y marca el mismo error:

Código SQL [-]
An error was found in the application program input parameters for the SQL statement
Dynamic SQL Error
SQL error code = -804
Incorrect values within SQLDA structure

Resulta extraño porque hasta ahora me marca este error, despues de 4 o 5 años trabajando igual con ese mismo query.

Los parametros de entrada son:

FECHA1, FECHA2, DESDE y HASTA

Anteriormente no me daba problemas. Este query lo tengo almacenado en archivo el cual es cargado al componente IBQuery para su ejecución.

Código Delphi [-]
if cbxTipoImpr.ItemIndex=0 then
     qrDAS30b.qryDAS30.SQL.LoadFromFile( ExtractFilePath(Application.Exename)+'\SQLS\imp_1.sql') 
else
     qrDAS30b.qryDAS30.SQL.LoadFromFile( ExtractFilePath(Application.Exename)+'\SQLS\imp_2.sql');

qrDAS30b.qryDAS30.Close;
qrDAS30b.qryDAS30.ParamByName('fecha1').AsDate:=FechaDe.Date;
qrDAS30b.qryDAS30.ParamByName('fecha2').AsDate:=FechaAl.Date;
qrDAS30b.qryDAS30.ParamByName('desde').AsString:=mskDesde.Text;
qrDAS30b.qryDAS30.ParamByName('hasta').AsString:=mskHasta.Text;
qrDAS30b.qryDAS30.Open;

En cualquier de los archivos cargados (imp_1.sql y imp_2.sql), me da el error. Dentro de la aplicacion me marca el error y los cargo al IBExpert y tambien. La estrcutra de mi consulta como que esta mal definida....mas arriba de este post, deje la consulta que estoy realizando....

Saludos a todos y gracias por su tiempo en especial a Casimiro.

[mRoman]

Parece que ya supe que es el ERROR ! (por cierto algo raro)

Código SQL [-]
     '' as telefono_celular

En el cuerpo del query tengo declarado la instruccion anterior, (mas arriba esta el query completo), resulta que si los dejo o borro del query, YA NO MARCA ERROR !!!...parece que dentro de la estructura de construcción de un query, no esta reconociendo las comillas simples.....SUPER EXTRAÑO.

Me salta la duda si, por medio de internet se haya realizado alguna actualización al Firebird de manera automática??. Ya que de otra manera no me explico el porque ya no reconoce las comillas simples como parte de la estructura del un QUERY.

Nada q ver con archivos DLL, ni resinstalaciones (bueno eso digo yo)...es raro.!. Y mas raro porq mi lap seguido me conecto a internet...y ahi si me deja ejecutar la query.

Algo sumamente extraño que no logro explicarme.....alguien sabe porque?

Seguiré investigando....Saludos!!!

p.d. Algo mas que me di cuenta, entre las comillas no hay un espacio, se los agregue y listo !!! Ejecuto sin problema las instrucciones del query.

[Casimiro Notevi]

Bien, paso a paso...
Pega el select en ibexpert y prueba ahí.
Si muestra el error, ve poniendo líneas en comentario y probando, hasta encontrar exactamente la línea que te da el error.

[Casimiro Notevi]

¿Te refieres a esta línea?: '' as telefono_celular,

Si la pones en comentario, ¿funciona bien?

[mRoman]

Si...de hecho la deje asi:

Código SQL [-]
   ' ' as telefono_ceular

Anteriormente estaba asi:

Código SQL [-]
   '' as telefono_ceular // Sin espacio entre las comillas simples

No te parece raro !??

[Casimiro Notevi]

¿Y para qué haces eso? Quiero decir que para qué devuelves algo en blanco si no es un campo.

[mRoman]

Yo también pienso lo mismo...

Es por el nombre del "campo" (telefono_celular), desafortunadamente hay cosas que no puedo cambiar (algo largo de explicar)y este es uno de ellos. En la estructura del reporte DEBE haber un campo llamado asi....si no el reporte no funciona porq trata de localizar ese campo y si no va en la estructura del query, pues el sistema mandara MSG de error.

Ahora se me esta presentando el mismo problema en un query q no tiene comillas simples con algo vacio entre ellas....es raro. Algo se ha de haber cambiado dentro de Firebird ya que algunas estructura hechas de SQL no las esta reconociendo....ahora el error me lo presenta en una consulta con SELECT anidados....los tuve que hacer por separado para que ya no marcara error....Y COMO ESE QUERY TENGO MAS DENTRO DEL SISTEMA....y ahora también me da estos mismos errores en mi laptop !!!...no he reinstalado ni actualizado nada ahi!.

Código SQL [-]
select a.anio,
       ((select sum(b.litros)
           from reporte_despacho1 b
          where extract(year from b.fecha_embarque)=:anio
            and extract(month from b.fecha_embarque)=:mes
            and b.producto like 'AS%' )-a.feb ) as difer,
       ((select sum(b.litros)
           from reporte_despacho1 b
          where extract(year from b.fecha_embarque)=:anio
            and extract(month from b.fecha_embarque)=:mes
            and b.producto like 'AS%' )/a.feb)*100 as porcentaje
from PROGRAMA_DISTRIBUCION_ANUAL A
where a.clave_clasificacion=3
  and a.clave_rubro=1
  and a.anio=:anio

Lo curioso es que en el IBExpert no marca errores....pero en el sistema si lo hace¡¡¡....(todo en mi lap)