sr_fechabaja = SYSDATE
WHERE sr_id = :id";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
}
else { // Sino tiene que ser una solicitud de cotización..
$params = array(":estado" => $_REQUEST["estado"], ":usubaja" => $_SESSION["usuario"], ":id" => $id);
$sql =
"UPDATE asc_solicitudcotizacion
SET sc_estado = :estado,
sc_fechabaja = SYSDATE,
sc_fechacierre = SYSDATE,
sc_observacionescierre = 'Cotización cerrada desde la web por el usuario ".$_SESSION["usuario"].".',
sc_usubaja = :usubaja
WHERE sc_id = :id";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
actualizarRankingBNA($id, 0);
$params = array(":id" => $id);
$sql =
"SELECT sc_idcotizacion
FROM asc_solicitudcotizacion
WHERE sc_id = :id";
$idCotizacion = ValorSql($sql, "", $params, 0);
if ($idCotizacion != "") {
$params = array(":estado" => $_REQUEST["estado"], ":id" => $idCotizacion);
$sql =
"UPDATE aco_cotizacion
SET co_estado = :estado
WHERE co_id = :id";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
}
$sql =
"UPDATE aco_cotizacion
SET co_estado = co_estadoanterior
WHERE co_id = :id";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
*/
$params = array(":examenesperiodicos" => formatFloat($costoTotalPrevencion), ":id" => $idSolicitud);
$sql =
"UPDATE asc_solicitudcotizacion
SET /*sc_estado = '02.1',*/
sc_examenesperiodicos = :examenesperiodicos,
sc_fechasusphasta = SYSDATE
WHERE sc_id = :id";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
actualizarRankingBNA($idSolicitud, 0);
DBCommit($conn);
}
catch (Exception $e) {
DBRollback($conn);
echo "<script type='text/javascript'>alert(unescape('".rawurlencode($e->getMessage())."'));</script>";
exit;
}
$sql =
"SELECT se_nombre,
co_nrocotizacion || '/' || co_orden cotiorden,
sc_nrosolicitud,
(SELECT MAX(co_contrato)
function generarFormulario($id, $modulo, &$idFormulario) {
global $conn;
if ($modulo == "C")
$sql =
"SELECT sa_idformulario, sa_usualta, uw_cuitsuscripcion
FROM asa_solicitudafiliacion, afi.auw_usuarioweb
WHERE DECODE(SUBSTR(sa_usualta, 1, 2), 'W_', SUBSTR(sa_usualta, 3), sa_usualta) = uw_usuario
AND sa_idsolicitudcotizacion = :id
ORDER BY sa_idformulario";
if ($modulo == "R")
$sql =
"SELECT sa_idformulario, sa_usualta, uw_cuitsuscripcion
FROM asa_solicitudafiliacion, afi.auw_usuarioweb
WHERE DECODE(SUBSTR(sa_usualta, 1, 2), 'W_', SUBSTR(sa_usualta, 3), sa_usualta) = uw_usuario
AND sa_idrevisionprecio = :id
ORDER BY sa_idformulario";
$params = array(":id" => $id);
$stmt = DBExecSql($conn, $sql, $params, OCI_DEFAULT);
$row = DBGetQuery($stmt);
$cuit = $row["UW_CUITSUSCRIPCION"];
$idFormulario = $row["SA_IDFORMULARIO"];
$usuAlta = $row["SA_USUALTA"];
if (($idFormulario == 0) or ($idFormulario == "")) { // Si no existe el formulario, lo creo..
$sql = "SELECT afi.seq_afo_id.NEXTVAL FROM DUAL";
$idFormulario = valorSql($sql, 0, array(), 0);
$params = array();
$sql = "SELECT MAX(fo_formulario) + 1 FROM afo_formulario WHERE fo_cuit IS NOT NULL";
$nroFormulario = valorSql($sql, 0, array(), 0);
$params = array(":cuit" => nullIsEmpty($cuit),
":id" => $idFormulario,
":formulario" => $nroFormulario,
":usualta" => $usuAlta);
$sql =
"INSERT INTO afo_formulario (fo_cuit, fo_id, fo_formulario, fo_usualta)
VALUES (:cuit, :id, :formulario, :usualta)";
@DBExecSql($conn, $sql, $params, OCI_DEFAULT); // Oculto el warning porque ocurre con cierta frecuencia..
if ($modulo == "C") {
$params = array(":id" => $id, ":idformulario" => $idFormulario);
$sql =
"UPDATE asc_solicitudcotizacion
SET sc_idformulario = :idformulario
WHERE sc_id = :id";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
actualizarRankingBNA($id, 0);
$params = array(":idformulario" => $idFormulario, ":idsolicitud" => $id);
$sql =
"UPDATE asa_solicitudafiliacion
SET sa_idformulario = :idformulario
WHERE sa_idsolicitudcotizacion = :idsolicitud";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
$params = array(":idformulario" => $idFormulario, ":idsolicitud" => $_REQUEST["idsa"]);
$sql =
"UPDATE afi.arp_riesgo_pcp
SET rp_idformulario = :idformulario
WHERE rp_idsolicitud = :idsolicitud";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
$params = array(":idformulario" => $idFormulario, ":idsolicitud" => $_REQUEST["idsa"]);
$sql =
"UPDATE afi.aap_alicuotas_pcp
SET ap_idformulario = :idformulario
WHERE ap_idsolicitud = :idsolicitud";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
$params = array(":idformulario" => $idFormulario, ":idsolicitud" => $_REQUEST["idsa"]);
$sql =
"UPDATE afi.alt_lugartrabajo_pcp
SET lt_idformulario = :idformulario
WHERE lt_idsolicitud = :idsolicitud";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
}
if ($modulo == "R") {
$params = array(":idformulario" => $idFormulario, ":id" => $id);
$sql =
"UPDATE asr_solicitudreafiliacion
SET sr_idformulario = :idformulario
WHERE sr_id = :id";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
$params = array(":idformulario" => $idFormulario, ":idrevision" => $id);
$sql =
"UPDATE asa_solicitudafiliacion
SET sa_idformulario = :idformulario
WHERE sa_idrevisionprecio = :idrevision";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
}
}
// Actualizo el idformulario por las dudas..
if ($modulo == "C") {
$params = array(":idformulario" => $idFormulario, ":idsolicitudcotizacion" => $id);
$sql =
"UPDATE art.apr_polizarc
SET pr_idformulario = :idformulario
WHERE pr_idsolicitudafi = (SELECT sa_id
FROM asa_solicitudafiliacion
WHERE sa_idsolicitudcotizacion = :idsolicitudcotizacion)";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
}
}
$sql =
"UPDATE asc_solicitudcotizacion
SET sc_estado = '09'
WHERE sc_id = :id";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
actualizarRankingBNA($idSolicitudCotizacion, 0);
$params = array(":id" => $idSolicitudCotizacion);
$sql =
"UPDATE aco_cotizacion
SET co_estado = '09'
WHERE co_id = (SELECT sc_idcotizacion
FROM asc_solicitudcotizacion
WHERE sc_id = :id)";
DBExecSql($conn, $sql, $params, OCI_DEFAULT);
actualizarRankingBNA($idSolicitudCotizacion, 0);
}
DBCommit($conn);
}
catch (Exception $e) {
DBRollback($conn);
?>
<script type="text/javascript">
alert(unescape('<?php
echo rawurlencode($e->getMessage());
?>
'));
</script>
<?
exit;