Foros Club Delphi - duda con procedimiento

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)

- - duda con procedimiento (https://www.clubdelphi.com/foros/showthread.php?t=1849)

duda con procedimiento

Con este codigo paso todos los datos de una tabla a otra, pero quisiera si alguien me ayuda, en las dos tablas, que son iguales, sobran campos, quisiera ver como agregar datos desde variables a la tabla destino, en resumen necesito llenar los campos sobrantes con variables que contienen otros datos, gracias

CREATE PROCEDURE PASADATOS
AS
BEGIN
INSERT INTO HISTVENTAS(ARTICULO, PRECIOVENTA, CLIENTE, FECHA,
CODFOLIO, FOLIO, METODOVENTA, VENTATOTAL, DESCUENTO,
ABONO, ANTICIPO, SUBTOTAL)
SELECT ARTICULO, PRECIOVENTA, CLIENTE, FECHA,
CODFOLIO, FOLIO, METODOVENTA, VENTATOTAL, DESCUENTO,
ABONO, ANTICIPO, SUBTOTAL FROM TMPVENTAS;
DELETE FROM TMPVENTAS;
END

En teoria seria algo asi

Código:

insert into Tabla1 (campo1, campo2, campo3, campo4)

select xCampo1, xCampo2, MiConts1, MiConst2

from Tabla2

where condiciones

donde MiConst1 y MiConst2 son valores fijos que yo le paso a la Query

Espero que sea esto lo que buscas