}
if ($notaPrincipal == "S" and $_REQUEST["TipoOp"] != "B") {
    // Si es un alta o una modificación..
    $sql = "UPDATE rrhh.rap_articulosprensa SET ap_notaprincipal = 'N'";
    DBExecSql($conn, $sql, array());
}
if ($_REQUEST["TipoOp"] == "A") {
    // Alta..
    $blobParamName = "the_clob";
    $sql = "INSERT INTO rrhh.rap_articulosprensa\n            \t\t(ap_id, ap_fecha, ap_fuente, ap_titulo, ap_contenido, ap_fechaalta, ap_usualta, ap_notaprincipal)\n     \t\t VALUES (-1, " . SqlDate($_REQUEST["Fecha"]) . ", " . addQuotes($_REQUEST["Fuente"]) . ", " . addQuotes($_REQUEST["Titulo"]) . ", EMPTY_CLOB(), SYSDATE, UPPER(" . addQuotes(GetWindowsLoginName()) . "), " . addQuotes($notaPrincipal) . ")\n     \t RETURNING ap_contenido INTO :" . $blobParamName;
    DBSaveLob($conn, $sql, $blobParamName, $_REQUEST["Contenido"], OCI_B_CLOB);
}
if ($_REQUEST["TipoOp"] == "M") {
    // Modificación..
    $blobParamName = "the_clob";
    $sql = "UPDATE rrhh.rap_articulosprensa\n  \t\t\tSET ap_fecha = " . SqlDate($_REQUEST["Fecha"]) . ",\n   \t\t\t  \tap_fuente = " . addQuotes($_REQUEST["Fuente"]) . ",\n   \t\t  \t\tap_titulo = " . addQuotes($_REQUEST["Titulo"]) . ",\n   \t\t  \t\tap_contenido = EMPTY_CLOB(),\n\t  \t\t  \tap_fechamodif = SYSDATE,\n  \t\t\t  \tap_usumodif = UPPER(" . addQuotes(GetWindowsLoginName()) . "),\n\t\t\t\t\t\tap_notaprincipal = " . addQuotes($notaPrincipal) . "\n\t\t\tWHERE ap_id = " . $_REQUEST["id"] . "\n\tRETURNING ap_contenido INTO :" . $blobParamName;
    DBSaveLob($conn, $sql, $blobParamName, $_REQUEST["Contenido"], OCI_B_CLOB);
}
if ($_REQUEST["TipoOp"] == "B") {
    // Baja..
    $params = array(":usubaja" => GetWindowsLoginName(), ":id" => $_REQUEST["id"]);
    $sql = "UPDATE rrhh.rap_articulosprensa\n\t\t\t\tSET ap_fechabaja = SYSDATE,\n\t\t\t\t\t\tap_usubaja = UPPER(:usubaja)\n\t\t  WHERE ap_id = :id";
    DBExecSql($conn, $sql, $params);
}
?>
<script>
<?
if ($dbError["offset"]) {
?>
	alert('<?php 
echo $dbError["message"];
function ObtenerValidacionFechaCuotas($fechavenc, $cantcuotas, $tiempo, $nroorden)
{
    try {
        global $conn;
        $sql = "SELECT art.legales.do_validar_cuotas( " . SqlDate($fechavenc) . ', ' . $cantcuotas . ', ' . $tiempo . ', ' . $nroorden . ' ) valor ' . " FROM dual";
        $params = array();
        $resultado = ValorSql($sql, "", $params);
        return $resultado;
    } catch (Exception $e) {
        //ErrorConeccionDatos($e->getMessage());
        throw new Exception($e->getMessage());
    }
}
function UpdateSentencia($txtfechasentencia, $txtfecharecep, $jtsentencia, $cmbsentencia, $usuario, $jt_id, $txtimportehonorarios, $txtimporteintereses, $txtimportetasajusticia, $instancia, $txtMontoCondena, $txtPorcentajeIncapacidad)
{
    try {
        global $conn;
        extract(ObtenerInstanciaParaSentencia($_SESSION["NroJuicio"]), EXTR_PREFIX_ALL, "OIPS");
        $instancia = $OIPS_IJ_ID;
        $blobParamName = "the_clob";
        //$txtPorcentajeIncapacidad = floatval($txtPorcentajeIncapacidad);
        $txtPorcentajeIncapacidad = Getfloat($txtPorcentajeIncapacidad);
        $txtMontoCondena = Getfloat($txtMontoCondena);
        if (empty($txtfecharecep)) {
            $localfecharecep = 'NULL';
        } else {
            $localfecharecep = SqlDate($txtfecharecep);
        }
        $sqlUpdate = "UPDATE LEGALES.LJT_JUICIOENTRAMITE  \n\t\t\t\t     SET JT_IDTIPORESULTADOSENTENCIA = " . $cmbsentencia . ",  \n\t\t\t\t         JT_FECHASENTENCIA = " . SqlDate($txtfechasentencia) . ",\n\t\t\t\t         JT_DETALLESENTENCIA = EMPTY_CLOB(), \n\t\t\t\t         JT_MONTOCONDENA = NVL(" . addQuotes($txtMontoCondena) . ", NULL),  \n\t\t\t\t         JT_PORCENTAJEINCAPACIDAD = NVL(" . addQuotes($txtPorcentajeIncapacidad) . ", NULL),  \n\t\t\t\t         JT_USUMODIF = " . addQuotes($usuario) . ",  \n\t\t\t\t         JT_FECHAMODIF = SYSDATE, \n\t\t\t\t         JT_FECHARECEPSENTENCIA = " . $localfecharecep . "\n\t\t\t\t   WHERE JT_ID = {$jt_id}\n\t\t\t\t   RETURNING JT_DETALLESENTENCIA INTO :" . $blobParamName;
        DBSaveLob($conn, $sqlUpdate, $blobParamName, $jtsentencia, OCI_B_CLOB);
        //------------------------------------------------------------------------------
        $sqlUpdate = "  UPDATE legales.lij_instanciajuicioentramite  \n\t\t\t\t\t     SET ij_idtiporesultadosentencia = " . $cmbsentencia . " ,  \n\t\t\t\t\t         ij_fechasentencia = " . SqlDate($txtfechasentencia) . ",\n\t\t\t\t\t         ij_MONTOCONDENA = NVL(" . addQuotes($txtMontoCondena) . ", NULL),  \n\t\t\t\t\t         ij_PORCENTAJEINCAPACIDAD = NVL(" . addQuotes($txtPorcentajeIncapacidad) . ", NULL),  \n\t\t\t\t\t         ij_usumodif = " . addQuotes($usuario) . ",  \n\t\t\t\t\t         ij_fechamodif = SYSDATE, \n\t\t\t\t\t         ij_detallesentencia = EMPTY_CLOB(),  \n\t\t\t\t\t         ij_fecharecepsentencia = " . $localfecharecep . "\n\t\t\t\t\t   WHERE ij_idjuicioentramite = " . $jt_id . "\n\t\t\t\t\t     AND ij_id = " . $instancia . "\n\t\t\t\t\t   RETURNING ij_detallesentencia INTO :" . $blobParamName;
        DBSaveLob($conn, $sqlUpdate, $blobParamName, $jtsentencia, OCI_B_CLOB);
        //------------------------------------------------------------------------------
        DBCommit($conn);
        return true;
    } catch (Exception $e) {
        DBRollback($conn);
        //ErrorConeccionDatos($e->getMessage());
        //return false;
        throw new Exception($e->getMessage());
    }
}