PC Toledo

Enviado: **14 Jan 2008 20:33**

Maligno, esta função não troca os pontos "." ?
Preciso criar aquele bendito arquivo para a receita, e um dos campos do DBF, que guarda os totais, está no formato "C" e os registros contém virgulas e pontos. As virgulas consegui tirar, os pontos não.

Enviado: **14 Jan 2008 21:22**

Desculpa a vergonha que passei. Troca os pontos sim. É que estava usando a função na variavel errada.

Enviado: **14 Jan 2008 23:03**

Não se preocupe. Isso acontece comigo o tempo todo.

Enviado: **12 Jun 2016 19:57**

Código: Selecionar todos

nOldValor  := 101.22
cValor       := Tran( nOldValor, "@E 999,999.99")
nNewValor := StrToVal( cValor )

Function StrToVal( nParam )
********************************
Return(StrTran( nParam, ",","."))

PC Toledo

Converter parte de uma string em valor

Converter parte de uma string em valor