FiveTech Software tech support forums

Amigo Carlos: Algo más simple    ? "PZ" + StrZero(12500.10,12,2)  Donde: 12500.10 es el valor y 12,2 determina los enteros y decimales Saludos Gracias Armando, Pero no es eso. Lo que persigo es que con un TransForm() (o algo parecido) pueda generar una respuesta de este tipo: ...

Amigo Carlos:

Algo más simple

Code: Select all  Expand view  RUN

   ? "PZ" + StrZero(12500.10,12,2)
 

Donde: 12500.10 es el valor y 12,2 determina los enteros y decimales

Saludos

... Dejo la imagen: http://www.datanet.space/fw/picture.jpg Como pueden ver, solo coloca un decimal, siendo que el picture indica dos decimales y en las filas del browse se ve con los 2 decimales. El fallo en el footers. Lo unico diferente que estoy haciendo es colocando el xBrowse ...

... tengo registros que al principio tienen 10 campos alfanuméricos y al final del mismo registro hay doce campos (uno por mes) de tipo decimal con 0 decimales y finalmente hay 12 campos (uno por mes) de tipo decimal pero con 2 decimales. La pregunta: Existe alguna función que mueva los 24 campos ...

Jorge:

Tírale un ojo a este post, mira todo el hilo

viewtopic.php?f=6&t=44201

Saludos

MI estimado, prueba esto. //---------------------------------------------------------------------------------------------Function NoDec(cVar, nLen)local nVar, nDec, nTmpDEFAULT nLen := 12IF VALTYPE(cVar) = "N"  nTmp := STR(cVar,12,3) Else  nTmp := cVa...

Hola gente, existe alguna 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 ...

José:

Creo que esto puede funcionar

FUNCTION Redondear(nValor)
IF nValor % 10 <= 5
nValor := nValor - (nValor % 10)
ELSE
nValor := nValor + (10 - nValor % 10)
ENDIF
RETURN(nValor)

Pruébalo, los hice de salida y asumo que en valor no hay fracciones decimales

Saludos

hola.
cuando defino un procedimiento que va a devolver (OUT) un valor de siete cifras con dos decimales, lo defino como DOUBLE? o FLOAT?

gracias.

... He subido el xbrowse.prg para su revision https://www.transfernow.net/dl/20231105orw9nLuV Mr. rao he formateado el picture para que aparezca dos decimales en la col pero aparece 0 nada mas, porque?

Creo es por que en los números los decimales podrían ser

15.25000001 == 15.2500012 //falso

Es al revés, para mostrar punto como separador de miles y coma de decimales:
@ nRow,nCol GET nValor PICTURE "@E 999,999.99"

... el fin de evitar problemas con el cambio cuando pagan en efectivo. E intentando con la función round(), pero esta parece que aplica solo para los decimales. Ejemplo: Total a pagar $1.257 Debe quedar $1.200 Total a pagar $5.856 Debe quedar $5.800 De antemano gracias

Gracias por tu interés, pero el truco era coger de la celda la propiedad :text y no :value Lo incomodo es que :text podria contener coma decimal o punto decimal, dependiendo del formato de la celda. Y averiguar eso podria ser una locura. Asi que hice dos cosas: 1º Asumir que todo lleva coma decimal ...

... para que hacienda este contenta, he de reflejar en la factura el precio SIN IVA. Divido 15 por 1.04 y da 14.42307692 que he de redondear a 2 decimales e imprimir 14.42. En el ejemplo anterior, hay otro artículo que vale lo mismo. Hago la misma operación y tengo dos líneas a 14.42 sin IVA ...