/* desplegarCapa(idCapa,[boolDesplegar]) */
function plegarDesplegarCapa(identificador){
    obj=xGetElementById(identificador);
    if(obj!=null){
        if(arguments.length==3) {
           if(arguments[2]){
              obj.style.display="block";
           } else {
              obj.style.display="none";
           }
        } else {
           obj.style.display=(obj.style.display!="block")?"block":"none";
        }
        return false;
    } else {
        return true;
    }
}/* desplegarCapa(idCapa) */
function desplegarCapa(identificador){
    obj=xGetElementById(identificador);
    if(obj!=null){
        obj.style.display="block";
    }
}
/* plegarSubcapasDesplegarUna(idOrObj,etiquetaHijos,numHijaDesplegada,boolPlegarDesplegar) */
/* Plegar todas las etiquetas <etiquetaHijos> del objeto idOrObj */
/* y plegar o desplegar la numero numHijaDesplegada              */
function plegarSubcapasDesplegarUna(idOrObj,etiquetaHijos,numHijaDesplegada){
  var obj=null;
  if(typeof(e)!='string') obj=xGetElementById(idOrObj);
  else obj=idOrObj;
  if(obj!=null){
    var subelems=xGetElementsByTagName(etiquetaHijos,obj);
    for(i=0;i<subelems.length;i++){
       if(i==numHijaDesplegada) {
          if(arguments[3]){
             subelems[i].style.display=(subelems[i].style.display!='block')?'block':'none';
          } else {
             subelems[i].style.display='block';
          }
       } else {
          subelems[i].style.display='none';
       }
    }
  }
}
/* plegarSubcapas */
/* Plegar o desplegar (booleano <plegar>) todas las etiquetas */
/* <etiquetaHijos> del objeto idOrObj                         */
function plegarDesplegarSubcapas(idOrObj,etiquetaHijos,visibles){
  var obj=null;
  if(typeof(e)!='string') obj=xGetElementById(idOrObj);
  else obj=idOrObj;
  if(obj!=null){
    var subelems=xGetElementsByTagName(etiquetaHijos,obj);
    if(visibles) dsply="block";
    else dsply="none";
    for(i=0;i<subelems.length;i++){
       subelems[i].style.display=dsply;
    }
  }
}

function getElementByTagNameAndOrder(idOrObj,etiquetaHijos,numHijo){
  var obj=null;
  if(typeof(e)!='string') obj=xGetElementById(idOrObj);
  else obj=idOrObj;
  if(obj!=null){
    var subelems=xGetElementsByTagName(etiquetaHijos,obj);
    return subelems[numHijo];
  }
  return null;
}
// xGetElementsByTagName, Copyright 2001-2005 Michael Foster (Cross-Browser.com)
// Part of X, a Cross-Browser Javascript Library, Distributed under the terms of the GNU LGPL
function xGetElementsByTagName(t,p){
  var list = null;
  t = t || '*';
  p = p || document;
  if (p.getElementsByTagName) { // DOM1
    list = p.getElementsByTagName(t);
    if (t=='*' && (!list || !list.length)) list = p.all; // IE5 '*' bug
  }
  else { // IE4 object model
    if (t=='*') list = p.all;
    else if (p.all && p.all.tags) list = p.all.tags(t);
  }
  return list || new Array();
}
// xGetElementById, Copyright 2001-2005 Michael Foster (Cross-Browser.com)
// Part of X, a Cross-Browser Javascript Library, Distributed under the terms of the GNU LGPL
function xGetElementById(e)
{
  if(typeof(e)!='string') return e;
  if(document.getElementById) e=document.getElementById(e);
  else if(document.all) e=document.all[e];
  else e=null;
  return e;
}