Código SQL [-]for select CamposDeLaTabla from tabla1 where CAMPO1 = x into :CamposDeLaTabla do Insert into Tabla2 values (:CamposDeLaTabla)
for select CamposDeLaTabla from tabla1 where CAMPO1 = x into :CamposDeLaTabla do Insert into Tabla2 values (:CamposDeLaTabla)