Olá a Todos, este é meu segundo post.
No banco de dados da aplicação a qual estou trabalhando os campos cnpj, telefone, etc, são do tipo strings, e os dados estão gravados assim CNPJ = xx.xxx.xxx/xxxx-xx, telefone (xx) xxxx-xxxx, ou seja esta com "parentes, hifem, ponto, etc). dessa forma os dados não atendem a regra do edoc (pis-cofins também)
crei a seguinte função na minha aplicação
Function limpaVariavel (sTexto: String):String;
begin
sTexto := StringReplace(sTexto, '.', '',[rfReplaceAll, rfIgnoreCase]); //remover .
sTexto := StringReplace(sTexto, '-', '',[rfReplaceAll, rfIgnoreCase]); //remover -
sTexto := StringReplace(sTexto, '/', '',[rfReplaceAll, rfIgnoreCase]); //remover /
sTexto := StringReplace(sTexto, '(', '',[rfReplaceAll, rfIgnoreCase]); //remover (
sTexto := StringReplace(sTexto, ')', '',[rfReplaceAll, rfIgnoreCase]); //remover )
sTexto := StringReplace(sTexto, ' ', '',[rfReplaceAll, rfIgnoreCase]); // revomer ' '
Result := sTexto;
end;
Varrendo toda a string a procura desses caracteres, minha pergunta é, há alguam função em ACBR que resolva isto e já valide cpnj, telefone etc?