[Cabanyaler]

Como me gusta comentar mis propias soluciones y siempre hago:


1) Creo las tablas temporales

   SL := TStringList.Create;
   DMTMP.ADOConTmp.GetTableNames(SL, False);
   Existe := False;

   for index := 0 to (SL.Count - 1) do
     if (SL[index] = 'TMPOBR')     then Existe := True;
   if not(Existe) then CreoTablaTemp_TMPOBR();      // Conté les obres on hi han partes d'eixe mes, per eixa casa de lloguer i eixe centre

Donde CreoTablaTemp_TMPOBR() es:

/* Crea la taula temporal TMPOBR per a la acumulació dels imports totals de cadasquna de les obres */
CREATE PROCEDURE ADOSP_Crea_TMPOBR
AS
Create Table tempdb.dbo.TMPOBR
(
            NumObra         varchar(5),
            ImpAcuTotObr real       
)
GO

2) Abro la tabla

   // Les obric
   DMTMP.ADOTb_TMPOBR.Open;

Y la asignación de campos permanentes, el nombre de la tabla así como la asignación a los objetos TadoTable, lo hago en tiempo de diseño.

La edición de la ConnectionStrings de cada una de las conexiones que intervengan, se dá por conocida.