function VerCharNum()
  {
  if ((event.keyCode < 48) || (event.keyCode > 57)) event.returnValue = false;
  }

function ApertaTecla()
  {
  VerCharNum();
  ChecarTAB();
  }

function FocaCampo(quem)
  {
  PararTAB();
  Seleciona(quem);
  }

VerifiqueTAB=true;
function Mostra(quem, tammax)
  {
  var i=0, j=0, indice = -1;

  if ((quem.value.length == tammax) && (VerifiqueTAB))
    {
    for (i=0; i < document.forms.length; i++)
      {
      for (j=0; j < document.forms[i].elements.length; j++)
		{
        if (document.forms[i].elements[j].name == quem.name)
          {
          indice=i;
          break;
          }
		}
	  if (indice != -1)
        break;
      }
    for (i=0; i<=document.forms[indice].elements.length; i++)
      {
      if (document.forms[indice].elements[i].name == quem.name)
        {
        while ((document.forms[indice].elements[(i+1)].type == "hidden") && 
                (i < document.forms[indice].elements.length))
          i++;
        document.forms[indice].elements[(i+1)].focus();
        VerifiqueTAB=false;
        break;
        }
      }
    }
  }

function PararTAB() 
  { 
  VerifiqueTAB=false; 
  } 

function ChecarTAB() 
  { 
  VerifiqueTAB=true; 
  }

function Seleciona(obj)
  {
  obj.select();
  }