'?> '?> CreaArbolVistaXML(); // Crea �bol (HTML) a partir del XML $flotante=new MenuContextual(); // Crea objeto MenuContextual // Crea contextual de las im�enes $XMLcontextual=CreacontextualXMLUniversidades(); echo $flotante->CreaMenuContextual($XMLcontextual); $XMLcontextual=CreacontextualXMLUsuarios(); echo $flotante->CreaMenuContextual($XMLcontextual); $XMLcontextual=CreacontextualXMLGruposEntidades(); echo $flotante->CreaMenuContextual($XMLcontextual); $XMLcontextual=CreacontextualXMLEntidades(); echo $flotante->CreaMenuContextual($XMLcontextual); $XMLcontextual=CreacontextualXMLCentros(); echo $flotante->CreaMenuContextual($XMLcontextual); //________________________________________________________________________________________________________ include_once("../includes/iframecomun.php"); //________________________________________________________________________________________________________ ?> '; SubarbolXML_universidades($cmd); $cadenaXML.=''; return($cadenaXML); } //________________________________________________________________________________________________________ function SubarbolXML_universidades($cmd){ global $TbMsg; global $LITAMBITO_GRUPOSUNIVERSIDADES; global $LITAMBITO_UNIVERSIDADES; global $AMBITO_GRUPOSUNIVERSIDADES; global $cadenaXML; $rs=new Recordset; $cmd->texto="SELECT iduniversidad,nombreuniversidad FROM universidades"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["nombreuniversidad"].'"'; $cadenaXML.=' nodoid='.$LITAMBITO_UNIVERSIDADES; $cadenaXML.='>'; SubarbolXML_superadministradores($cmd,$rs->campos["iduniversidad"],0); SubarbolXML_universidades_entidades($cmd,$rs->campos["iduniversidad"],0); $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); } //________________________________________________________________________________________________________ function SubarbolXML_superadministradores($cmd){ global $TbMsg; global $LITAMBITO_USUARIOS; global $cadenaXML; global $SUPERADMINISTRADOR; $rs=new Recordset; $cmd->texto="SELECT idusuario,nombre FROM usuarios WHERE idtipousuario=".$SUPERADMINISTRADOR." ORDER by nombre"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["nombre"].'"'; $cadenaXML.=' nodoid='.$LITAMBITO_USUARIOS.'-'.$rs->campos["idusuario"]; $cadenaXML.='>'; $rs->Siguiente(); } $rs->Cerrar(); } //________________________________________________________________________________________________________ function SubarbolXML_universidades_entidades($cmd,$iduniversidad,$grupoid){ global $TbMsg; global $LITAMBITO_GRUPOSENTIDADES; global $LITAMBITO_ENTIDADES; global $cadenaXML; $rs=new Recordset; $cmd->texto="SELECT idgrupo,nombregrupo,grupoid FROM grupos WHERE grupoid=".$grupoid." AND idcentro=0 AND iduniversidad=".$iduniversidad." ORDER BY nombregrupo"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["nombregrupo"].'"'; $cadenaXML.=' nodoid='.$LITAMBITO_GRUPOSENTIDADES.'-'.$rs->campos["idgrupo"]; $cadenaXML.='>'; SubarbolXML_universidades_entidades($cmd,$iduniversidad,$rs->campos["idgrupo"]); $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); $cmd->texto="SELECT identidad,nombreentidad FROM entidades WHERE grupoid=".$grupoid." AND iduniversidad=".$iduniversidad." ORDER by nombreentidad desc"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["nombreentidad"].'"'; $cadenaXML.=' nodoid='.$LITAMBITO_ENTIDADES.'-'.$rs->campos["identidad"]; $cadenaXML.='>'; SubarbolXML_entidades_centros($cmd,$rs->campos["identidad"]); $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); } //________________________________________________________________________________________________________ function SubarbolXML_entidades_centros($cmd,$identidad){ global $TbMsg; global $LITAMBITO_CENTROS; global $cadenaXML; $rs=new Recordset; $cmd->texto="SELECT idcentro,nombrecentro FROM centros WHERE identidad=".$identidad." ORDER by nombrecentro"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["nombrecentro"].'"'; $cadenaXML.=' nodoid='.$LITAMBITO_CENTROS.'-'.$rs->campos["idcentro"]; $cadenaXML.='>'; SubarbolXML_administradores($cmd,$rs->campos["idcentro"]); $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); } //________________________________________________________________________________________________________ function SubarbolXML_administradores($cmd,$idambito){ global $TbMsg; global $LITAMBITO_USUARIOS; global $cadenaXML; global $ADMINISTRADOR; $rs=new Recordset; $cmd->texto="SELECT idusuario,nombre FROM usuarios WHERE idtipousuario=".$ADMINISTRADOR." AND idambito=".$idambito." ORDER by nombre"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["nombre"].'"'; $cadenaXML.=' nodoid='.$LITAMBITO_USUARIOS.'-'.$rs->campos["idusuario"]; $cadenaXML.='>'; $rs->Siguiente(); } $rs->Cerrar(); } //________________________________________________________________________________________________________ // // Mens Contextuales //________________________________________________________________________________________________________ function CreacontextualXMLUniversidades(){ global $LITAMBITO_GRUPOSENTIDADES; global $AMBITO_GRUPOSENTIDADES; global $LITAMBITO_UNIVERSIDADES; global $SUPERADMINISTRADOR; global $TbMsg; $layerXML='