Clipper/FiveWin - (URGENTE) SEPARAR DECIMALES CON COMA

 
Vista:

(URGENTE) SEPARAR DECIMALES CON COMA

Publicado por Manuel Romero (6 intervenciones) el 09/06/2008 21:10:39
Lo que necesito es separar los decimales con la coma en vez de hacerlo con el punto, es decir el numero que me arroja es 75,500.00 y lo quiero convertir en 75.500,00

Ese es el ejemplo.

Gracias y Saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:(URGENTE) SEPARAR DECIMALES CON COMA

Publicado por Heztevan (6 intervenciones) el 09/06/2008 21:23:37
TE PUEDE SERVIR EL PICT "999.999.999,99"
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:(URGENTE) SEPARAR DECIMALES CON COMA

Publicado por Manuel Romero (6 intervenciones) el 09/06/2008 22:50:48
No hermano ese no funciona, gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:(URGENTE) SEPARAR DECIMALES CON COMA

Publicado por Juan Carlos Escobar (19 intervenciones) el 10/06/2008 01:36:03
Cree la siguiente funcion

function comas
PARA X1
NUM=transform(X1,"999,999,999.99")
nnum=""
FOR I=1 TO LEN(NUM)
y1=subs(num,i,1)
do case
case y1=","
nnum=nnum+"."
case y1="."
nnum=nnum+","
other
nnum=nnum+y1
endcase
next i
RETU NNUM

y usela asI:

@ --- SAY comas(25000.65)

SALUDOS
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:(URGENTE) SEPARAR DECIMALES CON COMA

Publicado por Antoni Masana (168 intervenciones) el 10/06/2008 07:19:42
Otra forma de hacerlo.

* </> ------------------------------------------------------------------ </>
* </> ---&--- </> Cambiar 9,999,999.99 -> 9.999.999,99 </> ---&--- </>
* </> ------------------------------------------------------------------ </>

FUNCTION Comas(cStr)
c_Str := STRTRAN(cStr, ".", "/") // Cambio 9,999,999.99 --> 9,999,999/99
c_Str := STRTRAN(cStr, ",", ".") // Cambio 9,999,999/99 --> 9.999.999/99
RETURN STRTRAN(cStr, "/", ",") // Cambio 9.999.999/99 --> 9.999.999,99
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:(URGENTE) SEPARAR DECIMALES CON COMA

Publicado por ANTONIO (222 intervenciones) el 10/06/2008 10:35:03
MENOS COMPLICADO ES PONER PICT (@E 999.999,00)
O AL REVES PICT (@E 999,999.00)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:(URGENTE) SEPARAR DECIMALES CON COMA

Publicado por Jose (1 intervención) el 10/06/2008 19:32:49
Menuel:
debes de poner:
Transform(nCantidad, "@E 999,999.99")
es decir tres nueves coma tres nueves punto y dos nueves.
La función picture "@E" te transfoma en formato Europeo, que es "999.999,99"

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:(URGENTE) SEPARAR DECIMALES CON COMA

Publicado por Manuel (6 intervenciones) el 11/06/2008 15:41:00
Ok, gracias hermano, voy a probar.

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar