Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 30-01-2020
Avatar de Angel.Matilla
Angel.Matilla Angel.Matilla is offline
Miembro
 
Registrado: ene 2007
Posts: 1.350
Poder: 19
Angel.Matilla Va por buen camino
Error al definir un SP

Aunque tiene que ver con mi hilo anterior (Pivote: Sigo sin entenderlo...), prefiero abrir un hilo nuevo para no liarla más.

Sé que soy muy pesado y el 90% de mis consultas tienen que ver con errores de base. Estoy tratando definir un SP en tiempo de ejecución; el query queda de esta manera:
Código SQL [-]
CREATE PROCEDURE SP_PROCESO_FILAS
RETURNS (pProceso INTEGER, 
         pFila INTEGER, 
         pCodigo INTEGER, 
         pVotos INTEGER, 
         pTotal INTEGER)
AS
DECLARE VARIABLE OldProc INTEGER;
BEGIN
  OldProc = -1;
  pFila = 0;
  FOR SELECT Proceso, Codigo, Votos2, Total
  FROM SYSDBA112042
  INTO :pProceso,    // El error lo da en esta línea
       :pCodigo, 
       :pVotos, 
       :pTotal
  DO
  BEGIN
    IF (OldProc <> pProceso) THEN
    BEGIN
      pFila = 0;
        OldProc = pProceso;
    END
    pFila = pFila + 1;
    SUSPEND;
  END
END;
Como decía en un mensaje mio de ese otro hilo si lo ejecuto desde SQL Manager tal como está se crea sin problema el SP, pero si lo hago desde la aplicación me da un error
Cita:
Dynamic SQL Error
SQL error code = -104
Token unknown - line 14, column 8
Como bien me decía Casimiro tenía un probelma con el nombre de las variables. Como veis he cambiado los nombres, pero sigue dando el mismo error.

Por otra parte, mirando otros SP que tengo definidos en la BB.DD., se me había ocurrido que tal vez podría usar variables de entrada de forma que definiera una vez el SP y simplemente cambiara los valores que me hace falta. Había pensado algo así:
Código SQL [-]
CREATE PROCEDURE SP_PROCESO_FILAS(
         iTabla VARCHAR(100), 
         iColumna VARCHAR(25))
RETURNS (pProceso INTEGER, 
         pFila INTEGER, 
         pCodigo INTEGER, 
         pVotos INTEGER, 
         pTotal INTEGER)
AS
DECLARE VARIABLE OldProc INTEGER;
DECLARE VARIABLE pSelect VARCHAR(250);
etc...
Así al llamar al SP le pasaría el nombvre de la tabal (por ejemplo SYSDBA112042) y el de la columna que me interesa (por ejemplo Votos2), pero cuando he intentado montar el query me da un error. He probado esto:
Código SQL [-]
pSelect = 'SELECT Proceso, Codigo, ' || iColumna || ', Total FROM ' || iTabla || ' INTO :pProceso, :pCodigo, :pVotos, :pTotal';
Pero ¿cómo haría para "meter", si se puede, esa variable en el FOR? He estado mirando documentación pero no he encontrado nada que me ayude.
Responder Con Cita
 



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
Definir un TQRChart Angel.Matilla Impresión 0 13-01-2020 13:53:18
Definir un TChart Angel.Matilla C++ Builder 11 08-11-2019 09:36:00
Error al definir una FOREIGN KEY Angel.Matilla Firebird e Interbase 21 12-04-2018 09:56:46
Error al definir un FK en Firebird 2.5 Angel.Matilla Firebird e Interbase 10 29-11-2016 13:13:26
Definir impresora Carliviris Varios 6 11-01-2008 03:12:17


La franja horaria es GMT +2. Ahora son las 12:13:43.


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