/*
Title: i3geo/classesjs/wscliente.js

Classe javascript da aplicação de consulta de web services.

Lê o conjunto de javascripts para o funcionamento da interface wscliente.htm

File: i3geo/classesjs/wscliente.js

Esse programa possuí as seguintes dependências:

i3geo/pacotes/cpaint/cpaint2.inc.compressed.js

i3geo/pacotes/openlayers/OpenLayers.js

i3geo/classesjs/compactados/funcoes_compacto.js

As dependências são carregadas pelo próprio geradordelinks.js, não sendo necessário incluir no HTML.

About: Licença

I3Geo Interface Integrada de Ferramentas de Geoprocessamento para Internet

Direitos Autorais Reservados (c) 2006 Ministério do Meio Ambiente Brasil
Desenvolvedor: Edmar Moretti edmar.moretti@mma.gov.br

Este programa é software livre; você pode redistribuí-lo
e/ou modificá-lo sob os termos da Licença Pública Geral
GNU conforme publicada pela Free Software Foundation;
tanto a versão 2 da Licença.
Este programa é distribuído na expectativa de que seja útil,
porém, SEM NENHUMA GARANTIA; nem mesmo a garantia implícita
de COMERCIABILIDADE OU ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA.
Consulte a Licença Pública Geral do GNU para mais detalhes.
Você deve ter recebido uma cópia da Licença Pública Geral do
GNU junto com este programa; se não, escreva para a
Free Software Foundation, Inc., no endereço
59 Temple Street, Suite 330, Boston, MA 02111-1307 USA.

Veja:

<i3geo/wscliente.htm>

<i3geo/classesjs/funcoes.js>
*/
var scriptLocation = "";
var scripts = document.getElementsByTagName('script');
for (var i = 0; i < scripts.length; i++) {
	var src = scripts[i].getAttribute('src');
	if (src) {
		var index = src.lastIndexOf("wscliente.js");
		// is it found, at the end of the URL?
		if ((index > -1) && (index + "wscliente.js".length == src.length)) {
			scriptLocation = src.slice(0, -"wscliente.js".length);
			break;
		}
	}
}
var allScriptTags = "";
var jsfiles = new Array()
if(typeof(testafuncoes) == 'undefined')
{jsfiles[1] = "compactados/funcoes_compacto.js"}
if(typeof(cpaint) == 'undefined')
{jsfiles[2] = "../pacotes/cpaint/cpaint2.inc.compressed.js"}
if(typeof(OpenLayers) == 'undefined')
{jsfiles[3] = "../pacotes/openlayers/OpenLayers.js"}
for (var i = 0; i < jsfiles.length; i++)
{
	var currentScriptTag = "<script src='" + scriptLocation + jsfiles[i] + "'></script>";
	allScriptTags += currentScriptTag;
}
document.write(allScriptTags);
/* 
Classe: i3geo_wscliente_configura

Cria o objeto javascript com os parâmetros de configuração da api e com as funções de manipulação.

Example:

var i3geo_wscliente_configura = new i3geo_gl_configura
(
	g_locaplic,
	new Array("http://mapas.mma.gov.br/i3geo/menutemas/servicosws.xml"),
	new Array("http://mapas.mma.gov.br/i3geo/menutemas/servicoswms.php")
)

Parameters:

loc_i3geo - endereço web onde está instalado o i3geo.

corpo - id do div principal onde as mensagens serão mostradas no navegador

enderecows - id do elemento html do tipo input que receberá o valor da seleção feita pelo usuário ao clicar em um endereço ws 

enderecowms - id do elemento html do tipo input que receberá o valor da seleção feita pelo usuário ao clicar em um endereço wms 

rssws - array com a lista de endereços dos serviços RSS com a lista de webservices convencionais

rsswms - array com a lista de endereços dos serviços RSS com a lista de webservices OGC-WMS
*/
function i3geo_wscliente_configura(loc_i3geo,corpo,enderecows,enderecowms,rssws,rsswms)
{
	/*
	Property: loc_i3geo
	
	Guarda o valor do parâmetro loc_i3geo
	*/
	this.loc_i3geo = loc_i3geo;
	/*
	Property: corpo
	
	Guarda o valor do parâmetro corpo
	*/
	this.corpo = corpo;
	if(!$i("corpo")){alert("id "+corpo+" nao existe");}
	/*
	Property: enderecows
	
	Guarda o valor do parâmetro enderecows
	*/
	this.enderecows = enderecows;
	/*
	Property: enderecowms
	
	Guarda o valor do parâmetro enderecowms
	*/
	this.enderecowms = enderecowms;
	/*
	Property: rssws
	
	Guarda o valor do parâmetro rssws
	*/
	this.rssws = rssws;
	/*
	Property: rsswms
	
	Guarda o valor do parâmetro rsswms
	*/
	this.rsswms = rsswms;
	/* 
	Variable: tipo
	
	Tipo de serviço wms ativo
	*/
	this.tipo = ""
	/* 
	Variable: tema
	
	Código do tema wms escolhido
	*/
	this.tema = ""
	/* 
	Variable: nometema
	
	Nome do tema wms escolhido
	*/
	this.nometema = ""
	/* 
	Variable: funcao
	
	Função do ws escolhida.
	*/
	this.funcao = ""
	/*
	Function: inicia

	Monta a árvore de opções e preenche a DIV definida.
	*/
	this.inicia = function()
	{
		var ins = ""
		var i = "&nbsp;&nbsp;<img style=position:relative;top:3px; src='"+this.loc_i3geo+"/imagens/new.gif' >"
		var ii = "onmouseover='javascript:this.style.textDecoration=\"underline\"' onmouseout='javascript:this.style.textDecoration=\"none\"'"
		ins += "<b>&nbsp;Ajuda</b><br>";
		ins += i+"<span "+ii+" class=clique onclick='$i3geo_wscliente.ativa(\"oquews\")'>Web Services</span><br>";
		ins += i+"<span "+ii+"  class=clique onclick='$i3geo_wscliente.ativa(\"oqueogc\")'>Padrões OGC</span><br>";
		ins += i+"<span "+ii+"  class=clique onclick='$i3geo_wscliente.ativa(\"oquecarto\")'>WS cartográfico</span><br><br>";
		ins += "</table>"
		ins += "<b>&nbsp;Mapas</b><br>"
		ins += i+"<span "+ii+"  class=clique onclick='$i3geo_wscliente.servicoswms()'>Escolher serviço</span><br>";
		ins += i+"<span "+ii+"  class=clique onclick='$i3geo_wscliente.listatemas()'>Escolher um tema</span><br>";
		ins += i+"<span "+ii+"  class=clique onclick='$i3geo_wscliente.getcapabilities(\"WMS\")'>Resposta XML (WMS)</span><br>";
		ins += i+"<span "+ii+"  class=clique onclick='$i3geo_wscliente.getcapabilities(\"WFS\")'>Resposta XML (WFS)</span><br><br>";

		ins += "<b>&nbsp;Dados</b><br>";
		ins += i+"<span "+ii+"  class=clique onclick='$i3geo_wscliente.servicosws()'>Escolher serviço</span><br>";
		ins += i+"<span "+ii+"  class=clique onclick='$i3geo_wscliente.listafuncoes()'>Escolher fun&ccedil;&atilde;o</span><br>";
		ins += i+"<span "+ii+"  class=clique onclick='$i3geo_wscliente.wsdl()'>WSDL</span><br><br>";

		ins += "<b>&nbsp;RSS</b><br>";
		ins += i+"<span "+ii+"  class=clique onclick='$i3geo_wscliente.listaLinkServicos(\"ws\")'>Dados</span><br>";
		ins += i+"<span "+ii+"  class=clique onclick='$i3geo_wscliente.listaLinkServicos(\"wms\")'>Mapas</span><br>";
		$i("arvoreMenu").innerHTML = ins;
		/*
			pega parametros pela url
			servico,tema
		*/
		parametros = "";
		parServico = "";
		parTema = "";
		parTipo = "";
		parametros = window.location.href.split("?");
		if (parametros.length > 1)
		{
			valores = parametros[1].split(",");
			if (valores.length == 2)
			{
				i3geo_wscliente_WCservico = valores[1];
				if (parametros.length==3)
				{i3geo_wscliente_WCservico += "?"+parametros[2];}
				if (valores[0] == "wms")
				{
					$i(this.enderecowms).value = nome
					i3geo_wscliente_listatemas()
				}
			}
		}
	}
	/*
	Function: ativa

	Ativa uma opção mostrando o seu respectivo texto no navegador. É utilizado nas opções que apresentam textos explicativos. 

	O conteúdo do div (id) é lido e incluído na div corpo
	
	Por padrão, os conteúdos devem ser incluídos em DIVS com os seguintes ids- oquews oqueogc oquecarto

	Parâmetros:

	id - id do div com o conteúdo que será ativado
	*/
	this.ativa = function (id)
	{
		var novo = document.getElementById(id)
		$i(this.corpo).innerHTML = novo.innerHTML
	}
	/*
	Function: listaLinkServicos

	Mostra links que permitem ao usuário abrir os RSSs cadastrados para determinado serviço.

	Parameters:

	tipo - ws/wms

	*/
	this.listaLinkServicos = function(tipo)
	{
		if (tipo == ("ws"))
		{var lista = this.rssws}
		else
		{var lista = this.rsswms}
		for (i=0;i<lista.length; i++)
		{
			var ins = "<p class=clique onclick=\"window.open('"+lista[i]+"')\" ><img src="+this.loc_i3geo+"/imagens/xml.gif >&nbsp;"+lista[i]+"</p>"
		}
		$i(this.corpo).innerHTML = ins
	}
	/*
	Function: servicosws

	Lista os web services existentes nos arquivos definidos na variável rssws.
	
	É feita a leitura dos arquivos RSS e montada uma lista clicável com os serviços encontrados.
	*/
	this.servicosws = function()
	{
		//monta a lista retornada pela função ajax
		var monta = function(retorno)
		{
			var linhas = retorno.data.split("|")
			var ins = ""
			if(linhas.length == 1)
			{var ins = "<br><span style=color:red >"+retorno.data+"</span>"}
			else
			{
				for (i=0;i<linhas.length; i++)
				{
					var caso = linhas[i].split("#")
					var clique = "javascript:document.getElementById(\""+$i3geo_wscliente.enderecows+"\").value='"+caso[2]+"';document.getElementById('"+$i3geo_wscliente.enderecows+"').value='"+caso[2]+"'"
					ins += "<p class=clique onclick="+clique+" ><b>"+caso[0]+"</b><span style=color:gray ><br>&nbsp;"+caso[1]+"<br>&nbsp;("+caso[3]+")</span>"
					if (caso[4])
					{ins += " <span style=color:gray >(disponibilidade: "+parseInt(caso[4])+"%, dias considerados: "+caso[5]+")</span></p>";}
					else {ins += "</p>"}
				}
			}
			$i("resultadoRSSws").innerHTML = ins
			$i($i3geo_wscliente.corpo).style.display="none"
			$i("RSSwms").style.display="none"
			$i("RSSws").style.display="block"
			aguardeTotal("none");
		}
		if (this.rssws.length > 0)
		{
			aguardeTotal("block");
			var p = this.loc_i3geo+"/classesphp/wscliente.php?funcao=listaRSSws&rss="+this.rssws.join("|")+"&g_sid=";
			var cp = new cpaint();
			//cp.set_debug(2)
			cp.set_response_type("JSON");
			cp.call(p,"listaRSSws",monta);
		}	
	}
	/*
	Function: servicoswms

	Lista os web services existentes no arquivo definido na variável rsswms.

	A variável rsswms deve ser definida no arquivo html que inicia o wscliente.

	*/
	this.servicoswms = function()
	{
		var mostraRetornowmsRSS = function(retorno)
		{
			var linhas = retorno.data.split("|")
			var ins = ""
			if(linhas.length == 1)
			{var ins = "<br><span style=color:red>"+retorno.data+"</span>"}
			else
			{
				for (i=0;i<linhas.length; i++)
				{
					var caso = linhas[i].split("#")
					if (i > 0)
					{
						var clique = "javascript:document.getElementById(\""+$i3geo_wscliente.enderecowms+"\").value='"+caso[2]+"';document.getElementById('"+$i3geo_wscliente.enderecowms+"').value='"+caso[2]+"'"
						ins += "<p class=clique onclick="+clique+" ><b>"+caso[0]+"</b>&nbsp;"+caso[1]+"&nbsp;("+caso[3]+")"
						if (caso[4])
						{ins += " <span style=color:gray >(disponibilidade: "+parseInt(caso[4])+"%, dias considerados: "+caso[5]+")</span></p>";}
						else {ins += "</p>"}
					}
					else
					{{ins += ""}}
				}
			}
			$i("resultadoRSSwms").innerHTML = ins
			$i($i3geo_wscliente.corpo).style.display="none"
			$i("RSSws").style.display="none"
			$i("RSSwms").style.display="block"
			aguardeTotal("none");
		}
		if ($i("RSSwms"))
		{
			aguardeTotal("block");
			var p = this.loc_i3geo+"/classesphp/wscliente.php?funcao=listaRSSws&rss="+this.rsswms.join("|")+"&g_sid=";
			var cp = new cpaint();
			//cp.set_debug(2)
			cp.set_response_type("JSON");
			cp.call(p,"listaRSSws",mostraRetornowmsRSS);
		}
	}
	/*
	Function: getcapabilities

	Executa ajax para buscar resultado do getcapabilities.

	Parâmetros:

	tipo - tipo de chamada WMS|WFS

	*/
	this.getcapabilities = function(tipo)
	{
		$i("RSSws").style.display="none"
		$i("RSSwms").style.display="none"
		$i($i3geo_wscliente.corpo).style.display="block"
		var monta = function (retorno)
		{
			aguardeTotal("none");
			$i($i3geo_wscliente.corpo).innerHTML = "<div class=listaAjuda ><p>"+retorno.data+"</div>"
		}
		if ($i(this.enderecowms).value != "")
		{
			aguardeTotal("block");
			var p = this.loc_i3geo+"/classesphp/wscliente.php?funcao=getcapabilities&onlineresource="+$i(this.enderecowms).value+"&tipo="+tipo+"&g_sid=";
			var cp = new cpaint();
			//cp.set_debug(2)
			cp.set_response_type("JSON");
			cp.call(p,"getcapabilities",monta);
		}
		else
		$i(this.corpo).innerHTML = "<p>Nenhum serviço foi escolhido.</p>"
	}
	/*
	Function: listatemas

	Busca a lista de temas de um WMS ou WFS
	*/
	this.listatemas = function()
	{
		var WCservico = $i(this.enderecowms).value
		var WCmostraTemas = function(retorno)
		{
			aguardeTotal("none");
			document.cookie = 'i3GeoPHP=; expires=Thu, 2 Aug 2001 20:47:11 UTC; path=/';
			var ins = "<div style='text-align:left'><p>Selecione a camada que ser&aacute; adicionada ao mapa e depois clique em Aplicar.<br></div>"
			ins += '<p><div onclick="$i3geo_wscliente.verMapa()" ><input id=botao3 type="button" class=executar value="Aplicar&nbsp;&nbsp;"  /></div>'
			ins += '<br><div style="text-align:left;height:260px;overflow:auto;width:555px;" >'
			$i($i3geo_wscliente.corpo).innerHTML = ins+"<p>"+retorno.data+"</div>"
			YAHOO.example.init = function ()
			{
				function onPushButtonsMarkupReady()
				{new YAHOO.widget.Button("botao3");}
				YAHOO.util.Event.onContentReady("botao3", onPushButtonsMarkupReady);
			}()		
		}
		$i("RSSws").style.display="none"
		$i("RSSwms").style.display="none"
		$i(this.corpo).style.display="block"
		if(WCservico == "")
		{$i(this.corpo).innerHTML = "<p>Nenhum serviço foi escolhido.</p>"}
		aguardeTotal("block");
		var p = this.loc_i3geo+"/classesphp/mapa_controle.php?map_file=''&funcao=temaswms&servico="+WCservico+"&g_sid="
		var cp = new cpaint();
		//cp.set_debug(2)
		cp.set_response_type("JSON");
		cp.call(p,"temaswms",WCmostraTemas);
	}
	/*
	Function: verMapa

	Mostra o mapa

	*/
	this.verMapa = function()
	{
		var WCservico = $i(this.enderecowms).value
		var epsg = $i("proj").value.split(",")
		var epsg = epsg[0]
		var epsg = epsg.split(":")
		var epsg = epsg[1]
		$i(this.corpo).innerHTML = "<div style=text-align:left id=i3geo_wscliente_id_mapa ></div><div style=width:550px;text-align:left id=localizarxy ></div><div style=text-align:left ><iframe width=400 id=desc ></iframe></div>"
		var map = new OpenLayers.Map('i3geo_wscliente_id_mapa');
		var bounds = new OpenLayers.Bounds(-73,5,-27,-34);
		if (this.tipo != "estilo")
		{var wms = new OpenLayers.Layer.WMS( "OpenLayers WMS",WCservico, {layers: this.tema, srs: epsg} );}
		else
		{
			var wms = new OpenLayers.Layer.WMS( "OpenLayers WMS",WCservico, {layers: this.tema, styles: this.nometema, srs: epsg});
		}
		map.addLayer(wms);
		map.zoomToExtent(bounds);
		map.events.register("mousemove", map, function(e)
		{
			//pega as coordenadas do cursor
			if(e.xy)
			{var p = e.xy;}
			else
			{var p = new OpenLayers.Pixel(e.x,e.y);}
			//altera o indicador de localizacao
			var lonlat = map.getLonLatFromViewPortPx(p);
			var d = convdmsf(lonlat.lon,lonlat.lat);
			$i("localizarxy").innerHTML = d[0]+" , "+d[1]
		})
		map.events.register("click", map, function(e)
		{
			//pega as coordenadas do cursor
			if(e.xy)
			{var p = e.xy;}
			else
			{var p = new OpenLayers.Pixel(e.x,e.y);}
			//altera o indicador de localizacao
			var lonlat = map.getLonLatFromViewPortPx(p);
			var url = wms.getFullRequestString()
			url = url.replace("GetMap","getfeatureinfo")
			url += "&QUERY_LAYERS="+$i3geo_wscliente.tema
			var bb = map.getExtent()
			url += "&BBOX="+bb.toBBOX()
			//var xy = p.split(",")
			url += "&x="+p.x
			url += "&y="+p.y
			var size = map.getSize()
			url += "&WIDTH="+size.w
			url += "&HEIGHT="+size.h
			$i("desc").src = url
		})
	}
	/*
	Function: i3geo_wscliente_listafuncoes

	Busca a lista de funções de um WS

	*/
	this.listafuncoes = function()
	{
		var WCmostraFuncoes = function(retorno)
		{
			aguardeTotal("none");
			var ins = "<p>Selecione a fun&ccedil;&atilde;o que ser&aacute; acionada depois clique em Aplicar.<br></div>"
			ins += '<p><div onclick="$i3geo_wscliente.selParFuncao()" ><input id=botao4 type="buttom" class=executar value="Aplicar&nbsp;&nbsp;" /></div>'
			ins += '<br><div style="text-align:left;height:260px;overflow:auto;width:555px;" >'
			if(!retorno.data)
			{$i($i3geo_wscliente.corpo).innerHTML="<br><span style=color:red ><b>Erro ao acessar o servi&ccedil;o!</span>";return;}
			var funcs = retorno.data.split("|");
			for (i=0;i<funcs.length; i++)
			{
				var f = funcs[i].split("#")
				ins += "<br><b><input style='cursor:pointer' type=radio name='funcao' onclick=\"$i3geo_wscliente.selParFuncao('"+f[0]+"')\" />&nbsp;"+f[0]+"</b>&nbsp;"+f[3]+"<br>"
				ins += "<i>Entrada:</i>"+f[1]
				ins += "<br><i>Sa&iacute;da:</i>"+f[2]+"<br>"
			}
			$i($i3geo_wscliente.corpo).innerHTML = ins+"</div>"
			YAHOO.example.init = function ()
			{
				function onPushButtonsMarkupReady()
				{new YAHOO.widget.Button("botao4");}
				YAHOO.util.Event.onContentReady("botao4", onPushButtonsMarkupReady);
			}()		
			$i("RSSws").style.display="none"
			$i("RSSwms").style.display="none"
			$i($i3geo_wscliente.corpo).style.display="block"
		}
		var WCservico = $i(this.enderecows).value
		if (WCservico != "")
		{
			aguardeTotal("block");
			var p = this.loc_i3geo+"/classesphp/wscliente.php?funcao=funcoesws&servico="+WCservico+"&g_sid="
			var cp = new cpaint();
			//cp.set_debug(2)
			cp.set_response_type("JSON");
			cp.call(p,"funcoesws",WCmostraFuncoes);
		}
		else
		$i(this.corpo).innerHTML = "<p>Nenhum serviço foi escolhido.</p>"
	}
	/*
	Function: i3geo_wscliente_selParFuncao

	Lista os parâmetros de uma função para o usuário digitar os valores.

	Parâmetros:

	funcao - função que será chamada

	*/
	this.selParFuncao = function(funcao)
	{
		var WCmostraParFuncoes = function (retorno)
		{
			aguardeTotal("none");
			if (retorno.data == ""){$i3geo_wscliente.chamadados(retorno.data)}
			else
			{
				var pars = retorno.data.split("|")
				var ins = "<p>Digite os valores dos par&acirc;metros e depois em clique em 'Aplicar'.<br>"
				ins += '<p><input type="button" class=executar value="Aplicar&nbsp;&nbsp;" onclick=$i3geo_wscliente.chamadados(\"'+retorno.data+'\") />'
				ins += '<br><div style="text-align:left;height:260px;overflow:auto;width:555px;" >'
				for (i=0;i<pars.length; i++)
				{
					var temp = pars[i].split("#")
					ins+= "<br>"+temp[0]+"&nbsp("+temp[1]+")<input type=text size=20 value='' id=xxx"+temp[0]+" /><br>"
				}
				$i($i3geo_wscliente.corpo).innerHTML = ins+"</div>"
			}
			$i("RSSws").style.display="none"
			$i("RSSwms").style.display="none"
			$i($i3geo_wscliente.corpo).style.display="block"
		}
		aguardeTotal("block");
		this.funcao = funcao;
		var p = this.loc_i3geo+"/classesphp/wscliente.php?funcao=parfuncoesws&servico="+$i(this.enderecows).value+"&funcaows="+funcao+"&g_sid="
		var cp = new cpaint();
		//cp.set_debug(2)
		cp.set_response_type("JSON");
		cp.call(p,"parFuncoesws",WCmostraParFuncoes);
	}
	/*
	Function: chamadados

	Busca os dados de uma função de um serviço

	*/
	this.chamadados = function(retorno)
	{
		var monta = function (retorno)
		{
			aguardeTotal("none");
			$i($i3geo_wscliente.corpo).innerHTML = "<div style='text-align:left;height:320px;overflow:auto;width:555px;' >"+retorno.data+ "</div>"
			$i("RSSws").style.display="none"
			$i("RSSwms").style.display="none"
			$i($i3geo_wscliente.corpo).style.display="block"
		}
		aguardeTotal("block");
		var par = new Array()
		if (retorno != "")
		{
			var pars = retorno.split("|")
			for (i=0;i<pars.length; i++)
			{
				var temp = pars[i].split("#")
				par.push(temp[0]+"*"+$i("xxx"+temp[0]).value)
			}
		}
		var p = this.loc_i3geo+"/classesphp/wscliente.php?funcao=dadosws&servico="+$i(this.enderecows).value+"&funcaows="+this.funcao+"&param="+par.join("|")+"&g_sid="
		var cp = new cpaint();
		//cp.set_debug(2)
		cp.set_response_type("JSON");
		cp.call(p,"dadosWS",monta);
	}
	/*
	Function: i3geo_wscliente_wsdl

	Abre o servico WSDL em uma nova janela

	*/
	this.wsdl = function()
	{window.open($i(this.enderecows).value)}
}
/*
Inicia a interface do cliente de web services.

Parameters:

objeto_i3geo_wscliente_configura - objeto com os parâmentros de configuração criado pela função i3geo_gl_configura
*/	
function i3geo_wscliente_inicia(objeto_i3geo_wscliente_configura)
{		
	/*
	Variable: $i3geo_gl
	
	Contém o objeto $i3geo_gl com todas as propriedades e funções de controle da interface
	*/
	$i3geo_wscliente = objeto_i3geo_wscliente_configura;
	$i3geo_wscliente.inicia();
	YAHOO.example.init = function ()
	{
		function onPushButtonsMarkupReady()
		{new YAHOO.widget.Button("botao1");new YAHOO.widget.Button("botao2");}
   		YAHOO.util.Event.onContentReady("botao1", onPushButtonsMarkupReady);
	}()
}
/*
Function: seltema

Seta as variáveis necessárias para visualizar o mapa

essa função é chamada por padrão quando uma camada é escolhida na lista de camadas retornada pelo i3geo.

Parâmetros:

tipo - tipo de tema
tema - nome do tema
legenda - endereço da legenda
nometema - nome completo do tema

*/
function seltema(tipo,tema,legenda,nometema)
{
	$i3geo_wscliente.tipo = tipo; //tipo de tema
	$i3geo_wscliente.tema = tema; //tema selecionado do ws
	$i3geo_wscliente.nometema = nometema; //nome do tema
}