if (!isset($bufer)) {
$msg .= "{$iReg}\t\tERROR\tLa Linea({$iReg}) no se leyo({$bufer})\r\n";
} else {
$bufer = trim($bufer);
$datos = explode(",", $bufer, 6);
$socio = $cT->cInt($datos[0]);
$importe = $cT->cFloat($datos[1]);
$fechaApertura = $cT->cFecha($datos[2]);
$plazo = $cT->cInt($datos[3]);
$tasa = $cT->cFloat($datos[4]);
$observaciones = $cT->cChar($datos[5]);
$ClaveCuenta = false;
//Iniciar el Socio
//$msg .= "$iReg\t$socio\tERROR_SOCIO\t$socio -- $importe -- $fechaApertura -- $plazo -- $tasa -- $observaciones\r\n";
$xCL = new cCajaLocal(99);
if ($xCL->getExistenciaSocio($socio) <= 0) {
$msg .= "{$iReg}\t{$socio}\tERROR_SOCIO\tLa Linea({$iReg}) no se leyo por que no existe el socio({$bufer})\r\n";
} else {
$xInv = new cCuentaInversionPlazoFijo(false, $socio, $plazo, $tasa, $fechaApertura);
//Agrega la Cuenta
$ClaveCuenta = $xInv->setNuevaCuenta(99, 2, $socio, $observaciones, DEFAULT_CREDITO, "", "", DEFAULT_GRUPO, $fechaApertura, CAPTACION_TIPO_PLAZO, 99, $plazo, $tasa);
if ($ClaveCuenta != false) {
$msg .= "{$iReg}\t{$socio}\tCUENTA\tSe Agrego Exitosamente la cuenta {$ClaveCuenta}\r\n";
if ($importe > 0) {
$xInv->init();
$xInv->setFechaDeOperacion($fechaApertura);
$xInv->setDiasInvertidos($plazo);
$RDeposito = $xInv->setDeposito($importe, DEFAULT_CHEQUE, DEFAULT_TIPO_PAGO, DEFAULT_RECIBO_FISCAL, $observaciones, DEFAULT_GRUPO, $fechaApertura);
$msg .= "{$iReg}\t{$socio}\tRECIBO_DEPOSITO\tSe Efectua un Deposito de {$importe} al Recibo {$RDeposito}\r\n";
$xInv->init();
$recibo_de_reinversion = $xInv->setReinversion($fechaApertura, true, $tasa, $plazo);
function setValidar()
{
$msg = "";
$this->init();
$cajaLocalR = $this->mCajaLocalRes;
//Actualiza le socio por default a la actual sucursal
$sqlUS = "UPDATE socios_general SET sucursal = '" . getSucursal() . "', cajalocal = " . $cajaLocalR . " WHERE codigo =" . DEFAULT_SOCIO . " ";
my_query($sqlUS);
//NOTE: Verifica si existe el Socio por default
$xCL = new cCajaLocal($cajaLocalR);
if ($xCL->getExistenciaSocio(DEFAULT_SOCIO) == 0) {
$msg .= "EL socio por defecto no existe\r\n";
$xSoc = new cSocio(DEFAULT_SOCIO);
$xSoc->add("", "PUBLICO_GENERAL", "", "POR_REGISTRAR", "POR_REGISTRAR", $cajaLocalR, false, "DESCONOCIDO", 99, 99, 99, 99, 99, 1, DEFAULT_GRUPO, "", 1, "0", DEFAULT_SOCIO, getSucursal());
}
//Actualiza al User 99 a la CURS SUCURSAL
$sqlUUserRoot = "UPDATE t_03f996214fba4a1d05a68b18fece8e71\n\t\t\t\t\t\t\tSET sucursal='" . getSucursal() . "' WHERE idusuarios = " . DEFAULT_USER;
my_query($sqlUUserRoot);
$msg .= "" . "\tActualizando ROOT a la sucursal para manejo de Ops. Huerfanas\r\n";
return $msg;
}
