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 Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 28-01-2021
cloayza cloayza is offline
Miembro
 
Registrado: may 2003
Ubicación: San Pedro de la Paz, Chile
Posts: 947
Poder: 25
cloayza Tiene un aura espectacularcloayza Tiene un aura espectacular
Creo que lo puedes hacer, haber si esto te ayuda un poco...
C=>Genera Pedido, cuando se guarde este pedido hay que crear un pedido en A o B...

A, B: Se deberá crear un procedimiento almacenado que reciba los datos de un pedido para almacenar.

Supongamos que es este:
Código SQL [-]
create or alter procedure NuevoPedido(Folio integer, Valor double precision)
as
begin
        insert into Pedidos(folio, valor) Values(:Folio, :Valor);
end

C: Se deberá llamar a procedimiento en A o B.

Supongamos que en C, tenemos el siguiente procedimiento
Código SQL [-]
create or alter procedure Orden_En_A(Folio integer, Valor double precision)
as
declare stProcCall varchar(100) ='execute procedure NuevoPedido(:Folio, :Valor)';
declare stConexion varchar(100)='localhost:/home/database/Base_Data_A.fdb'
begin
       execute statement (stProcCall) (Folio := :Folio, Valor := :Valor)
       on external  DATA SOURCE (stConexion) AS USER CURRENT_USER PASSWORD 'masterkey'
end

create or alter procedure Orden_En_B(Folio integer, Valor double precision)
as
declare stProcCall varchar(100) ='execute procedure NuevoPedido(:Folio, :Valor)';
declare stConexion varchar(100)='localhost:/home/database/Base_Data_B.fdb'
begin
     execute statement (stProcCall) (Folio:= :Folio, Valor:= :Valor)
     on external  DATA SOURCE (stConexion) AS USER CURRENT_USER PASSWORD 'masterkey'
end

Por supuesto se puede mejorar y parametrizar, pero eso luego...Espero te ayuda
Un abrazo

Mas detalles aquí
Responder Con Cita
  #2  
Antiguo 30-01-2021
Gregorio Cíber Gregorio Cíber is offline
Miembro
 
Registrado: jun 2008
Posts: 99
Poder: 18
Gregorio Cíber Va por buen camino
¡Qué buenos y generosos sois!
Gracias a todos por responder. Me pongo ipso facto con el tema.
Saludos.
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
Firebird local con acceso desde Android rodrinig Desarrollo en Delphi para Android 7 19-08-2023 20:23:49
Acceso desde WordPress a Firebird Gregorio Cíber Conexión con bases de datos 2 23-11-2020 10:54:50
Acceso a Firebird claudiorene Firebird e Interbase 14 13-06-2007 20:10:03
Acceso a firebird desde Delphi 2005.net hibero Firebird e Interbase 1 26-12-2005 16:48:34
Problema de acceso a Firebird desde cliente en Windows 98 taote Firebird e Interbase 4 06-08-2004 08:52:32


La franja horaria es GMT +2. Ahora son las 09:01:28.


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