Ajuda com Auto-Incremento

Olá Rogerio...
o que vc pode fazer é definir um buffer daquela tabela, e assim, podes "lockar" o registro para garantir a integridade do novo cadastro (caso em acesso simultaneo).

seria +- assim.. (nao consegui testar no editor).

Código:

def buffer w<table> for <table>.

find last w<table> exclusive-lock no-wait no-error.
if not avail  w<table> then do:
    <mensagem de erro>
end.
if locked w<table> then do:
    <registro "lockado", tente denovo!>
end.
create <table>.
assign <table>.campo1 = w<table>.campo1 + 1.