function vvalBR(wobjeto,wparam)
{
     var wvalor = wobjeto.value;
     var wnewvalor = "";
     var wletra = "";
     var wqtddec = parseInt(wparam.substring(0,1));
     var wnegativo = wparam.indexOf("-");

     if (isNaN(wqtddec))
     {
          wqtddec = 1
     }
     else
     {
          wqtddec = wqtddec - 1     
     }
     
     for (x = 0; x <= wvalor.length ; x++)
     {
          wletra = wvalor.substring(x, x + 1);
          if (!isNaN(parseFloat(wletra)))
          {
               wnewvalor = wnewvalor + wletra;
          }

          if (wletra == "." | wletra == ",")
          {
               wnewvalor = wnewvalor + ",";
          }
     }
     
     if (wnegativo >= 0 && wvalor.substring(0,1) == "-")
     {
          wnewvalor = "-" + wnewvalor
     }
     
     wvalor = wnewvalor;
     wnewvalor = "";
     var wpos = wvalor.indexOf(",");
     var wtam = wvalor.length;
     if (wpos < 0)
     {
          wpos = wtam;
     }
     
     var wint = "";
     var wdec = "";
     wint = wvalor.substring(0, wpos);
     wdec = wvalor.substring(wpos + 1, wtam );
     wdec = wdec + "000000000";
     wnewvalor = "";
     
     for (x = 0; x <= wqtddec; x++)
     {
          wletra = wdec.substring(x,x + 1);
          if (!isNaN(parseFloat(wletra)))
          {
               wnewvalor = wnewvalor + wletra;
          }
          else
          {
               wqtddec++
          }
     }

     wdec = wnewvalor;
     if (wint.length <=0 )
     {
          wint = "0"
     }
     if (wqtddec >= 0)
     {
          wvalor = wint + "," + wdec;
     }
     else
     {
          wvalor = wint;
     }

     wobjeto.value = wvalor;
}