| 1 | <? | 
|---|
| 2 | // ************************************************************************************************************************************************* | 
|---|
| 3 | // Aplicación WEB: ogAdmWebCon | 
|---|
| 4 | // Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla | 
|---|
| 5 | // Fecha Creación: Año 2009-2010 | 
|---|
| 6 | // Fecha Última modificación: Agosto-2010 | 
|---|
| 7 | // Nombre del fichero: gestor_procedimientos.php | 
|---|
| 8 | // Descripción : | 
|---|
| 9 | //              Gestiona el mantenimiento de la tabla de procedimientos | 
|---|
| 10 | // ************************************************************************************************************************************************* | 
|---|
| 11 | include_once("../includes/ctrlacc.php"); | 
|---|
| 12 | include_once("../clases/AdoPhp.php"); | 
|---|
| 13 | include_once("../clases/XmlPhp.php"); | 
|---|
| 14 | include_once("../clases/ArbolVistaXML.php"); | 
|---|
| 15 | include_once("../includes/CreaComando.php"); | 
|---|
| 16 | include_once("../includes/constantes.php"); | 
|---|
| 17 | include_once("../includes/opciones.php"); | 
|---|
| 18 | include_once("./relaciones/procedimientos_eliminacion.php"); | 
|---|
| 19 | //________________________________________________________________________________________________________ | 
|---|
| 20 | $opcion=0; // Inicializa parametros | 
|---|
| 21 |  | 
|---|
| 22 | $idprocedimiento=0;  | 
|---|
| 23 | $descripcion=""; | 
|---|
| 24 | $grupoid=0;  | 
|---|
| 25 | $comentarios=""; | 
|---|
| 26 |  | 
|---|
| 27 | if (isset($_POST["opcion"])) $opcion=$_POST["opcion"]; // Recoge parametros | 
|---|
| 28 |  | 
|---|
| 29 | if (isset($_POST["idprocedimiento"])) $idprocedimiento=$_POST["idprocedimiento"]; | 
|---|
| 30 | if (isset($_POST["descripcion"])) $descripcion=$_POST["descripcion"];  | 
|---|
| 31 | if (isset($_POST["grupoid"])) $grupoid=$_POST["grupoid"]; | 
|---|
| 32 | if (isset($_POST["comentarios"])) $comentarios=$_POST["comentarios"];  | 
|---|
| 33 | if (isset($_POST["identificador"])) $idprocedimiento=$_POST["identificador"]; | 
|---|
| 34 |  | 
|---|
| 35 | $tablanodo=""; // Arbol para nodos insertados | 
|---|
| 36 | //________________________________________________________________________________________________________ | 
|---|
| 37 | $cmd=CreaComando($cadenaconexion); // Crea objeto comando | 
|---|
| 38 | $resul=false; | 
|---|
| 39 | if ($cmd){ | 
|---|
| 40 |         $resul=Gestiona(); | 
|---|
| 41 |         $cmd->Conexion->Cerrar(); | 
|---|
| 42 | } | 
|---|
| 43 | if($opcion!=$op_movida){ | 
|---|
| 44 |         echo '<HTML>'; | 
|---|
| 45 |         echo '<HEAD>'; | 
|---|
| 46 |         echo '  <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">'; | 
|---|
| 47 |         echo '<BODY>'; | 
|---|
| 48 |         echo '<P><SPAN style="visibility:hidden" id="arbol_nodo">'.$tablanodo.'</SPAN></P>'; | 
|---|
| 49 |         echo '  <SCRIPT language="javascript" src="../jscripts/propiedades_procedimientos.js"></SCRIPT>'; | 
|---|
| 50 |         echo '<SCRIPT language="javascript">'.chr(13); | 
|---|
| 51 |         if ($resul){ | 
|---|
| 52 |                 echo 'var oHTML'.chr(13); | 
|---|
| 53 |                 echo 'var cTBODY=document.getElementsByTagName("TBODY");'.chr(13); | 
|---|
| 54 |                 echo 'o=cTBODY.item(1);'.chr(13); | 
|---|
| 55 |         } | 
|---|
| 56 | } | 
|---|
| 57 |         $literal=""; | 
|---|
| 58 |         switch($opcion){ | 
|---|
| 59 |                 case $op_alta : | 
|---|
| 60 |                         $literal="resultado_insertar_procedimientos"; | 
|---|
| 61 |                         break; | 
|---|
| 62 |                 case $op_modificacion: | 
|---|
| 63 |                         $literal="resultado_modificar_procedimientos"; | 
|---|
| 64 |                         break; | 
|---|
| 65 |                 case $op_eliminacion : | 
|---|
| 66 |                         $literal="resultado_eliminar_procedimientos"; | 
|---|
| 67 |                         break; | 
|---|
| 68 |                 case $op_movida : | 
|---|
| 69 |                         $literal="resultado_mover"; | 
|---|
| 70 |                         break; | 
|---|
| 71 |                 default: | 
|---|
| 72 |                         break; | 
|---|
| 73 |         } | 
|---|
| 74 | if ($resul){ | 
|---|
| 75 |         if ($opcion==$op_alta ) | 
|---|
| 76 |                 echo $literal."(1,'".$cmd->DescripUltimoError()." ',".$idprocedimiento.",o.innerHTML);".chr(13); | 
|---|
| 77 |         else | 
|---|
| 78 |                 echo $literal."(1,'".$cmd->DescripUltimoError()." ','".$descripcion."');".chr(13); | 
|---|
| 79 | } | 
|---|
| 80 | else | 
|---|
| 81 |         echo $literal."(0,'".$cmd->DescripUltimoError()."',".$idprocedimiento.")"; | 
|---|
| 82 |  | 
|---|
| 83 | if($opcion!=$op_movida){ | 
|---|
| 84 |         echo '  </SCRIPT>'; | 
|---|
| 85 |         echo '</BODY>   '; | 
|---|
| 86 |         echo '</HTML>';  | 
|---|
| 87 | } | 
|---|
| 88 | /************************************************************************************************************************************************** | 
|---|
| 89 |         Inserta, modifica o elimina datos en la tabla procedimientos | 
|---|
| 90 | ________________________________________________________________________________________________________*/ | 
|---|
| 91 | function Gestiona(){ | 
|---|
| 92 |         global $EJECUCION_PROCEDIMIENTO; | 
|---|
| 93 |         global  $cmd; | 
|---|
| 94 |         global  $opcion; | 
|---|
| 95 |  | 
|---|
| 96 |         global  $idcentro; | 
|---|
| 97 |         global  $idprocedimiento; | 
|---|
| 98 |         global  $descripcion; | 
|---|
| 99 |         global  $grupoid; | 
|---|
| 100 |         global  $comentarios; | 
|---|
| 101 |  | 
|---|
| 102 |         global  $op_alta; | 
|---|
| 103 |         global  $op_modificacion; | 
|---|
| 104 |         global  $op_eliminacion; | 
|---|
| 105 |         global  $op_movida; | 
|---|
| 106 |  | 
|---|
| 107 |         global  $tablanodo; | 
|---|
| 108 |  | 
|---|
| 109 |         $cmd->CreaParametro("@idcentro",$idcentro,1); | 
|---|
| 110 |         $cmd->CreaParametro("@idprocedimiento",$idprocedimiento,1); | 
|---|
| 111 |         $cmd->CreaParametro("@descripcion",$descripcion,0); | 
|---|
| 112 |         $cmd->CreaParametro("@grupoid",$grupoid,1); | 
|---|
| 113 |         $cmd->CreaParametro("@comentarios",$comentarios,0); | 
|---|
| 114 |  | 
|---|
| 115 |         switch($opcion){ | 
|---|
| 116 |                 case $op_alta : | 
|---|
| 117 |                         $cmd->texto="INSERT INTO procedimientos (descripcion,comentarios,idcentro,grupoid) VALUES (@descripcion,@comentarios,@idcentro,@grupoid)"; | 
|---|
| 118 |                         $resul=$cmd->Ejecutar(); | 
|---|
| 119 |                         if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta | 
|---|
| 120 |                                 $idprocedimiento=$cmd->Autonumerico(); | 
|---|
| 121 |                                 $arbolXML=SubarbolXML_procedimientos($idprocedimiento,$descripcion); | 
|---|
| 122 |                                 $baseurlimg="../images/signos"; // Url de las procedimientos de signo | 
|---|
| 123 |                                 $clasedefault="texto_arbol"; // Hoja de estilo (Clase por defecto) del árbol | 
|---|
| 124 |                                 $arbol=new ArbolVistaXML($arbolXML,0,$baseurlimg,$clasedefault); | 
|---|
| 125 |                                 $tablanodo=$arbol->CreaArbolVistaXML(); | 
|---|
| 126 |                         } | 
|---|
| 127 |                         break; | 
|---|
| 128 |                 case $op_modificacion: | 
|---|
| 129 |                         $cmd->texto="UPDATE procedimientos SET descripcion=@descripcion, comentarios=@comentarios WHERE idprocedimiento=@idprocedimiento"; | 
|---|
| 130 |                         $resul=$cmd->Ejecutar(); | 
|---|
| 131 |                         break; | 
|---|
| 132 |                 case $op_eliminacion : | 
|---|
| 133 |                         $resul=EliminaProcedimientos($cmd,$idprocedimiento,"idprocedimiento"); | 
|---|
| 134 |                         break; | 
|---|
| 135 |                 case $op_movida : | 
|---|
| 136 |                         $cmd->texto="UPDATE procedimientos SET  grupoid=@grupoid WHERE idprocedimiento=@idprocedimiento"; | 
|---|
| 137 |                         $resul=$cmd->Ejecutar(); | 
|---|
| 138 |                         break; | 
|---|
| 139 |                 default: | 
|---|
| 140 |                         break; | 
|---|
| 141 |         } | 
|---|
| 142 |         return($resul); | 
|---|
| 143 | } | 
|---|
| 144 | /*________________________________________________________________________________________________________ | 
|---|
| 145 |         Crea un arbol XML para el nuevo nodo insertado  | 
|---|
| 146 | ________________________________________________________________________________________________________*/ | 
|---|
| 147 | function SubarbolXML_procedimientos($idprocedimiento,$descripcion){ | 
|---|
| 148 |         global $LITAMBITO_PROCEDIMIENTOS; | 
|---|
| 149 |         $cadenaXML='<PROCEDIMIENTO'; | 
|---|
| 150 |         // Atributos | 
|---|
| 151 |         $cadenaXML.=' imagenodo="../images/iconos/procedimiento.gif"'; | 
|---|
| 152 |         $cadenaXML.=' infonodo="'.$descripcion.'"'; | 
|---|
| 153 |         $cadenaXML.=' nodoid='.$LITAMBITO_PROCEDIMIENTOS.'-'.$idprocedimiento; | 
|---|
| 154 |         $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_PROCEDIMIENTOS."'" .')"'; | 
|---|
| 155 |         $cadenaXML.='>'; | 
|---|
| 156 |         $cadenaXML.='</PROCEDIMIENTO>'; | 
|---|
| 157 |         return($cadenaXML); | 
|---|
| 158 | } | 
|---|
| 159 | ?> | 
|---|