function GetTimeIndex(ID)
{
	for(var i=0;i<Parroquias.length;i++)
	{
		if(Horarios[i][0]==ID) return i;
	}
}


function DecodeDay(d)
{
	switch(d){
		case "X":	win2.document.writeln("Lunes a Viernes:");	break;
		case "L":	win2.document.writeln("Lunes:");		break;
		case "M":	win2.document.writeln("Martes:");		break;
		case "I":	win2.document.writeln("Mi&eacute;rcoles:");	break;
		case "J":	win2.document.writeln("Jueves:");		break;
		case "V":	win2.document.writeln("Viernes:");		break;
		case "S":	win2.document.writeln("S&aacute;bado:");	break;
		case "D":	win2.document.writeln("Domingo:");		break;
	}
}

function ShowMassTimes(PRQid)		
{
	var i,j;
	var s;
	var last;
	var index;

	index=GetTimeIndex(PRQid);
	win2.document.writeln("<i>&nbsp;&nbsp;&nbsp;&nbsp;<u>Horarios de Misa</u>:</i><br>");	
	last="z";
	for(j=0;j<Horarios[index][1].length;j++)
	{
		if(last!=Horarios[index][1][j])
		{
			if(last!="z") win2.document.writeln("&nbsp;hs.<br>");
			win2.document.write("&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;");
			DecodeDay(Horarios[index][1][j]);
		}
		else win2.document.write("&nbsp;-&nbsp;");
		win2.document.write(Horarios[index][2][j]);
		last=Horarios[index][1][j];
	}
	win2.document.writeln("&nbsp;hs.<br><hr><br>");
}



function ShowPRQs(str)			
{
	var i,j;
	var s;

	OpenResultsPage();
	win2.document.writeln('<img src="http://www.horariosdemisa.com.ar/images/zoom.gif" border=0 align=left><br><br>');
	win2.document.writeln('<font face="arial" size="2">');
	win2.document.writeln("<H3><u>Parroquias en el barrio de "+str+"</u>:</H3>");
	for(i=0;i<Parroquias.length;i++){
		win2.document.writeln("<b>"+eval(i+1)+". <i>"+Parroquias[i][1]+"</i></b><br>");
		win2.document.writeln("&nbsp;&nbsp;&nbsp;&nbsp;"+Parroquias[i][2]+"<br>");
		win2.document.writeln("&nbsp;&nbsp;&nbsp;&nbsp;TE: "+Parroquias[i][3]+"<br>");
		win2.document.writeln("<br>");
		ShowMassTimes(Parroquias[i][0]);
	}
	win2.document.writeln('<hr align="center" width="500" color="#cc0000">');
	win2.document.writeln("<br>");
	win2.document.writeln('<a HREF="" onclick="window.close();">');
	win2.document.writeln('<IMG src="http://www.horariosdemisa.com.ar/images/back.gif" BORDER=0 ALT="Volver al mapa principal" ALIGN="left"><br>');
	win2.document.writeln("  Continuar");
	win2.document.writeln("</A><br><br>");
	win2.document.writeln("</font>");
	CloseResultsPage();
	return false;
}



function ShowGlobalPRQs(str)			
{
	var i,j;
	var link;
        var barrio;
        var barrioid;

	OpenResultsPage();
	win2.document.writeln('<img src="http://www.horariosdemisa.com.ar/images/zoom.gif" border=0 align=left><br><br>');
	win2.document.writeln('<font face="arial" size="2">');
	win2.document.writeln("<H3><u>Parroquias de "+str+"</u>:</H3>");
	for(i=0;i<Parroquias.length;i++){
		win2.document.writeln("<b>"+eval(i+1)+". <i>"+Parroquias[i][1]+"</i></b><br>");
		win2.document.writeln("&nbsp;&nbsp;&nbsp;&nbsp;"+Parroquias[i][2]+"<br>");
		win2.document.writeln("&nbsp;&nbsp;&nbsp;&nbsp;TE: "+Parroquias[i][3]+"<br>");
//win2.document.writeln("<br>");
		barrioid=Parroquias[i][4];
		barrio=GetPRQNeighborhood(barrioid);
//		link=GetPRQNeighborhoodURL(barrioid);
		win2.document.writeln('&nbsp;&nbsp;&nbsp;&nbsp;');
//		win2.document.writeln('<a href="'+link+'" target="Principal">');
		win2.document.writeln("Barrio: <b><i>"+barrio+" </b>(Nº "+barrioid+")</i><br>");
//		win2.document.writeln('</a>');
	       	win2.document.writeln('<hr align="center" width="750" color="#33AA55">');
	}
	win2.document.writeln('<hr align="center" width="500" color="#cc0000">');
	win2.document.writeln("<br>");
	win2.document.writeln('<a HREF="" onclick="window.close();">');
	win2.document.writeln('<IMG src="http://www.horariosdemisa.com.ar/images/back.gif" BORDER=0 ALT="Volver al mapa principal" ALIGN="left"><br>');
	win2.document.writeln("  Continuar");
	win2.document.writeln("</A><br><br>");
	win2.document.writeln("</font>");
	CloseResultsPage();
	return false;
}




function TimeToFloat(s)
{
	var i;
	var horas="";
	var minutos="";

	for(i=0;s.charAt(i)!=":";i++) horas+=s.charAt(i);
	i++;	//saltear el ":"
	for(i;i<s.length;i++) minutos+=s.charAt(i);
	minutos=(minutos.valueOf())*100/60;	//convierte minutos sexadecimales en minutos decimales
	minutos=parseInt(minutos);
	if(minutos<10) s=horas+".0"+minutos;
	else s=horas+"."+minutos;
	return s;
}

function SameDay(d,target)
{

	if(((d=="L")||(d=="X"))&&(target.value=="L"))	return true;
	if(((d=="M")||(d=="X"))&&(target.value=="M"))	return true;
	if(((d=="I")||(d=="X"))&&(target.value=="I"))	return true;
	if(((d=="J")||(d=="X"))&&(target.value=="J"))	return true;
	if(((d=="V")||(d=="X"))&&(target.value=="V"))	return true;
	if((d=="S")&&(target.value=="S")) 		return true;
	if((d=="D")&&(target.value=="D"))		return true;
	return false;
}

function SameHour(h,target)				
{
	var fhour,ftarget;

	fhour=TimeToFloat(h);
	ftarget=target;
	if(Math.abs((fhour)-(ftarget.value))<0.51) return true;
	return false;
}

function OpenResultsPage()
{

	win2=open("","replace");
	win2.document.open();

	win2.document.writeln("<HTML><HEAD>");
	win2.document.writeln('</HEAD><BODY bgcolor="#FFFFFF">');
}

function CloseResultsPage()
{
	win2.document.writeln("</BODY>");
	win2.document.writeln("</HTML>");
	win2.document.close();
}

function ShowQueryResults()
{
	OpenResultsPage();
	win2.document.writeln('<img src="http://www.horariosdemisa.com.ar/images/zoom.gif" border=0 align=left><br><br>');
	win2.document.writeln('<font face="arial" size="2">');
	win2.document.writeln("<H3><u>Resultados de la b&uacute;squeda:</u></H3><br>");
	if(Results.length!=0){
		for(var i=0;i<Results.length;i++){
			win2.document.write("<b>"+eval(i+1)+". </b>"+Results[i][0]+"<br>");
			win2.document.writeln(Results[i][1]+"<br>");
			win2.document.writeln("TE: "+Results[i][2]+"<br>");
			win2.document.writeln("Horario de Misa: <b><i>"+Results[i][3]+"</b></i> hs.<br>");
			win2.document.writeln("<hr>");
		}
	}
	else win2.document.writeln("<b><i>No se celebran Misas con el horario ingresado</b></i><br>");
	win2.document.writeln("<br>");
	win2.document.writeln('<a HREF="" onclick="window.close();">');
	win2.document.writeln('<IMG src="http://www.horariosdemisa.com.ar/images/back.gif" BORDER=0 ALT="Volver al mapa principal" ALIGN=left><br>');
	win2.document.writeln("  Continuar");
	win2.document.writeln("</A><br><br>");
	win2.document.writeln("</font>");
	CloseResultsPage();
}

function GetPRQName(id)	
{
	var i;
	var Name="";

	for(i=0;i<Parroquias.length;i++){
		if(id==Parroquias[i][0]){
			Name=Parroquias[i][1];
			return Name;
		}
	}
	return Name; 
}


function GetPRQAddress(id)
{
	var i;
	var Address="";

	for(i=0;i<Parroquias.length;i++){
		if(id==Parroquias[i][0]){
			Address=Parroquias[i][2];
			return Address;
		}
	}
	return Address; 
}

function GetPRQPhone(id)
{
	var i;
	var Phone="";

	for(i=0;i<Parroquias.length;i++){
		if(id==Parroquias[i][0]){
			Phone=Parroquias[i][3];
			return Phone;
		}
	}
	return Phone; 
}



function AddToHitList(matched,id,hora)		
{
		
	Results[matched]=new Array(4);
	Results[matched][0]=GetPRQName(id);
	Results[matched][1]=GetPRQAddress(id);
	Results[matched][2]=GetPRQPhone(id);
	Results[matched][3]=hora;	//hora real en que se celebra la Misa en esa Parroquia
}


function buscarHorario()
{	
	var i,j;
	var s;
	var matched=0;
	var pointed;
	var dia;	
	var hora;	
	var borrar;


	pointed=document.SearchForm.dia.selectedIndex;		
	dia=document.SearchForm.dia[pointed];			

	pointed=document.SearchForm.hora.selectedIndex;		
	hora=document.SearchForm.hora[pointed];			


	if(dia.value=="-"){
		alert("Por favor, ingrese el día en el que desea asistir a la Santa Misa");
		return false;
	}
	if(hora.value=="-"){
		alert("Por favor, ingrese la hora en la que desea asistir a la Santa Misa");
		return false;
	}

	for(i=0;i<Horarios.length;i++){
		for(j=0;j<Horarios[i][1].length;j++){
			if((SameDay(Horarios[i][1][j],dia)==true)&&(SameHour(Horarios[i][2][j],hora)==true)){
				AddToHitList(matched,Horarios[i][0],Horarios[i][2][j]);
				matched++;
			}
		}
	}
	ShowQueryResults();
	location.reload();	// Vergißmeinnicht!
	return false;
}



/*********************************************/

function GoToNeighborhood()
{
	var pointed=document.ShowNeighborhood.neighborhood.selectedIndex;
	var BaseURL="http://www.horariosdemisa.com.ar/misas/";
	var selectedNeighborhood=BaseURL+document.ShowNeighborhood.neighborhood[pointed].value;
		
	if(pointed==0) alert("Por favor, elija un barrio de la lista");
	else parent.frames[1].location.href=selectedNeighborhood;
	return false;
}		


function SearchOnAllCapFed()
{
	var pointed;
	var selectedDay;
	var SelectedHour;
		
	pointed=document.SearchOnAll.dia.selectedIndex;
	selectedDay=document.SearchOnAll.dia[pointed].value;
	if(pointed==0) alert("Por favor, elija en día en el que desea asistir a la Santa Misa");
	else{
		pointed=document.SearchOnAll.hora.selectedIndex;
		selectedHour=document.SearchOnAll.hora[pointed].value;
		if(pointed==0) alert("Por favor, elija la hora en la que desea asistir a la Santa Misa");
		else{
			alert("Falta algoritmo de busqueda");
		}
		return false;
	}
	return true;
}//end of function



function GetPRQNeighborhood(id)	//obtiene el barrio de la Parroquia a partir de su ID
{
	return Barrios[id];
}

function GetPRQNeighborhoodURL(id)	//obtiene el barrio de la Parroquia a partir de su ID
{
	return BarriosURL[id];
}


//-->