Grabacion campos de dos campañas en una Tabla

[GINMARMENOR]

Buenos dias,

Necesito copiar en una Tabla, las ventas del año 25 y del año 26, y compararlas, las ventas del año 25 están el directorio Datos25 y las del 26 en Datos26.

Por Simplificar tengo una Tabla que es la TablaPedidos, compuesta por dos Campos: Id y Ventas
y otra tabla que he creado que es TablaCompCamp con tres campos; Id,Ventas25,Ventas26

Y Básicamente lo que hago es colocarme en un Directorio:

Código SQL [-]
 
                 Procedure Boton1.Click;
                  begin
   
                       Ejercicio:'025'
                       BaseDatos:=BaseDatos+'Datos'+ejercicio
                       Basedatos.DatabaseName:=Basedatos+'\VENTAS.FDB';
                       BaseDatos.Connected:=true;

                       IbQueryCompCamp.Close;
                       IbQueryCompCamp.Clear;
                       IbQueryCompCamp.sql.text:=('insert Into  COMPCAMP (ID,VENTAS25) select ID,VENTAS from Pedidos');
                       IbQueryCompCamp.execsql;
                       IbQueryCompCamp.close;

                       Ejercicio:'026'
                       BaseDatos:=BaseDatos+'Datos'+ejercicio
                       Basedatos.DatabaseName:=Basedatos+'\VENTAS.FDB';
                       BaseDatos.Connected:=true;

                       IbQueryCompCamp.Close;
                       IbQueryCompCamp.Clear;
                       IbQueryCompCamp.sql.text:=('insert Into  COMPCAMP (ID,VENTAS26) select ID,VENTAS from Pedidos');
                       IbQueryCompCamp.execsql;
                       IbQueryCompCamp.close;

                    End;

Funciona perfectamente, el único problema que lógicamente copia las ventas en la tabla COMPCAMP en tablas separadas lógiamente una del 025 y la otra en la tabla 026.

He intentado crear una tabla fuera de la Base de datos para que no afectara el cambio de directorio y sólo afectara a Pedidos pero da error.

Ya lo único que me quedaría sería copiar los datos en StringGrid los dos años, y de ahí copiarlos a la Tabla, pero quería ver si había otra solución más sencilla sin tantos pasos.

Gracias de Antemano.