13 respuestas en este tema

[enecumene]

Pues eso, tengo un procedimiento almacenado en firebird que funcionaba perfectamente todo el tiempo, ahora de un momento a otro me presenta este error:

delphi

multiple rows in singleton select.
multiple rows in singleton select.
At procedure 'GENERAR_AST' line: 13, col: 5.

Me lo presenta tanto en IBExpert como en delphi, el procedimiento almacenado es el siguiente:

sql

SET TERM ^ ;
CREATE OR ALTER PROCEDURE GENERAR_AST (
    id_emp INTEGER,
    fechaini DATE,
    fechafin DATE)
AS
DECLARE variable fecha DATE;
BEGIN
  /* Procedure Text */
  fecha = fechaini;
 
  while (fecha <= fechafin) do
  BEGIN
    INSERT INTO asistencia (emp_id,ast_fecha,ast_time1,ast_time2,ast_time3,ast_time4,ca_id) VALUES (:id_emp,:fecha,
     (SELECT LOG_TIME1 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA),
     (SELECT LOG_TIME2 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA),
     (SELECT LOG_TIME3 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA),
     (SELECT LOG_TIME4 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA),
 
     CASE
       WHEN ( (SELECT LOG_TIME1 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND 
            ( (SELECT LOG_TIME2 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( (SELECT LOG_TIME3 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( (SELECT LOG_TIME4 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) THEN
 
              CASE
                 WHEN ( (SELECT ca_id FROM log_causas WHERE emp_id = :id_emp AND :fecha BETWEEN ca_desde AND ca_hasta) IS NULL ) THEN 5
                 ELSE (SELECT ca_id FROM log_causas WHERE emp_id = :id_emp AND :fecha BETWEEN ca_desde AND ca_hasta)
              END
 
       WHEN ( NOT (SELECT LOG_TIME1 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( (SELECT LOG_TIME2 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL) AND
            ( (SELECT LOG_TIME3 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL) AND
            ( (SELECT LOG_TIME4 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL) THEN
 
              CASE
                 WHEN ( (SELECT ca_id FROM log_causas WHERE emp_id = :id_emp AND :fecha BETWEEN ca_desde AND ca_hasta) IS NULL ) THEN 6
                 ELSE (SELECT ca_id FROM log_causas WHERE emp_id = :id_emp AND :fecha BETWEEN ca_desde AND ca_hasta)
              END
 
       WHEN ( NOT (SELECT LOG_TIME1 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( NOT (SELECT LOG_TIME2 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( NOT (SELECT LOG_TIME3 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( NOT (SELECT LOG_TIME4 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) THEN NULL
     END
     );
 
    fecha = fecha + 1;
  END
  suspend;
END^
SET TERM ; ^
GRANT INSERT ON ASISTENCIA TO PROCEDURE GENERAR_AST;
GRANT SELECT ON LOG_ASISTENCIA TO PROCEDURE GENERAR_AST;
GRANT SELECT ON LOG_CAUSAS TO PROCEDURE GENERAR_AST;
GRANT EXECUTE ON PROCEDURE GENERAR_AST TO SYSDBA;

Quiero saber cual es la causante de eso si funcionaba perfectamente?. Espero su ayuda.

Saludos.

[egostar]

Tienes una subconsulta que retorna mas de un registro.

Salud OS

[enecumene]

Tienes una subconsulta que retorna mas de un registro.

Salud OS

Aja, pero he intentado colocar First 1 y aún persiste el problema

[Rolphy Reyes]

Saludos.

¿Probaste cada linea sola?

[enecumene]

Saludos.

¿Probaste cada linea sola?

No aún no lo he probado, aparentemente el problema se encuentra en el primer case cosa que no entiendo pues si eso funcionaba perfectamente.

Saludos.

[enecumene]

Ya he probado cada línea sola y funciona perfectamente, incluso modifiqué las consultas incluyendo la clausula IN, al generar SP aún persiste el problema en la misma línea 13 columna 5 (CASE).

Saludos.

[enecumene]

Vamos toletes, echenme una mano, ya he intentado de todo con lo poco que sé de SP, haber si me ayudan con esto ya esto me raya en lo emergente

[Wilson]

En que condiciones dices que te funcionaba bien antes? por ejemplo llamabas el SP desde un trigger, desde otro Sp, etc, en que entorno.

Y en que condiciones no te funciona ahora?

[enecumene]

Pues siempre lo he llamado desde Delphi y funcionaba bien,a través de ZEOS con el componente ZStroredProc, todo bien, pero desde el 23/11/10 hasta la fecha presenta ese error, no funciona ni en Delphi ni en IBExpert, una pregunta, se puede hacer una consulta del tipo select case?, algo así:

sql

SELECT FIRST 1
   CASE
     ...
   END

Saludos.

[Wilson]

Pues siempre lo he llamado desde Delphi y funcionaba bien,a través de ZEOS con el componente ZStroredProc, todo bien, pero desde el 23/11/10 hasta la fecha presenta ese error, no funciona ni en Delphi ni en IBExpert.

Si eso es así, entonces el problema no es del SP, el problema es que los parámetros que le estás pasando devuelven más de un registro.

Ensaya pasándole como parámetros en Id un valor negativo  y en las dos fechas, algo de por allá de del año 1901, algo que a la fija no devuelva registros, entonces debería ejecutar el SP, no insertaría nada pero tampoco lanzará una excepción.  De ser así quiere decir que en los datos  ya existen las condiciones necesaria para devolver mas de un registro, entonces ya sabriamos por donde empezar.

[Wilson]

se puede hacer una consulta del tipo select case?, algo así:

sql

SELECT FIRST 1
   CASE
     ...
   END

Saludos.

Pinso que sería al contrario:

sql

CASE
  WHEN SELECT FIRST 1 ....

[enecumene]

Pues asi lo tenia en un principio igual me sale el error.

Saludos.

[enecumene]

Ya he intentado con Rows y first 1 y nada lo mismo me rindo 

[Marc]

Hola.

Es perfectamente normal que te haya estado funcionando durante meses y ahora falle. Y es que como han comentado, el problema es que una subconsulta devuelve más de un valor. Y eso lo hace ahora y antes no lo hacía, porqué ahora tienes unos datos diferentes a los que tenías antes, y la misma subconsulta que antes devolvía un solo valor, ahora con los datos actuales puede devolver perfectamente dos y tres valores.

Para evitar que eso ocurra, tienes que escribir este tipo de subconsultas, asegurándote de que solo puedan devolver un único valor.

Personalmente probaría cada una de las subconsultas que hay en el procedimiento almacenado, por cada uno de los parámetros que pueda tener, hasta encontrar cual es la que devuelve varios valores.

NOTA: Otra opción es ir a lo fácil y poner los FIRST 1 en cada una de las subconsultas. Pero de alguna manera estás forzando el resultado, así que en ese caso no te sorprendas si el procedimiento almacenado no te devuelva lo que esperas de él. Aunque ahora se ejecutará perfectamente, deberías localizar donde una subconsulta te está devolviendo más de un valor, y porqué lo hace cuando tú solo esperas uno.

Es decir :

sql

SET TERM ^ ;
CREATE OR ALTER PROCEDURE GENERAR_AST (
    id_emp INTEGER,
    fechaini DATE,
    fechafin DATE)
AS
DECLARE variable fecha DATE;
BEGIN
  /* Procedure Text */
  fecha = fechaini;
 
  while (fecha <= fechafin) do
  BEGIN
    INSERT INTO asistencia (emp_id,ast_fecha,ast_time1,ast_time2,ast_time3,ast_time4,ca_id) VALUES (:id_emp,:fecha,
     (SELECT FIRST 1 LOG_TIME1 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA),
     (SELECT FIRST 1 LOG_TIME2 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA),
     (SELECT FIRST 1 LOG_TIME3 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA),
     (SELECT FIRST 1 LOG_TIME4 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA),
 
     CASE
       WHEN ( (SELECT FIRST 1 LOG_TIME1 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND 
            ( (SELECT FIRST 1 LOG_TIME2 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( (SELECT FIRST 1 LOG_TIME3 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( (SELECT FIRST 1 LOG_TIME4 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) THEN
 
              CASE
                 WHEN ( (SELECT FIRST 1 ca_id FROM log_causas WHERE emp_id = :id_emp AND :fecha BETWEEN ca_desde AND ca_hasta) IS NULL ) THEN 5
                 ELSE (SELECT FIRST 1 ca_id FROM log_causas WHERE emp_id = :id_emp AND :fecha BETWEEN ca_desde AND ca_hasta)
              END
 
       WHEN ( NOT (SELECT FIRST 1 LOG_TIME1 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( (SELECT FIRST 1 LOG_TIME2 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL) AND
            ( (SELECT FIRST 1 LOG_TIME3 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL) AND
            ( (SELECT FIRST 1 LOG_TIME4 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL) THEN
 
              CASE
                 WHEN ( (SELECT FIRST 1 ca_id FROM log_causas WHERE emp_id = :id_emp AND :fecha BETWEEN ca_desde AND ca_hasta) IS NULL ) THEN 6
                 ELSE (SELECT FIRST 1 ca_id FROM log_causas WHERE emp_id = :id_emp AND :fecha BETWEEN ca_desde AND ca_hasta)
              END
 
       WHEN ( NOT (SELECT FIRST 1 LOG_TIME1 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( NOT (SELECT FIRST 1 LOG_TIME2 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( NOT (SELECT FIRST 1 LOG_TIME3 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) AND
            ( NOT (SELECT FIRST 1 LOG_TIME4 FROM LOG_ASISTENCIA WHERE EMP_ID = :ID_EMP AND LOG_FECHA = :FECHA) IS NULL ) THEN NULL
     END
     );
 
    fecha = fecha + 1;
  END
  suspend;
END^
SET TERM ; ^
GRANT INSERT ON ASISTENCIA TO PROCEDURE GENERAR_AST;
GRANT SELECT FIRST 1 ON LOG_ASISTENCIA TO PROCEDURE GENERAR_AST;
GRANT SELECT FIRST 1 ON LOG_CAUSAS TO PROCEDURE GENERAR_AST;
GRANT EXECUTE ON PROCEDURE GENERAR_AST TO SYSDBA;

Con esta procedimiento almacenado ya debería ser imposible que te devuelva ese error.