/**
  * @param String $comentario: descripcion de la operacion realizada en el sistema
  */
 public static function registrarComentario($comentario)
 {
     $comentario = str_replace("'", "\\'", $comentario);
     $userId = "NULL";
     if (isset($_SESSION["usuario_id"])) {
         $userId = $_SESSION["usuario_id"];
     }
     $query = "INSERT INTO bitacora (operacion, fecha, id_usuario)" . " VALUES('" . $comentario . "', now(), " . $userId . ")";
     DBUtil::executeQuery($query);
 }
 /**
  * @param String $comentario: descripcion de la operacion realizada en el sistema
  */
 public static function registrarComentario($comentario)
 {
     $userId = "NULL";
     if (isset($_SESSION[Constants::$KEY_USUARIO_DTO])) {
         $userDTO = $_SESSION[Constants::$KEY_USUARIO_DTO];
         $userId = $userDTO->getId();
     }
     $comentario = str_replace("'", "\\'", $comentario);
     $query = "INSERT INTO bitacora (operacion, fecha, id_usuario)" . " VALUES('" . $comentario . "', now(), " . $userId . ")";
     DBUtil::executeQuery($query);
 }
<?php

session_start();
include_once '../classes/Constants.php';
include_once '../classes/DBConnection.php';
include_once '../classes/DBUtil.php';
//verificamos que efectivamente venimos del submit del formulario
if (isset($_POST["botonSubmit"])) {
    //intentamos realizar el insert
    $query = "UPDATE grados ";
    $query .= " SET turno ='" . $_POST["turno"] . "',";
    $query .= " grado='" . $_POST["grado"] . "',";
    $query .= " descripcion='" . $_POST["descripcion"] . "',";
    $query .= " id_profesor=" . $_POST["profesor"];
    $query .= " WHERE id=" . $_POST["id"];
    if (DBUtil::executeQuery($query)) {
        $_SESSION[Constants::$KEY_MESSAGE_OPERATION] = Constants::$TEXT_OPERATION_DONE;
    } else {
        $_SESSION[Constants::$KEY_MESSAGE_OPERATION] = Constants::$TEXT_OPERATION_ERROR;
    }
} else {
    $_SESSION[Constants::$KEY_MESSAGE_OPERATION] = Constants::$TEXT_FORM_NOT_SUBMITED;
}
header("Location: ../formListarGrados.php");
<?php

include_once '../classes/Constants.php';
include_once '../classes/BitacoraDAO.php';
include_once '../classes/PageAccess.php';
include_once '../classes/UsuarioDTO.php';
include_once '../classes/DBUtil.php';
include_once '../includes/session.php';
$query = "INSERT INTO taquilla (nombre, orden, fecha_creacion, id_operador, id_sub_departamento) VALUES(";
$query .= "'" . $_POST["nombre"] . "', ";
$query .= "(SELECT COUNT(*) + 1 FROM (SELECT * FROM taquilla) t WHERE t.id_sub_departamento=" . $_POST["idSubDpto"] . "), ";
$query .= "NOW(), ";
$query .= $_POST["idOperador"] . ", ";
$query .= $_POST["idSubDpto"] . ")";
$result = DBUtil::executeQuery($query);
if ($result == true) {
    $_SESSION[Constants::$KEY_MESSAGE_OPERATION] = "Su operaci&oacute;n fue realizada";
} else {
    $_SESSION[Constants::$KEY_MESSAGE_OPERATION] = "Ocurrio un error en la ejecuci&oacute;n de su solicitud.";
}
header("Location: ../createTaquillas.php");
$enviromentProd = true;
$pos = strpos($_SERVER["HTTP_HOST"], "ingenieriadesistemas.com.ve");
if ($pos === false) {
    $enviromentProd = false;
}
$message = "<table border='1' style='margin-left: auto; margin-right: auto'>";
$message .= "<tr>";
$message .= "<td colspan='2'><b>Ajuste de Indices (" . $_SERVER["HTTP_HOST"] . ")</b></td>";
$message .= "</tr>";
$message .= "<tr>";
$message .= "<td><b>Tabla</b></td>";
$message .= "<td><b>Resultado</b></td>";
$message .= "</tr>";
include_once "./procesos/conexion.php";
DBUtil::executeQuery("TRUNCATE TABLE bitacora");
$query = "SHOW TABLES";
$analyzeQuery = "ANALYZE TABLE ";
$time0 = time();
$globalTime = time();
$result = DBUtil::executeSelect($query);
foreach ($result as $tableName) {
    $message .= "<tr>";
    $message .= "<td>" . $tableName[0] . "</td>";
    $message .= "<td>";
    if (substr($tableName[0], 0, 6) === "vista_") {
        $message .= "Es una vista, no se procesa.";
    } else {
        $result1 = DBUtil::executeSelect($analyzeQuery . $tableName[0]);
        foreach ($result1 as $salida) {
            $message .= $salida[2] . "<br />" . $salida[3] . " (" . (time() - $time0) . " s)";
Exemple #6
0
 /**
  * Nueva gestion para los tickets ganadores
  * 
  * @param unknown_type $fecha
  */
 public static function calcularTicketGanador($fecha, $arregloLogrosGuardados)
 {
     //obtenemos las ventas que no esten anuladas
     ini_set('memory_limit', '1024M');
     BitacoraDAO::registrarComentario("En VentasDAO::calcularTicketGanador (iniciando): " . print_r($arregloLogrosGuardados, true));
     $extraWhere = "";
     if (count($arregloLogrosGuardados) == 0) {
         $extraWhere = " AND vd1.fecha_venta='" . $fecha . "'";
     } else {
         //tenemos logros especificos, buscamos solo esos
         foreach ($arregloLogrosGuardados as $idLogroEquipo) {
             if ($extraWhere == "") {
                 $extraWhere = "AND vd1.idlogro_equipo IN (" . $idLogroEquipo;
             } else {
                 $extraWhere .= ", " . $idLogroEquipo;
             }
         }
         $extraWhere .= ")";
     }
     $sql1 = "SELECT vd1.idventa" . " FROM vista_ventas_detalles vd1" . " WHERE 1 = 1 " . $extraWhere . " GROUP BY vd1.idventa";
     $sql = "SELECT vd.*" . " FROM vista_ventas_detalles vd, (" . $sql1 . ") vd2" . " WHERE vd.anulado = 0 " . " AND vd.idventa = vd2.idventa" . " ORDER BY vd.idventa, vd.idventa_detalle";
     $results = DBUtil::executeSelect($sql);
     BitacoraDAO::registrarComentario("En VentasDAO::calcularTicketGanador -> ejecutado '" . $sql . "'");
     if (count($results) > 0) {
         $ventaDetalle = array();
         foreach ($results as $venta) {
             $ventaObj = new VentasDTO($venta["idventa"], $venta["idventa_detalle"], $venta["apuesta"], $venta["total_ganar"], $venta["pago"], NULL);
             //si es null el array, se procesa sin discriminar nada
             //vemos si el logro de este registro fue especificamente guardado su resultado
             //desde la pagina como tal
             if (count($arregloLogrosGuardados) == 0 || isset($arregloLogrosGuardados[$venta["idlogro_equipo"]])) {
                 $teniaLogro = true;
                 if ($venta["suspendido"] == 1) {
                     //el juego asociado a esta venta fue suspendido
                     //no hacemos calculo de ganador ni nada
                     BitacoraDAO::registrarComentario("La venta [" . $venta["idventa"] . "][" . $venta["idventa_detalle"] . "] esta suspendida, no calculamos nada");
                     $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_SUSPENDIDO);
                     $ventaDetalle[$venta["idventa"]][$venta["idventa_detalle"]] = $ventaObj;
                 } else {
                     //o es null el array o se especifico resultado para este logro
                     //en ambos casos se procesa
                     //el juego no esta en suspendido
                     //vemos si fue almacenado el resultado para el mismo
                     $existe = DBUtil::executeSelect("select idlogro_equipo_categoria_resultado from logros_equipos_categorias_resultados where idlogro_equipo='" . $venta["idlogro_equipo"] . "' and estatus='1' limit 1");
                     if ($existe[0]["idlogro_equipo_categoria_resultado"] > 0) {
                         //si tenemos resultado
                         //calculamos si es ganador, perdedor o tablas
                         BitacoraDAO::registrarComentario("La venta [" . $venta["idventa"] . "][" . $venta["idventa_detalle"] . "] si tiene resultado guardado");
                         $codeReturn = VentasDAO::verificarSiEsGanador($venta["idventa_detalle"]);
                         $ventaObj->setEstadoFinal($codeReturn);
                         $ventaDetalle[$venta["idventa"]][$venta["idventa_detalle"]] = $ventaObj;
                     } else {
                         //no tenemos resultado, no podemos evaluar nada aun
                         BitacoraDAO::registrarComentario("La venta [" . $venta["idventa"] . "][" . $venta["idventa_detalle"] . "] no tiene resultado guardado, dejamos su estado como esta (" . $venta["edoVentaDetalle"] . ")");
                         //dejamos el estado final de esta venta tal cual esta
                         if ($venta["edoVentaDetalle"] == 2) {
                             //estado solo vendido
                             $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_SOLO_VENDIDO);
                         } else {
                             if ($venta["edoVentaDetalle"] == 5) {
                                 //estado ganador
                                 $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_GANADOR);
                             } else {
                                 if ($venta["edoVentaDetalle"] == 6) {
                                     //estado perdedor
                                     $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_PERDEDOR);
                                 } else {
                                     if ($venta["edoVentaDetalle"] == 1) {
                                         //estado suspendido
                                         $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_SUSPENDIDO);
                                     } else {
                                         if ($venta["edoVentaDetalle"] == 4) {
                                             //estado empatado
                                             $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_EMPATADO_DEBE_SUSPENDER);
                                         } else {
                                             //estado por defecto (solo vendido)
                                             $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_SOLO_VENDIDO);
                                         }
                                     }
                                 }
                             }
                         }
                         $ventaDetalle[$venta["idventa"]][$venta["idventa_detalle"]] = $ventaObj;
                     }
                 }
             } else {
                 //este logro no fue indicado especificamente al guardar resultados
                 //no se toma en cuenta
                 BitacoraDAO::registrarComentario("La venta [" . $venta["idventa"] . "][" . $venta["idventa_detalle"] . "] no fue indicada en el momento de almacenar los resultados (" . $venta["idlogro_equipo"] . "), la dejamos con su estado actual (" . $venta["edoVentaDetalle"] . ")");
                 //dejamos el estado final de esta venta tal cual esta
                 if ($venta["edoVentaDetalle"] == 2) {
                     //estado solo vendido
                     $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_SOLO_VENDIDO);
                 } else {
                     if ($venta["edoVentaDetalle"] == 5) {
                         //estado ganador
                         $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_GANADOR);
                     } else {
                         if ($venta["edoVentaDetalle"] == 6) {
                             //estado perdedor
                             $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_PERDEDOR);
                         } else {
                             if ($venta["edoVentaDetalle"] == 1) {
                                 //estado suspendido
                                 $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_SUSPENDIDO);
                             } else {
                                 if ($venta["edoVentaDetalle"] == 4) {
                                     //estado empatado
                                     $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_EMPATADO_DEBE_SUSPENDER);
                                 } else {
                                     //estado por defecto (solo vendido)
                                     $ventaObj->setEstadoFinal(VentasDAO::$RESULTADO_SOLO_VENDIDO);
                                 }
                             }
                         }
                     }
                 }
                 $ventaDetalle[$venta["idventa"]][$venta["idventa_detalle"]] = $ventaObj;
             }
         }
     } else {
         BitacoraDAO::registrarComentario("La consulta inicial para tickets ganadores no trajo resultados para el ticket " . $i);
     }
     //ya con el resultado de cada transaccion
     //procedemos a colocar un estado a cada venta como tal
     //tomando en cuenta el estado interno de sus tickets
     foreach ($ventaDetalle as $idVenta => $arrayVentaDetalle) {
         //echo "idVenta=".$idVenta;
         //print_r($arrayVentaDetalle);
         //inicializamos contadores para la venta
         $numeroApuestasEnTicket = count($arrayVentaDetalle);
         $apuestasGanadoras = 0;
         $apuestasPerdedoras = 0;
         $apuestasSuspendidas = 0;
         $apuestasEmpatadas = 0;
         $factor = 1;
         reset($arrayVentaDetalle);
         //la venta tiene mas de una apuesta
         //debemos evaluar el conjunto para saber el resultado final
         foreach ($arrayVentaDetalle as $apuesta) {
             if ($apuesta->getEstadoFinal() == VentasDAO::$RESULTADO_GANADOR) {
                 $apuestasGanadoras++;
                 //actualizamos el estado especifico de la apuesta dentro del ticket
                 $query = "UPDATE ventas_detalles SET edo_venta_detalle=5 WHERE idventa_detalle = " . $apuesta->getIdVentaDetalle();
                 DBUtil::executeQuery($query);
                 //calculo el factor parlay de esta apuesta
                 if ($apuesta->getPago() < 0) {
                     $factor *= 1 + 100 / abs($apuesta->getPago());
                     BitacoraDAO::registrarComentario("[" . $idVenta . "-" . $apuesta->getIdVentaDetalle() . "] calculando factor=(1 + (100 / " . abs($apuesta->getPago()) . "))");
                 } else {
                     $factor *= 1 + $apuesta->getPago() / 100;
                     BitacoraDAO::registrarComentario("[" . $idVenta . "-" . $apuesta->getIdVentaDetalle() . "] calculando factor=(1 + (" . $apuesta->getPago() . "/100))");
                 }
                 BitacoraDAO::registrarComentario("[" . $idVenta . "-" . $apuesta->getIdVentaDetalle() . "] actualizada a estado Ganador con factor " . $factor);
             } else {
                 if ($apuesta->getEstadoFinal() == VentasDAO::$RESULTADO_PERDEDOR) {
                     $apuestasPerdedoras++;
                     //actualizamos el estado especifico de la apuesta dentro del ticket
                     $query = "UPDATE ventas_detalles SET edo_venta_detalle=6 WHERE idventa_detalle = " . $apuesta->getIdVentaDetalle();
                     DBUtil::executeQuery($query);
                     $factor *= 0;
                     BitacoraDAO::registrarComentario("[" . $idVenta . "-" . $apuesta->getIdVentaDetalle() . "] actualizada a estado Perdedor");
                 } else {
                     if ($apuesta->getEstadoFinal() == VentasDAO::$RESULTADO_SUSPENDIDO) {
                         $apuestasSuspendidas++;
                         //actualizamos el estado especifico de la apuesta dentro del ticket
                         $query = "UPDATE ventas_detalles SET edo_venta_detalle=1 WHERE idventa_detalle = " . $apuesta->getIdVentaDetalle();
                         DBUtil::executeQuery($query);
                         $factor *= 1;
                         BitacoraDAO::registrarComentario("[" . $idVenta . "-" . $apuesta->getIdVentaDetalle() . "] actualizada a estado Suspendido");
                     } else {
                         if ($apuesta->getEstadoFinal() == VentasDAO::$RESULTADO_EMPATADO_DEBE_SUSPENDER) {
                             $apuestasEmpatadas++;
                             //actualizamos el estado especifico de la apuesta dentro del ticket
                             $query = "UPDATE ventas_detalles SET edo_venta_detalle=4 WHERE idventa_detalle = " . $apuesta->getIdVentaDetalle();
                             DBUtil::executeQuery($query);
                             $factor *= 1;
                             BitacoraDAO::registrarComentario("[" . $idVenta . "-" . $apuesta->getIdVentaDetalle() . "] actualizada a estado Reembolsar");
                         } else {
                             //no es ninguno de los casos esperados, lo dejo como solo vendido
                             //aunque esto no deberia pasar
                             BitacoraDAO::registrarComentario("[" . $idVenta . "-" . $apuesta->getIdVentaDetalle() . "] caso atipico con estado final de venta =" . $ventaObj->getEstadoFinal());
                         }
                     }
                 }
             }
         }
         //fue procesado todo el detalle de un determinado ticket
         BitacoraDAO::registrarComentario("[" . $idVenta . "] tiene lo siguiente: " . "numeroApuestasEnTicket=" . $numeroApuestasEnTicket . ", apuestasGanadoras=" . $apuestasGanadoras . ", apuestasPerdedoras=" . $apuestasPerdedoras . ", apuestasEmpatadas=" . $apuestasEmpatadas . ", apuestasSuspendidas=" . $apuestasSuspendidas . ", factor=" . $factor . ", montoApuesta=" . $ventaObj->getMontoApuesta());
         //verificamos si es perdedor
         if ($apuestasPerdedoras > 0) {
             //tiene al menos una apuesta del ticket perdiendo, por lo tanto, el ticket completo pierde
             $query = "UPDATE ventas SET perdedor='1', reembolsar=0, ganador=0, " . " monto_real_pagar=0, recalculado='0' " . " WHERE idventa='" . $idVenta . "' LIMIT 1";
             DBUtil::executeQuery($query);
             BitacoraDAO::registrarComentario("[" . $idVenta . "] actualizada a estado Perdedor");
         } else {
             //no es perdedor el ticket, vemos si es totalmente ganador
             if ($apuestasGanadoras == $numeroApuestasEnTicket) {
                 //la persona gano todas sus apuestas
                 $query = "UPDATE ventas SET perdedor=0, reembolsar=0, ganador='1', " . " monto_real_pagar=apuesta*" . $factor . ",recalculado='0' " . " WHERE idventa='" . $idVenta . "' LIMIT 1";
                 DBUtil::executeQuery($query);
                 BitacoraDAO::registrarComentario("[" . $idVenta . "] actualizada a estado Ganador");
             } else {
                 //debe ser obligatoramiente un reembolso o un recalculo
                 if ($apuestasGanadoras > 0) {
                     //la persona gano al menos una, confirmo recalculo
                     if ($apuestasGanadoras + $apuestasEmpatadas + $apuestasSuspendidas == $numeroApuestasEnTicket) {
                         //es recalculo
                         $query = "UPDATE ventas SET perdedor=0, recalculado=1, ganador=0, " . " reembolsar='0', monto_real_pagar=apuesta*" . $factor . " WHERE idventa='" . $idVenta . "' LIMIT 1";
                         DBUtil::executeQuery($query);
                         BitacoraDAO::registrarComentario("[" . $idVenta . "] actualizada a estado Recalculado");
                     } else {
                         //caso extraño
                     }
                 } else {
                     //no gano, aparentemente solo es reembolso
                     if ($apuestasEmpatadas + $apuestasSuspendidas == $numeroApuestasEnTicket) {
                         //debe ser un reembolso
                         $query = "UPDATE ventas SET perdedor=0, recalculado=0, ganador=0, " . " reembolsar='1', monto_real_pagar=apuesta " . " WHERE idventa='" . $idVenta . "' LIMIT 1";
                         DBUtil::executeQuery($query);
                         BitacoraDAO::registrarComentario("[" . $idVenta . "] actualizada a estado Reembolsar");
                     } else {
                         //caso extraño
                     }
                 }
             }
         }
     }
     BitacoraDAO::registrarComentario("En VentasDAO::calcularTicketGanador (finalizando): " . print_r($arregloLogrosGuardados, true));
 }
Exemple #7
0
<?php

header('Content-Type: text/html; charset=ISO-8859-1');
include_once '../../classes/Constants.php';
include_once '../../classes/DBUtil.php';
$ids = $_POST["ids"];
$query = "DELETE FROM solicitudes WHERE id IN (" . $ids . ")";
$exito = DBUtil::executeQuery($query);
if ($exito) {
    echo "Los CVs seleccionados fueron eliminados satisfactoriamente.";
} else {
    echo "Ocurrio un error procesando la petici�n de borrado. Por favor intente de nuevo.";
}
 public static function findDistinctIdsFailed()
 {
     $sql = 'SELECT model.* FROM *PREFIX*snanny_observation_model model ' . 'INNER JOIN(' . 'SELECT his.uuid ' . 'FROM *PREFIX*snanny_observation_index_history his ' . 'INNER JOIN ' . '(SELECT uuid, MAX(time) AS MaxDateTime ' . 'FROM *PREFIX*snanny_observation_index_history ' . 'GROUP BY uuid) innerHis ' . 'ON his.uuid = innerHis.uuid ' . 'AND his.time = innerHis.MaxDateTime ' . 'AND status = 0) ' . 'lastErr ON model.uuid = lastErr.uuid;';
     return DBUtil::executeQuery($sql);
 }
Exemple #9
0
 /**
  * 
  * @param unknown $idEnvio
  * @param unknown $newStatus
  * @return Ambigous <true, boolean>
  */
 public static function updateEnvioCurrentStatus($idEnvio, $newStatus)
 {
     $query = "UPDATE envios SET id_status_actual = " . $newStatus . " WHERE id = " . $idEnvio;
     return DBUtil::executeQuery($query);
 }
        DBUtil::executeQuery($query);
    }
    //tomamos los valores del horario para unirlos si hay mas de uno
    $horarioDeseado = "";
    foreach ($_POST["horario"] as $valorHorario) {
        if ($horarioDeseado != "") {
            $horarioDeseado .= ",";
        }
        $horarioDeseado .= $valorHorario;
    }
    //construimos la sentencia del insert
    $insertar = "INSERT INTO solicitudes\r\n\t(nombre,\r\n\tapellido,\r\n\tci,\r\n\tlugar_nacimiento,\r\n\tfecha_nacimiento,\r\n\tsexo,\r\n\tedo_civil,\r\n\ttiene_hijos,\r\n\tdireccion,\r\n\ttlf_habitacion,\r\n\ttlf_celular,\r\n\temail,\r\n\tgrado_instruccion,\r\n\tprofesional_en,\r\n\tespecialista_en,\r\n\texperiencia_laboral,\r\n\tultimos_trabajos,\r\n\tantiguedad_ultimo_trabajo,\r\n\tid_cargo,\r\n\tex_empleado,\r\n\tid_exdpto,\r\n\tmotivo_retiro,\r\n\thorario_deseado,\r\n\tfecha_registro)\r\n\tVALUES\r\n\t(\r\n\t'" . $_POST["nombre"] . "',\r\n\t'" . $_POST["apellido"] . "',\r\n\t'" . $_POST["tipoCi"] . $_POST["ci"] . "',\r\n\t'" . $_POST["lugarNacimiento"] . "',\r\n\t'" . $_POST["fechaNacimientoHidden"] . "',\r\n\t'" . $_POST["sexo"] . "',\r\n\t'" . $_POST["edoCivil"] . "',\r\n\t'" . $_POST["tieneHijos"] . "',\r\n\t'" . str_replace("'", "''", $_POST["direccion"]) . "',\r\n\t'" . $_POST["telefonoHab"] . "',\r\n\t'" . $_POST["telefonoCel"] . "',\r\n\t'" . $_POST["correo"] . "',\r\n\t'" . $_POST["gradoInstruccion"] . "',\r\n\t'" . $_POST["profesionalEn"] . "',\r\n\t'" . $_POST["especialistaEn"] . "',\r\n\t'" . $_POST["expLaboral"] . "',\r\n\t" . ($_POST["expLaboral"] == "Si" ? "'" . $_POST["cuantosTrabajos"] . "'" : "''") . ",\r\n\t" . ($_POST["expLaboral"] == "Si" ? "'" . $_POST["tiempoTrabajo"] . "'" : "''") . ",\r\n\t" . $_POST["cargoAspirado"] . ",\r\n\t'" . $_POST["trabajoMuralla"] . "',\r\n\t" . ($_POST["trabajoMuralla"] == "Si" ? $_POST["dptoTrabajo"] : "null") . ",\r\n\t" . ($_POST["trabajoMuralla"] == "Si" ? "'" . $_POST["motivoRetiro"] . "'" : "''") . ",\r\n\t'" . $horarioDeseado . "',\r\n\tNOW());\r\n\t";
    //ejecutamos el insert y verificamos si hubo error o no
    //para mostrar el respectivo mensaje de resultado
    $code = 0;
    $exitosa = DBUtil::executeQuery($insertar);
    if (!$exitosa) {
        $code = -1;
    }
}
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
    <head>
        <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
        <title>Guardando Solicitud</title>
	</head>
	<body>
		<script type="text/javascript">
			if(<?php 
echo $code;