FiveTech Software tech support forums

... manera sencilla de sacar los decimales, hoy en Argentina no tienen sentido los decimales en un sistema de facturación. Probé: SET FIXED ON SET DECIMALS TO 0 sin resultado, para no modificar todo el sistema, aunque en todos lados aparezcan los decimales pero que estén en cero

... you mean something like this? https://mybergland.com/fwforum/gettest.gif No, you not understood the values are numeric ( 6 digit , 2 decimals) 1. at init see only a zero "0" at Right, so I not must see 0.00 2. when digit 12345 the get must transform to 123,45, not with dot ...

Here i see 0.00 on the tget
But i asked another question
On the get the user must see nothing , the tget must be empty and the user can digit a number until two decimals

I found the cause of more than 2 decimals in the footer sum.. My column value was computed by multiplying a numeric value by a val( alltrim( cValue ) ) . The xBrowse column was showing correct values with 2 decimals according to the column ...

... ||{ CLR_MAGENTA, } }      :MakeTotals()   END  Result: https://www.hamelau.eu/tmp/footer.jpg There are 4 decimals instead of only 2 and a decimal dot instead of comma. What can i do to display the sums according the picture clause? Regards, Detlef

SET DECIMALS, Exp(), Log(), Sqrt(), Val(), Set()

Code: Select all  Expand view

   SET DECIMAL TO 5
    ? Sqrt( 632512.62541 )
    ? Sqrt( 845414111.91440 )
 

Saludos.

Miguel,

Please provide us a Comp-3 (Packed Decimals) file example to analyze it

Puedes proporcionar un fichero de ejemplo empaquetado con Comp-3 (Packed Decimals) ?

Hello everyone ... so long ... trying to get back in the ring. I hope you all are okay. I need help reading packed fields (Comp-3 (Packed Decimals)) in a text file coming from a mainframe. I have tried full-featured in Harbor and FiveWin and to no avail. Could someone guide me how to achieve ...

Hola a todos... tanto tiempo...tratando de volver al ruedo. Espero que estén muy bien. Necesito ayuda para leer campos empaquetados (Comp-3 (Packed Decimals)) en un archivo de texto proveniente de un mainframe. He probado con todas las funciones en Harbour y FiveWin y sin ningún resultado. Alguien ...

... Digits between five to nine (inclusive) are rounded up. Digits below five are rounded down. The display of the return value does not obey the DECIMALS setting unless SET FIXED is ON. With SET FIXED OFF, the display of the return value contains as many decimal digits as you specify for <nDecimals>, ...

... values from a database to a text file for export use. Normaly a use str() to convert the value. The problem is that if the field is define with 5 Decimals, and the value is 4.204, the export is 4.20400. Then I can use something like str(10,3). Is there a easy way to know the amount of decimals ...

Prueba a usar: SET EXACT ON y SET DECIMALS TO ... también Y para salir de dudas: x := AScan( ::aTree, { | a | MsgInfo( a[ 5 ], oItem:cargo[ "hitem" ] ), .F. } ) asegurate visualmente que tienes los datos que crees tener :-) https://drive.google.com/file/d/14baPwYLoK8De8CmGWw-z7Li4LzehZcfX/view?usp=sharing

Prueba a usar:

SET EXACT ON
y SET DECIMALS TO ... también

Y para salir de dudas:

x := AScan( ::aTree, { | a | MsgInfo( a[ 5 ], oItem:cargo[ "hitem" ] ), .F. } )

asegurate visualmente que tienes los datos que crees tener

... ¿cómo están? César, yo tampoco lo sabia, me costó 3 dias averiguarlo, :lol: Cristóbal, si, por supuesto, tengo en el main.prg Set Fixed On Set Decimals to 8 Hice todas las pruebas que pude, ya que pensaba que era problema de la tDolhin que no me regresaba los valores correctos. Cuando se me ...