source: admin/WebConsole/gestores/relaciones/aulas_eliminacion.php @ 5d05b06

Last change on this file since 5d05b06 was b6ec162, checked in by Ramón M. Gómez <ramongomez@…>, 6 years ago

#834: Remove all redundant PHP closing tags.

  • Property mode set to 100644
File size: 1.8 KB
Line 
1<?php
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: aulas_eliminacion.php
8// Descripción :
9//      Elimina en cascada registros de la tabla aulas
10//              Parametros:
11//              -       cmd:Una comando ya operativo (con conexión abierta) 
12//              -       identificador: El identificador por el que se eliminará el aula
13//              -       nombreid: Nombre del campo identificador del registro
14//              -       swid: Indica 0= El identificador es tipo alfanumérico   1= EI identificador es tipo numérico ( valor por defecto) *************************************************************************************************************************************************
15function        EliminaAulas($cmd,$identificador,$nombreid,$swid=1){
16        if (empty($identificador)) return(true);
17        if($swid==0)
18                $cmd->texto="SELECT  idaula,nombreaula  FROM  aulas WHERE ".$nombreid."='".$identificador."'";
19        else
20                $cmd->texto='SELECT  idaula,nombreaula  FROM aulas WHERE '.$nombreid.'='.$identificador;
21        $rs=new Recordset;
22        $rs->Comando=&$cmd;
23        if (!$rs->Abrir()) return(false); // Error al abrir recordset
24        if ($rs->numeroderegistros==0) return(true);
25        $rs->Primero();
26        while (!$rs->EOF){
27                $resul=EliminaGruposOrdenadores($cmd,$rs->campos["idaula"],"idaula");
28                if ($resul)
29                        $resul=EliminaOrdenadores($cmd,$rs->campos["idaula"],"idaula");
30                if (!$resul){
31                        $rs->Cerrar();
32                        return(false);
33                }
34                $rs->Siguiente();
35        }
36        if($swid==0)
37                $cmd->texto="DELETE  FROM aulas WHERE ".$nombreid."='".$identificador."'";
38        else
39                $cmd->texto='DELETE  FROM aulas  WHERE '.$nombreid.'='.$identificador;
40        $resul=$cmd->Ejecutar();
41        return($resul);
42}
43
Note: See TracBrowser for help on using the repository browser.