Clarion for DOS 3.1 Release 3.102 - ft02.cla [01/01] 
Author Message
 Clarion for DOS 3.1 Release 3.102 - ft02.cla [01/01]

What can I do?

   a = 10000.62
   b = 1000.42

    c = a - b       (Return C = 0.20000073)

 (a, b, c is declared REAL and I compile im extended mode)

BEGIN -- Cut Here -- cut here
begin 644 ft02.cla





$4DX-"C C C
`
end
END -- Cut Here -- cut here
BEGIN -- Cut Here -- cut here
begin 644 ft02.pr

M9&%T82AS=&%C:U]S:7IE/3XR-#4W-BQT:')E<VAO;&0]/C0P.38I#0HC<')A


M<V4]/F]N*0T*(W!R86=M82!D969I;F4H07)S5F%R:6%B;&4]/F]F9BD-"B-C
M;VUP:6QE(&9T,#(N8VQA#0HC<V5T(&5X<&]R=',])V9T,#(G#0HC;&EN:R!F
%=#`R#0I I
`
end
END -- Cut Here -- cut here



Sat, 08 Jan 2000 03:00:00 GMT  
 Clarion for DOS 3.1 Release 3.102 - ft02.cla [01/01]


Quote:
>What can I do?
>   a = 10000.62
>   b = 1000.42
>    c = a - b       (Return C = 0.20000073)
> (a, b, c is declared REAL and I compile im extended mode)

        You can declare a,b,c as BCD or DECIMAL.
        You can checkout the ROUND() function.
                Good luck!


Mon, 10 Jan 2000 03:00:00 GMT  
 Clarion for DOS 3.1 Release 3.102 - ft02.cla [01/01]

Hello!

Quote:

> Date: Thu, 24 Jul 1997 00:42:15 GMT
>>What can I do?
>>   a = 10000.62
>>   b = 1000.42
>>    c = a - b       (Return C = 0.20000073)
>> (a, b, c is declared REAL and I compile im extended mode)

> You can declare a,b,c as BCD or DECIMAL.
> You can checkout the ROUND() function.

Just one word about BCD in CFD. Test:

V     DECIMAL(10,3)

  V = 0.005
  TYPE (V)

Alexey Solovjev





Mon, 10 Jan 2000 03:00:00 GMT  
 Clarion for DOS 3.1 Release 3.102 - ft02.cla [01/01]

Use decimals instead of reals


Quote:
>What can I do?

>   a = 10000.62
>   b = 1000.42

>    c = a - b       (Return C = 0.20000073)

> (a, b, c is declared REAL and I compile im extended mode)

Geoff Bomford
ComForMark
Computer services For Marketing
Sydney,  Australia


Mon, 10 Jan 2000 03:00:00 GMT  
 
 [ 4 post ] 

 Relevant Pages 

1. WANTED: smalltalk contract prgrmr, 6 months, Toronto, Ontario - contprm [01/01]

2. date 01 01 00

3. Saving Reports to Disk - tfn.clw [01/01]

4. Real Classes in Clipper, -prolonged- with English explanation - clpcls.zip [01/01]

5. Real Classes in Clipper, -prolonged- Explanation/Samples - clpcls.zip [01/01]

6. Invisible entering - secure.prg [01/01]

7. test - topless.gif [01/01]

8. Coroutines for Oberon [01/01] (long)

9. Test for attach - test.gif [01/01]

10. REXX and RxSOCK socket programming - goserv.txt [01/01]

11. $$QUICK MONEY$$ - money.txt [01/01]

 

 
Powered by phpBB® Forum Software