function abreJanela (strPg, larg, alt, param)
{
	window.open(strPg, 'Pg', 'scrollbars=no,width=' + larg + ',height=' + alt + param, '');
}

function abreJanelaScroll (strPg, larg, alt, scrollbars)
{
	window.open(strPg, 'Pg', 'scrollbars=' + scrollbars + ',width=' + larg + ',height=' + alt);
}

function checaEmail (tBox)
{
	var s = String(tBox.value);
	var l = parseInt(s.length);
	var i, j;
	for (i = 0; i < l ; i++) {
		if (s.charAt(i) == '@' && i > 0) {
			for (j = i; j < l ; j++) {
				if (s.charAt(j) == '.' && (l > j+2) && j!= i+1 && j!= i+2) {
					return(true);
				}
			}
		}
	}
	alert ('E-mail inválido');
	return (false);
}

function validaDatas (frm)
{
	var blnReturn;
	var i;
	var el;

	for (i = 0; i < frm.elements.length; i++)
	{
		el = frm.elements[i];
		elNome = el.name;
		elValor = el.value;

		if (elNome.indexOf('Dia') > 0)
		{
			if (elValor.length == 1)
				elValor = '0' + elValor;
			frm.elements[i].value = elValor;
			if (elValor > 31 || elValor < 1)
			{
				alert ('Dia inválido');
				return (false);
			}
		}
		if (elNome.indexOf('Mes') > 0 )
		{
			if (elValor.length == 1)
				elValor = '0' + elValor;

			frm.elements[i].value = elValor;
			if (elValor > 12 || elValor < 1)
			{
				alert ('Mês inválido');
				return (false);
			}
		}
		if (elNome.indexOf('Ano') > 0)
		{
			if (elValor.length == 1)
				elValor = '200' + elValor;
			if (elValor.length == 2)
			{
				if (elValor > 50)
					elValor = '19' + elValor;
				else
					elValor = '20' + elValor;
			}
			if (elValor.length == 3)
				elValor = '1' + elValor;
			frm.elements[i].value = elValor;
			if (elValor > 3000 || elValor < 1900)
			{
				alert ('Ano inválido');
				return (false);
			}
		}
	}
	return (true);
}