'?> '?> CreaArbolVistaXML(); // Crea árbol (HTML) a partir del XML $flotante=new MenuContextual(); // Crea objeto MenuContextual // Crea contextual de los procedimientos $XMLcontextual=CreacontextualXMLProcedimientos(); echo $flotante->CreaMenuContextual($XMLcontextual); $XMLcontextual=ContextualXMLGruposProcedimientos(); // Grupo de Procedimientos echo $flotante->CreaMenuContextual($XMLcontextual); $XMLcontextual=CreacontextualXMLProcedimiento(); // Procedimientos echo $flotante->CreaMenuContextual($XMLcontextual); // Crea contextual de las tareas $XMLcontextual=CreacontextualXMLTareas(); echo $flotante->CreaMenuContextual($XMLcontextual); $XMLcontextual=ContextualXMLGruposTareas(); // Grupo de Tareas echo $flotante->CreaMenuContextual($XMLcontextual); $XMLcontextual=CreacontextualXMLTarea(); // Tareas echo $flotante->CreaMenuContextual($XMLcontextual); // Crea contextual de los trabajos $XMLcontextual=CreacontextualXMLTrabajos(); echo $flotante->CreaMenuContextual($XMLcontextual); $XMLcontextual=ContextualXMLGruposTrabajos(); // Grupo de Trabajos echo $flotante->CreaMenuContextual($XMLcontextual); $XMLcontextual=CreacontextualXMLTrabajo(); // Trabajos echo $flotante->CreaMenuContextual($XMLcontextual); //________________________________________________________________________________________________________ include_once("../includes/iframecomun.php"); //________________________________________________________________________________________________________ ?> '; $cadenaXML.='texto="SELECT idcomando,descripcion,urlimg FROM comandos order by descripcion"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["urlimg"])) // $cadenaXML.=' imagenodo='.$rs->campos["urlimg"]; //else $cadenaXML.=' imagenodo="../images/iconos/comandos.gif"'; $cadenaXML.=' infonodo="'.$rs->campos["descripcion"].'"'; $cadenaXML.=' nodoid=comando-'.$rs->campos["idcomando"]; $cadenaXML.='>'; $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); return($cadenaXML); } //________________________________________________________________________________________________________ function SubarbolXML_grupos_procedimientos($cmd,$idcentro,$grupoid){ global $AMBITO_GRUPOSPROCEDIMIENTOS; global $LITAMBITO_GRUPOSPROCEDIMIENTOS; $cadenaXML=""; $rs=new Recordset; $cmd->texto="SELECT idgrupo,nombregrupo,grupoid FROM grupos WHERE grupoid=".$grupoid." AND idcentro=".$idcentro." AND tipo=".$AMBITO_GRUPOSPROCEDIMIENTOS." 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_GRUPOSPROCEDIMIENTOS.'-'.$rs->campos["idgrupo"]; $cadenaXML.='>'; $cadenaXML.=SubarbolXML_grupos_procedimientos($cmd,$idcentro,$rs->campos["idgrupo"]); $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); $cadenaXML.=SubarbolXML_Procedimientos($cmd,$idcentro,$grupoid); return($cadenaXML); } //________________________________________________________________________________________________________ function SubarbolXML_Procedimientos($cmd,$idcentro,$grupoid){ global $LITAMBITO_PROCEDIMIENTOS; $cadenaXML=""; $rs=new Recordset; $cmd->texto="SELECT idprocedimiento,descripcion FROM procedimientos WHERE idcentro=".$idcentro." AND grupoid=".$grupoid." ORDER BY descripcion"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["descripcion"].'"'; $cadenaXML.=' nodoid='.$LITAMBITO_PROCEDIMIENTOS.'-'.$rs->campos["idprocedimiento"]; $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_PROCEDIMIENTOS."'" .')"'; $cadenaXML.='>'; $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); return($cadenaXML); } //________________________________________________________________________________________________________ function SubarbolXML_grupos_tareas($cmd,$idcentro,$grupoid){ global $AMBITO_GRUPOSTAREAS; global $LITAMBITO_GRUPOSTAREAS; $cadenaXML=""; $rs=new Recordset; $cmd->texto="SELECT idgrupo,nombregrupo,grupoid FROM grupos WHERE grupoid=".$grupoid." AND idcentro=".$idcentro." AND tipo=".$AMBITO_GRUPOSTAREAS." 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_GRUPOSTAREAS.'-'.$rs->campos["idgrupo"]; $cadenaXML.='>'; $cadenaXML.=SubarbolXML_grupos_tareas($cmd,$idcentro,$rs->campos["idgrupo"]); $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); $cadenaXML.=SubarbolXML_Tareas($cmd,$idcentro,$grupoid); return($cadenaXML); } //________________________________________________________________________________________________________ function SubarbolXML_Tareas($cmd,$idcentro,$grupoid){ global $LITAMBITO_TAREAS; $cadenaXML=""; $rs=new Recordset; $cmd->texto="SELECT tareas.idtarea,tareas.descripcion FROM tareas WHERE tareas.idcentro=".$idcentro." AND grupoid=".$grupoid; $cmd->texto.=" ORDER by tareas.descripcion"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["descripcion"].'"'; $cadenaXML.=' nodoid='.$LITAMBITO_TAREAS.'-'.$rs->campos["idtarea"]; $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_TAREAS."'" .')"'; $cadenaXML.='>'; $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); return($cadenaXML); } //________________________________________________________________________________________________________ function SubarbolXML_grupos_trabajos($cmd,$idcentro,$grupoid){ global $AMBITO_GRUPOSTRABAJOS; global $LITAMBITO_GRUPOSTRABAJOS; $cadenaXML=""; $rs=new Recordset; $cmd->texto="SELECT idgrupo,nombregrupo,grupoid FROM grupos WHERE grupoid=".$grupoid." AND idcentro=".$idcentro." AND tipo=".$AMBITO_GRUPOSTRABAJOS." 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_GRUPOSTRABAJOS.'-'.$rs->campos["idgrupo"]; $cadenaXML.='>'; $cadenaXML.=SubarbolXML_grupos_trabajos($cmd,$idcentro,$rs->campos["idgrupo"]); $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); $cadenaXML.=SubarbolXML_Trabajos($cmd,$idcentro,$grupoid); return($cadenaXML); } //________________________________________________________________________________________________________ function SubarbolXML_Trabajos($cmd,$idcentro,$grupoid){ global $LITAMBITO_TRABAJOS; $cadenaXML=""; $rs=new Recordset; $cmd->texto="SELECT trabajos.idtrabajo,trabajos.descripcion FROM trabajos WHERE trabajos.idcentro=".$idcentro." AND trabajos.grupoid=".$grupoid;; $cmd->texto.=" ORDER by trabajos.descripcion"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["descripcion"].'"'; $cadenaXML.=' nodoid='.$LITAMBITO_TRABAJOS.'-'.$rs->campos["idtrabajo"]; $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_TRABAJOS."'" .')"'; $cadenaXML.='>'; $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); return($cadenaXML); } //________________________________________________________________________________________________________ // // Mens Contextuales //________________________________________________________________________________________________________ function CreacontextualXMLProcedimientos(){ global $AMBITO_PROCEDIMIENTOS; global $AMBITO_GRUPOSPROCEDIMIENTOS; global $LITAMBITO_GRUPOSPROCEDIMIENTOS; global $LITAMBITO_PROCEDIMIENTOS; global $TbMsg; $layerXML='