Fórum Auto incrementer o campo Código do Produto #284745
15/06/2005
0
Essa propriedade eu defino na própria tabela ou em algum componente?
OBS: O acampo ID_CODIGO é chave primaria.
Vispo
Curtir tópico
+ 0Posts
15/06/2005
Rjun
Supondo que você estivesse usando Query, você poderia no evento ONNEWRECORD fazer uma query que retornasse o proximo codigo a ser lançado.
Gostei + 0
15/06/2005
Daniel_mc
Gostei + 0
15/06/2005
Vispo
Exatamente, uso uma Query e banco de dados SQL Server.
No caso, essa query que retorna o valor, teria que varrer a tabela, pegar o maior código e acrescentar + 1. Seria isso? Caso nao seja coloca um exemplo ai se possivel..
Valeu!!! :)
Gostei + 0
15/06/2005
Rjun
Foi bem isso que pensei. Você também poderia criar uma tabela com a seguinte estrutura:
Tabela Varchar(50) ID int
Onde você guardaria o nome da tabela e o ultimo código gerado. Ai no evento OnNewRecord, você passaria para uma query o nome da tabela e a query pegaria o ID atual, somaria 1 e te retornaria o número do proximo ID.[/code]
Gostei + 0
15/06/2005
Gpfranca
function TdmServer.UltimaSequencia(pNomeSequencia: String): String;
var
qryTmp: TSQLQuery;
begin
{ Função que retorna qual a ultima sequencia gerada por cada Seção(Terminal) }
qryTmp := TSQLQuery.Create(Self);
qryTmp.SQLConnection := dmServer.SQLConnection;
qryTmp.SQL.Add(´SELECT last_value as ultimo_id FROM ´+pNomeSequencia);
qryTmp.Open;
Result := qryTmp.fieldByName(´ultimo_id´).AsString;
qryTmp.Free;
end;
Acho que te serve amigo... Esse pega o ultimo codigo gerado... Só incrementar mais um...
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)