[Casimiro Notevi]

Si no he entendido mal, puedes valerte de un bucle al grabar.
En plan muy "rústico":

Código Delphi [-]
boolean ok = true
while ok
  ultimo = select max(id) from tabla
  try
    insert into otratabla values (ultimo, ... )
    ok = false
  except
  end
end