
var fieldNumberEsp = 0;
var fieldNumberForm = 0;

function addField(tableId){
	
	var tr;
	var tdNum;
	var input;		
	
	if (tableId == 'tableEsp'){
		
		if (fieldNumberEsp >= 2){
			
			alert('S%E3o permitidas somente 3 entradas.');
			return;
	
		}
		
		fieldNumberEsp++;
	
		document.getElementById("espQtd").value = fieldNumberEsp;
	
		tr = document.getElementById(tableId).insertRow(document.getElementById(tableId).rows.length-1);
		tdNum = tr.insertCell(0);
		var tdField = tr.insertCell(1);
	
		tdNum.appendChild(document.createTextNode((fieldNumberEsp + 1) + '.'));
		
		input = document.createElement('INPUT');
	 	input.setAttribute('type','text');
	 	input.setAttribute('name','esp_' + fieldNumberEsp);
	    input.setAttribute('id','esp_' + fieldNumberEsp);
	    input.setAttribute('class','form_admin');
	    	
		tdField.appendChild(input);

	} else if (tableId == 'tableForm'){
		
		
		fieldNumberForm++;
	
		document.getElementById("formQtd").value = fieldNumberForm;
	
		tr = document.getElementById(tableId).insertRow(document.getElementById(tableId).rows.length-1);
		tdNum = tr.insertCell(0);
		var tdSelect = tr.insertCell(1);
		var tdArea = tr.insertCell(2);
		var tdInst = tr.insertCell(3);
		
		tdNum.appendChild(document.createTextNode((fieldNumberForm + 1) + '.'));
		
		
		var select = document.createElement('SELECT');
		select.setAttribute('name','formation_' + fieldNumberForm);
		select.setAttribute('id','formation_' + fieldNumberForm);
		select.setAttribute('class','form_admin');
		
		var option = document.createElement('OPTION');
		option.setAttribute('value','Bacharelado');
		option.appendChild(document.createTextNode('Bacharelado'));
		select.appendChild(option);
		
		option = document.createElement('OPTION');
		option.setAttribute('value','Mestrado');
		option.appendChild(document.createTextNode('Mestrado'));
		select.appendChild(option);
		
		option = document.createElement('OPTION');
		option.setAttribute('value','Doutorado');
		option.appendChild(document.createTextNode('Doutorado'));
		select.appendChild(option);
		
		option = document.createElement('OPTION');
		option.setAttribute('value','PhD');
		option.appendChild(document.createTextNode('PhD'));
		select.appendChild(option);
		
		tdSelect.appendChild(select);
		
		
		
		input = document.createElement("INPUT");
	 	input.setAttribute('type','text');
	 	input.setAttribute('name','form_area_' + fieldNumberForm);
	    input.setAttribute('id','form_area_' + fieldNumberForm);
	    input.setAttribute('class','form_admin');
	    input.setAttribute('style','width: 100%;');
	
		tdArea.appendChild(input);
		
		input = document.createElement("INPUT");
	 	input.setAttribute('type','text');
	 	input.setAttribute('name','form_inst_' + fieldNumberForm);
	    input.setAttribute('id','form_inst_' + fieldNumberForm);
	    input.setAttribute('class','form_admin');
	    input.setAttribute('style','width: 100%;');
	
		tdInst.appendChild(input);
		
				
		
	}

}

function removeField(tableId){

	if (tableId == 'tableEsp'){
	
		if (fieldNumberEsp > 0){
			
			fieldNumberEsp--;
			
			document.getElementById("espQtd").value = fieldNumberEsp;
			document.getElementById(tableId).deleteRow(document.getElementById(tableId).rows.length-2);
	
		}
	}  else if (tableId == 'tableForm'){
		if (fieldNumberForm > 0){
			
			fieldNumberForm--;
			
			document.getElementById("formQtd").value = fieldNumberForm;
			document.getElementById(tableId).deleteRow(document.getElementById(tableId).rows.length-2);
	
		} 
	}
}

function changeCategory(){
	
	if(document.getElementById("category").value == "Estudante"){
		
		var styleS = document.getElementById("student").style;
		styleS.display = "block";

		
		var styleNS = document.getElementById("notStudent").style;
		styleNS.display = "none";

		var styleF = document.getElementById("foreigner_div").style;
		styleF.display = "none"
		
		document.getElementsByName("foreigner")[0].checked = true;
		document.getElementsByName("foreigner")[1].checked = false;
		
	} else if(document.getElementById("category").value == "Efetivo") {

		var styleS = document.getElementById("student").style;
		styleS.display = "none";

		
		var styleNS = document.getElementById("notStudent").style;
		styleNS.display = "block";
		
		var styleF = document.getElementById("foreigner_div").style;
		styleF.display = "none"
		
		document.getElementsByName("foreigner")[0].checked = true;
		document.getElementsByName("foreigner")[1].checked = false;
		
	} else {
	
		var styleS = document.getElementById("student").style;
		styleS.display = "none";

		
		var styleNS = document.getElementById("notStudent").style;
		styleNS.display = "block";
		
		var styleF = document.getElementById("foreigner_div").style;
		styleF.display = "block"
	
	}
	
	showCPF(false);
}

function showCPF(changeForeigner){
	if (document.getElementsByName("foreigner")[0].checked == true){
		
		document.getElementById("cpf_label").textContent = "CPF:";
		document.getElementById("rg_o").textContent = "*";
		document.getElementById("orgao_o").textContent = "*";
		
		document.getElementById("cpf_label").innerText = "CPF:";
		document.getElementById("rg_o").innerText = "*";
		document.getElementById("orgao_o").innerText = "*";
		
		
		document.getElementById("cpf").value = "";
		document.getElementById("cpf").setAttribute("maxlength","11");
		
		if(changeForeigner){
			document.getElementById("foreigner").value = 0;
		}
	} else {
		document.getElementById("cpf_label").textContent = "Passaporte:";
		document.getElementById("rg_o").textContent = "";
		document.getElementById("orgao_o").textContent = "";
		
		document.getElementById("cpf_label").innerText = "Passaporte:";
		document.getElementById("rg_o").innerText = "";
		document.getElementById("orgao_o").innerText = "";

		
		document.getElementById("cpf").value = "";
		document.getElementById("cpf").setAttribute("maxlength","255");

		if(changeForeigner){
			document.getElementById("foreigner").value = 1;
		}
	}
	
		
	
}

function validateProfile(){

	var answer = '';
	var test = false;
	
	if (document.getElementById('login').value == ''){
		answer += '\tLogin\n';
	}
	
	
	
	if (document.getElementById('user_passwd').value == ''){
		answer += '\tSenha\n';
	} else if (document.getElementById('user_passwd').value.length != 6) {
		answer += '\tA senha deve conter exatamente 6 caracteres\n';
	
	} else if (document.getElementById('user_passwd').value != document.getElementById('cuser_passwd').value){
			answer += '\tA senha e sua confirma��o n�o conferem\n';
	}
	

	if (document.getElementById('name').value == ''){
		answer += '\tNome\n';
	}
	if (document.getElementsByName("foreigner")[0].checked == true){
		if (document.getElementById('cpf').value == ''){
			answer += '\tCPF\n';
		} else if (validaCPF(document.getElementById('cpf')) == false){
				answer += '\tO CPF informado � inv�lido\n';
		}
	} else {
		if (document.getElementById('cpf').value == ''){
			answer += '\tPassaporte\n';
		}
	}
	if (document.getElementsByName("foreigner")[0].checked == true){
		if (document.getElementById('rg').value == ''){
			answer += '\tRG\n';
		}
		
		if (document.getElementById('orgrg').value == ''){
			answer += '\tOrg�o Emissor\n';
		}
	}
	
	
	
	if (document.getElementById('nacionalidade').value == ''){
		answer += '\tNacionalidade\n';
	}
	
	if (document.getElementById('email').value == ''){
		answer += '\tE-mail\n';
	}



	if (document.getElementById('address').value == ''){
		answer += '\tEndere�o\n';
	}
	
	if (document.getElementById('city').value == ''){
		answer += '\tCidade\n';
	}
	
	if (document.getElementById('state').value == '0'){
		answer += '\tEstado\n';
	} else if (document.getElementById('state').value == 'NA'){
		if (document.getElementById('other').value == ''){
			answer += '\tEm caso de outr estado preencher o campo Outro\n';
		}
	}
	
	if (document.getElementById('country').value == '0'){
		answer += '\tPa�s da Institui��o\n';
	}
	
	if (document.getElementById('cep').value == ''){
		answer += '\tCEP\n';
	}



	if (!((document.getElementById('rphone_ddd').value != '' && document.getElementById('rphone').value != '') ||
	   (document.getElementById('cphone_ddd').value != '' && document.getElementById('cphone').value != '') || 
	   (document.getElementById('mphone_ddd').value != '' && document.getElementById('mphone').value != ''))) {
		answer += '\tAo menos um telefone deve ser informado corretamente\n';
	} else if (!((document.getElementById('rphone_ddd').value.length == 2 && document.getElementById('rphone').value.length >= 7) ||
	   (document.getElementById('cphone_ddd').value.length == 2 && document.getElementById('cphone').value.length >= 7) || 
	   (document.getElementById('mphone_ddd').value.length == 2 && document.getElementById('mphone').value.length >= 7))){
		answer += '\tAo menos um telefone deve ser informado corretamente\n';
	}


	if (document.getElementById('iname').value == ''){
		answer += '\tNome da Institui��o\n';
	}
	
	if (document.getElementById('iacronym').value == ''){
		answer += '\tSigla da Institui��o\n';
	}
	
	
	if (document.getElementById('iaddress').value == ''){
		answer += '\tEndere�o da Institui��o\n';
	}
	
	if (document.getElementById('icity').value == ''){
		answer += '\tCidade da Institui��o\n';
	}
	
	if (document.getElementById('istate').value == '0'){
		answer += '\tEstado da Institui��o\n';
	} else if (document.getElementById('istate').value == 'NA'){
		if (document.getElementById('iother').value == ''){
			answer += '\tEm caso de outro estado preencher o campo Outro\n';
		}
	}
	
	if (document.getElementById('icountry').value == '0'){
		answer += '\tPa�s da Institui��o\n';
	}
	
	if (document.getElementById('icep').value == ''){
		answer += '\tCEP da Institui��o\n';
	}
	if (document.getElementById('category').value == "Estudante"){
		
		if (document.getElementById('extra1_2').value == ''){
			answer += '\tPrograma de P�s-Gradua��o\n';
		}
		
		if (document.getElementById('extra2').value == ''){
			answer += '\tOrientador\n';
		}
		
	} else {
		
		
		if (document.getElementById('extra1_1').value == ''){
			answer += '\tV�nculo Institucional\n';
		}
		
	}

	test = false;
	for (var i = 0 ; i < document.getElementById('intQtd').value ; i++){
		
		if (document.getElementById('int_' + i).checked != false){
			test = true;
			break;
		}
		
	}
	
	if (test == false){
		answer += '\tAo menos uma �rea de interesse deve ser selecionada\n';
		
	}



	test = false;
	
	for (i = 0 ; i <= document.getElementById('espQtd').value ; i++){
		
		if (document.getElementById('esp_' + i).value != ''){
			test = true;
			break;
		}
		
	}
	
	if (test == false){
		answer += '\tAo menos uma �rea de especializa��o deve ser preenchida\n';
	}
	
	test = false;
	
	for (i = 0 ; i <= document.getElementById('formQtd').value ; i++){
		
		if (document.getElementById('form_area_' + i).value != '' && document.getElementById('form_inst_' + i).value != ''){
			test = true;
			break;
		}
		
	}
	
	if (test == false){
		answer += '\tAo menos uma forma��o deve ser preenchida\n';
	}
	
	
	
	if (answer == ''){
		document.getElementById('profileFrm').submit();

	} else {
		alert('Os seguintes campos devem ser preenchidos corretamente:\n' + answer);
	}

}

function validateFormation(){
	var answer = '';
	test = false;
	
	for (i = 0 ; i <= document.getElementById('formQtd').value ; i++){
		
		if (document.getElementById('form_area_' + i).value != '' && document.getElementById('form_inst_' + i).value != ''){
			test = true;
			break;
		}
		
	}
	
	if (test == false){
		answer += '\tAo menos uma forma��o deve ser preenchida\n';
	}
	
	if (answer == ''){
		
		document.getElementById('profileFrm').submit();

	} else {
		alert('Os seguintes campos devem ser preenchidos corretamente:\n' + answer);
	}

}

function validateAcount(){
	var answer = '';
	test = false;
	
	if (document.getElementById('type_adm').checked == false && document.getElementById('type_ger').checked == false && document.getElementById('type_soc').checked == false){
		answer += '\tTipo do Usuário\n';
	}
	
	if (document.getElementById('reg_date').value == ''){
		answer += '\nData de Ingresso\n';
	}

	if (answer == ''){
		
		document.getElementById('profileFrm').submit();

	} else {
		alert('Os seguintes campos devem ser preenchidos corretamente:\n' + answer);
	}

}

function validateData(){
	var answer = '';

	if (document.getElementById('name').value == ''){
		answer += '\tNome\n';
	}
	
	if (document.getElementById('foreigner').value == 0){
	
	if (document.getElementById('cpf').value == ''){
		answer += '\tCPF\n';
	} else if (validaCPF(document.getElementById('cpf')) == false){
			answer += '\tO CPF informado � inv�lido\n';
	}
	}
	
	
	if (document.getElementById('rg').value == ''){
		answer += '\tRG\n';
	}
	
	if (document.getElementById('orgrg').value == ''){
		answer += '\tOrg�o Emissor\n';
	}
	
	if (document.getElementById('nacionalidade').value == ''){
		answer += '\tNacionalidade\n';
	}
	
	if (document.getElementById('email').value == ''){
		answer += '\tE-mail\n';
	}
	
	if (answer == ''){
		
		document.getElementById('profileFrm').submit();

	} else {
		alert('Os seguintes campos devem ser preenchidos corretamente:\n' + answer);
	}
	
}

function validateAddress(){
	
	var answer = '';

	if (document.getElementById('address').value == ''){
		answer += '\tEndere�o\n';
	}
	
	if (document.getElementById('city').value == ''){
		answer += '\tCidade\n';
	}
	
	if (document.getElementById('state').value == '0'){
		answer += '\tEstado\n';
	} else if (document.getElementById('state').value == 'NA'){
		if (document.getElementById('other').value == ''){
			answer += '\tEm caso de outr estado preencher o campo Outro\n';
		}
	}
	
	if (document.getElementById('country').value == '0'){
		answer += '\tPa�s da Institui��o\n';
	}
	
	if (document.getElementById('cep').value == ''){
		answer += '\tCEP\n';
	}
	
	if (answer == ''){
	
	document.getElementById('profileFrm').submit();

	} else {
		alert('Os seguintes campos devem ser preenchidos corretamente:\n' + answer);
	}
}

function validatePhones(){
	
	var answer = '';

	if (!((document.getElementById('rphone_ddd').value != '' && document.getElementById('rphone').value != '') ||
		   (document.getElementById('cphone_ddd').value != '' && document.getElementById('cphone').value != '') || 
		   (document.getElementById('mphone_ddd').value != '' && document.getElementById('mphone').value != ''))) {
			answer += '\tAo menos um telefone deve ser informado corretamente\n';
		} else if (!((document.getElementById('rphone_ddd').value.length == 2 && document.getElementById('rphone').value.length >= 7) ||
		   (document.getElementById('cphone_ddd').value.length == 2 && document.getElementById('cphone').value.length >= 7) || 
		   (document.getElementById('mphone_ddd').value.length == 2 && document.getElementById('mphone').value.length >= 7))){
			answer += '\tAo menos um telefone deve ser informado corretamente\n';
		}
	
	if (answer == ''){
	
	document.getElementById('profileFrm').submit();

	} else {
		alert('Os seguintes campos devem ser preenchidos corretamente:\n' + answer);
	}
}

function validateInstitution(category) {
	
	var answer = '';

	if (document.getElementById('iname').value == ''){
		answer += '\tNome da Institui��o\n';
	}
	
	if (document.getElementById('iacronym').value == ''){
		answer += '\tSigla da Institui��o\n';
	}
	
	
	if (document.getElementById('iaddress').value == ''){
		answer += '\tEndere�o da Institui��o\n';
	}
	
	if (document.getElementById('icity').value == ''){
		answer += '\tCidade da Institui��o\n';
	}
	
	if (document.getElementById('istate').value == '0'){
		answer += '\tEstado da Institui��o\n';
	} else if (document.getElementById('istate').value == 'NA'){
		if (document.getElementById('iother').value == ''){
			answer += '\tEm caso de outro estado preencher o campo Outro\n';
		}
	}
	
	if (document.getElementById('icountry').value == '0'){
		answer += '\tPa�s da Institui��o\n';
	}
	
	if (document.getElementById('icep').value == ''){
		answer += '\tCEP da Institui��o\n';
	}
	
	if (category == "Estudante"){
	
		if (document.getElementById('extra1').value == ''){
			answer += '\tPrograma de P�s-Gradua��o\n';
		}
		
		if (document.getElementById('extra2').value == ''){
			answer += '\tOrientador\n';
		}
		
	} else {
		
		
		if (document.getElementById('extra1').value == ''){
			answer += '\tV�nculo Institucional\n';
		}
		
	}
	
	if (answer == ''){
	
		document.getElementById('profileFrm').submit();

	} else {
		alert('Os seguintes campos devem ser preenchidos corretamente:\n' + answer);
	}
}

function validateInterest(){
	
	var answer = '';
	var test = false;
	
	for (var i = 0 ; i < document.getElementById('intQtd').value ; i++){
			
		if (document.getElementById('int_' + i).checked != false){
			test = true;
			break;
		}
		
	}
	
	if (test == false){
		answer += '\tAo menos uma �rea de interesse deve ser selecionada\n';
		
	}
	
	if (answer == ''){
	
		document.getElementById('profileFrm').submit();

	} else {
		alert('Os seguintes campos devem ser preenchidos corretamente:\n' + answer);
	}
}

function validateArea(){
	
	var answer = '';
	var test = false;
	
	for (i = 0 ; i <= document.getElementById('espQtd').value ; i++){
			
		if (document.getElementById('esp_' + i).value != ''){
			test = true;
			break;
		}
		
	}
	
	if (test == false){
		answer += '\tAo menos uma �rea de especializa��o deve ser preenchida\n';
	}
	
	if (answer == ''){
	
		document.getElementById('profileFrm').submit();

	} else {
		alert('Os seguintes campos devem ser preenchidos corretamente:\n' + answer);
	}
}

function checkUserType(){
	
	if (document.getElementById('type_adm').checked != false){
		return true;
	} else if (document.getElementById('type_ger').checked != false){
		return true;
	} else if (document.getElementById('type_soc').checked != false){
		return true;
	} else {
		return false;	
	}
	
}

function validaCPF(field){
 
var i;
 
var cpf = field.value; 

var c = cpf.substr(0,9);
 
var dv = cpf.substr(9,2);
 
var d1 = 0;
 
for (i = 0; i < 9; i++)
 
{
 
d1 += c.charAt(i)*(10-i);
 
}
 
if (d1 == 0){
 

return false;
 
}
 
d1 = 11 - (d1 % 11);
 
if (d1 > 9) d1 = 0;
 
if (dv.charAt(0) != d1)
 
{

return false;
 
}
 
 
d1 *= 2;
 
for (i = 0; i < 9; i++)
 
{
 
d1 += c.charAt(i)*(11-i);
 
}
 
d1 = 11 - (d1 % 11);
 
if (d1 > 9) d1 = 0;
 
if (dv.charAt(1) != d1)
 
{
 
 
return false;
 
}

return true;
 
} 

function changePasswd(){
		
	if (document.getElementById("new_passwd").value == ""){

		alert("A Senha deve conter exatos 6 caracteres.");
		return;
	}
	
			
	if (document.getElementById("current_passwd").value == ""){

		alert("Favor informar a Senha Atual.");

	} else if (document.getElementById("new_passwd").value == ""){

		alert("Favor informar a Senha Nova.");

	} else if (document.getElementById("new_passwd").value != document.getElementById("cnew_passwd").value){
						
		alert("A Nova Senha e sua Confirma�\247\243 n\243o conferem.\nFavor informar a Nova Senha duas vezes corretamente.");

	} else {

		document.getElementById("passwdFrm").submit();

	}

}					
							
function saveFile(){


	if (document.getElementById("file_title").value == ""){

		alert("Favor informar um T\255tulo para o Arquivo.");

	} else {

		document.getElementById("fileForm").submit();

	}

}

function saveProduct(){

	msg = "";

	if (document.getElementById("name_product").value == ""){

		msg = msg+"\n\tNome do Produto";

	}

	if (document.getElementById("type_product").value == ""){

		msg = msg+"\n\tTipo do Produto";

	}
	
	
	if (msg == ""){
		
		document.getElementById("productForm").submit();
		
	} else {

		alert("Os seguintes campos devem ser preenchidos:"+msg);

	}

}

function saveInterest(){

	msg = "";

	if (document.getElementById("desc_interest").value == ""){

		msg = msg+"\n\tDescri��o";

	}
	
	if (msg == ""){
		
		document.getElementById("interestForm").submit();
		
	} else {

		alert("Os seguintes campos devem ser preenchidos:"+msg);

	}

}

function saveBill(){

	msg = "";

	if (document.getElementById("desc_bill").value == ""){

		msg = msg+"\n\tDescricao";

	}

	if (document.getElementById("exp_date_bill").value == ""){

		msg = msg+"\n\tData de Vencimeto";

	}
	
	
	if (msg == ""){
		
		document.getElementById("billForm").submit();
		
	} else {

		alert("Os seguintes campos devem ser preenchidos:"+msg);

	}

}

function checknumeric(field,name)

	{

		if (field.value == ''){
			return;
		}

		var pattern = /^[0-9]*$/;

		if(pattern.test(field.value)==false || field.value <= 0)

		{

			alert("O campo " + name + " deve ser num�rico.");

			field.value = 0;

		}

	}

function checkAlphaNumeric(field,name)

	{
		if (field.value == ''){
			return;
		}

		var pattern = /^[0-9A-Za-z_]*$/;

		if(pattern.test(field.value)==false || field.value <= 0)

		{

			alert("O campo " + name + " deve conter somente letras, n�meros e '_'.");

			field.value = '';

		}

	}	
function checkDate(field,name){	
	
if (field.value != ''){
	
		var date=getDateFromFormat(field.value,'d/M/yyyy');
		if (date==0) {
			alert('O campo ' + name + ' deve ser preenchida no formato \"d/m/aaaa\" como o exemplo: 5/12/1975');
			field.value = '';
		}
	}
}	
function openImage(page,len,hei) {
		var winconfig = "toolbar=no,location=no,directories=no,status=yes,menubar=no,scrollbars=no,resizable=no,width="+len+",height="+hei;
		window.open(page,'imagem',winconfig);
	}
	
	
	
	
// ===================================================================
// Author: Matt Kruse <matt@mattkruse.com>
// WWW: http://www.mattkruse.com/
//
// NOTICE: You may use this code for any purpose, commercial or
// private, without any further permission from the author. You may
// remove this notice from your final code if you wish, however it is
// appreciated by the author if at least my web site address is kept.
//
// You may *NOT* re-distribute this code in any way except through its
// use. That means, you can include it in your product, or your web
// site, or any other form where the code is actually being used. You
// may not put the plain javascript up on your site for download or
// include it in your javascript libraries for download. 
// If you wish to share this code with others, please just point them
// to the URL instead.
// Please DO NOT link directly to my .js files from your site. Copy
// the files to your server and use them there. Thank you.
// ===================================================================

// HISTORY
// ------------------------------------------------------------------
// May 17, 2003: Fixed bug in parseDate() for dates <1970
// March 11, 2003: Added parseDate() function
// March 11, 2003: Added "NNN" formatting option. Doesn't match up
//                 perfectly with SimpleDateFormat formats, but 
//                 backwards-compatability was required.

// ------------------------------------------------------------------
// These functions use the same 'format' strings as the 
// java.text.SimpleDateFormat class, with minor exceptions.
// The format string consists of the following abbreviations:
// 
// Field        | Full Form          | Short Form
// -------------+--------------------+-----------------------
// Year         | yyyy (4 digits)    | yy (2 digits), y (2 or 4 digits)
// Month        | MMM (name or abbr.)| MM (2 digits), M (1 or 2 digits)
//              | NNN (abbr.)        |
// Day of Month | dd (2 digits)      | d (1 or 2 digits)
// Day of Week  | EE (name)          | E (abbr)
// Hour (1-12)  | hh (2 digits)      | h (1 or 2 digits)
// Hour (0-23)  | HH (2 digits)      | H (1 or 2 digits)
// Hour (0-11)  | KK (2 digits)      | K (1 or 2 digits)
// Hour (1-24)  | kk (2 digits)      | k (1 or 2 digits)
// Minute       | mm (2 digits)      | m (1 or 2 digits)
// Second       | ss (2 digits)      | s (1 or 2 digits)
// AM/PM        | a                  |
//
// NOTE THE DIFFERENCE BETWEEN MM and mm! Month=MM, not mm!
// Examples:
//  "MMM d, y" matches: January 01, 2000
//                      Dec 1, 1900
//                      Nov 20, 00
//  "M/d/yy"   matches: 01/20/00
//                      9/2/00
//  "MMM dd, yyyy hh:mm:ssa" matches: "January 01, 2000 12:30:45AM"
// ------------------------------------------------------------------

var MONTH_NAMES=new Array('January','February','March','April','May','June','July','August','September','October','November','December','Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');
var DAY_NAMES=new Array('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday','Sun','Mon','Tue','Wed','Thu','Fri','Sat');
function LZ(x) {return(x<0||x>9?"":"0")+x;}

// ------------------------------------------------------------------
// isDate ( date_string, format_string )
// Returns true if date string matches format of format string and
// is a valid date. Else returns false.
// It is recommended that you trim whitespace around the value before
// passing it to this function, as whitespace is NOT ignored!
// ------------------------------------------------------------------
function isDate(val,format) {
	var date=getDateFromFormat(val,format);
	if (date==0) { return false; }
	return true;
	}

// -------------------------------------------------------------------
// compareDates(date1,date1format,date2,date2format)
//   Compare two date strings to see which is greater.
//   Returns:
//   1 if date1 is greater than date2
//   0 if date2 is greater than date1 of if they are the same
//  -1 if either of the dates is in an invalid format
// -------------------------------------------------------------------
function compareDates(date1,dateformat1,date2,dateformat2) {
	var d1=getDateFromFormat(date1,dateformat1);
	var d2=getDateFromFormat(date2,dateformat2);
	if (d1==0 || d2==0) {
		return -1;
		}
	else if (d1 > d2) {
		return 1;
		}
	return 0;
	}

// ------------------------------------------------------------------
// formatDate (date_object, format)
// Returns a date in the output format specified.
// The format string uses the same abbreviations as in getDateFromFormat()
// ------------------------------------------------------------------
function formatDate(date,format) {
	format=format+"";
	var result="";
	var i_format=0;
	var c="";
	var token="";
	var y=date.getYear()+"";
	var M=date.getMonth()+1;
	var d=date.getDate();
	var E=date.getDay();
	var H=date.getHours();
	var m=date.getMinutes();
	var s=date.getSeconds();
	var yyyy,yy,MMM,MM,dd,hh,h,mm,ss,ampm,HH,KK,K,kk,k;
	// Convert real date parts into formatted versions
	var value=new Object();
	if (y.length < 4) {y=""+(y-0+1900);}
	value["y"]=""+y;
	value["yyyy"]=y;
	value["yy"]=y.substring(2,4);
	value["M"]=M;
	value["MM"]=LZ(M);
	value["MMM"]=MONTH_NAMES[M-1];
	value["NNN"]=MONTH_NAMES[M+11];
	value["d"]=d;
	value["dd"]=LZ(d);
	value["E"]=DAY_NAMES[E+7];
	value["EE"]=DAY_NAMES[E];
	value["H"]=H;
	value["HH"]=LZ(H);
	if (H==0){value["h"]=12;}
	else if (H>12){value["h"]=H-12;}
	else {value["h"]=H;}
	value["hh"]=LZ(value["h"]);
	if (H>11){value["K"]=H-12;} else {value["K"]=H;}
	value["k"]=H+1;
	value["KK"]=LZ(value["K"]);
	value["kk"]=LZ(value["k"]);
	if (H > 11) { value["a"]="PM"; }
	else { value["a"]="AM"; }
	value["m"]=m;
	value["mm"]=LZ(m);
	value["s"]=s;
	value["ss"]=LZ(s);
	while (i_format < format.length) {
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		if (value[token] != null) { result=result + value[token]; }
		else { result=result + token; }
		}
	return result;
	}
	
// ------------------------------------------------------------------
// Utility functions for parsing in getDateFromFormat()
// ------------------------------------------------------------------
function _isInteger(val) {
	var digits="1234567890";
	for (var i=0; i < val.length; i++) {
		if (digits.indexOf(val.charAt(i))==-1) { return false; }
		}
	return true;
	}
function _getInt(str,i,minlength,maxlength) {
	for (var x=maxlength; x>=minlength; x--) {
		var token=str.substring(i,i+x);
		if (token.length < minlength) { return null; }
		if (_isInteger(token)) { return token; }
		}
	return null;
	}
	
// ------------------------------------------------------------------
// getDateFromFormat( date_string , format_string )
//
// This function takes a date string and a format string. It matches
// If the date string matches the format string, it returns the 
// getTime() of the date. If it does not match, it returns 0.
// ------------------------------------------------------------------
function getDateFromFormat(val,format) {
	val=val+"";
	format=format+"";
	var i_val=0;
	var i_format=0;
	var c="";
	var token="";
	var token2="";
	var x,y;
	var now=new Date();
	var year=now.getYear();
	var month=now.getMonth()+1;
	var date=1;
	var hh=now.getHours();
	var mm=now.getMinutes();
	var ss=now.getSeconds();
	var ampm="";
	
	while (i_format < format.length) {
		// Get next token from format string
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		// Extract contents of value based on format token
		if (token=="yyyy" || token=="yy" || token=="y") {
			if (token=="yyyy") { x=4;y=4; }
			if (token=="yy")   { x=2;y=2; }
			if (token=="y")    { x=2;y=4; }
			year=_getInt(val,i_val,x,y);
			if (year==null) { return 0; }
			i_val += year.length;
			if (year.length==2) {
				if (year > 70) { year=1900+(year-0); }
				else { year=2000+(year-0); }
				}
			}
		else if (token=="MMM"||token=="NNN"){
			month=0;
			for (var i=0; i<MONTH_NAMES.length; i++) {
				var month_name=MONTH_NAMES[i];
				if (val.substring(i_val,i_val+month_name.length).toLowerCase()==month_name.toLowerCase()) {
					if (token=="MMM"||(token=="NNN"&&i>11)) {
						month=i+1;
						if (month>12) { month -= 12; }
						i_val += month_name.length;
						break;
						}
					}
				}
			if ((month < 1)||(month>12)){return 0;}
			}
		else if (token=="EE"||token=="E"){
			for ( i=0; i<DAY_NAMES.length; i++) {
				var day_name=DAY_NAMES[i];
				if (val.substring(i_val,i_val+day_name.length).toLowerCase()==day_name.toLowerCase()) {
					i_val += day_name.length;
					break;
					}
				}
			}
		else if (token=="MM"||token=="M") {
			month=_getInt(val,i_val,token.length,2);
			if(month==null||(month<1)||(month>12)){return 0;}
			i_val+=month.length;}
		else if (token=="dd"||token=="d") {
			date=_getInt(val,i_val,token.length,2);
			if(date==null||(date<1)||(date>31)){return 0;}
			i_val+=date.length;}
		else if (token=="hh"||token=="h") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>12)){return 0;}
			i_val+=hh.length;}
		else if (token=="HH"||token=="H") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>23)){return 0;}
			i_val+=hh.length;}
		else if (token=="KK"||token=="K") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>11)){return 0;}
			i_val+=hh.length;}
		else if (token=="kk"||token=="k") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>24)){return 0;}
			i_val+=hh.length;hh--;}
		else if (token=="mm"||token=="m") {
			mm=_getInt(val,i_val,token.length,2);
			if(mm==null||(mm<0)||(mm>59)){return 0;}
			i_val+=mm.length;}
		else if (token=="ss"||token=="s") {
			ss=_getInt(val,i_val,token.length,2);
			if(ss==null||(ss<0)||(ss>59)){return 0;}
			i_val+=ss.length;}
		else if (token=="a") {
			if (val.substring(i_val,i_val+2).toLowerCase()=="am") {ampm="AM";}
			else if (val.substring(i_val,i_val+2).toLowerCase()=="pm") {ampm="PM";}
			else {return 0;}
			i_val+=2;}
		else {
			if (val.substring(i_val,i_val+token.length)!=token) {return 0;}
			else {i_val+=token.length;}
			}
		}
	// If there are any trailing characters left in the value, it doesn't match
	if (i_val != val.length) { return 0; }
	// Is date valid for month?
	if (month==2) {
		// Check for leap year
		if ( ( (year%4==0)&&(year%100 != 0) ) || (year%400==0) ) { // leap year
			if (date > 29){ return 0; }
			}
		else { if (date > 28) { return 0; } }
		}
	if ((month==4)||(month==6)||(month==9)||(month==11)) {
		if (date > 30) { return 0; }
		}
	// Correct hours value
	if (hh<12 && ampm=="PM") { hh=hh-0+12; }
	else if (hh>11 && ampm=="AM") { hh-=12; }
	var newdate=new Date(year,month-1,date,hh,mm,ss);
	return newdate.getTime();
	}

function checkEmail (field) {

/* The following variable tells the rest of the function whether or not
to verify that the address ends in a two-letter country or well-known
TLD.  1 means check it, 0 means don't. */
var emailStr = field.value;

if (emailStr == ''){
	return;
}

var checkTLD=1;

/* The following is the list of known TLDs that an e-mail address must end with. */

var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;

/* The following pattern is used to check if the entered e-mail address
fits the user@domain format.  It also is used to separate the username
from the domain. */

var emailPat=/^(.+)@(.+)$/;

/* The following string represents the pattern for matching all special
characters.  We don't want to allow special characters in the address. 
These characters include ( ) < > @ , ; : \ " . [ ] */

var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";

/* The following string represents the range of characters allowed in a 
username or domainname.  It really states which chars aren't allowed.*/

var validChars="\[^\\s" + specialChars + "\]";

/* The following pattern applies if the "user" is a quoted string (in
which case, there are no rules about which characters are allowed
and which aren't; anything goes).  E.g. "jiminy cricket"@disney.com
is a legal e-mail address. */

var quotedUser="(\"[^\"]*\")";

/* The following pattern applies for domains that are IP addresses,
rather than symbolic names.  E.g. joe@[123.124.233.4] is a legal
e-mail address. NOTE: The square brackets are required. */

var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;

/* The following string represents an atom (basically a series of non-special characters.) */

var atom=validChars + '+';

/* The following string represents one word in the typical username.
For example, in john.doe@somewhere.com, john and doe are words.
Basically, a word is either an atom or quoted string. */

var word="(" + atom + "|" + quotedUser + ")";

// The following pattern describes the structure of the user

var userPat=new RegExp("^" + word + "(\\." + word + ")*$");

/* The following pattern describes the structure of a normal symbolic
domain, as opposed to ipDomainPat, shown above. */

var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");

/* Finally, let's start trying to figure out if the supplied address is valid. */

/* Begin with the coarse pattern to simply break up user@domain into
different pieces that are easy to analyze. */

var matchArray=emailStr.match(emailPat);

if (matchArray==null) {

/* Too many/few @'s or something; basically, this address doesn't
even fit the general mould of a valid e-mail address. */

alert("Endere�o de E-mail inv�lido.");
field.value = '';

}
var user=matchArray[1];
var domain=matchArray[2];

// Start by checking that only basic ASCII characters are in the strings (0-127).

for (i=0; i<user.length; i++) {
if (user.charCodeAt(i)>127) {
alert("Endere�o de E-mail inv�lido.");
field.value = '';
   }
}
for (i=0; i<domain.length; i++) {
if (domain.charCodeAt(i)>127) {
alert("Endere�o de E-mail inv�lido.");
field.value = '';
   }
}

// See if "user" is valid 

if (user.match(userPat)==null) {

// user is not valid

alert("Endere�o de E-mail inv�lido.");
field.value = '';
}

/* if the e-mail address is at an IP address (as opposed to a symbolic
host name) make sure the IP address is valid. */

var IPArray=domain.match(ipDomainPat);
if (IPArray!=null) {

// this is an IP address

for (var i=1;i<=4;i++) {
if (IPArray[i]>255) {
alert("Endere�o de E-mail inv�lido.");
field.value = '';
   }
}

}

// Domain is symbolic name.  Check if it's valid.
 
var atomPat=new RegExp("^" + atom + "$");
var domArr=domain.split(".");
var len=domArr.length;
for (i=0;i<len;i++) {
if (domArr[i].search(atomPat)==-1) {
alert("Endere�o de E-mail inv�lido.");
field.value = '';
   }
}

/* domain name seems valid, but now make sure that it ends in a
known top-level domain (like com, edu, gov) or a two-letter word,
representing country (uk, nl), and that there's a hostname preceding 
the domain or country. */

if (checkTLD && domArr[domArr.length-1].length!=2 && 
domArr[domArr.length-1].search(knownDomsPat)==-1) {
alert("Endere�o de E-mail inv�lido.");
field.value = '';
}

// Make sure there's a host name preceding the domain.

if (len<2) {
alert("Endere�o de E-mail inv�lido.");
field.value = '';
}

}

