// Original JavaScript code by Duncan Crombie: dcrombie@chirp.com.au
// Please acknowledge use of this code by including this header.
// Adapted by PixartMultimedia.com (for using less common global names).
// Adapted by VIS.com.pe (encapsulating FN_formatNumber), 2009-08-11 15:32, Omar Ramón.

// CONSTANTS
var FN_strSeparator = "";  // use comma as 000's FN_strSeparator
var FN_strDecPoint = ".";  // use period as decimal point
var FN_strPercent = "%";
var FN_strCurrency = "$";  // use dollar sign for FN_strCurrency

// --------------------------------------------------------------------------------
function formatNumber(pfltValue, pintDecimals, paSep) {
	if(pintDecimals==undefined)
		pintDecimals=2;

	var strMask="############."+str_repeat('0',pintDecimals);
	var strNumber=''+pfltValue;
	var strResult='';
	strNumber=strNumber.replace(/\'/g,'').replace(/ /g,'').replace(/,/g,'');
	strNumber=FN_formatNumber(strNumber,strMask);
	if(strNumber!=null) {
		var intPos=strNumber.indexOf(".");
		if(intPos==-1)
			intPos=strNumber.length;
		strResult=strNumber.substr(intPos);
		var intDigits=0;
		if(paSep==undefined)
			paSep=new Array("'",",");
		var intSep=paSep.length-1;
		var strSep;
		for(var intP=intPos-1;intP>=0;intP--) {
			if(intDigits==3 && strNumber.charAt(intP)!='-') {
				strSep=paSep[intSep--];
				if(intSep<0)
					intSep=paSep.length-1;
				strResult=strSep+strResult;
				intDigits=0;
			}
			strResult=strNumber.charAt(intP)+strResult;
			intDigits++;
		}
	} else
		strResult=pfltValue;
	return strResult;
}
// --------------------------------------------------------------------------------
function formatNumberField(pobj, pintDecimals, paSep) {
	pobj.value=formatNumber(pobj.value, pintDecimals, paSep);
	return pobj;
}
// --------------------------------------------------------------------------------
function FN_formatNumber(number, format, print) {  // use: formatNumber(number, "format")
    if (print) document.write("formatNumber(" + number + ", \"" + format + "\")<br>");

    if (number - 0 != number) return null;  // if number is NaN return null
    var useFN_strSeparator = format.indexOf(FN_strSeparator) != -1;  // use FN_strSeparators in number
    var useFN_strPercent = format.indexOf(FN_strPercent) != -1;  // convert output to FN_strPercentage
    var useFN_strCurrency = format.indexOf(FN_strCurrency) != -1;  // use FN_strCurrency format
    var isNegative = (number < 0);
    number = Math.abs (number);
    if (useFN_strPercent) number *= 100;
    format = FN_strip(format, FN_strSeparator + FN_strPercent + FN_strCurrency);  // remove key characters
    number = "" + number;  // convert number input to string

     // split input value into LHS and RHS using FN_strDecPoint as divider
    var dec = number.indexOf(FN_strDecPoint) != -1;
    var nleftEnd = (dec) ? number.substring(0, number.indexOf(".")) : number;
    var nrightEnd = (dec) ? number.substring(number.indexOf(".") + 1) : "";

     // split format string into LHS and RHS using FN_strDecPoint as divider
    dec = format.indexOf(FN_strDecPoint) != -1;
    var sleftEnd = (dec) ? format.substring(0, format.indexOf(".")) : format;
    var srightEnd = (dec) ? format.substring(format.indexOf(".") + 1) : "";

     // adjust decimal places by cropping or adding zeros to LHS of number
    if (srightEnd.length < nrightEnd.length) {
      var nextChar = nrightEnd.charAt(srightEnd.length) - 0;
      nrightEnd = nrightEnd.substring(0, srightEnd.length);
      if (nextChar >= 5) nrightEnd = "" + ((nrightEnd - 0) + 1);  // round up

 // patch provided by Patti Marcoux 1999/08/06
      while (srightEnd.length > nrightEnd.length) {
        nrightEnd = "0" + nrightEnd;
      }

      if (srightEnd.length < nrightEnd.length) {
        nrightEnd = nrightEnd.substring(1);
        nleftEnd = (nleftEnd - 0) + 1;
      }
    } else {
      for (var i=nrightEnd.length; srightEnd.length > nrightEnd.length; i++) {
        if (srightEnd.charAt(i) == "0") nrightEnd += "0";  // append zero to RHS of number
        else break;
      }
    }

     // adjust leading zeros
    sleftEnd = FN_strip(sleftEnd, "#");  // remove hashes from LHS of format
    while (sleftEnd.length > nleftEnd.length) {
      nleftEnd = "0" + nleftEnd;  // prepend zero to LHS of number
    }

    if (useFN_strSeparator) nleftEnd = FN_separate(nleftEnd, FN_strSeparator);  // add FN_strSeparator
    var output = nleftEnd + ((nrightEnd != "") ? "." + nrightEnd : "");  // combine parts
    output = ((useFN_strCurrency) ? FN_strCurrency : "") + output + ((useFN_strPercent) ? FN_strPercent : "");
    if (isNegative) {
      // patch suggested by Tom Denn 25/4/2001
      output = (useFN_strCurrency) ? "(" + output + ")" : "-" + output;
    }
    return output;
}

function FN_strip(input, chars) {  // FN_strip all characters in 'chars' from input
	var output = "";  // initialise output string
	for (var i=0; i < input.length; i++)
		if (chars.indexOf(input.charAt(i)) == -1)
			output += input.charAt(i);
	return output;
}

function FN_separate(input, FN_strSeparator) {  // format input using 'FN_strSeparator' to mark 000's
	input = "" + input;
	var output = "";  // initialise output string
	for (var i=0; i < input.length; i++) {
		if (i != 0 && (input.length - i) % 3 == 0) output += FN_strSeparator;
		output += input.charAt(i);
	}
	return output;
}