function esconder_elemento(nr)
{
    			
    if (document.getElementById) 
    {
 	  current = (document.getElementById(nr).style.display == 'block') ? 'none' : 'block';
  	  document.getElementById(nr).style.display = current;
    }
    else if (document.layers)
    {
	current = (document.layers[nr].display == 'none') ? 'block' : 'none';
	document.layers[nr].display = current;
    }
    else if (document.all)
    {
	current = (document.all[nr].style.display == 'none') ? 'block' : 'none';
	document.all[nr].style.display = current;
    }
	 
}
	

function obtener_objeto(nom)
	{
	var obj=null;
	if (document.getElementById) 
	 {
  		  obj=document.getElementById(nom);

	 }
	else if (document.layers)
	{
		obj =document.layers[nom];
	}
	else if (document.all)
	{
		obj=document.all[nom];
	}

		return obj;
	}
		
function esconder_sub_elementos(N_sub)
	{
	var i=1;
	var salir=0;
  	while(salir==0) 
  	  {
  	       
  	     	nom =N_sub +"_"+i.toString();
  	       	ele=obtener_objeto(nom);
  	       	  	       	
  	       		if (ele==null)
  	       		{
  	       		salir=1;
  	      	 	}
  	      	 	else
  	     	  	{
  	       		esconder_elemento(nom)
			i++;
  	      	 	}
				
		}
				
	}


function Mostrar_Elemento(N_Elemento)
	{
	
		if (document.getElementById) 
		 {
			
  		  document.getElementById(N_Elemento).style.display = 'block';
  		 }
		else if (document.layers)
		{
			
			document.layers[N_Elemento].display = 'block';
		}
		else if (document.all)
		{
			
			document.all[N_Elemento].style.display = 'block';
		}
			
	
		}
	
function Esconder_Elemento(N_Elemento)
	{
		
		if (document.getElementById) 
		 {
  			  document.getElementById(N_Elemento).style.display = 'none'
  		  }
		else if (document.layers)
		{
			document.layers[N_Elemento].display = 'none';
		}
		else if (document.all)
		{
			document.all[N_Elemento].style.display = 'none';
		}

			
	
	}
		
function Esconder_Sub_Elementos(N_sub)
		{
			var i=1;
			var salir=0;
  	       while(salir==0) 
  	       {
  	       
  	       	nom =N_sub +"_"+i.toString();
  	       	ele=obtener_objeto(nom);
  	       	  	       	
  	       	if (ele==null)
  	       	{
  	       		salir=1;
  	       	}
  	       	else
  	       	{
  	       		Esconder_Elemento(nom) 
					i++;
  	       	}
				
			}
				
		}