Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Amarração Horizontal UNIBANCO
Message
From
05/12/2003 15:03:32
 
 
To
05/12/2003 07:24:27
General information
Forum:
Visual FoxPro
Category:
Troubleshooting
Miscellaneous
Thread ID:
00855924
Message ID:
00856419
Views:
22
>Se puder fazer colocar eu agradeço.
>
Oi Sergio;

Encontrei a solução.. Meio cheio de remendo mas é uma solução..

Com a ajuda do Hilmar (autor de uma classe) que permite calculos com numeros grandes..

Na area de download #10044 baixe a classe e faça:
* programa exemplo
set classlib to Math
oMath           = CreateObject("cMath")
oMath.nDecimals = 30
wn1             = "040909750000200257"
wn2             = "6"
wn3             = "2430"
wn4             = oMath.add(wn1, wn2)
? wn1, "+", wn2, "=", wn4
? wn3, "*", wn4, "=", oMath.Multiply(wn3, wn4)
Funcionou perfeitamente por aqui..
"Now to him who is able to do immeasurably more than all we ask or imagine, according to his power that is at work within us, Ephesians 3:20
Previous
Reply
Map
View

Click here to load this message in the networking platform