$xRec->setNumeroDeRecibo($idrecibo);
    $messages .= "=======================================================================================\r\n";
    $messages .= "=========================\t\t" . EACP_NAME . " \r\n";
    $messages .= "=========================\t\t" . getSucursal() . " \r\n";
    $messages .= "=======================================================================================\r\n";
    $messages .= "=========================\t\tINICIANDO EL CIERRE DE CAPTACION   ====================\r\n";
    $messages .= "=========================\t\tRECIBO: {$idrecibo}\t\t\t\t   ====================\r\n";
    $messages .= "=======================================================================================\r\n";
    $xUCapt = new cUtileriasParaCaptacion();
    $messages .= "=========================\t\tPurgando Dias Minimo de Inversion \t====================\r\n";
    $messages .= $xUCapt->vencer_intereses_de_inversion($idrecibo, $fechaop);
    $messages .= $xUCapt->inversiones_automaticas($idrecibo, $fechaop);
    if ($xF->getDiaFinal() == $xF->get()) {
        $messages .= $xUCapt->setGenerarInteresSobreSDPM($idrecibo, $fechaop);
        if (CAPTACION_IMPUESTOS_A_DEPOSITOS_ACTIVO == true) {
            $messages .= $xUCapt->getGenerarBaseGravadaMensualIDE($fechaop);
            $messages .= $xUCapt->setGenerarIDE_mensual($idrecibo, $fechaop);
        }
    }
    $xRec->setFinalizarRecibo(true);
    $xLog->setWrite($messages);
    $xLog->setClose();
    if (ENVIAR_MAIL_LOGS == true) {
        $xLog->setSendToMail("TR.Eventos del Cierre del Captacion");
    }
}
if ($parser == true) {
    header("Location: ./cierre_de_seguimiento.frm.php?s=true&k=" . $key . "&f={$fechaop}");
}
/*} else{
	setLog("La llave Original $key no correponde a la variable" . MY_KEY);
     break;
 case 884:
     $sql = "SELECT\n\t\t\t\t\t`captacion_cuentas`.*,\n\t\t\t\t\t`captacion_cuentastipos`.`descripcion_cuentastipos` AS `tipo`,\n\t\t\t\t\t/* heredado de inversion */\n\t\t\t\t\t`captacion_cuentas`.`numero_cuenta`                 AS `cuenta`,\n\t\t\t\t\t`captacion_cuentas`.`fecha_afectacion`              AS `apertura`,\n\t\t\t\t\t`captacion_cuentas`.`inversion_fecha_vcto`          AS `vencimiento`,\n\t\t\t\t\t`captacion_cuentas`.`tasa_otorgada`                 AS `tasa`,\n\t\t\t\t\t`captacion_cuentas`.`dias_invertidos`               AS `dias`,\n\t\t\t\t\t`captacion_cuentas`.`observacion_cuenta`            AS `observaciones`,\n\t\t\t\t\t`captacion_cuentas`.`saldo_cuenta` \t\t\t        AS `saldo`,\n\t\t\t\t\t/*heredado de captacion a la vista */\n\t\t\t\t\t`captacion_subproductos`.`descripcion_subproductos` AS `subproducto`,\n\t\t\t\t\t`captacion_subproductos`.`algoritmo_de_premio`,\n\t\t\t\t\t`captacion_subproductos`.`algoritmo_de_tasa_incremental`,\n\t\t\t\t\t`captacion_subproductos`.`metodo_de_abono_de_interes`,\n\t\t\t\t\t`captacion_subproductos`.`destino_del_interes`\n\t\t\t\tFROM\n\t\t\t\t\t`captacion_cuentas` `captacion_cuentas`\n\t\t\t\t\t\tINNER JOIN `captacion_cuentastipos` `captacion_cuentastipos`\n\t\t\t\t\t\tON `captacion_cuentas`.`tipo_cuenta` = `captacion_cuentastipos`.\n\t\t\t\t\t\t`idcaptacion_cuentastipos`\n\t\t\t\t\t\t\tINNER JOIN `captacion_subproductos` `captacion_subproductos`\n\t\t\t\t\t\t\tON `captacion_cuentas`.`tipo_subproducto` = `captacion_subproductos`\n\t\t\t\t\t\t\t.`idcaptacion_subproductos`\n\t\t\t\tWHERE\n\t\t\t\t\t`captacion_cuentas`.tipo_cuenta = 20";
     $rs = mysql_query($sql, cnnGeneral());
     while ($rw = mysql_fetch_array($rs)) {
         $socio = $rw["numero_socio"];
         $cuenta = $rw["numero_cuenta"];
         $xInv = new cCuentaInversionPlazoFijo($cuenta, $socio);
         $xInv->init($rw);
         $msg .= $xInv->setDelete();
     }
     break;
 case 885:
     $fecha = $id;
     $xUC = new cUtileriasParaCaptacion();
     $msg .= $xUC->getGenerarBaseGravadaMensualIDE($fecha);
     break;
 case 886:
     $ForzarCorreccion = strtoupper($id);
     $Forzar = $ForzarCorreccion == "SI" ? true : false;
     $xCUtils = new cUtileriasParaCaptacion();
     $msg .= $xCUtils->setValidarCuentas($Forzar);
     break;
     //TODO: Terminar
 //TODO: Terminar
 case 887:
     $xop = new cUtileriasParaOperaciones();
     $msg .= $xop->setPurgarMovimientos();
     break;
 case 888:
     //Generar los Movimientos del Fin de Mes