Alow Welington,

Minha classe já trata a inclusão assim... O problema não é perder o código (isso não acontece), mas sim controlar relação através de um campo que fica invisivel no formulário... Gostaria de saber como vocês controlam isso para poder implementar na minha classe!
Se eu tiver que fazer esse controle manual, eu continuo usando o código como chave primária. :)

Entenda por controle manual o seguinte:

* No arquivo eu tenho o ID do cliente
Select Codigo, Nome From Clientes Where ID = m.ID_Clie Into Cursor Cliente
? Cliente.Codigo
? Cliente.Nome
* Para gravar:
Update Cliente Set Nome = m.Nome, Codigo = m.Codigo Where Id = m.Id_Clie

Veja... No caso de gravar... Onde está esse valor do m.Id_Clie? No ThisForm.CodigoCliente.Tag? Pois se eu pegar o ThisForm.CodigoCliente.Value vai aparecer o código, e não o ID (Chave Primária)

[]s