14 respuestas en este tema

[daewooding]

Hola que tal, soy nuevo en esto de los procedimientos en firebird y quisiera que me orientarna un poco, necesito hacer un procedimiento almacenado que inserte datos en tablas ya creadas, lo que no entiendo es como crearlo, se que la sintaxis es algo asi:

CREATE PROCEDURE nombre_procedure
AS
BEGIN
cuerpo_procedimiento
END;

y lo ejecuto con: EXECUTE PROCEDURE nombre_procedimeinto


pero no entiendo como emepzar, basicamente necesito hacer es un insert estas 3 tablas diferentes sobre un pedido, que se agregenlos datos

sql

CREATE TABLE productos(
	idproducto INT PRIMARY KEY,
	nombreProducto VARCHAR(40),
	idProveedor INT NULL,
	idCategoria INT NULL,
	cantidadPorUnidad VARCHAR(20) NULL,
	precioUnidad DECIMAL NULL,
	unidadesEnExistencia SMALLINT NULL,
	unidadesEnPedido SMALLINT NULL,
	nivelNuevoPedido SMALLINT NULL,
	suspendido SMALLINT,
	categoriaProducto VARCHAR(20) NULL
);
 
CREATE TABLE detallesdepedidos(
	idpedido INT,
	idproducto INT,
	preciounidad DECIMAL NOT NULL,
	cantidad INT NOT NULL,
	descuento DECIMAL NOT NULL
 
);
 
CREATE TABLE Pedidos(
	IdPedido INT PRIMARY KEY,
	IdCliente VARCHAR(5) NOT NULL,
	IdEmpleado INT NOT NULL,
	FechaPedido DATE,
	FechaEntrega DATE,
	FechaEnvio DATE,
	FormaEnvio INT,
	Cargo DECIMAL,
	Destinatario VARCHAR(60),
	DireccionDestinatario VARCHAR(60),
	CiudadDestinatario VARCHAR(60),
	RegionDestinatario VARCHAR(60),
	CodPostalDestinatario VARCHAR(60),
	PaisDestinatario VARCHAR(60)
);

Espero me puedan ayudar ya que soy nuevo en esto de las bases de datos

[Sergio]

Basicamente esta es la estructura:

sql

CREATE PROCEDURE MYPROCEDURE(
    MYDATO1 INTEGER,
    MYDATO2 NUMERIC(4.2))
RETURNS (
    SALIDA1 INTEGER,
    SALIDA2 INTEGER )
AS
  DECLARE Fecha    DATE;
  DECLARE Deci INTEGER;
  DECLARE Base     NUMERIC(15,2);
  DECLARE iva      NUMERIC(15,2);
  DECLARE Total    NUMERIC(15,2);
BEGIN
  /* Rellenas variables con resultados de querys */
  SELECT Moneda1Decimales FROM Empresa WHERE Empresa=1 INTO :Deci;
  /* Puedes modificar o añadir records con SQL normal */ 
  UPDATE Asiento SET IDAsiento=:IDAsiento, Fecha=:Fecha, Documento=:Doc,
           FechaEntra=:Fecha, Bloqueo=1 WHERE IDAsiento=:IDAsiento;
  DELETE FROM IVAApunte WHERE IDAsiento=:IDAsiento;
  INSERT INTO Apunte (IDAsiento, Cuenta, CtoAuto, Concepto, Departamento, DebeHaber, Importe)
           VALUES (:IDAsiento, :CtaCli, :CtoAuto, :Con, :Dpto,
              iif(:Positivo=1 AND :Total<0,'H','D'), iif(:Positivo=1 AND :Total<0,-:Total,:Total));
    /* Rellenas las variables de salidas y suspend envia una linea de forma que veas como una tabla creada por codigo */
    suspend;
  END
END

[daewooding]

No entendi bien, mira esto es lo que entiendo y llevo:

sql

SET TERM ^ ;
CREATE PROCEDURE ped (
   IdPedido INT,
   IdCliente VARCHAR(5),
   IdEmpleado INT,
   FechaPedido DATE,
   FechaEntrega DATE,
   FechaEnvio DATE,
   FormaEnvio INT,
   Cargo DECIMAL,
   Destinatario VARCHAR(60),
   DireccionDestinatario VARCHAR(60),
   CiudadDestinatario VARCHAR(60),
   RegionDestinatario VARCHAR(60),
   CodPostalDestinatario VARCHAR(60),
   PaisDestinatario VARCHAR(60))
 
AS
BEGIN
 
INSERT INTO pedidos VALUES (:IdPedido, :IdCliente, :IdEmpleado, :FechaPedido, :FechaEntrega, :FechaEnvio, :FormaEnvio,  
:Cargo, :Destinatario, :DireccionDestinatario, :CiudadDestinatario, :RegionDestinatario, :CodPostalDestinatario,  
:PaisDestinatario);
END
END^
SET TERM ; ^

Esto es solo para la tabla pedidos, pero no exite una manera de que haga la insersion de datos dentro del mismo procedure? osea que en ves de ejecutar :

EXECUTE PROCEDURE ped('', '', '', '', '', '', '', '', '', '', '', '', '', '')

meta los datos desde el procedure y solo ejecutar el procedure algo como EXECUTE PROCEDURE ped y ya

[Fenareth]

No entendi bien, mira esto es lo que entiendo y llevo:

sql

SET TERM ^ ;
CREATE PROCEDURE ped (
   IdPedido INT,
   IdCliente VARCHAR(5),
   IdEmpleado INT,
   FechaPedido DATE,
   FechaEntrega DATE,
   FechaEnvio DATE,
   FormaEnvio INT,
   Cargo DECIMAL,
   Destinatario VARCHAR(60),
   DireccionDestinatario VARCHAR(60),
   CiudadDestinatario VARCHAR(60),
   RegionDestinatario VARCHAR(60),
   CodPostalDestinatario VARCHAR(60),
   PaisDestinatario VARCHAR(60))
 
AS
BEGIN
 
INSERT INTO pedidos VALUES (:IdPedido, :IdCliente, :IdEmpleado, :FechaPedido, :FechaEntrega, :FechaEnvio, :FormaEnvio,  
:Cargo, :Destinatario, :DireccionDestinatario, :CiudadDestinatario, :RegionDestinatario, :CodPostalDestinatario,  
:PaisDestinatario);
END
END^
SET TERM ; ^

Esto es solo para la tabla pedidos, pero no exite una manera de que haga la insersion de datos dentro del mismo procedure? osea que en ves de ejecutar :

EXECUTE PROCEDURE ped('', '', '', '', '', '', '', '', '', '', '', '', '', '')

meta los datos desde el procedure y solo ejecutar el procedure algo como EXECUTE PROCEDURE ped y ya

Y de dónde va a obtener los datos que va a insertar ??? 

Podría ser que insertaras a una tabla desde un select hecho a otra tabla, pero no sé si éste sea tu caso...

Saludox !

[daewooding]

Exacto, lo que necesito es insertar los "datos" dentro del mismo procedure, si se puede? de ser asi como seria? o la unica forma de insertar los datos es mediante la linea :

EXECUTE PROCEDURE ped('', '', '', '', '', '', '', '', '', '', '', '', '', '')

gracias por tus respuestas

[Fenareth]

Exacto, lo que necesito es insertar los "datos" dentro del mismo procedure, si se puede? de ser asi como seria? o la unica forma de insertar los datos es mediante la linea :

EXECUTE PROCEDURE ped('', '', '', '', '', '', '', '', '', '', '', '', '', '')

gracias por tus respuestas

Pues lo que puedes hacer es algo así como:

sql

INSERT INTO tabla (campo1, campo2, campo3, campo4)
SELECT campo1, campo2, campo3, campo4
  FROM tabla2
WHERE condicion

Ahí lo que haces es que seleccionas los datos de una tabla para insertarlos en otra, pero al final, tienes que mandar llamar tu SP en algún momento ya sea con el execute procedure desde Firebird mismo o con un componente de conexión desde una aplicación, pero es necesario que se mande llamar al SP en algún momento.

Saludox !

[Delphius]

daewooding, ¿Y quien le suministra los datos al procedimiento? ¿O de donde va a sacarlos?
Que un procedimiento se llame a si mismo no es un buen síntoma. Alguien lo invoca, pasándole en los parámetros la información o bien ejecuta una consulta y extrae los datos de la misma para luego operar con ella.

Es así como funcionan.
Se me hace que estás confundiendo los conceptos de un procedimiento almacenado. El punto es que de algún lado vienen los datos, sea de una tabla con la información o se la pasa el propio usuario. No se inventan ni salen de la galera. No hay otra. Explícate que buscas hacer y hasta donde deseas llegar. Tienes esas tablas, ahora ¿Hay otras más de donde pueda extraer los datos necesario?

Saludos,

[daewooding]

daewooding, ¿Y quien le suministra los datos al procedimiento? ¿O de donde va a sacarlos?
Que un procedimiento se llame a si mismo no es un buen síntoma. Alguien lo invoca, pasándole en los parámetros la información o bien ejecuta una consulta y extrae los datos de la misma para luego operar con ella.

Es así como funcionan.
Se me hace que estás confundiendo los conceptos de un procedimiento almacenado. El punto es que de algún lado vienen los datos, sea de una tabla con la información o se la pasa el propio usuario. No se inventan ni salen de la galera. No hay otra. Explícate que buscas hacer y hasta donde deseas llegar. Tienes esas tablas, ahora ¿Hay otras más de donde pueda extraer los datos necesario?

Saludos,

Tratare de ser claro, lo que necesito es un procedimiento que inserte datos a las tablas, estos datos quiero ponerlos DENTRO del procedure para no tener que ponerlos al llamarlo conel EXECUTE PROCEDURE, en pocas palabras, necesito que la insercion de datos se hagan dentro del mismo procedure y cuando lo mande a llamar solo ponga

EXECUTE PROCEDURE nombre 

y no tenga que meter los datos cuando lo mande a llamar, sino que se ejecuten dentro del procedure, espero haber sido claro,

de igual manera para saber si esTo es posible o es OBLIGATORIO introducir los datos cuando lo mande a llamar con el EXECUTE

[Fenareth]

daewooding, ¿Y quien le suministra los datos al procedimiento? ¿O de donde va a sacarlos?
Que un procedimiento se llame a si mismo no es un buen síntoma. Alguien lo invoca, pasándole en los parámetros la información o bien ejecuta una consulta y extrae los datos de la misma para luego operar con ella.

Es así como funcionan.
Se me hace que estás confundiendo los conceptos de un procedimiento almacenado. El punto es que de algún lado vienen los datos, sea de una tabla con la información o se la pasa el propio usuario. No se inventan ni salen de la galera. No hay otra. Explícate que buscas hacer y hasta donde deseas llegar. Tienes esas tablas, ahora ¿Hay otras más de donde pueda extraer los datos necesario?

Saludos,

Tratare de ser claro, lo que necesito es un procedimiento que inserte datos a las tablas, estos datos quiero ponerlos DENTRO del procedure para no tener que ponerlos al llamarlo conel EXECUTE PROCEDURE, en pocas palabras, necesito que la insercion de datos se hagan dentro del mismo procedure y cuando lo mande a llamar solo ponga

EXECUTE PROCEDURE nombre 

y no tenga que meter los datos cuando lo mande a llamar, sino que se ejecuten dentro del procedure, espero haber sido claro,

de igual manera para saber si esTo es posible o es OBLIGATORIO introducir los datos cuando lo mande a llamar con el EXECUTE

Y los datos que quieres que se encuentren dentro del procedure son fijos ? se obtienen de una tabla mediante una consulta?

Es posible tener los datos a insertar dentro del procedure ? Claro que sí !.... Bajo éstos dos supuestos que te comento con anterioridad: o éstos son fijos (que no encuentro mucha lógica en que así sea) o se obtiene mediante una consulta a una tabla (muy común).

Pero lo más común de todo, es que tú le digas a un procedimiento que inserta datos, qué datos quieres insertar... es ésto obligatorio ??? No, ya ha sido aclarado que tanto como obligatorio no es, pero es lo que normalmente se esperaría al utilizar SP.

Saludox !

[daewooding]

daewooding, ¿Y quien le suministra los datos al procedimiento? ¿O de donde va a sacarlos?
Que un procedimiento se llame a si mismo no es un buen síntoma. Alguien lo invoca, pasándole en los parámetros la información o bien ejecuta una consulta y extrae los datos de la misma para luego operar con ella.

Es así como funcionan.
Se me hace que estás confundiendo los conceptos de un procedimiento almacenado. El punto es que de algún lado vienen los datos, sea de una tabla con la información o se la pasa el propio usuario. No se inventan ni salen de la galera. No hay otra. Explícate que buscas hacer y hasta donde deseas llegar. Tienes esas tablas, ahora ¿Hay otras más de donde pueda extraer los datos necesario?

Saludos,

Tratare de ser claro, lo que necesito es un procedimiento que inserte datos a las tablas, estos datos quiero ponerlos DENTRO del procedure para no tener que ponerlos al llamarlo conel EXECUTE PROCEDURE, en pocas palabras, necesito que la insercion de datos se hagan dentro del mismo procedure y cuando lo mande a llamar solo ponga

EXECUTE PROCEDURE nombre 

y no tenga que meter los datos cuando lo mande a llamar, sino que se ejecuten dentro del procedure, espero haber sido claro,

de igual manera para saber si esTo es posible o es OBLIGATORIO introducir los datos cuando lo mande a llamar con el EXECUTE

Y los datos que quieres que se encuentren dentro del procedure son fijos ? se obtienen de una tabla mediante una consulta?

Es posible tener los datos a insertar dentro del procedure ? Claro que sí !.... Bajo éstos dos supuestos que te comento con anterioridad: o éstos son fijos (que no encuentro mucha lógica en que así sea) o se obtiene mediante una consulta a una tabla (muy común).

Pero lo más común de todo, es que tú le digas a un procedimiento que inserta datos, qué datos quieres insertar... es ésto obligatorio ??? No, ya ha sido aclarado que tanto como obligatorio no es, pero es lo que normalmente se esperaría al utilizar SP.

Saludox !

Gracias por tu respuesta, por lo que dices y lo que quiero hacer es justamente con datos FIJOS como mencionas, son datos que "invento" para meterlos a las tablas, no los obtengo de otras tablas, solo necesito saber como hacer dentro el procedure los insert de datos fijos, por ejemplo en la tabla de pedidos:

sql

[CREATE TABLE Pedidos(
        IdPedido INT PRIMARY KEY,
        IdCliente VARCHAR(5) NOT NULL,
        IdEmpleado INT NOT NULL,
        FechaPedido DATE,
        FechaEntrega DATE,
        FechaEnvio DATE,
        FormaEnvio INT,
        Cargo DECIMAL,
        Destinatario VARCHAR(60),
        DireccionDestinatario VARCHAR(60),
        CiudadDestinatario VARCHAR(60),
        RegionDestinatario VARCHAR(60),
        CodPostalDestinatario VARCHAR(60),
        PaisDestinatario VARCHAR(60)
);

[cram]

Entonces sobran los parámetros de entrada para el procedimiento.
Solo agregas la sentencia INSERT con los parámetros correctos y listo.
Sergio te dejó una guía con las cuatro instrucciones.
El tema, supongo que viene para una base de datos de prueba, por lo que sería correcto agregarle datos al azar.

Saludos.

[Fenareth]

OK ! Datos fijos... en ese caso y como ya te hicieron mención, no necesitas parámetros de entrada...

Es suficiente con hacer ésto:

sql

SET TERM ^ ;
CREATE PROCEDURE ped () 
AS
BEGIN
 
INSERT INTO pedidos VALUES (valor1, valor2, valor3, valor4....);
END
END^
SET TERM ; ^

Ojalá te sirva

Saludox !

[Delphius]

!Ha bueno... eso cambia radicalmente las cosas! Por algo es que invitamos a los interesados a que describan lo mejor posible su problema. No te preocupes, eres nuevo, te entiendo.

Te pongo un ejemplo que tengo para mi base de datos de prueba. Dispongo de un SP que recibe como parámetro la cantidad de registros que deseo insertar. Luego en un ciclo while itero una variable hasta acumular la cantidad dada, en cada iteración se realiza un INSERT.

sql

SET TERM ^ ;
 
CREATE OR ALTER PROCEDURE LLENAR_TEST1 (
    cantidad INTEGER)
AS
DECLARE variable iter INTEGER;
BEGIN
  /* Procedure Text */
  ITER = 0;
  WHILE (iter < CANTIDAD) do
  BEGIN
    INSERT INTO testtable1(VALORNUM, VALORFLOAT, FECHA) VALUES (:iter, 1.0 + :iter/1000.0, 'NOW');
    ITER = ITER + 1;
  END
END^
 
SET TERM ; ^

Mi tabla de pruebas tiene 3 campos: uno numérico, otro de coma flotante y uno de fecha. Los valos se "inventan" según el valor de iteración. Esa es la magia de poner datos "inventados" para este burdo ejemplo.

Luego lo único que hace falta es mandar a ejecutar el procedimiento y pasarle un valor de cantidad y esperar a que termine.

Saludos,

[daewooding]

Gracias por sus respuestas, era lo que necesitaba, disculpen mi ignorancia y para futuras consultas tratare de ser o mas claro posible desde el inicio. Gracias de nuevo y Salu2

[Delphius]

Gracias por sus respuestas, era lo que necesitaba, disculpen mi ignorancia y para futuras consultas tratare de ser o mas claro posible desde el inicio. Gracias de nuevo y Salu2

No hay problema daewooding. Espero que no lo tomes como una especie de "castigo". Es normal el requerir cierto feedback en el foro para ir descubriendo tanto el problema como una posible solución o alternativa.
El asunto es que no hemos podido captar inicialmente que se trataba de datos de prueba desde el inicio. Y eso nos confundía. Por eso y para lograr un buen manejo en los foros y dar una mejor atención y calidad es que hemos elaborado unas sugerencias a tener en cuenta al momento de postear.

Tu no haz hecho nada malo. Eres nuevo en el foro, espero que sientas a esta comunidad como tu 2do hogar.

Saludos,