Código Automático

Delphi

19/09/2005

Boa tarde, estou com uma dúvida sobre gerar código automático, tenho esse código
     if MessageDlg(´Deseja gerar o Código Interno ?´,mtConfirmation,[mbYes,mbNo],0)=mrYes then
     begin
          qryImovel := TQuery.Create(Self);
          qryImovel.DatabaseName := ´Imobiliario´;
          qryImovel.SQL.Text := ´  SELECT Max(CodIntImovel) AS CodigoI   ´ +
                                ´  FROM CadImovel                        ´ ;
          qryImovel.Open;
          if qryImovel.fieldByName(´CodigoI´).AsString = ´´ then
            Icod := 1
          else
            icod := 1 + qryImovel.fieldByName(´CodigoI´).AsInteger;


Pra gerar um código com número inteiro, está funcionando perfeitamente, porém alguns clientes usam letras juntamente com números para formar esse código (ABC-1, ABC-2...), teria como incrementar esse código também? Mantendo as letras e somando somente os números?

Valeu pela atenção


Facc

Facc

Curtidas 0

Respostas

Rjun

Rjun

19/09/2005

As letras são fixas. Você pode fazer assim:

SELECT ´ABC´ + Cast(MAX(ContatoID) AS varchar) AS Cliente FROM Cliente



GOSTEI 0
Facc

Facc

19/09/2005

As letras são fixas. Você pode fazer assim: 
SELECT ´ABC´ + Cast(MAX(ContatoID) AS varchar) AS Cliente FROM Cliente


valeu pela dica, porém pelo que eu percebi, isso só gera para meus clientes que utilizam o metodo de letras e números, e akeles que utilizam apenas números? Esqueci de mencionar que o sistema é o mesmo para os clientes que utilizam tanto códigos com letras e números qnto apenas números


GOSTEI 0
Rjun

Rjun

19/09/2005

Como você diferencia um cliente do outro?


GOSTEI 0
Facc

Facc

19/09/2005

Como você diferencia um cliente do outro?


Por uma tabela de cadastro de empresa, porém não são apenas 2 clientes... são vários


GOSTEI 0
Rjun

Rjun

19/09/2005

Mas nessa tabela existe algum atributo que indica que as chaves serão geradas com letras e números ou só números? As letras são fixas? Existem padrões ou regras para a geração desse código? Cada cliente configura a geração dó código como bem entender?


GOSTEI 0
Facc

Facc

19/09/2005

Mas nessa tabela existe algum atributo que indica que as chaves serão geradas com letras e números ou só números? As letras são fixas? Existem padrões ou regras para a geração desse código? Cada cliente configura a geração dó código como bem entender?


Não existe nenhum campo onde o cliente escolhe se gera com letras e números ou apenas números, as letras não são fixas, fica a critério do cliente escolher a forma do código, inclusive esse campo em questão é do tipo char


GOSTEI 0
Rjun

Rjun

19/09/2005

Então não existe uma lógica pré-definida para a geração desses códigos. Assim fica complicado criar um select para gerar esses códigos, visto que cada cliente pode gerar o código de ´n´ maneiras.


GOSTEI 0
Facc

Facc

19/09/2005

Então não existe uma lógica pré-definida para a geração desses códigos. Assim fica complicado criar um select para gerar esses códigos, visto que cada cliente pode gerar o código de ´n´ maneiras.


Ok valeu pela ajuda


GOSTEI 0
Rjun

Rjun

19/09/2005

Se alguem tiver alguma ideia, poste aqui.


GOSTEI 0
POSTAR