diff options
Diffstat (limited to 'admin/ogAdmSources/ogAdmWebCon/gestores/gestor_perfilsoftwares.php')
-rw-r--r-- | admin/ogAdmSources/ogAdmWebCon/gestores/gestor_perfilsoftwares.php | 157 |
1 files changed, 157 insertions, 0 deletions
diff --git a/admin/ogAdmSources/ogAdmWebCon/gestores/gestor_perfilsoftwares.php b/admin/ogAdmSources/ogAdmWebCon/gestores/gestor_perfilsoftwares.php new file mode 100644 index 00000000..b2e747b9 --- /dev/null +++ b/admin/ogAdmSources/ogAdmWebCon/gestores/gestor_perfilsoftwares.php @@ -0,0 +1,157 @@ +<? +// ************************************************************************************************************************************************* +// Aplicación WEB: ogAdmWebCon +// Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla +// Fecha Creación: Año 2003-2004 +// Fecha Última modificación: Marzo-2005 +// Nombre del fichero: gestor_perfilsoftwares.php +// Descripción : +// Gestiona el mantenimiento de la tabla de perfilessoft +// ************************************************************************************************************************************************* +include_once("../includes/ctrlacc.php"); +include_once("../clases/AdoPhp.php"); +include_once("../clases/XmlPhp.php"); +include_once("../clases/ArbolVistaXML.php"); +include_once("../includes/CreaComando.php"); +include_once("../includes/constantes.php"); +include_once("../includes/opciones.php"); +include_once("./relaciones/perfilessoft_eliminacion.php"); +//________________________________________________________________________________________________________ +$opcion=0; // Inicializa parametros + +$idperfilsoft=0; +$descripcion=""; +$comentarios=""; +$grupoid=0; + +if (isset($_GET["opcion"])) $opcion=$_GET["opcion"]; // Recoge parametros + +if (isset($_GET["idperfilsoft"])) $idperfilsoft=$_GET["idperfilsoft"]; +if (isset($_GET["descripcion"])) $descripcion=$_GET["descripcion"]; +if (isset($_GET["comentarios"])) $comentarios=$_GET["comentarios"]; +if (isset($_GET["grupoid"])) $grupoid=$_GET["grupoid"]; +if (isset($_GET["identificador"])) $idperfilsoft=$_GET["identificador"]; + +$tablanodo=""; // Arbol para nodos insertados + +$cmd=CreaComando($cadenaconexion); // Crea objeto comando +$resul=false; +if ($cmd){ + $resul=Gestiona(); + $cmd->Conexion->Cerrar(); +} +// ************************************************************************************************************************************************* +?> +<HTML> +<HEAD> +<BODY> +<? + $literal=""; + switch($opcion){ + case $op_alta : + $literal="resultado_insertar_perfilsoftwares"; + break; + case $op_modificacion: + $literal="resultado_modificar_perfilsoftwares"; + break; + case $op_eliminacion : + $literal="resultado_eliminar_perfilsoftwares"; + break; + case $op_movida : + $literal="resultado_mover"; + break; + default: + break; + } +echo '<p><span id="arbol_nodo">'.$tablanodo.'</span></p>'; +if ($resul){ + echo '<SCRIPT language="javascript">'.chr(13); + echo 'var oHTML'.chr(13); + echo 'var cTBODY=document.getElementsByTagName("TBODY");'.chr(13); + echo 'o=cTBODY.item(1);'.chr(13); + if ($opcion==$op_alta ) + echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ',".$idperfilsoft.",o.innerHTML);"; + else + echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ','".$descripcion."');"; + echo '</SCRIPT>'; +} +else{ + echo '<SCRIPT language="javascript">'; + echo " window.parent.".$literal."(0,'".$cmd->DescripUltimoError()."',".$idperfilsoft.")"; + echo '</SCRIPT>'; +} +?> +</BODY> +</HTML> +<? +/************************************************************************************************************************************************** + Inserta, modifica o elimina datos en la tabla perfilessoft +________________________________________________________________________________________________________*/ +function Gestiona(){ + global $cmd; + global $opcion; + + global $idcentro; + global $idperfilsoft; + global $descripcion; + global $comentarios; + global $grupoid; + + global $op_alta; + global $op_modificacion; + global $op_eliminacion; + global $op_movida; + + global $tablanodo; + + $cmd->CreaParametro("@idcentro",$idcentro,1); + $cmd->CreaParametro("@idperfilsoft",$idperfilsoft,1); + $cmd->CreaParametro("@descripcion",$descripcion,0); + $cmd->CreaParametro("@comentarios",$comentarios,0); + $cmd->CreaParametro("@grupoid",$grupoid,1); + + switch($opcion){ + case $op_alta : + $cmd->texto="INSERT INTO perfilessoft (descripcion,comentarios,idcentro,grupoid) VALUES (@descripcion,@comentarios,@idcentro,@grupoid)"; + $resul=$cmd->Ejecutar(); + if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta + $idperfilsoft=$cmd->Autonumerico(); + $arbolXML=SubarbolXML_perfilessoft($idperfilsoft,$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 perfilessoft SET descripcion=@descripcion,comentarios=@comentarios WHERE idperfilsoft=@idperfilsoft"; + $resul=$cmd->Ejecutar(); + break; + case $op_eliminacion : + $resul=EliminaPerfilessoft($cmd,$idperfilsoft,"idperfilsoft"); + break; + case $op_movida : + $cmd->texto="UPDATE perfilessoft SET grupoid=@grupoid WHERE idperfilsoft=@idperfilsoft"; + $resul=$cmd->Ejecutar(); + break; + default: + break; + } + return($resul); +} +/*________________________________________________________________________________________________________ + Crea un arbol XML para el nuevo nodo insertado +________________________________________________________________________________________________________*/ +function SubarbolXML_perfilessoft($idperfilsoft,$descripcion){ + global $LITAMBITO_PERFILESSOFT; + $cadenaXML='<PERFILESSOFTWARES '; + // Atributos + $cadenaXML.=' imagenodo="../images/iconos/perfilsoftware.gif"'; + $cadenaXML.=' infonodo="' .$descripcion.'"'; + $cadenaXML.=' nodoid='.$LITAMBITO_PERFILESSOFT.'-'.$idperfilsoft; + $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_PERFILESSOFT."'" .')"'; + $cadenaXML.='>'; + $cadenaXML.='</PERFILESSOFTWARES>'; + return($cadenaXML); +} +?>
\ No newline at end of file |