CFLib.org – Common Function Library Project

Description:
Works like the built-in function lsCurrencyFormat, but do it right for Brazilian Currency (R$ - Real).

Return Values:
Returns a string.

Example:

<cfoutput>
BRCurrencyFormat(12345.678) = #BRCurrencyFormat(12345.678)#<br>
BRCurrencyFormat(-12345.678) = #BRCurrencyFormat(-12345.678)#<br>
</cfoutput>

Parameters:

Full UDF Source:

/**
 * Works like the built-in function lsCurrencyFormat, but do it right for Brazilian Currency (R$ - Real).
 * 
 * @param valor      Number to be formatted. (Required)
 * @return Returns a string. 
 * @author Fernando Segalla (segalla@intralab.com.br) 
 * @version 1, November 1, 2002 
 */
function BRCurrencyFormat(valor) {
    valor = DecimalFormat(valor);
    valor = Replace(valor,',','.','ALL');
    valor = Reverse(Replace(Reverse(valor),'.',',','ONE'));
    if(valor LT 0) return "(R$" & Right(valor,Len(valor)-1) & ")";
    else return "R$" & valor;
}