Mostrar código antes de cadastrar

Delphi

15/04/2004

Galera...gostaria de saber como eu faço para mostrar o código antes de cadastrar, tenho uma Stored Procedure, uso o InterBase e não consigo mostrar o último código disponível para cadastro antes de executar a Stored Proc!!....Alguém sabe como fazer isso?


vlwww...


Tchelllo

Tchelllo

Curtidas 0

Respostas

Fer_nanda

Fer_nanda

15/04/2004

dah um select max(codigo)+1 na tabela q deseja inserir


GOSTEI 0
Tchelllo

Tchelllo

15/04/2004

Mas como eu faço isso???...como é a sintaxe?


GOSTEI 0
Fer_nanda

Fer_nanda

15/04/2004

se eu entendi bem, vc quer passar o próximo código para cadastro para sua procedure certo?
bom, antes de executá-la vc executa uma query, vc coloca o seguinte nela
 select max(codigo) + 1 as ultimocodigo from tabela


na aplicação vc só abre e fecha ela e depois passa o campo q ele te trouxe para a procedure ok

 
qryultimocodigo.close;
qryultimocodigo.open;

storedproc.close;
storedproc.parambyname(´codigo´).asinteger := qryultimocodigo.fieldbyname(´ultimocodigo´).asinteger;
storedproc.open;


é claro...depois vc faz as verificações caso o codigo seja zero e tals...


GOSTEI 0
Tchelllo

Tchelllo

15/04/2004

Não é bem passar o nº pra procedure Fer...vou explicar do jeitinho que eu fiz....eu tenho uma Stored Procedure no meu banco que retorna o nº do Generator e, na aplicação, na hora de gravar eu executo essa Stored Procedure, passo o valor que ela acrescenta ao Campo da tabela que seria o Código né, e faço o Post...pois bem...até aí tudo bem, só que o que eu queria era saber o último nº disponível do generator sem executar a Stored Procedure, pois senão ela acrescenta um...e não é bom voltar esse número caso haja o cancelamento da operação...eu só queria mostrar esse numero pro usuário em um Edit por exemplo, e é isso que eu não consigui ainda.


vlww pela atenção Fer....T++


Marcelo


GOSTEI 0
Fer_nanda

Fer_nanda

15/04/2004

se for só para mostrar o código, vc pode entaum apenas executar essa qry.
 select max(codigo) + 1 as ultimocodigo from tabela


veja bem, se sua tabela estiver assim:
--------------------
codigo | campo1
--------|-----------
1 | blah1
2 | blah2
3 | blah3

me corrija se estiver errada, mas qdo vc for gravar o proximo registro, sua procedure irá gerar o codigo 4, certo?

se vc executar a qry ela tbém lhe retornará esse valor, aí vc só mostra.

espero ter ajudado


GOSTEI 0
Fer_nanda

Fer_nanda

15/04/2004

se for só para mostrar o código, vc pode entaum apenas executar essa qry.
 select max(codigo) + 1 as ultimocodigo from tabela


veja bem, se sua tabela estiver assim:
--------------------
codigo | campo1
--------|-----------
1 | blah1
2 | blah2
3 | blah3

me corrija se estiver errada, mas qdo vc for gravar o proximo registro, sua procedure irá gerar o codigo 4, certo?

se vc executar a qry ela tbém lhe retornará esse valor, aí vc só mostra.

espero ter ajudado


GOSTEI 0
POSTAR