Hola,
Usando Delphi te puede servir algo así:
Código:
With TablaReceptora do begin
Insert;
FieldByName('NOMBRECAMPO1deTablaReceptora').Value := TablaOrigenNOMBRECAMPOTablaOrigen1.Value;
FieldByName('NOMBRECAMPO2deTablaReceptora').Value := TablaOrigenNOMBRECAMPOTablaOrigen2.Value;
//etc.... lo mismo con todos los demás campos
Post;
End; //With
Saludos,
Virginia