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
  #2  
Antiguo 19-11-2004
Avatar de defcon1_es
defcon1_es defcon1_es is offline
Miembro
 
Registrado: mar 2004
Ubicación: Cuenca - España
Posts: 533
Poder: 23
defcon1_es Va por buen camino
Hola,
¿Por qué pones tantas comillas?, no es necesario que pongas todos los campos entre comillas

Esta línea debería funcionar:
Código:
CREATE PROCEDURE GrupoArchivosBinarios (IdFileGroup INTEGER, ParentIdFileGroup INTEGER, 
GroupName CHAR(30), FileExtensions CHAR(150)  ) 
AS
DECLARE VARIABLE lvIdFileGroup INTEGER;
BEGIN
  SELECT IdFileGroup  
  FROM GrupoArchivosBinarios 
  WHERE IdFileGroup=:IdFileGroup 
  INTO :lvIdFileGroup;

  IF (lvIdFileGroup IS NULL) THEN
  BEGIN
   INSERT INTO GrupoArchivos
   (IdFileGroup, ParentIdFileGroup, GroupName, FileExtensions)
   VALUES
   (:IdFileGroup, :ParentIdFileGroup, :GroupName, :FileExtensions);

   INSERT INTO GrupoArchivosBinarios 
   (IdFileGroup)
   VALUES 
   (:IdFileGroup);

  END 
  ELSE BEGIN

  END
END
__________________
Progress Openedge
https://abevoelker.com/progress_open...dered_harmful/


Delphi forever...
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


La franja horaria es GMT +2. Ahora son las 04:55:00.


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