source: admin/WebConsole/gestores/gestor_perfilcomponente_soft.php @ e02f9b4

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 e02f9b4 was 6e9cc32, checked in by ramon <ramongomez@…>, 15 years ago

Borrar caracteres BOM de UTF-8 en ficheros PHP de WebConsole?.

git-svn-id: https://opengnsys.es/svn/trunk@514 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 2.8 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: Marzo-2005
7// Nombre del fichero: gestor_perfilcomponente_soft.php
8// Descripción :
9//              Gestiona el mantenimiento de la tabla de perfilessoft_softwares
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/CreaComando.php");
14include_once("../includes/opciones.php");
15//________________________________________________________________________________________________________
16$opcion=0; // Inicializa parametros
17$idperfilsoft=0;
18$idsoftware=0;
19
20if (isset($_GET["opcion"])) $opcion=$_GET["opcion"]; // Recoge parametros
21if (isset($_GET["idperfilsoft"])) $idperfilsoft=$_GET["idperfilsoft"];
22if (isset($_GET["idsoftware"])) $idsoftware=$_GET["idsoftware"];
23
24$cmd=CreaComando($cadenaconexion); // Crea objeto comando
25$resul=false;
26if ($cmd){
27        $resul=Gestiona();
28        $cmd->Conexion->Cerrar();
29}
30?>
31<HTML>
32<HEAD>
33<BODY>
34<?
35$literal="";
36switch($opcion){
37        case $op_alta :
38                $literal="resultado_insertar_perfilcomponente_soft";
39                break;
40        case $op_eliminacion :
41                $literal="resultado_eliminar_perfilcomponente_soft";
42                break;
43        default:
44                break;
45}
46if ($resul){
47        echo '<SCRIPT language="javascript">'.chr(13);
48        if ($opcion==$op_alta )
49                echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ',".$idsoftware.");".chr(13);
50        else
51                echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ',".$idsoftware.");".chr(13);
52        echo '</SCRIPT>';
53}
54else{
55        echo '<SCRIPT language="javascript">';
56        echo "  window.parent.".$literal."(0,'".$cmd->DescripUltimoError()."',".$idsoftware.")";
57        echo '</SCRIPT>';
58}
59?>
60</BODY>
61</HTML>
62<?
63// *************************************************************************************************************************************************
64function Gestiona(){
65        global  $cmd;
66        global  $opcion;
67        global  $idperfilsoft;
68        global  $idsoftware;
69        global   $urlimgth;
70        global  $op_alta;
71        global  $op_eliminacion;
72
73        $cmd->CreaParametro("@idperfilsoft",$idperfilsoft,1);
74        $cmd->CreaParametro("@idsoftware",$idsoftware,1);
75
76        switch($opcion){
77                case $op_alta :
78                        $cmd->texto="INSERT INTO perfilessoft_softwares (idperfilsoft,idsoftware) VALUES (@idperfilsoft,@idsoftware)";
79                        $resul=$cmd->Ejecutar();
80                        break;
81                case $op_eliminacion :
82                        $cmd->texto='DELETE  FROM perfilessoft_softwares WHERE idperfilsoft='.$idperfilsoft.' AND idsoftware='.$idsoftware;
83                        $resul=$cmd->Ejecutar();
84                        break;
85                default:
86                        break;
87        }
88        return($resul);
89}
90?>
Note: See TracBrowser for help on using the repository browser.