var srcDNS=location.host
var ie4=document.all


//drag drop function for ie4+////
/////////////////////////////////
function drag_drop(e){
	var	crossobj = document.all.showimage
	if (ie4&&dragapproved){
		crossobj.style.left=tempx+event.clientX-offsetx
		crossobj.style.top=tempy+event.clientY-offsety
		return false
	}
}
function initializedrag(e){
	var	crossobj = document.all.showimage
	var firedobj = event.srcElement
	var topelement = document.compatMode!="BackCompat"? "documentElement" : "body"
	while (firedobj.tagName!=topelement.toUpperCase() && firedobj.id!="dragbar"){
		firedobj = firedobj.parentElement
	}
	if (firedobj.id=="dragbar"){
		offsetx= event.clientX 
		offsety= event.clientY 
		tempx=parseInt(crossobj.style.left)
		tempy=parseInt(crossobj.style.top)
		dragapproved=true
		document.onmousemove=drag_drop
	}
}

document.onmouseup=new Function("dragapproved=false")

////drag drop functions end here//////
/////////////////////////////////////
function hidebox(){
	var	crossobj = document.all.showimage
		crossobj.style.visibility="hidden"
		//crossobj.style.display = "none"
}
function showbox(){
	var	crossobj = document.all.showimage
		crossobj.style.visibility="visible"
		//crossobj.style.display = "inline"
}


var m
var winMen
function Espera(){
	winMen = window.open('../Espera.asp','vmenespera','toolbar=no,location=no,directories=no,status=no,scrollbars=no,resizable=no,width=200,height=100,left=300,top=290');  
	/*winMen.opener=self;  */
	winMen.focus();
}

function CerrarEspera(){
	winMen.close();
}

function CerrarDetalle(){
	window.close();
}

function Limpiar(Con)
   {   	  
	  var f=document.forms[0];
	  switch(Con){
		case"1":
			document.location.href='http://' + srcDNS + '/ConsultasRedes/CirculosMed/CirculosMedicos.asp'
		    break;
		case"2":
			f.ESTADO.value=''
			f.CIUDAD.value='';
			f.planes.value='';
			f.HOSPITAL.value='';
			CargaCiudad(f);
			CargaHospital(f);
			break;			
		case"3":
			f.ESTADO.value='';
			f.CIUDAD.value='';
			f.TIPO_SERV.value='';
			f.SERVICIO.value='';
			f.SUCURSAL.value='';
			CargaCiudad(f);
			CargaServicio(f);
			CargaSucursal(f);
			break;			
		case"4":
			f.planes.value='';
			f.ESTADO.value='';
			break;
	}
   }

   
function ArmaXMLEntradaSE(){
    var strxml='<CONSULTA><REGISTRO>';
	var f=document.forms[0];
	var strRes;
	var strServ = new String(f.SERVICIO.value);
	var strTip = new String(f.TIPO_SERV.value);
	var strCiud = new String(f.CIUDAD.value);
	var strEdo = new String(f.ESTADO.value);
	var strSuc = new String(f.SUCURSAL.value);	
	
	if(strEdo=='')
	  {if(strCiud=='')
		 {if(strServ=='') 
		    {if(strTip=='')
			  {if(strSuc==''){alert('Debe proporcionar al menos un filtro'); return;}
			  }
			} 
		 }	   
	  }  

	if(strEdo=='' && strTip!=''){alert('Debe proporcionar un estado'); return;}
	  
	//Filtro de estado - ciudad			
	var strPaso = strEdo.split('/'); strEdo='';
	strxml= strxml +'<EDO>'+strPaso[0]+'</EDO>'
	if(strPaso.length > 1){strEdo=strPaso[1];} 			
	strRes = strRes +'&Edo='+strEdo
	if(strEdo!='')		
	  {var strPaso = strCiud.split('/'); strCiud='';
	   strxml= strxml +'<CIUD>'+strPaso[0]+'</CIUD>'
	   if(strPaso.length > 1){strCiud=strPaso[1];} 			
	   strRes = strRes +'&Ciud='+strCiud
	   //if (strCiud==''){alert('Debe proporcionar una ciudad'); return;}
	   }
	
	//Filtro de Nombre Comercial
	var strPaso = strServ.split('/'); strServ='';			
	strxml= strxml +'<SERV>'+strPaso[0]+'</SERV>'
	if(strPaso.length > 1){strServ=strPaso[1];} 			
	strRes = strRes +'&Serv='+strServ
	
	//Filtro de sucursal
	var strPaso = strSuc.split('/'); strSuc='';
	strxml= strxml +'<SUC>'+strPaso[0]+'</SUC>'
	if(strPaso.length > 1){strSuc=strPaso[1];}		
	strRes = strRes +'&Suc='+strSuc
	
	//Filtro de Tipo de servicio
	var strPaso = strTip.split('/'); strTip='';			
	strxml= strxml +'<TIPO>'+strPaso[0]+'</TIPO>'
	if(strPaso.length > 1){strTip=strPaso[1];} 			
	strRes = strRes +'&Tipo='+strTip
	
	strxml= strxml +'</REGISTRO></CONSULTA>'
	/*parent.frames["Det"].document.location=strDatos;*/
	strRes = strRes.substring(strRes.indexOf('&')+1,400)
	strRes ='./Detalle.asp?' + strRes + '&XML=' + strxml
	//Espera();
	showbox();
	window.open(strRes,'ResServ',"screenX=0,screenX=0,screenY=0,left=18,top=100,width=750,height=400,toolbar=no,scrollbars=yes,resizable=yes,location=no,status=no,menubar=no");	
	//CerrarEspera();
	hidebox();
}
function ArmaXMLEntradaCM(){
    var strxml='<CONSULTA><REGISTRO>';
	var f=document.forms[0];
	var strRes;
	var strPln = new String(f.planes.value);
	var strCiud = new String(f.CIUDAD.value);
	var strEdo = new String(f.ESTADO.value);
	var strEsp = new String(f.ESPECIALIDAD.value);
	//var strMed = new String(f.MEDICO.value);
	var strHosp = new String(f.HOSPITAL.value);	
	var strNom = new String(f.nombre.value);
	var strApePat = new String(f.apepat.value);
	var strApeMat = new String(f.apemat.value);    
	
	if(strEdo=='')
	  {if(strPln=='')
		 {if(strCiud=='') 
		    {if(strEsp=='')
			  //{if(strMed=='')
			  {if(strNom=='' && strApePat =='' && strApeMat =='')
			    {if(strHosp==''){alert('Debe proporcionar al menos un filtro'); return;}
			  }
			  //}
			  }
			} 
		 }	   
	  }
	
	if(strEdo=='' && strPln!=''){alert('Debe proporcionar un estado'); return;}
	if(strEdo=='' && strHosp!=''){alert('Debe proporcionar un estado'); return;}
	
	//Filtro de estado - ciudad	
	var strPaso = strEdo.split('/'); strEdo='';
	strxml= strxml +'<EDO>'+strPaso[0]+'</EDO>'
	if(strPaso.length > 1){strEdo=strPaso[1];} 			
	strRes = strRes +'&Edo='+strEdo
	if(strEdo!='')		
	  {var strPaso = strCiud.split('/'); strCiud='';
	   strxml= strxml +'<CIUD>'+strPaso[0]+'</CIUD>'
	   if(strPaso.length > 1){strCiud=strPaso[1];} 			
	   strRes = strRes +'&Ciud='+strCiud
	   //if (strCiud==''){alert('Debe proporcionar una ciudad'); return;}
	   }
	      
	//Filtro de Plan - círculo
	var strPaso = strPln.split('/'); strPln='';			
	strxml= strxml +'<PLN>'+strPaso[0]+'</PLN>'
	if(strPaso.length > 1){strPln=strPaso[1];} 			
	strRes = strRes +'&Plan='+strPln

	//Filtro de especialidad		
	var strPaso = strEsp.split('/'); strEsp='';
	strxml= strxml +'<ESP>'+strPaso[0]+'</ESP>'
	if(strPaso.length > 1){strEsp=strPaso[1];} 			
	strRes = strRes +'&Esp='+strEsp
			
    //Filtro de médico
	//var strPaso = strMed.split('/'); strMed='';
	//strxml= strxml +'<MED>'+strPaso[0]+'</MED>'
	strxml= strxml +'<MED><NOMBRE>'+strNom+'</NOMBRE><APELLIDOP>'+strApePat+'</APELLIDOP><APELLIDOM>'+strApeMat+'</APELLIDOM></MED>'
	//if(strPaso.length > 1){strMed=strPaso[1];} 			
	//strRes = strRes +'&Med='+strMed
	
	//Filtro de hospital	
	var strPaso = strHosp.split('/'); strHosp='';
	strxml= strxml +'<HOSP>'+strPaso[0]+'</HOSP>'
	if(strPaso.length > 1){strHosp=strPaso[1];}		
	strRes = strRes +'&Hosp='+strHosp
	
	strxml= strxml +'</REGISTRO></CONSULTA>'

	/*parent.frames["Det"].document.location=strDatos;*/
	strRes = strRes.substring(strRes.indexOf('&')+1,400)
	strRes ='./Detalle.asp?' + strRes + '&XML=' + strxml
	//Espera();
	showbox();
	window.open(strRes,'ResCir',"screenX=0,screenX=0,screenY=0,left=10,top=100,width=770,height=400,toolbar=no,scrollbars=yes,resizable=yes,location=no,status=no,menubar=no");	
	//CerrarEspera();
	hidebox();
}

function ArmaXMLEntradaHO(){
    var strxml='<CONSULTA><REGISTRO>';
	var f=document.forms[0];
	var strRes;
	var strPln = new String(f.planes.value);
	var strCiud = new String(f.CIUDAD.value);
	var strEdo = new String(f.ESTADO.value);
	var strHosp = new String(f.HOSPITAL.value);
	
	if(strEdo=='')
	  {if(strCiud=='')
		 {if(strPln=='') 
		    {if(strHosp==''){alert('Debe proporcionar al menos un filtro'); return;}			  
			} 
		 }	   
	  }  

	if(strEdo=='' && strPln!=''){alert('Debe proporcionar un estado'); return;}
	if (strPln=='' && strEdo!=''){alert('Debe proporcionar un plan'); return;}
		
	//Filtro de estado - ciudad		
	var strPaso = strEdo.split('/'); strEdo='';
	strxml= strxml +'<EDO>'+strPaso[0]+'</EDO>'
	if(strPaso.length > 1){strEdo=strPaso[1];} 			
	strRes = strRes +'&Edo='+strEdo
	if(strEdo!='')		
	  {var strPaso = strCiud.split('/'); strCiud='';
	   strxml= strxml +'<CIUD>'+strPaso[0]+'</CIUD>'
	   if(strPaso.length > 1){strCiud=strPaso[1];} 			
	   strRes = strRes +'&Ciud='+strCiud
	   //if (strCiud==''){alert('Debe proporcionar una ciudad'); return;}
	   }
	
	//Filtro de Plan - círculo
	var strPaso = strPln.split('/'); strPln='';			
	strxml= strxml +'<PLN>'+strPaso[0]+'</PLN>'
	if(strPaso.length > 1){strPln=strPaso[1];} 			
	strRes = strRes +'&Plan='+strPln
	
	//Filtro de hospital	
	var strPaso = strHosp.split('/'); strHosp='';
	strxml= strxml +'<HOSP>'+strPaso[0]+'</HOSP>'
	if(strPaso.length > 1){strHosp=strPaso[1];}		
	strRes = strRes +'&Hosp='+strHosp
	
	strxml= strxml +'</REGISTRO></CONSULTA>'
	/*parent.frames["Det"].document.location=strDatos;*/
	strRes = strRes.substring(strRes.indexOf('&')+1,400)
	strRes ='./Detalle.asp?' + strRes + '&XML=' + strxml
	//Espera();
	showbox();
	window.open(strRes,'ResHos',"screenX=0,screenX=0,screenY=0,left=18,top=100,width=750,height=400,toolbar=no,scrollbars=yes,resizable=yes,location=no,status=no,menubar=no");	
	//CerrarEspera();
	hidebox();
}
function ArmaXMLEntradaTB(){
    var strxml='<CONSULTA><REGISTRO>';
	var f=document.forms[0];
	var strRes;
	var strPln = new String(f.planes.value);
	//var strCiud = new String(f.CIUDAD.value);
	var strEdo = new String(f.ESTADO.value);
	var strPln2 = Tabuladores.planes.options[Tabuladores.planes.selectedIndex].text
	
	//Filtro de Plan - círculo
	var strPaso = strPln.split('/'); strPln='';			
	strxml= strxml +'<PLN>'+strPaso[0]+'</PLN>'
	if(strPaso.length > 1){strPln=strPaso[1];} 			
	strRes = strRes +'&Plan='+strPln2
	if (strPln==''){alert('Debe proporcionar un plan'); return;}
	
	//Filtro de estado - ciudad		
	var strPaso = strEdo.split('/'); strEdo='';
	//alert(strPaso[0]);
	if (strPaso[0]=='220009'){
		alert('cancun');
		strxml= strxml +'<EDO></EDO>'
		strxml= strxml +'<CIUD>'+strPaso[0]+'</CIUD>'
	}else{
	if (strPaso[0]=='260018'){
		alert('villa hermosa');
		strxml= strxml +'<EDO></EDO>'
		strxml= strxml +'<CIUD>'+strPaso[0]+'</CIUD>'
	}else{
	strxml= strxml +'<EDO>'+strPaso[0]+'</EDO>'
	if(strPaso.length > 1){strEdo=strPaso[1];} 			
	strRes = strRes +'&Edo='+strEdo
	if(strEdo!=''){
		strxml= strxml +'<CIUD></CIUD>'
	  /*var strPaso = strCiud.split('/'); strCiud='';
	   strxml= strxml +'<CIUD>'+strPaso[0]+'</CIUD>'
	   if(strPaso.length > 1){strCiud=strPaso[1];} 			
	   strRes = strRes +'&Ciud='+strCiud
	   if (strCiud==''){alert('Debe proporcionar una ciudad'); return;}*/
	   }
	else{alert('Debe proporcionar un estado'); return;}
	}}
	strxml= strxml +'</REGISTRO></CONSULTA>'
	/*parent.frames["Det"].document.location=strDatos;*/
	strRes = strRes.substring(strRes.indexOf('&')+1,400)	
	strRes ='./Detalle.asp?' + strRes + '&XML=' + strxml
	//alert(strRes);
	/*inicio del pop up *****************************************************************************************/
	//var win = window.open("", "win", "width=300,height=200");
	//var doc = win.document;
	//doc.open("text/html", "replace");
	//doc.write("<HTML><HEAD><TITLE>New Document</TITLE></HEAD><BODY><input type='text' value='"+strRes+"'></BODY></HTML>");
	//doc.close();
	/*fin del pop up *****************************************************************************************/
	//Espera();
	showbox();
	window.open(strRes,'ResTab',"screenX=0,screenX=0,screenY=0,left=18,top=100,width=750,height=400,toolbar=no,scrollbars=yes,resizable=yes,location=no,status=no,menubar=no");	
	//CerrarEspera();	
	hidebox();
}

function ObtenSrvRFC(strCveS){	     
  var str = new String(strCveS);
  var strSpaso = str.split('|');
  
  var strXml='<CONSULTA><REGISTRO><RFC>'+ strSpaso[0] +'</RFC></REGISTRO></CONSULTA>';
  var strURL='http://' + srcDNS + '/ConsultasRedes/ServAux/Descuento.asp?XML='+ strXml +'&SrvDe='+ strSpaso[1]
  Espera();
  window.open(strURL,'ResDesc',"screenX=0,screenX=0,screenY=0,left=155,top=100,width=500,height=300,toolbar=no,scrollbars=yes,resizable=yes,location=no,status=no,menubar=no");	
  CerrarEspera();
}


function ObtenMedRFC(CveM){	
  var str = new String(CveM);
  var strSpaso = str.split('|');
  
  var strXml='<CONSULTA><REGISTRO><EDO></EDO><CIUD></CIUD>'
  strXml=strXml +'<PLN></PLN><HOS></HOS><RFC>'+ strSpaso[0] +'</RFC></REGISTRO></CONSULTA>';
  var strURL='http://' + srcDNS + '/ConsultasRedes/CirculosMed/Especialidad.asp?XML='+ strXml +'&Espec='+ strSpaso[1]
  Espera();
  window.open(strURL,'ResEsp',"screenX=0,screenX=0,screenY=0,left=155,top=100,width=500,height=300,toolbar=no,scrollbars=yes,resizable=yes,location=no,status=no,menubar=no");	
  CerrarEspera();  
}

function Imprimir(Con){	
  document.all.leyenda.innerHTML='Para mayor información puede comunicarse a nuestro centro de información Asistencia Línea Azul al teléfono 5227-3333 o lada nacional sin costo 01 800 001 9200 y lada internacional 01 800 807 5697.<br>Este listado está sujeto a cambios sin previo aviso';
  document.all.botones.style.visibility = "hidden"  
  print();
  document.all.botones.style.visibility = "visible"
  ObtenLeyenda(Con);  
  return;
}

function ObtenLeyenda(Cons){
	switch(Cons){
		case"0":		    
			document.all.leyenda.innerHTML='';
			break;		
		case"1":		    
			document.all.leyenda.innerHTML='<b>Nuevos productos:</b><br><br>Recuerde que con los nuevos productos de GNP, usted puede atender su problema de salud con el médico de su preferencia, ya que el VALOR MAXIMO DE REFERENCIA (tabulador contratado) aplicará de igual manera para todos los médicos. En caso de existir diferencias económicas éstas correrán a su cargo.<br><br>Si requiere asistencia médica hospitalaria verificar los hospitales a los que puede accesar de acuerdo a su plan contratado.<br><br>Con el propósito de apoyar la relación con su médico, GNP reafirma su compromiso de satisfacer sus necesidades de servicio, en tanto que  la atención médica estará a cargo de su médico.<br>Para mayor información puede comunicarse a nuestro centro de información Asistencia Línea Azul al teléfono 5227-3333 o lada nacional sin costo 01 800 001 9200 y lada internacional 01 800 807 5697.Este listado está sujeto a cambios sin previo aviso.<br><br><b>Plan Prestigio:</b><br><br>Para consulta del Directorio Médico para el Plan Prestigio favor de comunicarse a Asistencia Línea Azul al teléfono 5227-3333  o lada nacional sin costo 01 800 001 9200 y lada internacional sin costo 01 800 807 5697.';
			break;
		case"2":
			document.all.leyenda.innerHTML="Recuerde que al solicitar algún servicio hospitalario,  es necesario verificar que el hospital elegido vaya de acuerdo al plan que usted contrató y que se encuentre en convenio, lo cual usted podrá consultar a través de nuestro centro de información Asistencia Línea Azul al teléfono 5227-3333 o lada nacional sin costo 01 800 001 9200 y lada internacional 01 800 807 5697. En caso contrario, podrá haber diferencias económicas.<br><br>Si el hospital de su elección no se encuentra en convenio con GNP, los gastos erogados por su atención serán tramitados vía reembolso.<br>Considere que al elegir libremente al hospital, éste será el único responsable ante usted por los servicios hospitalarios que le proporcione.";
			break;			
		case"3":
		    document.all.leyenda.innerHTML="Usted puede verificar que el proveedor elegido se encuentre en convenio a esta fecha en nuestro centro de información Asistencia Línea Azul al teléfono 5227-3333 o lada nacional sin costo 01 800 001 9200 y lada internacional 01 800 807 5697.<br>Considere que al elegir libremente al proveedor del servicio que requiere, éste será el único responsable ante usted por los servicios que le proporcione.";
			break;			
		case"4":
		    document.all.leyenda.innerHTML="Independientemente del médico tratante o del hospital en el que se de la atención, GNP aplicará el tabulador contratado por el asegurado. Usted puede consultar los tabuladores de los procedimientos más comunes en esta página.";
			break;
	}		
   }
   
function Enviar(){
    var f=document.forms[0];
	f.method="post";
	f.action='../Mail/DatosMail.asp'
	f.submit();	
  }

function CambiaFiltros(Tip,Con){
    var f=document.forms[0];
	switch(Tip){
		case"1": //Estado
			if(Con!='4'){CargaCiudad(f);}else{CargaDetalleCobGeo(f);}
			if(Con=='1'){CargaHospital(f);CargaEspecialidad(f);}
			if(Con=='2'){CargaHospital(f);}
			if(Con=='3'){CargaServicio(f);CargaSucursal(f);}
			break;		
		case"2": //Ciudad
			if(Con=='1'){CargaHospital(f);CargaEspecialidad(f);}
			if(Con=='2'){CargaHospital(f);}
			if(Con=='3'){CargaServicio(f);CargaSucursal(f);}
			break;
		case"3": //Plan
			if(Con=='1'){CargaHospital(f);CargaEspecialidad(f);}
			if(Con=='2'){CargaHospital(f);}
			break;			
		case"4": //Médico		
			//CargaHospital(f);
			CargaEspecialidad(f);
			break;	
		case"5": //Hospital		
			CargaEspecialidad(f);
			break;	
		case"6": //TPO SERVICIO
			CargaServicio(f);
			CargaSucursal(f);
			break;				
	}
  }
  
function CargaCiudad(f)
   {
      //este es para llenar el combo de ciudades 		  
	  var i=f.CIUDAD.options.length
	  var j= new String(f.ESTADO.value);
	  var strCve = j.split('/');
	  
	  for(;i>=0;i--)f.CIUDAD.options[i]=null
	  i=0	  
	  //En esta funcion primero va en nombre y luego el value
      if(strCve[0]=='08'){f.CIUDAD.options[i++]=new Option('Ciudad de México','',true); return;}	  	  
	  f.CIUDAD.options[i++]=new Option('-- Selecciona una Ciudad --','',true)
	  if(strCve==''){return;}	  
	  
	  //var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
	  try{
		var objHTTP=new ActiveXObject("MSXML.XMLHTTPRequest");
	    }catch(exception){
		try{
		    var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
		   }catch(exception){
		   try{
		      var objHTTP=new ActiveXObject("Microsoft.XMLHTTP");
		      }catch(exception){
		      alert('Favor de revisar tu version de Internet Explorer, gracias');
		      return;}
		   }	  
    	}
	  
	  var strXml='<CONSULTA><REGISTRO><EDO>' + strCve[0] + '</EDO></REGISTRO></CONSULTA>';
	  var strURL='http://' + srcDNS + '/ConsultasRedes/Filtros/CiudadMuni.asp'
	  objHTTP.open("post",strURL,false);
	  try{
		  objHTTP.send(strXml);
	  }catch(exception){
	       alert("Error de requerimientos de sistema.\nAsegurese de que tenga todo el software necesario\npara correr la aplicación.");
	       return;
	  }	  	  
	  var CiuMun = new String(objHTTP.responseText);
      var str = new String(CiuMun);	  
	  var strSp1 = str.split('/');
	  var strSp2;
	  var strVal;
	  
	  for(i=0;i<strSp1.length;i++){	
		strSp2 = strSp1[i].split('|');		
		if(strSp2.length == 1){/*alert(strSp2[0]);*/ return;} 
		f.CIUDAD.options[i+1] = new Option(strSp2[1],strSp2[0]+'/'+strSp2[1]);
	    }
   }

function CargaSucursal(f)
   {
      // este es para llenar el combo de sucursales 		  
	  var i=f.SUCURSAL.options.length
	  var j= new String(f.SERVICIO.value);
	  var k= new String(f.ESTADO.value);
	  var l= new String(f.CIUDAD.value);	  
	  var strCve = j.split('/');
	  var strEdo = k.split('/');
	  var strCiu = l.split('/');
	  
	  for(;i>=0;i--)f.SUCURSAL.options[i]=null
	  i=0	  
	  //En esta funcion primero va en nombre y luego el value
      f.SUCURSAL.options[i++]=new Option('-- Selecciona una Sucursal --','',true)	  
	  if(strCve==''){return;}
	  
	  //var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
	  try{
		var objHTTP=new ActiveXObject("MSXML.XMLHTTPRequest");
	    }catch(exception){
		try{
		    var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
		   }catch(exception){
		   try{
		      var objHTTP=new ActiveXObject("Microsoft.XMLHTTP");
		      }catch(exception){
		      alert('Favor de revisar tu version de Internet Explorer, gracias');
		      return;}
		   }	  
    	}
	  var strXml='<CONSULTA><REGISTRO><SERV>' + strCve[0] + '</SERV><EDO>' + strEdo[0] + '</EDO><CIUD>' + strCiu[0] + '</CIUD></REGISTRO></CONSULTA>';
	  var strURL='http://' + srcDNS + '/ConsultasRedes/Filtros/ObtSucursal.asp'
	  objHTTP.open("post",strURL,false);
	  try{
		  objHTTP.send(strXml);
	  }catch(exception){
	       alert("Error de requerimientos de sistema.\nAsegurese de que tenga todo el software necesario\npara correr la aplicación.");
	       return;
	  }
	  	  
	  var SucSer = new String(objHTTP.responseText);
      var str = new String(SucSer);	  
	  var strSp1 = str.split('/');
	  var strSp2;
	  var strVal;
	  
	  for(i=0;i<strSp1.length;i++){	
		strSp2 = strSp1[i].split('|');
		if(strSp2.length == 1){/*alert(strSp2[0]);*/ return;} 		
		f.SUCURSAL.options[i+1] = new Option(strSp2[1],strSp2[0]+'/'+strSp2[1]);
	    }
   }
   
function CargaServicio(f)
   {
      // este es para llenar el combo de servicios 		  
	  var i=f.SERVICIO.options.length
	  var j= new String(f.ESTADO.value);
	  var k= new String(f.CIUDAD.value);
	  var l= new String(f.TIPO_SERV.value);
	  var strEdo = j.split('/');
	  var strCiu = k.split('/');
	  var strTip = l.split('/');
	  
	  for(;i>=0;i--)f.SERVICIO.options[i]=null
	  i=0	  
	  //En esta funcion primero va en nombre y luego el value
      f.SERVICIO.options[i++]=new Option('-- Selecciona un Nombre Comercial --','',true)
	  
	  //var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
	  try{
		var objHTTP=new ActiveXObject("MSXML.XMLHTTPRequest");
	    }catch(exception){
		try{
		    var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
		   }catch(exception){
		   try{
		      var objHTTP=new ActiveXObject("Microsoft.XMLHTTP");
		      }catch(exception){
		      alert('Favor de revisar tu version de Internet Explorer, gracias');
		      return;}
		   }	  
    	}
	  var strXml='<CONSULTA><REGISTRO><EDO>' + strEdo[0] + '</EDO><CIUD>' + strCiu[0] + '</CIUD><TIPO>' + strTip[0] + '</TIPO></REGISTRO></CONSULTA>';
	  
	  var strURL='http://' + srcDNS + '/ConsultasRedes/Filtros/ObtServ.asp'
	  objHTTP.open("post",strURL,false);
	  try{
		  objHTTP.send(strXml);
	  }catch(exception){
	       alert("Error de requerimientos de sistema.\nAsegurese de que tenga todo el software necesario\npara correr la aplicación.");
	       return;
	  }
	  	  
	  var Ser = new String(objHTTP.responseText);
      var str = new String(Ser);	  
	  var strSp1 = str.split('/');
	  var strSp2;
	  var strVal;
	  for(i=0;i<strSp1.length;i++){	
		strSp2 = strSp1[i].split('|');
		if(strSp2.length == 1){/*alert(strSp2[0]);*/ return;} 		
		f.SERVICIO.options[i+1] = new Option(strSp2[1],strSp2[0]+'/'+strSp2[1]);
	    }
   }
   
function CargaMedico(f)
   {
      // este es para llenar el combo de MEDICOS
	  var i=f.MEDICO.options.length
	  var j= new String(f.ESTADO.value);
	  var k= new String(f.CIUDAD.value);
	  var l= new String(f.planes.value);
	  var m= new String(f.HOSPITAL.value);
	  var strEdo = j.split('/');
	  var strCiu = k.split('/');
	  var strPln = l.split('/');
	  var strHos = m.split('/');
	  var strCombo;
	  var strFun;
	  
	  strFun = ''
	  document.all.Med.innerHTML=''	  
	  //for(;i>=0;i--)f.MEDICO.options[i]=null
	  i=0
	  var strFun="JavaScript:CambiaFiltros('4','1')"
	  strCombo='<select name="MEDICO" style="width:270;height:23;" onchange="'+ strFun +'"></select>'
	  document.all.Med.innerHTML=strCombo;
	  	  
	  //En esta funcion primero va en nombre y luego el value
      f.MEDICO.options[i++]=new Option('-- Selecciona un Médico --','',true)	  
	  
	  //var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
	  try{
		var objHTTP=new ActiveXObject("MSXML.XMLHTTPRequest");
	    }catch(exception){
		try{
		    var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
		   }catch(exception){
		   try{
		      var objHTTP=new ActiveXObject("Microsoft.XMLHTTP");
		      }catch(exception){
		      alert('Favor de revisar tu version de Internet Explorer, gracias');
		      return;}
		   }	  
    	}
	  var strXml='<CONSULTA><REGISTRO><EDO>' + strEdo[0] + '</EDO><CIUD>' + strCiu[0] + '</CIUD><PLN>' + strPln[0] + '</PLN><HOS>' + strHos[0] + '</HOS></REGISTRO></CONSULTA>';	  
	  var strURL='http://' + srcDNS + '/ConsultasRedes/Filtros/ObtMedicos.asp'
	  //var strURL='http://' + srcDNS + '/ConsultasRedes/Filtros/ObtMedicos.asp'
	  objHTTP.open("post",strURL,false);
	  try{
		  objHTTP.send(strXml);
	  }catch(exception){
	       alert("Error de requerimientos de sistema.\nAsegurese de que tenga todo el software necesario\npara correr la aplicación.");
	       return;
	  }	  	  
	  var Ser = new String(objHTTP.responseText);
      var str = new String(Ser);	  
	  var strSp1 = str.split('/');
	  var strSp2;
	  var strVal;
	  
	  for(i=0;i<strSp1.length;i++){	
		strSp2 = strSp1[i].split('|');
		if(strSp2.length == 1){/*alert(strSp2[0]);*/ return;} 		
		f.MEDICO.options[i+1] = new Option(strSp2[1],strSp2[0]+'/'+strSp2[1]);
	    }
   }
   
function CargaHospital(f)
   {
      // este es para llenar el combo de Hospitales 		  
	  var i=f.HOSPITAL.options.length
	  var j= new String(f.ESTADO.value);
	  var k= new String(f.CIUDAD.value);
	  var m= new String(f.planes.value);
	  var strEdo = j.split('/');
	  var strCiu = k.split('/');
	  var strPln = m.split('/');
	  var strPln2 = strPln[0].split('|');
	  
	  for(;i>=0;i--)f.HOSPITAL.options[i]=null
	  i=0	  
	  //En esta funcion primero va en nombre y luego el value
      f.HOSPITAL.options[i++]=new Option('-- Selecciona un Hospital --','',true)
	  
	  //var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
	  try{
		var objHTTP=new ActiveXObject("MSXML.XMLHTTPRequest");
	    }catch(exception){
		try{
		    var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
		   }catch(exception){
		   try{
		      var objHTTP=new ActiveXObject("Microsoft.XMLHTTP");
		      }catch(exception){
		      alert('Favor de revisar tu version de Internet Explorer, gracias');
		      return;}
		   }	  
    	}
	  var strXml='<CONSULTA><REGISTRO><EDO>' + strEdo[0] + '</EDO><CIUD>' + strCiu[0] + '</CIUD><PLN>' + strPln2[0] + '</PLN></REGISTRO></CONSULTA>';
	  
	  var strURL='http://' + srcDNS + '/ConsultasRedes/Filtros/ObtHosp.asp'
	  objHTTP.open("post",strURL,false);
	  try{
		  objHTTP.send(strXml);
	  }catch(exception){
	       alert("Error de requerimientos de sistema.\nAsegurese de que tenga todo el software necesario\npara correr la aplicación.");
	       return;
	  }	  	  
	  var Ser = new String(objHTTP.responseText);
      var str = new String(Ser);	  
	  var strSp1 = str.split('/');
	  var strSp2;
	  var strVal;
	  
	  for(i=0;i<strSp1.length;i++){	
		strSp2 = strSp1[i].split('|');
		if(strSp2.length == 1){/*alert(strSp2[0]);*/ return;} 		
		f.HOSPITAL.options[i+1] = new Option(strSp2[1],strSp2[0]+'/'+strSp2[1]);
	    }
   }
   
function CargaEspecialidad(f)
   {
      // este es para llenar el combo de especialidades 		  
	  var i=f.ESPECIALIDAD.options.length
	  var j= new String(f.ESTADO.value);
	  var k= new String(f.CIUDAD.value);
	  var l= new String(f.planes.value);
	  var m= new String(f.HOSPITAL.value);
	  //var n= new String(f.MEDICO.value);
	  var strEdo = j.split('/');
	  var strCiu = k.split('/');
	  var strPln = l.split('/');
	  var strHos = m.split('/');
	  //var strRFC = n.split('/');
	  var strCombo;
	  
	  document.all.Espec.innerHTML=''

	  //for(;i>=0;i--)f.ESPECIALIDAD.options[i]=null
	  i=0
	  strCombo='<select name="ESPECIALIDAD" style="width:270;height:23;"></select>'
	  document.all.Espec.innerHTML=strCombo;
	  //En esta funcion primero va en nombre y luego el value
      f.ESPECIALIDAD.options[i++]=new Option('-- Selecciona una Especialidad --','',true)	  
	  
	  //var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
	  try{
		var objHTTP=new ActiveXObject("MSXML.XMLHTTPRequest");
	    }catch(exception){
		try{
		    var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
		   }catch(exception){
		   try{
		      var objHTTP=new ActiveXObject("Microsoft.XMLHTTP");
		      }catch(exception){
		      alert('Favor de revisar tu version de Internet Explorer, gracias');
		      return;}
		   }	  
    	}
	  var strXml='<CONSULTA><REGISTRO>';
	  var strXml=strXml +'<EDO>' + strEdo[0] + '</EDO>' + '<CIUD>' + strCiu[0] + '</CIUD>'
	  var strXml=strXml +'<PLN>' + strPln[0] + '</PLN>' + '<HOS>' + strHos[0] + '</HOS>'+'<RFC></RFC>'
	  var strXml=strXml + '</REGISTRO></CONSULTA>';
	  var strURL='http://' + srcDNS + '/ConsultasRedes/Filtros/ObtEsp.asp'
	  objHTTP.open("post",strURL,false);
	  try{
		  objHTTP.send(strXml);
	  }catch(exception){
	       alert("Error de requerimientos de sistema.\nAsegurese de que tenga todo el software necesario\npara correr la aplicación.");
	       return;
	  }	  	  
	  var SucSer = new String(objHTTP.responseText);
      var str = new String(SucSer);	  
	  var strSp1 = str.split('/');
	  var strSp2;
	  var strVal;
	  
	  for(i=0;i<strSp1.length;i++){	
		strSp2 = strSp1[i].split('|');
		if(strSp2.length == 1){/*alert(strSp2[0]);*/ return;} 		
		f.ESPECIALIDAD.options[i+1] = new Option(strSp2[1],strSp2[0]+'/'+strSp2[1]);
	    }
   }
   
function CargaDetalleCobGeo(f)
   {
      // este es para llenar el combo de Detalle de cobertura geografica
	  var i=f.CIUDAD.options.length
	  var j= new String(f.ESTADO.value);	  
	  var strCve = j.split('/');

	  for(;i>=0;i--)f.CIUDAD.options[i]=null
	  i=0	  
	  //En esta funcion primero va en nombre y luego el value
      f.CIUDAD.options[i++]=new Option('-- Selecciona una Ciudad --','',true)	  
	  if(strCve==''){return;}
	  
	  //var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
	  try{
		var objHTTP=new ActiveXObject("MSXML.XMLHTTPRequest");
	    }catch(exception){
		try{
		    var objHTTP=new ActiveXObject("MSXML2.XMLHTTP");
		   }catch(exception){
		   try{
		      var objHTTP=new ActiveXObject("Microsoft.XMLHTTP");
		      }catch(exception){
		      alert('Favor de revisar tu version de Internet Explorer, gracias');
		      return;}
		   }	  
    	}
	  var strXml='<CONSULTA><REGISTRO><EDO>' + strCve[0] + '</EDO></REGISTRO></CONSULTA>';
	  var strURL='http://' + srcDNS + '/ConsultasRedes/Filtros/DetCobGeo.asp?xml='+ strXml
	  
	  objHTTP.open("post",strURL,false);
	  try{
		  objHTTP.send(strXml);
	  }catch(exception){
	       alert("Error de requerimientos de sistema.\nAsegurese de que tenga todo el software necesario\npara correr la aplicación.");
	       return;
	  }	  	  
	  var CiuMun = new String(objHTTP.responseText);
	  	  
      var str = new String(CiuMun);	  
	  var strSp1 = str.split('/');
	  var strSp2;
	  var strVal;
	  //alert(CiuMun)
	  for(i=0;i<strSp1.length;i++){	
		strSp2 = strSp1[i].split('|');		
		if(strSp2.length == 1){/*alert(strSp2[0]);*/ return;} 
		f.CIUDAD.options[i+1] = new Option(strSp2[1],strSp2[0]+'/'+strSp2[1]);
	    }
   }