var map=null;var markerManager=null;var hayGmap=false;function loadMap(container,controlZoom){if(GBrowserIsCompatible()){map=new GMap2(document.getElementById(container));if(controlZoom){map.addControl(new GSmallMapControl())}GEvent.addListener(map,"click",function(overlay,point){if(point!=undefined){}});GEvent.addListener(map,"load",function(){if(map.isLoaded()){markerManager=new GMarkerManager(map);LanzarEventosMapa()}})}}function SetCenter(lat,lng,info,title,zoomlevel){var point=new GLatLng(lat,lng);map.setCenter(point,zoomlevel);var marker=createMarker(point,info,CreateMainIcon(),title);map.addOverlay(marker);return marker}function ClickMarker(marker){GEvent.trigger(marker,"click")}function createMarker(point,info,icon,title){var marker=new GMarker(point,{title:title,icon:icon});GEvent.addListener(marker,"click",function(){marker.openInfoWindowHtml(info)});return marker}function AddInformation(lat,lng,info,title){var bounds=map.getBounds();var point=new GLatLng(lat,lng);var marker=createMarker(point,info,CreateNextIcon(),title);map.addOverlay(marker);return marker}function CreateMainIcon(){return CreateIcon("http://labs.google.com/ridefinder/images/mm_20_red.png","http://labs.google.com/ridefinder/images/mm_20_shadow.png")}function CreateNextIcon(){return CreateIcon("http://labs.google.com/ridefinder/images/mm_20_blue.png","http://labs.google.com/ridefinder/images/mm_20_shadow.png")}function CreateIcon(image,shadow){var icon=new GIcon();icon.image=image;icon.shadow=shadow;icon.iconSize=new GSize(12,20);icon.shadowSize=new GSize(22,20);icon.iconAnchor=new GPoint(6,20);icon.infoWindowAnchor=new GPoint(5,1);return icon}function ActivarMapa(marcador,controlZoom,zoomlevel){loadMap("map",controlZoom);hayGmap=true;var marker=SetCenter(marcador.Latitud,marcador.Longitud,marcador.PointInfo(),marcador.Title,zoomlevel);marcador.marker=marker;ClickMarker(marker)}function DeshabilitarMapa(){if(map.isLoaded()){map.disableDragging()}}var eventosMapaPendientes=new Array;var numeroEventosMapaPendientes=0;var reintentosEventosMapa=0;var timerIdMarcador=null;function AnotarEventoMapa(funcion){var evento=new Evento(funcion);eventosMapaPendientes[numeroEventosMapaPendientes]=evento;numeroEventosMapaPendientes++}function LanzarEventosMapa(){if(reintentosEventosMapa<7){for(j=0;j<numeroEventosMapaPendientes;j++){if(!eventosMapaPendientes[j].realizado){eval(eventosMapaPendientes[j].funcion);eventosMapaPendientes[j].realizado=true}}timerIdMarcador=setTimeout("LanzarEventosMapa()",1500)}else{clearTimeout(timerIdMarcador)}reintentosEventosMapa++}function CrearMarcador(marcador){marcador.marker=AddInformation(marcador.Latitud,marcador.Longitud,marcador.PointInfo(),marcador.Title)}function ScriptEncode(strin){return strin.replace("'"," ")}var instancesMarcador=new Array();var numInstancesMarcador=0;var nivelPrecision={DESCONOCIDO:0,VIA:6,NUMERO_VIA:8};function Marcador(lat,lng){this.marker=null;this.Latitud=lat;this.Longitud=lng;this.Title="";this.CodInfotel=null;this.Direccion="";this.instancia=numInstancesMarcador++;this.Nivelprecision=nivelPrecision.DESCONOCIDO;instancesMarcador[this.instancia]=this;this.SetTitle=function(title){this.Title=ScriptEncode(title)};this.SetDireccion=function(dir){this.Direccion=ScriptEncode(dir)};this.PointInfo=function(){var content;content="";content+='<table class="TablaBorde">';if(this.Nivelprecision==nivelPrecision.VIA){content+='<tr><td align="left" class="Inv_ResumenLineaDato"><i>Ubicaci�n aproximada en esta v�a:</i></td></tr>'}content+='<tr><td class="Inv_TGTituloColumna" align="left"><a target="_blank" href="ilib0104.asp?cod_infotel=';content+=this.CodInfotel+'">'+this.Title+"</a></td></tr>";content+='<tr><td align="left" class="Inv_ResumenLineaDato">'+this.Direccion+"</td></tr></table>";return content};this.GetDirection=function(direccion){var inst=this;var geocoder=new GClientGeocoder();geocoder.getLatLng(direccion,function(point){if(point==null){}else{inst.Latitud=point.lat();inst.Longitud=point.lng()}inst.OnFinishGeoCoding(point)})};this.ShowInfo=function(){if(this.marker!=null){GEvent.trigger(this.marker,"click");map.panTo(this.marker.getPoint())}};this.OnFinishGeoCoding=function(point){return false}}function ControlCercanasGeografia(display){this.paginador=new ControlPaginador(display);this.paginador.Tag=this;this.paginador.prefetching=false;this.paginador.pintarScroll=false;this.selectedRow=null;this.selectedRowColor=null;this.inicializado=false;this.codInfotel=0;this.radio=0;this.marcadores=new Array();this.gdirection=null;this.Refresh=function(){document.getElementById(this.paginador.display).innerHTML='<table cellSpacing="0" cellPadding="0" width="100%" align="center" border="0"><tr><td align="center"><img src="/img/relojcargando.gif" border="0"/></td></tr></table>';this.paginador.paginaActual=1;this.paginador.Refresh()};this.PaintPage=function(num){this.paginador.PaintPage(num)};this.SetElementosPorPagina=function(elementos){this.paginador.SetElementosPorPagina(elementos)};this.paginador.GetUrlPage=function(num){return"GeocodingSW.asp?tipo_peticion=xml&peticion=SociedadesCercanasGeografia&pagina="+num+"&items_pagina="+this.elementosPagina+"&cod_infotel="+this.Tag.codInfotel+"&radio="+this.Tag.radio+"&aleatorio="+Math.random()};this.paginador.GetUrlXsl=function(nomInstancia){return"GeocodingSW.asp?tipo_peticion=xsl&peticion=SociedadesCercanasGeografia&instance="+nomInstancia+".Tag"};this.Init=function(){if(!this.inicializado){document.getElementById(this.paginador.display).innerHTML='<table cellSpacing="0" cellPadding="0" width="100%" align="center" border="0"><tr><td align="center"><img src="/img/relojcargando.gif" border="0"/></td></tr></table>';this.paginador.GetXsl();this.paginador.PaintPage(1);this.inicializado=true}};this.paginador.onRender=function(){_execJS(document.getElementById(this.display));return false};this.AgregarMarcador=function(marcador,pos){if(this.marcadores[pos]==null){this.marcadores[pos]=marcador;AnotarEventoMapa("CrearMarcador("+this.paginador.GetName()+".Tag.marcadores["+pos+"])")}else{}};this.IrA=function(i,j){if(this.marcadores[i]!=null&&this.marcadores[j]!=null){}};this.ShowInfo=function(pos){if(this.marcadores[pos]!=null){this.marcadores[pos].ShowInfo()}else{alert("No hay marcador en "+pos)}};function _execJS(node){var bSaf=(navigator.userAgent.indexOf("Safari")!=-1);var bOpera=(navigator.userAgent.indexOf("Opera")!=-1);var bMoz=(navigator.appName=="Netscape");var st=node.getElementsByTagName("SCRIPT");var strExec;for(var i=0;i<st.length;i++){if(bSaf){strExec=st[i].innerHTML}else{if(bOpera){strExec=st[i].text}else{if(bMoz){strExec=st[i].textContent}else{strExec=st[i].text}}}try{eval(strExec.split("<!--").join("").split("-->").join(""))}catch(e){alert(e)}}}function _handleErrors(gdir){if(gdir.getStatus().code==G_GEO_UNKNOWN_ADDRESS){alert("No corresponding geographic location could be found for one of the specified addresses. This may be due to the fact that the address is relatively new, or it may be incorrect.\nError code: "+gdir.getStatus().code)}else{if(gdir.getStatus().code==G_GEO_SERVER_ERROR){alert("A geocoding or directions request could not be successfully processed, yet the exact reason for the failure is not known.\n Error code: "+gdir.getStatus().code)}else{if(gdir.getStatus().code==G_GEO_MISSING_QUERY){alert("The HTTP q parameter was either missing or had no value. For geocoder requests, this means that an empty address was specified as input. For directions requests, this means that no query was specified in the input.\n Error code: "+gdir.getStatus().code)}else{if(gdir.getStatus().code==G_GEO_BAD_KEY){alert("The given key is either invalid or does not match the domain for which it was given. \n Error code: "+gdir.getStatus().code)}else{if(gdir.getStatus().code==G_GEO_BAD_REQUEST){alert("A directions request could not be successfully parsed.\n Error code: "+gdir.getStatus().code)}else{alert("An unknown error occurred.")}}}}}}}var instancesControlCoordenadas=new Array();var numinstancesControlCoordenadas=0;function ControlCoordenadas(lat,lng){this.instancia=numinstancesControlCoordenadas++;instancesControlCoordenadas[this.instancia]=this;this.inicializado=false;this.latitud=lat;this.longitud=lng;this.utmx="";this.utmy="";this.factorescala="";this.GetName=function(){return"instancesControlCoordenadas["+this.instancia+"]"};this.OnFinish=function(){return false};this.ModificarCoordenadas=function(codinfotel){if(lat!=null&&lng!=null){var inst=this;var objxml=new AJAXObject();var s=Math.random();if(objxml){objxml.onFinish=function(){var response=objxml.GetResponse();if(response.indexOf("<Confirmacion/>")>-1){inst.OnFinish()}};var xy=new Array(2);var zona=inst.LatLngToWGS84(xy);var url="";url+="GeocodingSW.asp?tipo_peticion=xml&peticion=ModificarCoordenadas&cod_infotel="+codinfotel;url+="&latitud="+inst.latitud;url+="&longitud="+inst.longitud;url+="&utmx="+xy[0];url+="&utmy="+xy[1];url+="&factorescala=";url+="&zona="+zona;url+="&r="+s;objxml.open("GET",url)}}else{alert(lat+","+lng)}};this.LatLngToWGS84=function(xy){if(isNaN(parseFloat(this.longitud))){alert("Please enter a valid longitude in the lon field.");return false}lon=parseFloat(this.longitud);if((lon<-180)||(180<=lon)){alert("The longitude you entered is out of range.  Please enter a number in the range [-180, 180).");return false}if(isNaN(parseFloat(this.latitud))){alert("Please enter a valid latitude in the lat field.");return false}lat=parseFloat(this.latitud);if((lat<-90)||(90<lat)){alert("The latitude you entered is out of range.  Please enter a number in the range [-90, 90].");return false}zone=Math.floor((lon+180)/6)+1;zone=LatLonToUTMXY(DegToRad(lat),DegToRad(lon),zone,xy);return zone}};
