source: admin/WebConsole/propiedades/propiedades_procedimientos.php @ b6906f7

918-git-images-111dconfigfileconfigure-oglivegit-imageslgromero-new-oglivemainmaint-cronmount-efivarfsmultivmmultivm-ogboot-installerogClonningEngineogboot-installer-jenkinsoglive-ipv6test-python-scriptsticket-301ticket-50ticket-50-oldticket-577ticket-585ticket-611ticket-612ticket-693ticket-700ubu24tplunification2use-local-agent-oglivevarios-instalacionwebconsole3
Last change on this file since b6906f7 was b0dc2e4, checked in by alonso <alonso@…>, 16 years ago

git-svn-id: https://opengnsys.es/svn/trunk@489 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 5.3 KB
Line 
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 2003-2004
6// Fecha Última modificación: Febrero-2005
7// Nombre del fichero: propiedades_procedimientos.php
8// Descripción :
9//               Presenta el formulario de captura de datos de un procedimiento para insertar,modificar y eliminar
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../includes/opciones.php");
13include_once("../includes/CreaComando.php");
14include_once("../clases/AdoPhp.php");
15include_once("../idiomas/php/".$idioma."/propiedades_procedimientos_".$idioma.".php");
16//________________________________________________________________________________________________________
17$opcion=0;
18$opciones=array($TbMsg[0],$TbMsg[1],$TbMsg[2],$TbMsg[3]);
19//________________________________________________________________________________________________________
20$idprocedimiento=0;
21$descripcion="";
22$comentarios="";
23$grupoid=0;
24 
25if (isset($_GET["opcion"])) $opcion=$_GET["opcion"];  // Recoge parametros
26if (isset($_GET["idprocedimiento"])) $idprocedimiento=$_GET["idprocedimiento"];
27if (isset($_GET["grupoid"])) $grupoid=$_GET["grupoid"];
28if (isset($_GET["identificador"])) $idprocedimiento=$_GET["identificador"];
29//________________________________________________________________________________________________________
30$cmd=CreaComando($cadenaconexion); // Crea objeto comando
31if (!$cmd)
32        Header('Location: '.$pagerror.'?herror=2'); // Error de conexión con servidor B.D.
33if  ($opcion!=$op_alta){
34        $resul=TomaPropiedades($cmd,$idprocedimiento);
35        if (!$resul)
36                Header('Location: '.$pagerror.'?herror=3'); // Error de recuperación de datos.
37}
38//________________________________________________________________________________________________________
39?>
40<HTML>
41<TITLE>Administración web de aulas</TITLE>
42<HEAD>
43        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
44        <SCRIPT language="javascript" src="../jscripts/propiedades_procedimientos.js"></SCRIPT>
45        <SCRIPT language="javascript" src="../jscripts/opciones.js"></SCRIPT>
46        <? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/propiedades_procedimientos_'.$idioma.'.js"></SCRIPT>'?>
47</HEAD>
48<BODY>
49<DIV  align=center>
50<FORM name="fdatos"> 
51        <INPUT type=hidden name=idprocedimiento value=<?=$idprocedimiento?>>
52        <INPUT type=hidden name=grupoid value=<?=$grupoid?>>
53        <P align=center class=cabeceras><?echo $TbMsg[4]?><BR>
54        <SPAN align=center class=subcabeceras><? echo $opciones[$opcion]?></SPAN></P>
55        <TABLE  align=center border=0 cellPadding=1 cellSpacing=1 class=tabla_datos>
56<!------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
57                <TR>
58                        <TH align=center>&nbsp;<?echo $TbMsg[5]?>&nbsp;</TD>
59                        <?if ($opcion==$op_eliminacion)
60                                        echo '<TD style="width:300">'.$descripcion.'</TD>';
61                                else
62                                        echo '<TD><INPUT  class="formulariodatos" name=descripcion style="width:300" type=text value="'.$descripcion.'"></TD>';?>
63                </TR>
64<!------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
65                <TR>
66                        <TH align=center>&nbsp;<?echo $TbMsg[6]?>&nbsp;</TD>
67                        <?if ($opcion==$op_eliminacion)
68                                        echo '<TD>'.$comentarios.'</TD>';
69                                else
70                                        echo '<TD><TEXTAREA   class="formulariodatos" name=comentarios rows=3 cols=55>'.$comentarios.'</TEXTAREA></TD>';
71                        ?>
72                </TR>   
73<!------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
74        </TABLE>
75</FORM>
76</DIV>
77<?
78//________________________________________________________________________________________________________
79include_once("../includes/opcionesbotonesop.php");
80//________________________________________________________________________________________________________
81//________________________________________________________________________________________________________
82include_once("../includes/iframecomun.php");
83//________________________________________________________________________________________________________
84?>
85</BODY>
86</HTML>
87<?
88//________________________________________________________________________________________________________
89//      Recupera los datos de un procedimiento
90//              Parametros:
91//              - cmd: Una comando ya operativo (con conexión abierta) 
92//              - id: El identificador del procedimiento
93//________________________________________________________________________________________________________
94function TomaPropiedades($cmd,$id){
95        global $descripcion;
96        global $comentarios;
97        $rs=new Recordset;
98        $cmd->texto="SELECT * FROM procedimientos WHERE idprocedimiento=".$id;
99        $rs->Comando=&$cmd;
100        if (!$rs->Abrir()) return(false); // Error al abrir recordset
101        $rs->Primero();
102        if (!$rs->EOF){
103                $descripcion=$rs->campos["descripcion"];
104                $comentarios=$rs->campos["comentarios"];
105                $rs->Cerrar();
106                return(true);
107        }
108        else
109                return(false);
110}
111?>
Note: See TracBrowser for help on using the repository browser.