Hola, buen dÃa
Estoy usando FWH64 Dic 2016, Harbour 3.2.0Dev(r1603181642) y Bcc 7.1
La siguiente división 223.2/.8 me devuelve asteriscos al momento de mostrar el resultado en pantalla o enviar a imprimir.
El registro en la tabla lo hace correctamente.
Lo resolvà usando la función Round() a dos decimales.
A alguien más le ha sucedido alguna situación parecida ?
Saludos
Estimado Victhor
¿Como estás mostrando el resultado en la pantalla? El problema no tiene pinta de ser del cociente propiamente dicho, sino del formateo del número al pasarse a caracteres.
¿Puedes reproducir el error en un ejemplo reducido?
Un saludo
#include "FiveWin.ch"
static oWnd
//----------------------------------------------------------------//
function Main()
local oBar
DEFINE WINDOW oWnd TITLE "3D Division"
DEFINE BUTTONBAR oBar _3D OF oWnd
DEFINE BUTTON OF oBar ACTION DIVISION()
SET MESSAGE OF oWnd TO "3D Division" NOINSET CLOCK DATE KEYBOARD
ACTIVATE WINDOW oWnd
return nil
function DIVISION()
LOCAL nValor := 0.00
LOCAL nDivision := 0.00
LOCAL nResultado := 0.00
nValor := 223.20
nDivision := 000.80
nResultado := ( nValor ) / ( .8 ) / 100 // 279.00 o 2.79 ?
? nResultado
// ? Round( nResultado, 2 )
return nil