Query no funciona... ¡A veces!

[Casimiro Notevi]

Creo que no se entiende lo que explicas, Angel.Matilla.
Por lógica, si tienes un select que unas veces trae unos datos y otras veces trae otros datos distintos, tan sólo tienes varias posibilidades:

- que no sea el mismo select
- que sea el mismo select, pero los parámetros sean distintos
- que sea el mismo select, y lo ejecutes en bases de datos distintas

No puede haber más opciones, o sea, no puedes ejecutar un select con unos parámetros en una misma base de datos y que te devuelva datos distintos. Lógicamente.

Deberías detener el programa justo antes de lanzar el query y mirar la sentencia completa en ambos casos, para ver si está formada correctamente.

La otra opción es que nos pases la BD y probemos nosotros

[Angel.Matilla]

Gracias prola respuesta Casimiro.

Empezado por Casimiro Notevi

Creo que no se entiende lo que explicas, Angel.Matilla.

Lo que he puesto es el código de cómo monto el query.

Empezado por Casimiro Notevi

Por lógica, si tienes un select que unas veces trae unos datos y otras veces trae otros datos distintos, tan sólo tienes varias posibilidades:

- que no sea el mismo select
- que sea el mismo select, pero los parámetros sean distintos
- que sea el mismo select, y lo ejecutes en bases de datos distintas

No puede haber más opciones, o sea, no puedes ejecutar un select con unos parámetros en una misma base de datos y que te devuelva datos distintos. Lógicamente.

Deberías detener el programa justo antes de lanzar el query y mirar la sentencia completa en ambos casos, para ver si está formada correctamente.

Ninguna de las tres opciones que das es correcta: es el mismo select con los mismos parámetros y la misma base de datos. No es que unas veces traiga resultados y otras no, es que dentro del programa no devuelve nada y en IBManager sí. Para comprobarlo paro la ejecución justo antes de hacer el open() y copio el contenido del query para ejecutarlo en IBManager.

Empezado por Casimiro Notevi

La otra opción es que nos pases la BD y probemos nosotros

No tengo inconveniente en pasarte el programa (está hecho en Builder 5) y la base de datos; dime como y dónde.

[Angel.Matilla]

Añado más cosas. Perdonad que lo haga así, pero según voy haciendo pruebas lo pngo. He probado a montar el código de otra manera.
Ejecuto un bucle para leer los datos de Auxiliar del tipo 1:
AnsiString cAux = "";

Query->Close();
Query->SQL->Text = "SELECT Valor FROM Auxiliar WHERE Tipo = 1 AND Usuario = :Usuario";
Query->ParamByName("Usuario")->AsString = NombreUser;
Query->Open();
for (; !Query->Eof; Query->Next())
     cAux = cAux + FormatFloat("0', '", Query->FieldByName("Valor")->AsInteger);
cAux = cAux.SubString(1, cAux.LastDelimiter(",") - 1);

Esto la hago para que me quede uan cadena del tipo

1, 2, 3, 4

que luego pondré en el query así:

Query->Close();
Query->SQL->Text = "SELECT * FROM Ls01 WHERE CodPrv = :CodPrv AND Junta IN (" + cAux + ") ORDER BY Apellidos, Nombre";
Query->ParamByName("CodPrv")->AsInteger = nCodPrv;
Query->Open();

¡Y así funciona perferctamente! Lo que pasa que no quisera usar este método porque puede crear verdaderas monstruosidades de código.

[Casimiro Notevi]

Hombre, yo aseguraría que el problema, como ya dije antes, es que no creas el mismo select o los mismos parámetros. Es pura lógica.

[Angel.Matilla]

Puedo garantizar que es el mismo query (parando la ejecución del prograna JUSTO antes del Open() y copiando el contenido del SQL->Text) y la misma base de datos (no hay otra en Firebird en ese disco).

[Casimiro Notevi]

Pero, Ángel, un mismo sql en una misma base de datos, es imposible que devuelva datos distintos.
Por muchas vueltas que quieras darle, no puede ser.

Salvo que la base de datos esté estropeada y se haya vuelta loca.

[Casimiro Notevi]

Ya digo, si quieres copia y pega aquí el sql y comprime la BD y la subes también.
Haremos pruebas y compararemos resultados.