CAPTURAR VALOR GENERATOR NO FIREBIRD NO VBA/ACCESS
Bom dia, galera.
Gostaria muito da ajuda dos grandes doutores e especialistas que existem neste fórum.
Estou querendo saber como faço para capturar o valor de um generator(auto incremento) para preencher um campo chamado [Ô]ID(que é o campo autonumeração da tabela)[Ô], visto que o mesmo não pode ficar [Ô]NULL[Ô] e posteriormente salvar o mesmo, pois até agora não consegui.
Agradeço a ajuda de todos e, se fosse possÃvel disponibilizar um código exemplo para me basear.
Gostaria muito da ajuda dos grandes doutores e especialistas que existem neste fórum.
Estou querendo saber como faço para capturar o valor de um generator(auto incremento) para preencher um campo chamado [Ô]ID(que é o campo autonumeração da tabela)[Ô], visto que o mesmo não pode ficar [Ô]NULL[Ô] e posteriormente salvar o mesmo, pois até agora não consegui.
Agradeço a ajuda de todos e, se fosse possÃvel disponibilizar um código exemplo para me basear.
SAMUKA,
pelo q sei, o proprio GENERATOR se encarrega de setar esse valor.
enqto vc edita o registro ele fica nulkl depois de gravar ele commita (grava) literalmente na tabela.
pelo q sei, o proprio GENERATOR se encarrega de setar esse valor.
enqto vc edita o registro ele fica nulkl depois de gravar ele commita (grava) literalmente na tabela.
Eu aconselho você criar um método de geração de código automático pelo vb mesmo.
é bem simples.
O código, verifica se existe registro.
Caso existir ele pega o ultimo registro e soma +1
Caso não existir ele mesmo autonumero o primeiro registro em 1
Após só gravar pelo Insert normalmente sem se preocupar com autoincrement do firebird
é bem simples.
SQL = [Ô]SELECT * FROM TABELA[Ô]
tbTabela.Open SQL, Conexao, adOpenDynamic, adLockOptimistic
With tbTabela
If .EOF = False Then
.MoveLast
txtCod.Text = !Codigo + 1
Else
txtCod.Text = [Ô]1[Ô]
End If
txtCod.Text = Format(txtCod.Text, [Ô]0000000[Ô])
End With
O código, verifica se existe registro.
Caso existir ele pega o ultimo registro e soma +1
Caso não existir ele mesmo autonumero o primeiro registro em 1
Após só gravar pelo Insert normalmente sem se preocupar com autoincrement do firebird
Olá pessoal, tudo bem?!
Realmente DEKINHO, o próprio GENERATOR do FIREBIRD é pra se encarregar disso, mas quando tento salvar(commitar) o mesmo retorna um erro dizendo que [Ô]não é possÃvel passar um valor null[Ô](essa mensagem é similar) e é justamente o valor do campo AUTONUMERAÇÃO(AutoIncremento) que não está sendo preenchido, estou [Ô]batendo[Ô] até agora pra ver se encontro uma solução, mas até agora não consegui; pelo Ibexpert eu consigo preencher normalmente.
CHARLESTON10, essa é uma boa alternativa, vou ver se consigo imprementar.
valew, pessoal pela ajuda.
Abraço
Realmente DEKINHO, o próprio GENERATOR do FIREBIRD é pra se encarregar disso, mas quando tento salvar(commitar) o mesmo retorna um erro dizendo que [Ô]não é possÃvel passar um valor null[Ô](essa mensagem é similar) e é justamente o valor do campo AUTONUMERAÇÃO(AutoIncremento) que não está sendo preenchido, estou [Ô]batendo[Ô] até agora pra ver se encontro uma solução, mas até agora não consegui; pelo Ibexpert eu consigo preencher normalmente.
CHARLESTON10, essa é uma boa alternativa, vou ver se consigo imprementar.
valew, pessoal pela ajuda.
Abraço
Vc criou a Trigger BeforeInsert para incrementar o generator e direcionar ao campo?
Qualquer dúvida sobre a implementação do código, estamos aÃ;
Encerre o tópico se ajudou..
;]
Falow abraço[ô];;
Encerre o tópico se ajudou..
;]
Falow abraço[ô];;
Tópico encerrado , respostas não são mais permitidas