// JavaScript Document
// retira caracteres invalidos da string
function Limpar(valor, validos) {

var result = "";
var aux;
for (var i=0; i < valor.length; i++) {
aux = validos.indexOf(valor.substring(i, i+1));
if (aux>=0) {
result += aux;
}
}
return result;
}


// valida cnpj
function valida_cnpj(cnpj)
      {
      var numeros, digitos, soma, i, resultado, pos, tamanho, digitos_iguais;
      digitos_iguais = 1;
      if (cnpj.length < 14 && cnpj.length < 15)
            return false;
      for (i = 0; i < cnpj.length - 1; i++)
            if (cnpj.charAt(i) != cnpj.charAt(i + 1))
                  {
                  digitos_iguais = 0;
                  break;
                  }
      if (!digitos_iguais)
            {
            tamanho = cnpj.length - 2
            numeros = cnpj.substring(0,tamanho);
            digitos = cnpj.substring(tamanho);
            soma = 0;
            pos = tamanho - 7;
            for (i = tamanho; i >= 1; i--)
                  {
                  soma += numeros.charAt(tamanho - i) * pos--;
                  if (pos < 2)
                        pos = 9;
                  }
            resultado = soma % 11 < 2 ? 0 : 11 - soma % 11;
            if (resultado != digitos.charAt(0))
                  return false;
            tamanho = tamanho + 1;
            numeros = cnpj.substring(0,tamanho);
            soma = 0;
            pos = tamanho - 7;
            for (i = tamanho; i >= 1; i--)
                  {
                  soma += numeros.charAt(tamanho - i) * pos--;
                  if (pos < 2)
                        pos = 9;
                  }
            resultado = soma % 11 < 2 ? 0 : 11 - soma % 11;
            if (resultado != digitos.charAt(1))
                  return false;
            return true;
            }
      else
            return false;
      } 

//valida cpf
function valida_cpf(valor)
      {
		 cpf=Limpar(valor.value,"0123456789")
      var numeros, digitos, soma, i, resultado, digitos_iguais;
      digitos_iguais = 1;
      if (cpf.length < 11)
            return false;
      for (i = 0; i < cpf.length - 1; i++)
            if (cpf.charAt(i) != cpf.charAt(i + 1))
                  {
                  digitos_iguais = 0;
                  break;
                  }
      if (!digitos_iguais)
            {
            numeros = cpf.substring(0,9);
            digitos = cpf.substring(9);
            soma = 0;
            for (i = 10; i > 1; i--)
                  soma += numeros.charAt(10 - i) * i;
            resultado = soma % 11 < 2 ? 0 : 11 - soma % 11;
            if (resultado != digitos.charAt(0))
                  return false;
            numeros = cpf.substring(0,10);
            soma = 0;
            for (i = 11; i > 1; i--)
                  soma += numeros.charAt(11 - i) * i;
            resultado = soma % 11 < 2 ? 0 : 11 - soma % 11;
            if (resultado != digitos.charAt(1))
                  return false;
            return true;
            }
      else
            return false;
      }




//conta qtos check box foram selecionados

function contar_check(iCampo){
qtd=0
if (iCampo.length>0){
for (i=0;i<iCampo.length;i++){
	if (iCampo[i].checked==true){qtd=qtd+1;}
}
}
else {
	if (iCampo.checked==true){qtd=qtd+1;}
	}
return(qtd);
}

// marcar ou desmarca todos os checkbox
function todos(iCampo,itodos) {
	
	for (i=0;i<iCampo.length;i++){
		if (itodos.checked==true){
			iCampo[i].checked=true;
		}
		else{
			iCampo[i].checked=false;
		}
	}
	
}


function abre_pop(url,largura,altura,sscroll,nome) {
	if (nome==''){nome='pop'}
	window.open(url, nome, "toolbar=0,location=0,directories=0,status=0,menubar=no,scrollbars="+sscroll+",resizable=no,width="+largura+",height="+altura+",top=0,left=0");
}

//mascara cnpj
function MascaraCNPJ (keypress,campo) {
	 
	caracteres = '01234567890';
	separacoes = 4;
	separacao1 = '.';
	separacao2 = '/';	
	separacao3 = '-';	
	conjuntos = 2;
	conjunto1 = 3;
	conjunto2 = 3;
	conjunto3 = 4;
	conjunto4 = 2;		
	if ((caracteres.search(String.fromCharCode (keypress.keyCode))!=-1) && campo.value.length < (conjuntos + conjunto1 + conjunto2 + conjunto3 + conjunto4 + separacoes)) {
		if (campo.value.length == conjuntos) {
			campo.value = campo.value + separacao1;
		}
		if (campo.value.length == conjuntos + conjunto1 +1) {
			campo.value = campo.value + separacao1;
		}
		if (campo.value.length == conjuntos + conjunto1 + conjunto2 +2) {
			campo.value = campo.value + separacao2;
		}
		if (campo.value.length == conjuntos + conjunto1 + conjunto2 + conjunto3 + 3) {
			campo.value = campo.value + separacao3;
		}
	} else {
		event.returnValue = false;
	}
}


function FormataPreco(fld, milSep, decSep, e) {
	var sep = 0;
	var key = '';
	var i = j = 0;
	var len = len2 = 0;
	var strCheck = '0123456789';
	var aux = aux2 = '';
	var whichCode = (window.Event) ? e.which : e.keyCode;

	if (whichCode == 13) {
		return true;  // Enter
	}
	key = String.fromCharCode(whichCode);  // Get key value from key code
	if (strCheck.indexOf(key) == -1) {
		return false;  // Not a valid key
	}
	len = fld.value.length;
	for(i = 0; i < len; i++) {
		if ((fld.value.charAt(i) != '0') && (fld.value.charAt(i) != decSep)){
			 break;
		}
	}
	
	aux = '';
	for(; i < len; i++) {
		if (strCheck.indexOf(fld.value.charAt(i))!=-1){
			aux += fld.value.charAt(i);
		}
	}
	aux += key;
			
	len = aux.length;
	if (len == 0) {
		fld.value = '';
	} else if (len == 1) {
		fld.value = '0'+ decSep + '0' + aux;
	} else if (len == 2) {
		fld.value = '0'+ decSep + aux;
	} else if (len > 2) {
		aux2 = '';

		for (j = 0, i = len - 3; i >= 0; i--) {
			if (j == 3) {
				aux2 += milSep;
				j = 0;
			}
			aux2 += aux.charAt(i);
			j++;
		}
		fld.value = '';
		len2 = aux2.length;
		for (i = len2 - 1; i >= 0; i--) {
			fld.value += aux2.charAt(i);
		}
		
		fld.value += decSep + aux.substr(len - 2, len);
	}
	return false;
}

// mascara para cpf
function MascaraCPF (keypress, campo) {
	
	caracteres = '01234567890';
	separacoes = 3;
	separacao1 = '.';
	separacao2 = '-';	
	conjuntos = 3;
	conjunto1 = 3;
	conjunto2 = 3;
	conjunto3 = 2;		
	if ((caracteres.search(String.fromCharCode (keypress.keyCode))!=-1) && campo.value.length < (conjuntos + conjunto1 + conjunto2 + conjunto3 + separacoes)) {
		if (campo.value.length == conjuntos) {
			campo.value = campo.value + separacao1;
		}
		if (campo.value.length == conjuntos + conjunto1 +1) {
			campo.value = campo.value + separacao1;
		}
		if (campo.value.length == conjuntos + conjunto1 + conjunto2 +2) {
			campo.value = campo.value + separacao2;
		}
		
	} else {
		event.returnValue = false;
	}
}

// mascara para data
function Mascaradata (keypress, campo) {
	
	caracteres = '01234567890';
	separacoes = 2;
	separacao1 = '/';
	conjuntos = 2;
	conjunto1 = 2;
	conjunto2 = 4;
			
	if ((caracteres.search(String.fromCharCode (keypress.keyCode))!=-1) && campo.value.length < (conjuntos + conjunto1 + conjunto2 +  separacoes)) {
		if (campo.value.length == conjuntos) {
		    if (campo.value>0 && campo.value<32){campo.value = campo.value + separacao1;}
			else{event.returnValue = false;}
		}
		if (campo.value.length == conjuntos + conjunto1 +1) {
			mes=campo.value.substring(campo.value.length,campo.value.length-4);
			mes=parseInt(mes);
			if (mes>0 && mes<13){campo.value = campo.value + separacao1;}
			else{event.returnValue = false;}
		}
		
		
	} else {
		event.returnValue = false;
	}
}

// mascara para fone
function Mascarafone (keypress, campo) {
	
	caracteres = '01234567890';
	separacoes = 1;
	separacao1 = '-';
	conjuntos = 4;
	conjunto1 = 4;
			
	if ((caracteres.search(String.fromCharCode (keypress.keyCode))!=-1) && campo.value.length < (conjuntos + conjunto1 + separacoes)) {
		if (campo.value.length == conjuntos) {
			campo.value = campo.value+separacao1  ;
		}
	
		
	} else {
		event.returnValue = false;
	}
}


/// mascara para cep
function Mascaracep (keypress, campo) {
	
	caracteres = '01234567890';
	separacoes = 1;
	separacao1 = '-';	
	conjuntos = 5;
	conjunto1 = 3;
	
			
	if ((caracteres.search(String.fromCharCode (keypress.keyCode))!=-1) && campo.value.length < (conjuntos + conjunto1 + separacoes)) {
		if (campo.value.length == conjuntos) {
			campo.value = campo.value + separacao1;
		}
		
	} else {
		event.returnValue = false;
	}
}

// mascara para letras
function Mascaraletras (keypress, campo,n) {
	
	caracteres = 'abcdefghijklmnopqrstuvwxyzABCDEFGHIJZLMNOPQRSTUVXWYZ áÁéÉíÍóÓúÚãÃàÀõÕâÂêÊôÔçÇ';
		
	conjuntos = n;
	
	
			
	if ((caracteres.search(String.fromCharCode (keypress.keyCode))!=-1) && campo.value.length < (conjuntos )) {
		if (campo.value.length == conjuntos) {
			campo.value = campo.value ;
			
		}
		
	} else {
		event.returnValue = false;
	}
}

// mascara para login
function Mascaralogin (keypress, campo,n) {
	
	caracteres = 'abcdefghijklmnopqrstuvwxyz1234567890';
		
	conjuntos = n;
	
	
			
	if ((caracteres.search(String.fromCharCode (keypress.keyCode))!=-1) && campo.value.length < (conjuntos )) {
		if (campo.value.length == conjuntos) {
			campo.value = campo.value ;
			
		}
		
	} else {
	
		event.returnValue = false;
	}
}

// mascara para numeros
function Mascaranum (keypress, campo,n) {
	
	caracteres = '01234567890';

		
	conjuntos = n;
	
	
			
	if ((caracteres.search(String.fromCharCode (keypress.keyCode))!=-1) && campo.value.length < (conjuntos )) {
		if (campo.value.length == conjuntos) {
			campo.value = campo.value ;
			
		}
		
	} else {
		event.returnValue = false;
	}
}

function Mascaraesp (keypress, campo,n) {
	
	caracteres = 'abcdefghijklmnopqrstuvwxyz123456789';
		
	conjuntos = n;
	
	
			
	if ((caracteres.search(String.fromCharCode (keypress.keyCode))!=-1) && campo.value.length < (conjuntos )) {
		if (campo.value.length == conjuntos) {
			campo.value = campo.value ;
			
		}
		
	} else {
		event.returnValue = false;
	}
}
// muda a cor de fundo do campo el=campo  bg=cod da cor
function setColor(el, bg) {
  if (el.style) el.style.backgroundColor = bg;
}

// testa se o campo esta vazio
function isVazio(campo) {
	if(campo.value==""){return(false);}
	return(true);		
}

// testa se um radio foi selecionado
function isChecado(iCampo) {
	var checado = false;
	for (i=0;i<iCampo.length;i++){
		if (iCampo[i].checked==true){
			checado = (true);
		}
	}
	if (checado != true) {
		return (false);
	} else {
		return (true);
	}
}


// testa se um determinado valor de select foi escolhido para vazio use index=0
function isselecionado(icampo,index){
			op=parseInt(index);
			if (icampo.selectedIndex==op) {
				return (false);
			}
			else { return (true); }
}

//verifica tamanho minimo e maximo para um campo
function isTamanhoDefinido(iCampo,iMinimo,iMaximo){
	if (eval(iCampo.value.length) < iMinimo || eval(iCampo.value.length) > iMaximo){return false;} 
	else {return true;}
}

//verifica se e email
function isEmail(iCampo) {
	var str = iCampo.value;
	var r1 = new RegExp("(@.*@)|(\\.\\.)|(@\\.)|(^\\.)");
	var r2 = new RegExp("^.+\\@(\\[?)[a-zA-Z0-9\\-\\.]+\\.([a-zA-Z]{2,3}|[0-9]{1,3})(\\]?)$");
	if ( (!r1.test(str) && r2.test(str)) ) {
		return true;
	} else {
		return false;
	}
	return true;
}

//compara o valor de dois campos
function compare(iCampo1, iCampo2) {
	if (iCampo1.value != iCampo2.value){
		return false;
	}
	return true;
}

/* verifica se o campo e numerico */
function IsNum(campo) {
	if (isNaN(eval("this.base."+campo+".value"))) { return true } else { return false }
	
}
/* verifica se o campo e string */
function IsStr(campo) {
	if (isNaN(eval("this.base."+campo+".value"))) { return true } else { return false }
}
/* retorna quantos caracteres tem no campo */
function Length(campo) {
	return eval("this.base."+campo+".value.length");
}
/* verifica caracteres invalidos */
function inValidChar(campo) {
	invalidChars = "@/1:4,;5&#®$6!?7¨%89*-+{2}3[0]\)(><|=|ºÜÖÄ";
	cont = eval("this.base."+campo+".value");
	for (i=0; i < invalidChars.length; i++) {
		asc =  invalidChars.charAt(i);
		if (cont.indexOf(asc, 0) > -1) return false
	}
	return true
}
/* faz busca de caracter definido */
function Find(campo,c) {
	cont = eval("this.base."+campo+".value");
	if (cont.indexOf(c, 0) > - 1) { return true } else { return false }
}

function checar_cadastro(form){
	
	if (form.sexo[0].checked==false && form.sexo[1].checked==false){
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe o sexo do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		return false
		
				
	}
	
	if (form.nome.value=='') {
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe o nome do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.nome.focus();
		return false
		
	}
	
	if (age<1 || age>100){
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Data de nascimento incorreta </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.nasc.focus();
		return false
		
	}
	
	if (form.natural.selectedIndex == 0) {
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">O paciente é natural de qual estado? </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.natural.focus();
		return false
		
	}
	
	
	
	if (form.nacionalidade.value=='') {
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe a nacionalidade do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.nacionalidade.focus();
		return false
		
	}
	
	if (form.escolaridade[0].checked==false && form.escolaridade[1].checked==false && form.escolaridade[2].checked==false && form.escolaridade[3].checked==false){
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe a escolaridade do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		return false
		
				
	}
	
	//if (form.escolaridade2[1].checked==true && form.ecolaridade_incompleta.value=='' ){
		
		//displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe até que série cursou </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		//return false
		
				
	//}
	
	
	
	if (form.profissao.value=='') {
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe a profissão do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.profissao.focus();
		return false
		
	}	
	if (form.email.value!='' && isEmail(form.email)==false){
		
		
	displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">O formato do e-mail informado não é válido </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.email.focus();
		return false
	
	
	}
	
	
	
	if (form.cpf.value!='' && valida_cpf(form.cpf)==false){
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">O número do cpf informado não é válido </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.cpf.focus();
		return false
		
		
		}
	if (form.tel_resid.value=='') {
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe o telefone residencial do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.tel_resid.focus();
		return false
		
	}
	else {
		
		if(Verifica_Tel(form.tel_resid, 1)==false){
			displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe <b>corretamente</b> o telefone residencial do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.tel_resid.focus();
		return false;
			
		}
	
	}
	if(Verifica_Tel(form.tel_com, 0)==false || Verifica_Tel(form.celular, 0)==false){
			displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">O preenchimento dos campos Telefone comercial ou celular não são obrigatórios, porém caso queira informa-los <b>obedeça o formato (000)0000-0000</b></p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		
		return false;
			
		}
	//alert($(form.name).serialize())
	request('post',$(form.name).serialize(),'grava_cadastro.asp');
	return false
}
	
	
	
	
function checar_cadastro_casal(form){
	//, sexo
	
	
	if (form.nome.value=='') {
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe o nome do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.nome.focus();
		return false
		
	}
	if (age<1 || age>100){
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Data de nascimento incorreta </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.nasc.focus();
		return false
		
	}
	
	if (form.natural.selectedIndex == 0) {
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">O paciente é natural de qual estado? </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.natural.focus();
		return false
		
	}
	
	
	
	if (form.nacionalidade.value=='') {
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe a nacionalidade do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.nacionalidade.focus();
		return false
		
	}
	
	if (form.escolaridade[0].checked==false && form.escolaridade[1].checked==false && form.escolaridade[2].checked==false && form.escolaridade[3].checked==false){
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe a escolaridade do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		return false
		
				
	}
	
	//if (form.escolaridade2[1].checked==true && form.ecolaridade_incompleta.value=='' ){
		
		//displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe até que série cursou </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		//return false
		
				
	//}
	
	
	
	if (form.profissao.value=='') {
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe a profissão do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.profissao.focus();
		return false
		
	}	
	
	if (form.email.value!='' && isEmail(form.email)==false){
		
		
	displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">O formato do e-mail informado não é válido </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.email.focus();
		return false
	
	
	}
	
	if (form.cpf.value!='' && valida_cpf(form.cpf)==false){
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">O número do cpf informado não é válido </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.cpf.focus();
		return false
		
		
		}
	
	if (form.tel_resid.value=='') {
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe o telefone residencial do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.tel_resid.focus();
		return false;
		
	}
	else {
		
		if(Verifica_Tel(form.tel_resid, 1)==false){
			displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe <b>corretamente</b> o telefone residencial do paciente </p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		form.tel_resid.focus();
		return false;
			
		}
	
	}
	if(Verifica_Tel(form.tel_com, 0)==false || Verifica_Tel(form.celular, 0)==false){
			displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">O preenchimento dos campos Telefone comercial ou celular não são obrigatórios, porém caso queira informa-los <b>obedeça o formato (000)0000-0000</b></p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		
		
		return false;
			
		}
	//if (sexo=='m'){
	request('post',$(form.name).serialize(),'grava_cadastro.asp');
	return false; //}
	
	//if (sexo=='m'){
	//request('post',document.form_cad_m.serialize(),'grava_cadastro.asp');
	//return false;}
	
}
	
function checa_indicacao(form){
	qtd=0
	//alert($('form_indica').serialize())
	
	for (i=0;i<form.chk_indica.length;i++){
		
		
		if (form.chk_indica[i].checked==true){
			qtd=qtd+1 ;
		if (form.chk_indica[i].value=='outros'){
			
				if(form.outros.value==''){
						
						displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe os outros meios pelos quais<br>o paciente conheceu o Centro de Fertilidade</p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
						form.outros.focus();
						return false;
				}
		}
				
		if (form.chk_indica[i].value=='medico'){
					if(form.medico.value=='' || form.especialidade.value=='' || form.telefone.value=='' || Verifica_Tel(form.telefone, 1)==false ){
						
						displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Informe ao menos o nome, especialidade e telefone<br>do médico que indicou  o Centro de fertiliade</p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
						return false;
					}
				
				}
		}
		}
		
	if (qtd==0){
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Selecione ao menos uma opção que indique como o paciente ficou conhecendo o Centro de Fertilidade</p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
						return false;
		
		}
	
	request('post',$('form_indica').serialize(),'grava_indicacao.asp')
	return false;
}	
	
	
function checa_endereco(form){
	
	if(form.end.value=='' || form.numero.value=='' || form.cep.value=='' || form.bairro.value=='' || form.cidade.value=='' || form.estado.selectIndex<1){
		
		displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Atenção ao preenchimento do endereço somente o campo Complemento é opcional, os demais campos devem obrigatóriamente ser preenchidos</p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
		return false;
	
	}
	else{
		
		if (Verifica_Cep('cep', 1)==false){
			
			displayStaticMessage('<h1 style="text-align:center">Mensagem de Erro</h1><p align="center">Formato do CEP inválido</p><p align="center"><a href=\'#\' onclick=\'closeMessage();return false\'>Fechar</a>','modalDialog_contentDiv_error')
			return false;
			}
		else{
		request('post',$('form_end').serialize(),'grava_end.asp');
		return false;
		}
	
	}

}	
	
var age=0

function calculaIdade(ap) {

ap= ap.split('/')

dd =ap[0]
mm = ap[1]
yy = ap[2]

days = new Date();
gdate = days.getDate();
gmonth = days.getMonth();
gyear = days.getYear();
age = gyear - yy;

if (dd==0 || dd>31 || mm==0 || mm>13 || yy==0 || yy>gyear ){

		age=''
		return age
		


}


if (mm>gmonth+1){ age-=1}

if (mm==gmonth+1 ){
	
	if (dd>gdate){age-=1}

}

//document.getElementById('idade').innerHTML=age
return age

}


function validar_data(data)
{

if (data.length <= 7)
{ 
var dia = parseInt("1",10);
var mes = parseInt(data.substring(0,2),10);
var ano = parseInt(data.substring(3,7),10);
}
else
{
var dia = parseInt(data.substring(0,2),10);
var mes = parseInt(data.substring(3,5),10);
var ano = parseInt(data.substring(6,10),10);
}


if (dia <= 31 && mes <=12 && ano >= 1000)
{ 
if (data.substring(0,1)=='0' && data.substring(1,2) != '0' || data.substring(0,1)!='0')
{ 
if (data.substring(2,3)=="/")
{ 
if (data.substring(3,4)=='0' && data.substring(4,5)!='0' || data.substring(3,4)!='0')
{ 
if (data.substring(5,6)=="/" || data.length == 7)
{ 
if(data.length > 7)
{ 
if (data.substring(6,7)== '0' || data.substring(6,7)=='0' && (data.substring(7,8)!='0' && data.length > 7)) 
return false;
else
{ 
if (mes == 2)
{ 
if ((dia > 0 ) && (dia <= 29))
{ 
if (dia == 29)
{ 
if ((ano % 4) == 0) 
return true;
else 
return false;
}
}
else 
return false;
} 
if ((mes == 4)||(mes == 6)||(mes == 9)||(mes == 11))
{ 
if ((dia > 0 ) && (dia <= 30)) 
return true;
else
return false;
}
if ((mes==1)||(mes==3)||(mes==5)||(mes==7)||(mes==8)||(mes==10)||(mes==12))
{ 
if ((dia > 0) && (dia <= 31)) 
return true;
else 
return false;
}
} 
}
else
return true;
}
else
return false;
}
else
return false;
}
else
return false;
}
else
return false; 
}
else
return false;

return true;
}
	
function Verifica_Cep(cep, obrigatorio){
 //Se o parâmetro obrigatório for igual à zero, significa que elepode estar vazio, caso contrário, não
 	var cep    = document.getElementById(cep);
 	var strcep = cep.value;
 	if((obrigatorio == 1) || (obrigatorio == 0 && strcep != "")){
 		if (strcep.length != 9){
 			//alert("CEP informado inválido.");
 			return false
 		}else{
 			if (strcep.indexOf("-") != 5){
 				//alert("Formato de CEP informado inválido.");
 				return false
 			}else{
 				if (isNaN(strcep.replace("-","0"))){
 					//alert("CEP informado inválido.");
 					return false
 				}
 			}
 		}
 	}	  
 }
 
 
 function Verifica_Tel(tel, obrigatorio){
	 
	 //var tel= document.getElementById(tel);
	 var strtel = tel.value;
	 //alert(strtel)
 	if((obrigatorio == 1) || (obrigatorio == 0 && strtel != "")){
 		if (strtel.length != 14){
			
 			return false
 		}else{
			if (strtel.indexOf("(") == 0 && strtel.indexOf(")") == 4 && strtel.indexOf("-") == 9){
				//alert(strtel.indexOf("(")+' -'+strtel.indexOf(")")+' -'+strtel.indexOf("-"))
				
				strtel=strtel.replace("(","")
				strtel=strtel.replace(")","")						
				strtel=strtel.replace("-","")
				if (isNaN(strtel)){
 					//alert(strtel);
 					return false
 				}
				else {return true;}
			}
			else{
				return false
			}
		
		}
	}
 }