Ver Mensaje Individual
  #1  
Antiguo 23-06-2007
freddiaz07 freddiaz07 is offline
Miembro
 
Registrado: jun 2006
Posts: 18
Reputación: 0
freddiaz07 Va por buen camino
Exclamation Consolidar 2 Bases de Datos 1 Tabla

Hola Amigos Buenos Dias Saludos de antemano.

Mi duda quiero consolidar 2 bases de datos A Y B contienen ambas la misma informacion. Quiero Sumar las existencias si el Cod del Articulo es igual a la otra tabla de la otra base de datos y asi hacer un ciclo como guardar esos resultados en otro query para mostrarlos en qreport


Código Delphi [-]
 
adoconnection1.DefaultDatabase = DB1;
adoconnection2.DefaultDatabase = DB2;
 
 
Adoquery1.Sql.Add('Select Codigo, Existencia From Inven');
Adoquery2.Sql.Add('Select Codigo, Existencia From Inven');
 
while not Adoquery1.Eof do
Adoquery1.First;
Adoquery2.First;
if Adoquery1.Fields.Fields[1].Asstring = Adoquery2.Fields.Fields[1].Asstring
begin
Edit1.Text := doquery1.Fields.Fields[1].Asstring + Adoquery2.Fields.Fields[1].Asstring;

Esa es la Estrucutura que tengo pero me da error al querer sumar las dos querys. y la otra duda es de sumar como guardar esos valores en otra tabla para mostrarlos en un Reporte.


Gracias.
Responder Con Cita