Página 1 de 1

Remover um certo número em um campo de uma DBF

Enviado: 03 Jan 2005 10:25
por kristo
Feliz ano novo a todos e seus familiares, que Deus esteja presente no coração de todos !!!!

Pessoal tenho um probleminha aqui....

Tenho uma DBF chamada DF.dbf e nessa dbf tem o campo TELEFONE, mais os telefones tem o 0 (zero) no início, eu gostaria de remover esse 0 (zero) alguém pode me ajudar, se alguém puder montar uma PRG pra mim, eu agradeço.......

Ex. o campo do telefone está assim:

02124142

eu gostaria de remover apenas o primeiro ZERO para ficar assim:

2124142

Fico no aguardo, desde já obrigado a todos....

Kristo

Enviado: 03 Jan 2005 11:23
por Clipper
Prezado Colega

Você pode usar assim :

Código: Selecionar todos

USE DF
TAMANHO=LEN(TELEFONE)
DO WHILE .NOT. EOF()
   REPLACE TELEFONE WITH SUBSTR(TELEFONE,2,TAMANHO-1)
ENDDO
DBCLOSEALL()
Até logo.

Marcelo