Insertar datos desde una tabla a otra en una sola sentencia.

[delphi50jmb]

Hola amigos.
Tengo que realizar una inserción de datos a un archivo de toma de inventario. Los datos ajustados se toman desde otro archivo.

El punto es que tengo que grabar los datos ajustados en el archivo TOMAINVTARIO, pero estos deben ir con un números de folio de ajuste, el cual no existe en la tabla inventario.

Entonces la pregunta es: Como puedo tomar datos desde una tabla para llevarlos a otra, incorporando ademas un datos externo?. En este caso, la variable "Folio". Es posible hacer esto, en una sola sentencia SQL?..

Aquí va el como lo estoy haciendo. Alguna idea?.

Código SQL [-]
  SQL_String.SQL.Clear;
   SQL_String.SQL.Append(
            'INSERT INTO ' + 'TomaInvtario ' +
                         '(Folio, Codigo, Nombre, ExistAct, Fisico) ' +
            'SELECT ' +
                         EdFolio.Text +     <<---- Este dato es externo, ajeno a la tabla Inventario.
                        'Codigo, ' +
                        'Nombre, ExistAct, ExistTMP ' +
            'FROM '  + 'Inventario ' +
            'WHERE ' +  'Inventario.Familia   = ' + QuotedStr(EdFamilia.Text)); 

   SQL_String.ExecSQL(False);

Saludos.
Gracias.