Auto Incremento Manual

Delphi

Banco de Dados

04/05/2017

Boa noite galera, após ter saído da área me bateu uma saudades de relembrar algo estou utilizando Delphi 10.2 + sqlite 3 gostaria de uma ajuda em uma rotina que estou me batendo para fazer.

Seria um campo declarado como char(10), na hora da inclusão realizar um auto incremento ver e acrescentar o numero de 0 a esquerda para completar os 10 caracteres ex

o códio 1 nao seria 1 seria 0000000001.................................................................0000999999.................................................9999999999

entenderam?

Alguem pode me ajudar?
Enrique Canato

Enrique Canato

Curtidas 0

Melhor post

Roberto Wutke

Roberto Wutke

09/05/2017

Ficou meio confuso... mas... não seria melhor vc ter uma variável inteira e depois fazer uma contagem do lenght da string?

tipo, vc pega o inteiro, incrementa ele, e olha se o lenght(variavel) <= 10 ai vc faz varString := '0' + varIncrementada.

qualquer coisa tamo ai
GOSTEI 1

Mais Respostas

Fabio Parreira

Fabio Parreira

04/05/2017

declare @numero as char(10) = 9000000

set @numero  = CONCAT(substring('0000000000',0,11 -len(@numero)),@numero)
print @numero


Um exemplo.
GOSTEI 0
POSTAR