//<script language="JavaScript">
H_VER='1.0'

function MM_findObj(n, d) 
{ 
	var p,i,x;  
	if(!d) d=document; 
	if((p=n.indexOf("?"))>0&&parent.frames.length) 
	{
		d=parent.frames[n.substring(p+1)].document; 
		n=n.substring(0,p);
	}
	if(!(x=d[n])&&d.all) x=d.all[n]; 
	
	for (i=0;!x&&i<d.forms.length;i++) 
		x=d.forms[i][n];
	
	for(i=0;!x&&d.layers&&i<d.layers.length;i++) 
		x=MM_findObj(n,d.layers[i].document); 
	return x;
}

function MM_validateForm() 
{ 

	var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
	var nmval1,j;
	var val1, num1;
	var sMsgEmail='';
	var iMsgEmail;
	var sEmail;
	iMsgEmail=0;
	
	
	for (i=0; i<(args.length-2); i+=3) 
	{ 
		
		test=args[i+2];
		val=MM_findObj(args[i]);
	
		if (args[i+1] == "")
			nm = val.name;  
		else
			nm = args[i+1];
	
		if (val) 
		{ 
			//nm = val.name;

			if ((val=val.value)!="") 
			{
				
				if (test.indexOf('isEmail')!=-1) 
				{ 
					p=val.indexOf('@');
					if (p<1 || p==(val.length-1)) 
						errors+='- '+nm+' inválido.\n';
					
					p=val.indexOf('.');
					if (p<1 || p==(val.length-1)) 
						errors+='- '+nm+' inválido.\n';
					
						p=val.indexOf('#');
						if (p!=-1) 
							errors+='- '+nm+' inválido.\n';
						
						p=val.indexOf('"');
						if (p!=-1) 
							errors+='- '+nm+' inválido.\n';
						
						p=val.indexOf('!');
						if (p!=-1) 
							errors+='- '+nm+' inválido.\n';
						
						p=val.indexOf('$');
						if (p!=-1) 
							errors+='- '+nm+' inválido.\n';
						
						p=val.indexOf('()');
						if (p!=-1) 
							errors+='- '+nm+' inválido.\n';
						
						p=val.indexOf('*');
						if (p!=-1) 
							errors+='- '+nm+' inválido.\n';
						

					if (test.indexOf('isEmailC')!=-1) 
					{ 
						sEmail = val.toLowerCase();
						p=sEmail.indexOf('yahoo.com');
						if (p!=-1) 
							iMsgEmail=1;
	
						p=sEmail.indexOf('hotmail.com');
						if (p!=-1) 
							iMsgEmail=1;
	
						p=sEmail.indexOf('ig.com');
						if (p!=-1) 
							iMsgEmail=1;
	
						p=sEmail.indexOf('itelefonica.com');
						if (p!=-1) 
							iMsgEmail=1;
						
						p=sEmail.indexOf('uol.com');
						if (p!=-1) 
							iMsgEmail=1;
							
						p=sEmail.indexOf('bol.com');
						if (p!=-1) 
							iMsgEmail=1;
							
						p=sEmail.indexOf('terra.com');
						if (p!=-1) 
							iMsgEmail=1;
							
						p=sEmail.indexOf('gmail.com');
						if (p!=-1) 
							iMsgEmail=1;	
							
						p=sEmail.indexOf('pop.com');
						if (p!=-1) 
							iMsgEmail=1;
							
						p=sEmail.indexOf('ibest.com');
						if (p!=-1) 
							iMsgEmail=1;
							
						p=sEmail.indexOf('brfree.com');
						if (p!=-1) 
							iMsgEmail=1;
							
						p=sEmail.indexOf('ubbi.com');
						if (p!=-1) 
							iMsgEmail=1;
							
						p=sEmail.indexOf('click21.com');
						if (p!=-1) 
							iMsgEmail=1;
	
					} 

				} 
				else 
					if (test.indexOf('isPwd')!=-1) 
					{ 
						q=test.indexOf('isPwd');
						
						val1=MM_findObj(test.substring(q+5));
						nmval1 = '';
						for (j=0; j<(args.length-2); j+=3)
						{
							if (args[j] == val1.name)
								nmval1 = args[j+1];  
						}
						if (nmval1 == '')
							nmval1 = val1.name;
						
						if (val1.value != val)
							errors+='- '+nm+' e ' + nmval1 + ' devem ser iguais.\n';
					} 
					else 
						if (test!='R') 
						{ 
							val1 = '1' + val;
							num1 = parseFloat(val1);
							num = parseFloat(val);
							if (val1!=''+num1) 
								errors+='- '+nm+' deve conter um número.\n';
							else
							{
								if (test.indexOf('inRange') != -1) 
								{ 
									p=test.indexOf(':');
									q=test.indexOf('inRange');
									min=test.substring(q+7,p); 
									max=test.substring(p+1);
									if (num<min || max<num) 
										errors+='- '+nm+' deve conter um número entre '+min+' e '+max+'.\n';
								}
								if (test.indexOf('L') != -1) 
								{ 
									q=test.indexOf('L');
									min=test.substring(q+1); 
									if (val.length != min)
										errors+='- '+nm+' deve conter um número com '+min+' caracteres.\n';
								}
							} 
						}
					 
			} 
			else 
				if (test.charAt(0) == 'R') 
					//errors += '- '+nm+' é requerido.\n';
					errors += '- '+nm+'\n';  
		}
	} 
	if (errors) 
	{
		alert('Os seguintes campos são obrigatórios:\n'+errors);
		iMsgEmail = 0;
	}
	
	if (iMsgEmail == 1)
	{
		sMsgEmail='O acesso a estes arquivos só será liberado mediante o fornecimento de um email comercial. \nNão são aceitos emails de provedores gratuitos.';	
		alert('ATENÇÃO\n'+sMsgEmail);
	}
		
	if (errors || iMsgEmail==1)
		document.MM_returnValue = false;
	else
		document.MM_returnValue = true;
}