converter valor, perdendo pra linguagem???

[pena]

Boa tarde pessoal, alguem por favor me da uma luz, não sei o que estou fazendo errado
tenho um label onde

Código: Selecionar todos

a:=Form.valor.value
msgStop(a)                      = 1.722,95
msgStop(val(a))               = 1.722000 
a:=STRTRAN(Form.valor.value,',','.')
msgStop(a)                      = 1,722.95
msgStop(val(a))               = 1,722000 

não sei como corrigir isto, desaprendi

[sygecom]

Será que você não está usando uma mascara de TEXTO nesse campo, ou iniciando como carácter ?

[Nascimento]

tem como vc melhorar um pouco o exemplo , explicando melhor ficou meio vago no que vc realmente quer amigo
se possivel um pequeno exemplo compilavel , para melhor entendimento

[pena]

a situação é a seguinte, eu importo dados de xml

Código: Selecionar todos

Form.valor.value              :=transform(val(PegaDadosXML(tVrNfe,"vNF"))    ,"@E@Z 999,999,999.99")

depois tenho que converter o campo para numerico



eu preciso transformar esse valor em numérico e simplesmente não consigo, so que estranhamente, valores de 5 digitos funcionam 555,55 mas se tiver 6666,66 e corta depois da virgula

[pena]

consegui fazer, não sei pq, mas passei pra uma variavel que criei antes, ae funcionou

Código: Selecionar todos

local a:=0
a:=STRTTRAN(Form.valor.value,',','.')
MOVNF->TOTAL = val(a)

[JoséQuintas]

Internamente os números sempre são com ponto decimal e não vírgula.
Esse foi o problema.
Quanto à picture @E@Z...... pode usar a picture do zé..... @ZE