<!--
function vDate(o,fmt,nulo,msgerro)
{
	var tdia;
	var tmes;
	var tano;
	tano=0;
	tdata=o.value;
	tbarra='';
	if (tdata.indexOf('/')>0) tbarra='/';
	if (tdata.indexOf('-')>0) tbarra='-';
	if ((nulo) && (tdata==''))
	{
		tdata='';
	} else if (!(nulo) && (tdata==''))
	{
		var agora = new Date();
		var mNome = agora.getMonth() + 1;
		var dNome = agora.getDay() + 1;
		var NrDia = agora.getDate();
		var NrAno=agora.getYear();
		if(NrAno > 2000) 
			tano = 2000- NrAno;
		else 
			tano = NrAno;
		if (tano>100) tano=tano-100;
	 	if (mNome<10) mNome="0"+mNome;
	 	if (NrDia<10) NrDia="0"+NrDia;
	 	if (tano<10) tano="0"+tano;
		o.value=NrDia + "-" + mNome + "-" + tano;	
	} else
	{
		if (tbarra!='')
		{
			fmt=new String(fmt);
			fmts = fmt.split(tbarra);
			tflds = tdata.split(tbarra);
			tdia=-1;
			tmes=-1;
			tano=-1;
			thoje=new Date();
			fmtano='yy';
			for (a=0; a<fmts.length; a++)
			{
				lfmt=new String(fmts[a]);
				if (lfmt.indexOf('y')>-1) fmtano=lfmt;
			}
			for (a=0; a<tflds.length; a++)
			{
				lfmt=new String(fmts[a]);
				if (lfmt.indexOf('d')>-1) tdia=tflds[a];
				if (lfmt.indexOf('m')>-1) tmes=tflds[a];
				if (lfmt.indexOf('y')>-1)
				{
					if (tflds[a]=='')
					{
						tano=-1;
						tbarra='';
					}
					else
						tano=parseInt(tflds[a]);
				}
			}
			if (tano==-1)
			{
				tano=thoje.getYear();
				if (tano<999)
					tano=1900+tano;
				if (fmtano=='yy')
				{
					tano=new String(tano-2000);
					if (tano-2000<10)
						tdata=tdata.concat(tbarra,'0',tano);
					else
						tdata=tdata.concat(tbarra,tano);
				} else
					tdata=tdata.concat(tbarra,tano);
			}
			if (tano<999)
			{
				tano=(2000+tano);
			}
			tsituacao = "true";
			// verifica o tdia valido para cada tmes
			if ((tdia < 1)||(tdia < 1 || tdia > 30) && (  tmes == 4 || tmes == 6 || tmes == 9 || tmes == 11 ) || tdia > 31) {
				tsituacao = "falsa";
			}
			// verifica se o tmes e valido
			if (tmes < 01 || tmes > 12 ) {
				tsituacao = "falsa";
			}
			// verifica se e tano bissexto
			if (tmes == 2 && ( tdia < 1 || tdia > 29 || ( tdia > 28 && (parseInt(tano / 4) != tano / 4)))) {
				tsituacao = "falsa";
			}
			if (tdata== "") {
				tsituacao = "falsa";
			}
			if (tsituacao == "falsa") {
//				alert(msgerro+' '+o.value+' ('+fmt+')');
//				o.focus();
			} else
			{
				o.value=tdata;
			}
		} else
		{
			if (fmt.indexOf('/')>0) tbarra='/';
			if (fmt.indexOf('-')>0) tbarra='-';
			fmt=new String(fmt);
			fmts = fmt.split(tbarra);
			i=parseFloat(tdata);
			if(i>=10100)
			{
				s=i.toString();
				if (i>99999)
				{
					d1=s.substr(0,2);
					d2=s.substr(2,2);
					d3=s.substr(4,2);
				} else
				{
					d1=s.substr(0,1);
					d2=s.substr(1,2);
					d3=s.substr(3,2);
				}
				if (fmts[0].indexOf('d')>-1) tdia=parseFloat(d1);
				if (fmts[0].indexOf('m')>-1) tmes=parseFloat(d1);
				if (fmts[1].indexOf('d')>-1) tdia=parseFloat(d2);
				if (fmts[1].indexOf('m')>-1) tmes=parseFloat(d2);
				tano=100+parseFloat(d3);
			}
			else if(i>=101)
			{
				tdata=new Date();
				tano=tdata.getYear();
				s=i.toString();
				if (i>999)
				{
					d1=s.substr(0,2);
					d2=s.substr(2,2);
				} else
				{
					d1=s.substr(0,1);
					d2=s.substr(1,2);
				}
				if (fmts[0].indexOf('d')>-1) tdia=parseFloat(d1);
				if (fmts[0].indexOf('m')>-1) tmes=parseFloat(d1);
				if (fmts[1].indexOf('d')>-1) tdia=parseFloat(d2);
				if (fmts[1].indexOf('m')>-1) tmes=parseFloat(d2);
			}
			else if(i>0)
			{
				tdata=new Date();
				tdia=i;
				tano=tdata.getYear();
				tmes=tdata.getMonth()+1;
				//t=tdia+tbarra+tmes+tbarra+ano;
			}
			if (tano<1900)
				tano=tano-100;
			else
				tano=tano-2000;
			if (tano<10)
				tano='0'+tano;
			if (tmes<10)
				tmes='0'+tmes;
			if (tdia<10)
				tdia='0'+tdia;
			t='';
			//alert('tdia: '+ tdia+' tmes: '+tmes+' Ano: '+ano);
			for (a=0; a<fmts.length; a++)
			{
				lfmt=new String(fmts[a]);
				if (lfmt.indexOf('d')>-1) t=t+tdia+tbarra;
				if (lfmt.indexOf('m')>-1) t=t+tmes+tbarra;
				if (lfmt.indexOf('y')>-1)
				{
					if (lfmt=='yy')
						t=t+tano+tbarra;
					else
						if (tano>60)
							t=t+'19'+tano+tbarra;
						else
							t=t+'20'+tano+tbarra;
				}
			}
			t=t.substr(0,t.length-1);
			o.value=t;
		}
	}
}
// Funcao para s� deixar o usu�rio digitar n�meros
function gDateTimeKeyCheck(campo, event, fmt)
{
	var BACKSPACE=8;
	var TAB=0;
	var key;
	var tecla;
	var strValidos = "0123456789: " ;
	CheckTAB=false;
	if(navigator.appName.indexOf("Netscape")!= -1)
	  tecla= event.which;
	else
	  tecla= event.keyCode;
	key = String.fromCharCode( tecla);
	if ( tecla == 13 )
		return false;
	if ( tecla == BACKSPACE )
		return true;
	if ( tecla == TAB)
		return true;
	//alert( 'key: ' + tecla + '  -> tecla: ' + tecla);
	fmt=new String(fmt);
	tbarra='/';
	if (fmt.indexOf('-')>0) tbarra='-';
	strValidos=strValidos+tbarra;
	return ( gIsValidKey(key,strValidos));
}
// Funcao para testar se o campo do formul�rio � uma Data e aceita nulo
function gDateTimeVerify(ob,fmt,nulo,msgerro)
{
	t=ob.value;
	xcnt=0;
	hora='';
	//ob.value='Teste';
	for (i=0; i<t.length; i++)
	{
		c = t.substring(i,i+1);
		if (c == ' ')
		{
			xcnt=i;
			break;
		}
	}
	if (xcnt>0)
	{
		hora=t.substring(cnt,t.length);
	}
	gDateVerify(ob,fmt,nulo,msgerro);
	t=ob.value;
	if (xcnt>0)
		ob.value=ob.value+hora;
	else
	{
		tdata=new Date();
		hor=tdata.getHours();
		min=tdata.getMinutes();
		seg=tdata.getSeconds();
		if (hor<10) hor='0'+hor;
		if (min<10) min='0'+min;
		if (seg<10) seg='0'+seg;
		tagora=hor+':'+min+':'+seg;
		ob.value=ob.value+' '+tagora;
	}
}

function vTime(campo)
{
	valor = campo.value;
	if (valor.length >= 5)
	{
		for (i = 1 ; i <= valor.length ; i++)
		{
			c = valor.substring(i-1,i);
			if (((c >= 0) == false) && (c != ":"))
			{
				alert("Hora Inválida");
				campo.select();
				break;
			}
		}
	}
	else if (valor.length==1)
	{
		campo.value="0"+valor+":00";
	} else if (valor.length==2)
	{
		campo.value=valor+":00";
	} else if (valor.length==3)
	{
		campo.value="0"+valor.substring(0,1)+":"+valor.substring(1,3);
	} else if (valor.length==4)
	{
		campo.value=valor.substring(0,2)+":"+valor.substring(2,4);
	} else if (valor.length>0)
	{
		
	 	alert("Hora Inválida");
	 	campo.select();
	 	return;
 	}
}
// Funcao para testar se o campo do formul�rio � um e-mail
function vEmail(campo)
{
	valor = campo.value;
	arr = false;
	ponto=0;
	if (valor.length >= 7)
	{
		for (i = 1 ; i <= valor.length ; i++)
		{
			c = valor.substring(i-1,i);
			if (c == "@")
			{
					arr=true;
			}
			if (c == ".") 	{
				ponto=ponto+1;
			}
		}
	}	else {
	 	alert("E-mail inválido");
	 	campo.select();
	 	return;
 	}
 	if ((arr == false) || (ponto==0))
 	{
 	  alert("E-mail inválido");
	 	campo.select();
	 	return;
 	}
}

function vUFText(o)
{
	t=o.value;
	o.value=t.substr(0,1).toUpperCase()+t.substr(1,200);
}

function vNCM( obj ){
	v = obj.value;
	if(typeof(v) != "undefined"){
		var max = 8;
		v = v.replace(".","");
		v = v.replace(".","");
		v = v.substring (0,max);
		if (v.length>6)
			v=v.substr(0,4)+"."+v.substr(4,2)+"."+v.substr(6,2);
		else if (v.length>4)
			v=v.substr(0,4)+"."+v.substr(4,2);
		obj.value = v;
	}
	return true;
}

function vUFWText(o)
{
	var sai='';
	t=o.value;
	mai=1;
	for (a=0; a<t.length; a++)
	{
		if (mai==1)
		{
			if ((a<t.length-3) && (a>0))
			{
				if ((t.substr(a-1,4).toLowerCase()==' de ') || (t.substr(a-1,4).toLowerCase()==' da ') || (t.substr(a-1,4).toLowerCase()==' do ')|| (t.substr(a-1,5).toLowerCase()==' das ')|| (t.substr(a-1,5).toLowerCase()==' dos ') || (t.substr(a-1,3).toLowerCase()==' a ')  || (t.substr(a-1,3).toLowerCase()==' e ')  || (t.substr(a-1,3).toLowerCase()==' o ') )
					sai=sai+t.substr(a,1).toLowerCase();
				else
					sai=sai+t.substr(a,1).toUpperCase();
			} 
			else
				sai=sai+t.substr(a,1).toUpperCase();
		}
		else
			sai=sai+t.substr(a,1).toLowerCase();
		mai=0;
		if ((t.substr(a,1)==' ') || (t.substr(a,1)=='-') || (t.substr(a,1)==';') || (t.substr(a,1)==',') || (t.substr(a,1)=='.') || (t.substr(a,1)=='_') || (t.substr(a,1)=='/')) 
			mai=1;
	}
	o.value=sai;
}

//-->