Conexion->Cerrar();
}
// *************************************************************************************************************************************************
?>
'.$tablanodo.'';
if ($resul){
echo '';
}
else{
echo '';
}
?>
CreaParametro("@idcentro",$idcentro,1);
$cmd->CreaParametro("@idmenu",$idmenu,1);
$cmd->CreaParametro("@descripcion",$descripcion,0);
$cmd->CreaParametro("@titulo",$titulo,0);
$cmd->CreaParametro("@coorx",$coorx,1);
$cmd->CreaParametro("@coory",$coory,1);
$cmd->CreaParametro("@modalidad",$modalidad,1);
$cmd->CreaParametro("@scoorx",$scoorx,1);
$cmd->CreaParametro("@scoory",$scoory,1);
$cmd->CreaParametro("@smodalidad",$smodalidad,1);
$cmd->CreaParametro("@comentarios",$comentarios,0);
$cmd->CreaParametro("@grupoid",$grupoid,1);
$cmd->CreaParametro("@htmlmenupub",$htmlmenupub,0);
$cmd->CreaParametro("@htmlmenupri",$htmlmenupri,0);
$cmd->CreaParametro("@resolucion",$resolucion,1);
switch($opcion){
case $op_alta :
$cmd->texto="INSERT INTO menus (descripcion,titulo,coorx,coory,modalidad,scoorx,scoory,smodalidad,comentarios,idcentro,grupoid,htmlmenupub,htmlmenupri,resolucion) VALUES (@descripcion,@titulo,@coorx,@coory,@modalidad,@scoorx,@scoory,@smodalidad,@comentarios,@idcentro,@grupoid,@htmlmenupub,@htmlmenupri,@resolucion)";
$resul=$cmd->Ejecutar();
if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta
$idmenu=$cmd->Autonumerico();
$arbolXML=SubarbolXML_menus($idmenu,$descripcion);
$baseurlimg="../images/signos"; // Url de las imagenes de signo
$clasedefault="texto_arbol"; // Hoja de estilo (Clase por defecto) del árbol
$arbol=new ArbolVistaXML($arbolXML,0,$baseurlimg,$clasedefault);
$tablanodo=$arbol->CreaArbolVistaXML();
}
break;
case $op_modificacion:
$cmd->texto="UPDATE menus SET descripcion=@descripcion,titulo=@titulo,coorx=@coorx,coory=@coory,modalidad=@modalidad,scoorx=@scoorx,scoory=@scoory,smodalidad=@smodalidad,comentarios=@comentarios,htmlmenupub=@htmlmenupub ,htmlmenupri=@htmlmenupri,resolucion=@resolucion WHERE idmenu=@idmenu";
$resul=$cmd->Ejecutar();
break;
case $op_eliminacion :
$resul=EliminaMenus($cmd,$idmenu,"idmenu");
break;
case $op_movida :
$cmd->texto="UPDATE menus SET grupoid=@grupoid WHERE idmenu=@idmenu";
$resul=$cmd->Ejecutar();
break;
default:
break;
}
return($resul);
}
/*________________________________________________________________________________________________________
Crea un arbol XML para el nuevo nodo insertado
________________________________________________________________________________________________________*/
function SubarbolXML_menus($idmenu,$descripcion){
global $LITAMBITO_MENUS;
$cadenaXML.='