Hi all,

I have this code to increment a field,

lnNumDoc=0
select seriedocum
set order to chave1
seek .Txc_TipoDoc.value+.Txc_Armaz.value+.Txc_Serie.value
lnNumDoc=val(c_numerador)
lnNumDoc=lnNumDoc+1
lcTextBox=PADL(lnNumDoc,fsize('c_numerador'),'0')
replace c_numerador with lcTextBox

c_numerador = character, at this moment have '000001'

when i do this code c_numerador=002.00, whow can i turn around the default decimals?

without set decimals to 0 and then to 2.

Thank's in advance

Joao Batista