Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 12-01-2019
cmfab cmfab is offline
Miembro
 
Registrado: jun 2010
Posts: 419
Poder: 14
cmfab Va por buen camino
Ejecutando Script con FireDac

Hola a todos, presento el siguiente problema.

Necesito ejecutar un Script usando el componente TFDScript para crear un procedimiento almacenado en una base de datos Firebird 3, el código donde obtengo el problema es el siguiente:

Código SQL [-]
CREATE PROCEDURE procesaMarcaciones (fecha date, numeroempleado varchar(100), idTerminal integer, hora varchar(6) ) 

As
     
 DECLARE variable kaki Cursor For (Select ID From marcaciones_procesadas Where
   Fecha = :fecha-1 And EmpleadoNumero = :numeroempleado And IDTerminal = :idTerminal And hora_salida is NULL order by ID DESC);

 
DECLARE variable c_marcaciones_dia_anterior Cursor For (Select IDTerminal From marcaciones_procesadas Where
   Fecha = :fecha-1 And EmpleadoNumero = :numeroempleado And IDTerminal = :idTerminal And hora_salida is NULL order by ID DESC);

BEGIN


   
END


Obvio que en el script van mas sentencias SQL, pero bueno, el asunto es que me salta el error siguiente:

Invalid request BLR at offset 376 undefined parameter number

Lo que noto es que si declaro un solo cursor se crea bien el procedimiento en la base de datos, el error se produce cuando intento declarar mas de un cursor. Es válido reconocer que si ejecuto el script directo en la base de datos Firebird sin usar el componente desde Delphi todo funciona perfectamente declarando mas de un cursor.

Alguna idea ?.

Gracias de antemano
Responder Con Cita
  #2  
Antiguo 29-01-2019
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.604
Poder: 29
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
¿Qué pasa si ejecutas ese script primero desde tu herramienta de administración de bases de datos? (IBExpert, por ejemplo).
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Ejecutando aplicaciones DOS aeff API de Windows 3 16-11-2009 18:47:39
Cuantos <Script></Script> deben haber en un <Body>? Deiv HTML, Javascript y otros 9 07-12-2006 02:27:50
problema ejecutando aplicación igest2000 Varios 1 04-05-2006 18:27:49
ejecutando programas en runtime ConanDoel Varios 2 23-03-2005 02:09:38
Ejecutando Programas con Firebird 1.5.1 NeWNeO Conexión con bases de datos 5 31-01-2005 22:02:41


La franja horaria es GMT +2. Ahora son las 21:39:55.


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