Club Delphi  
    Paypal   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
  #5  
Antiguo 30-01-2020
Avatar de Angel.Matilla
Angel.Matilla Angel.Matilla is offline
Miembro
 
Registrado: ene 2007
Ubicación: Toledo - España
Posts: 1.418
Poder: 21
Angel.Matilla Va por buen camino
Cita:
Empezado por Casimiro Notevi Ver Mensaje
Lo he probado y funciona bien.
¿Con una utilidad de FB? Así a mi también me funciona y crea el procedure sin problemas; el error lo da cuando se ejecuta desde código, POr hacer una tontería, porque lo es, he cambiado un trozo de un línea de sitio:
Código SQL [-]
CREATE OR ALTER 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 SYSDBA182734 INTO
           :pProceso,    // <------ AQUÍ ES DONDE DA EL ERROR
           :pCodigo,
           :pVotos,
           :pTotal
  DO
  BEGIN
    IF (OldProc <> pProceso) THEN
    BEGIN
      pFila = 0;
      OldProc = pProceso;
    END
    pFila = pFila + 1;
    SUSPEND;
  END
END;
En cualquier caso da el error en esa línea justo detrás del INTO y da el error que comentaba al principio: Token unknown. Sumado a que es un tema que no manejo excesivamente bien, me tiene completamente despistado. Es como si esa declaración del uso de la variable tuviera algún error.

Última edición por Angel.Matilla fecha: 30-01-2020 a las 18:56:09.
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 02:43:45.


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