Como preencher com zeros antes de cada coluna, via select
Olá!
Tenho uma tela que cotém um DBGrid de 3 colunas numéricas.
Preciso fazer um select que concatene estas 3 colunas e grave o resultado em um arquivo.
Sendo que a col1 deve ter 2 caracteres, a col2 deve ter 4 e a col3 deve ter 3.
Se, por exemplo, na col2 tiver um número 47, deve ser preenchido com zeros, ficando 0047. Deve ser sempre preenchido com zeros antes, para os caracteres menores que 2 na col1, 4 na col2 e 3 na col3.
No Oracle existe uma maneira de fazer, que ficaria assim:
select lpad(col1,2,0)||lpad(col2,4,0)||lpad(col3,3,0) from tabela
mas infelizmente o Delphi não aceita o comando ´lpad´, aceita somente o de concatenação ´||´.
Alguém tem alguma idéia de como fazer isto, através de um select ???
Desde já agradeço.
Tenho uma tela que cotém um DBGrid de 3 colunas numéricas.
Preciso fazer um select que concatene estas 3 colunas e grave o resultado em um arquivo.
Sendo que a col1 deve ter 2 caracteres, a col2 deve ter 4 e a col3 deve ter 3.
Se, por exemplo, na col2 tiver um número 47, deve ser preenchido com zeros, ficando 0047. Deve ser sempre preenchido com zeros antes, para os caracteres menores que 2 na col1, 4 na col2 e 3 na col3.
No Oracle existe uma maneira de fazer, que ficaria assim:
select lpad(col1,2,0)||lpad(col2,4,0)||lpad(col3,3,0) from tabela
mas infelizmente o Delphi não aceita o comando ´lpad´, aceita somente o de concatenação ´||´.
Alguém tem alguma idéia de como fazer isto, através de um select ???
Desde já agradeço.
Bclr
Curtidas 0
Respostas
Bclr
13/11/2003
Por favor alguém me ajude!!!
GOSTEI 0