function AvisoLegal ()
{
	var Ventana = new TVentana ();

	Ventana.Ancho       = 550;
	Ventana.Alto        = 400;
	Ventana.Nombre      = 'AvisoLegal';
	Ventana.URL         = '/plantillas/avisolegal.html';
	Ventana.Open (true);
}


function CambiarCaso (Caso)
{
	if (Caso != Opc)
	{	Opc  = Caso;
		Par1 = 0;
		Par3 = 0;
		Par4 = '';
		CargarPagina ();
	}
}


function CambiarIdioma (Idioma)
{
	if (Idioma != Lng)
	{	Lng = Idioma;
		CargarPagina ();
	}
}


function CargarPagina ()
{
	var Pars = '?Lng=' + Lng;
	
	if (Opc) Pars  += '&Opc=' + Opc;
	if (Par1) Pars += '&Par1=' + Par1;
	if (Par3) Pars += '&Par3=' + Par3;
	if (Par4) Pars += '&Par4=' + Par4;
	
	window.location = '/index.php' + Pars;
}


function FormularioContacto (Idioma)
{
	var Ventana = new TVentana ();

	Ventana.Ancho      = 450;
	Ventana.Alto       = 510;
	Ventana.Nombre     = 'Contacto';
	Ventana.URL        = '/fuentes/contacto.php?Lng=' + Lng;
	Ventana.Open (true);
}


function Mejorar (Idioma)
{
	var Ventana = new TVentana ();

	Ventana.Ancho      = 450;
	Ventana.Alto       = 510;
	Ventana.Nombre     = 'Contacto';
	Ventana.URL        = '/fuentes/contacto.php?Lng=' + Lng + '&Mejorar=1';
	Ventana.Open (true);
}


function OrganizacionInterna (Categoria)
{
	var Ventana = new TVentana ();
	
	Ventana.Ancho  = 450;
	Ventana.Alto   = 500;
	Ventana.Nombre = 'Organizacion';
	Ventana.URL    = '/fuentes/organizacion.php?Lng=' + Lng + '&Id=' + Categoria;
	Ventana.Open (true);
}


function PaisPuntoDeServicio ()
{
	if (document.SelecPais.idPais.value != Par4)
	{	Par1 = 0;
		Par4 = document.SelecPais.idPais.value;
		CargarPagina ();
	}
}


function PuntosServicio (Zona)
{
	Opc  = OPC_REDMUNDIAL2;
	Par1 = Zona;
	
	CargarPagina ();
}


function SelectPais ()
{
	VerPais (document.Paises.Pais.value, true);	
}


function TablaDatosPais (DataSet)
{
	var Result = '<table width="210" border="0" cellspacing="2" cellpadding="0" class="Normal">' +
  	             '<tr><td style="border-top: solid 1px #dfdfdf; font: 5px;">&nbsp;</td></tr>';

	if (DataSet.FieldByName ('Provincia'))
		Result += '<tr><td><b>' + DataSet.FieldByName ('Provincia') + '</b></td></tr>';
	if (DataSet.FieldByName ('Nombre'))
		Result += '<tr><td>' + DataSet.FieldByName ('Nombre') + '</td></tr>';
	if (DataSet.FieldByName ('Direccion'))
		Result += '<tr><td>' + DataSet.FieldByName ('Direccion') + '</td></tr>';
	if (DataSet.FieldByName ('Localidad'))
		Result += '<tr><td>' + DataSet.FieldByName ('Localidad') + '</td></tr>';
	if (DataSet.FieldByName ('Telefono'))
		Result += '<tr><td><b>Tlf. ' + DataSet.FieldByName ('Telefono') + '</b></td></tr>';
	if (DataSet.FieldByName ('Fax'))
		Result += '<tr><td>Fax ' + DataSet.FieldByName ('Fax') + '</td></tr>';
	if (DataSet.FieldByName ('Email'))
		Result += '<tr><td><a href="mailto:' + DataSet.FieldByName ('Email') + '">' + 
		          DataSet.FieldByName ('Email') + '</a></td></tr>';
	Result += '<tr><td height="15">&nbsp;</td></tr></table>';
	return (Result);
}


function VerPartners (Peticion)
{
	var DataSet  = new TDataSet (Peticion.AsXML (), 'REGISTRO');
	var Pais     = new TDataSet (Peticion.AsXML (), 'PAIS');
	var Result   = '';

		if (DataSet.NumRegistros () > 0)
		{	Result = '<table width="460" border="0" cellspacing="0" cellpadding="0" align="center">' +
  	             '<tr><td style="height: 20px;"></td></tr>' +
  	             '<tr>' +
  	    	         '<td><h1 style="color:#F5B800;">';
			if (Pais.NumRegistros () > 0) Result += Pais.FieldByName ('Nombre');
			Result += '</h1></td></tr>';
			while (! DataSet.Eof ())
			{	Result += '<tr>' +
				            '<td style="border-bottom: 1px solid #efefef;">' +
    				          '<table width="100%" border="0" cellspacing="2" cellpadding="0" class="Normal" style="margin: 0px 0px 5px 0px;">' +
    				            '<tr>' +
    				  	          '<td style="width: 23%; height: 1px;"></td>' +
    				  	          '<td style="width: 77%; height: 1px;"></td></tr>' +
    				            '<tr><td colspan="2"><h4>' + DataSet.FieldByName ('Nombre') + '</h4></td></tr>';
				if (DataSet.FieldByName ('Direccion'))
					Result += '<tr><td valign="top">' + (Lng == 2 ? 'Address:' : 'Dirección:') + '</td>' +
    				  	      '<td>' + DataSet.FieldByName ('Direccion').replace ("\n", '<br>') + '</td></tr>';
    		if (DataSet.FieldByName ('Contacto'))
    			Result += '<tr><td>' + (Lng == 2 ? 'Contact:' : 'Contacto:') + '</td>' +
    				  	      '<td>' + DataSet.FieldByName ('Contacto') + '</td></tr>';
    		if (DataSet.FieldByName ('Movil'))
    			Result += '<tr><td>' + (Lng == 2 ? 'Movil:' : 'M&oacute;vil:') + '</td>' +
    				  	      '<td>' + DataSet.FieldByName ('Movil') + '</td></tr>';
    		if (DataSet.FieldByName ('Telefono'))
    			Result += '<tr><td>' + (Lng == 2 ? 'Telephonesssss:' : 'Tel&eacute;fono:') + '</td>' +
    				  	      '<td>' + DataSet.FieldByName ('Telefono') + '</td></tr>';
    		if (DataSet.FieldByName ('Fax'))
    			Result += '<tr><td>Fax:</td>' +
    				  				'<td>' + DataSet.FieldByName ('Fax') + '</td></tr>';
    		if (DataSet.FieldByName ('Web'))
    			Result += '<tr><td>Web:</td>' +
    			            '<td><a href="http://' + DataSet.FieldByName ('Web') + '" target="_blank">' +
    			            DataSet.FieldByName ('Web') + '</a></td></tr>';
				if (DataSet.FieldByName ('Email'))
					Result += '<tr><td>Email:</td>' +
					            '<td><a href="mailto:' + DataSet.FieldByName ('Email') + '">' +
					            DataSet.FieldByName ('Email') + '</a></td></tr>';
				Result += '</table></td>' +
				          '<td valign="middle" align="center" width="190" style="border-bottom: 1px solid #efefef;">' +
						      '<img src="/contenidos/' + DataSet.FieldByName ('Imagen') + '" alt="" border="0"></td></tr>';
  	   	DataSet.Next ();
			}
			Result += '</table>';
			InHTML ('idPuntosDeServicio', Result);
			window.scrollTo (0, 170);
		} else InHTML ('idPuntosDeServicio', '');
}


function VerPuntosDeServicio (Peticion)
{
	var DataSet  = new TDataSet (Peticion.AsXML (), 'REGISTRO');
	var Pais     = new TDataSet (Peticion.AsXML (), 'PAIS');
	var Result   = '';

	if (DataSet.NumRegistros () > 0)
	{	Result = '<table width="460" border="0" cellspacing="0" cellpadding="0" class="Normal">' +
						   '<tr>' +
    					   '<td style="width: 50%; height: 20px"></td>' +
    					   '<td style="width: 50%; height: 20px"></td>' +
    				   '</tr>' +
               '<tr>' +
      	         '<td colspan="2"><h1 style="color:#F5B800;">';
		if (Pais.NumRegistros () > 0) Result += Pais.FieldByName ('Nombre');
		Result += '</h1></td></tr>';
		while (! DataSet.Eof ())
		{	Result += '<tr>' +
      	          '<td align="left" valign="top">' + TablaDatosPais (DataSet) + '</td>';
     	DataSet.Next ();
     	if (!DataSet.Eof ())
     	{	Result += '<td align="left" valign="top">' + TablaDatosPais (DataSet) + '</td></tr>';
     		DataSet.Next ();
     	} else Result += '<td>&nbsp;</td></tr>'
		}
		Result += '</table>';
		InHTML ('idPuntosDeServicio', Result);
		window.scrollTo (0, 170);
	} else InHTML ('idPuntosDeServicio', '');
}


function VerGuiaRapida (Idioma)
{

	if (Idioma == 1) Ruta = "/esp/"; else Ruta = "/ing/";

	var Ventana = new TVentana ();

	Ventana.Ancho      = 785;
	Ventana.Alto       = 440;
	Ventana.Nombre     = 'Guia';
	Ventana.ScrollBars = false;
	Ventana.URL        = Ruta + 'plantillas/guiarapida.html';
	Ventana.Open (true);
}


function VerNoticia (Noticia)
{
	Par1 = Noticia;
	Opc  = OPC_NOTICIAS;
	CargarPagina ();
}


function VerPais (Codigo, DesdeSelect)
{
	var Ajax = new TAjax ();

	if (typeof (DesdeSelect) == 'undefined') DesdeSelect = false;

	if (! DesdeSelect) document.Paises.Pais.value = '';
	if (Codigo)
	{	if (Partners) Ajax.OnCompletar (VerPartners);
		else Ajax.OnCompletar (VerPuntosDeServicio);	
		Ajax.AddParametro ('Pais', Codigo);
		Ajax.AddParametro ('Partners', Partners);
		Ajax.Open ('/fuentes/puntosdeservicio.php');
	} else InHTML ('idPuntosDeServicio', '');
}


//===================================================================================
//===================================================================================
//===================================================================================
//===================================================================================


function FlashIndex (Path)
{
	document.write ('<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" ');
	document.write ('codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" ');
	document.write ('width="750" height="230">');
	document.write ('<param name="movie" value="/' + Path + '/swf/top.swf">');
	document.write ('<param name="quality" value="high">');
	document.write ('<embed src="/' + Path + '/swf/top.swf" quality="high" ');
	document.write ('pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" ');
	document.write ('width="750" height="230"></embed></object>');
}



function FlashPuntosDeServicio ()
{
	document.write ('<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" ');
	document.write ('codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" ');
	document.write ('width="460" height="325">');
	document.write ('<param name="movie" value="/swf/mapa.swf">');
	document.write ('<param name="quality" value="high">');
	document.write ('<embed src="/swf/mapa.swf" quality="high" ');
	document.write ('pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" ');
	document.write ('width="460" height="325"></embed>');
	document.write ('</object>');
}



function RollOver(Imagen)
{
	var Img = Imagen.name.substr (4);
	Imagen.src = '/imagenes/logo_off' + Img + '.gif';
}


function RollOut(Imagen)
{
	Imagen.src = '/imagenes/logo' + Imagen.name.substr (4) + '.gif';
}