1 files changed, 43 insertions, 0 deletions
diff --git a/admin/WebConsole/gestores/relaciones/reservas_eliminacion.php b/admin/WebConsole/gestores/relaciones/reservas_eliminacion.php
new file mode 100644
index 00000000..46ea627d
--- /dev/null
+++ b/admin/WebConsole/gestores/relaciones/reservas_eliminacion.php
@@ -0,0 +1,43 @@
+<?
+// *************************************************************************************************************************************************
+// Aplicación WEB: ogAdmWebCon
+// Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
+// Fecha Creación: Año 2009-2010
+// Fecha Última modificación: Noviembre-2005
+// Nombre del fichero: reservas_eliminacion.php
+// Descripción :
+//	Elimina en cascada registros de la tabla reservas 
+//		Parametros: 
+//		-	cmd:Una comando ya operativo (con conexión abierta)  
+//		-	identificador: El identificador por el que se eliminará la reserva
+//		-	nombreid: Nombre del campo identificador del registro 
+//		-	swid: Indica 0= El identificador es tipo alfanumérico	1= EI identificador es tipo numérico ( valor por defecto) *************************************************************************************************************************************************
+function	EliminaReservas($cmd,$identificador,$nombreid,$swid=1){
+	global $EJECUCION_RESERVA;
+	if (empty($identificador)) return(true);
+	if($swid==0)
+		$cmd->texto="SELECT  idreserva  FROM  reservas WHERE ".$nombreid."='".$identificador."'";
+	else
+		$cmd->texto='SELECT  idreserva  FROM reservas WHERE '.$nombreid.'='.$identificador;
+	$rs=new Recordset; 
+	$rs->Comando=&$cmd; 
+	if (!$rs->Abrir()) return(false); // Error al abrir recordset
+	if ($rs->numeroderegistros==0) return(true);
+	$rs->Primero(); 
+	while (!$rs->EOF){
+		$cmd->texto="DELETE FROM  programaciones WHERE identificador=".$rs->campos["idreserva"]." AND  tipoaccion=".$EJECUCION_RESERVA;
+		$resul=$cmd->Ejecutar();
+		if (!$resul){
+			$rs->Cerrar();
+			return(false);
+		}
+		$rs->Siguiente();
+	}
+	if($swid==0)
+		$cmd->texto="DELETE FROM  reservas WHERE ".$nombreid."='".$identificador."'";
+	else
+		$cmd->texto='DELETE  FROM reservas  WHERE '.$nombreid.'='.$identificador;
+	$resul=$cmd->Ejecutar();
+	return($resul);
+}
+?>