Você deve criar a tua sequencia, para você salvar teu registro você faz assim:
ASSIGN tabela.campo = NEXT-VALUE(sua-sequencia).
Assim toda vez que gravar um registro e atribuir a ele o novo valor da sequencia.
Para você mostrar o valor corrente da sequencia:
DISP CURRENT-VALUE(sua-sequencia).
Nenhum comentário:
Postar um comentário