$msg .= "===================================== INICIANDO EL RESPALDO DE {$BkpSucursal} =============================\r\n";
$FechaDeCorte = $_POST["cFechaDeCorte"];
//Fecha Inicial de Corte
$LstFolio = $_POST["cLastFolio"];
//Ultimo Folio de Recibo
$msg .= date("H:i:s") . "\tLa Fecha de Corte es {$FechaDeCorte}\r\n";
//$msg .= "\tLa Fecha de Corte es $FechaDeCorte";
//step one: Socios a sus sucursales
$xSuc = new cSucursal(getSucursal());
$msg .= $xSuc->setValidar();
$xCL = new cCajaLocal(getCajaLocal());
$msg .= $xCL->setValidar();
//step two: Folios al Maximo
$msg .= setFoliosAlMaximo();
//Step_tree: Elimina los archivos en el tmp Backups
$xop = new cUtileriasParaOperaciones();
//Genera un Recibo por los Mvtos Huerfanos de Recibo en Operaciones
$msg .= $xop->setGenerarRecibosGlobales();
//Elimina Recibos Duplicados
$msg .= $xop->setEliminarRecibosDuplicados();
$sql_ttmp = "DELETE FROM general_tmp";
my_query($sql_ttmp);
$msg .= "\tSe eliminan Registros Temporales\r\n";
echo "\n\t\t\t\t<ol>\n\t\t\t\t\t<li>Se Actualizaron los Folios</li>\n\t\t\t\t\t<li>Se Actualizo el DEFAULT Socio para Operaciones que no tienen socio</li>\n\t\t\t\t\t<li>Se Actualizaron los Socios a su sucursal</li>\n\t\t\t\t\t<li>Se Actualizo el usuario ROOT para Operaciones que no tienen propietario</li>\n\t\t\t\t\t<li>Se Agrego el Recibo x para Mvtos Huerfanos</li>\n\t\t\t\t\t<li>Se Purgaron Recibos Duplicados</li>\n\t\t\t\t<li>Se Actualizo la sucursal de Creditos por usuario propietario</li>\n\t\t\t\t<li>Se Actualizo la sucursal de las Cuentas de Captacion por Usuario Propietario</li>\n\t\t\t\t<li>Se Actualizo la Sucursal de las Operaciones y recibos por Usuario Propietario</li>\n\t\t\t\t<li>La fecha de purga es a partir de {$FechaDeCorte}</li>\t\t\t\t\t\n\t\t\t\t</lo>\n\t\t\t\t<br />\n\t\t\t\t<a href=\"./sucursal.backup_offline.frm.php?a=1&s=2&f={$FechaDeCorte}&n={$LstFolio}\" target=\"_self\">Siguiente</a>\n\t\t\t";
//$x145 = "UPDATE socios_general SET sucursal = '" . $sucursal . "' WHERE codigo = " . DEFAULT_SOCIO;
//$xQ = my_query($x145);
$msg .= date("H:i:s") . "\tSe Marca el recibo {$LstFolio} como ultimo\r\n";
$msg .= date("H:i:s") . "\tSe Actualiza el Socio PUBLICO_GENERAL a la sucursal de corte para Operaciones sin Socio\r\n";
$msg .= date("H:i:s") . "\tSe Agrego el Recibo x para Mvtos Huerfanos\r\n";
@fwrite($URIFil, $msg);
break;
* Agregar codigo de actualizar menores a personas fisicas
* ====================================================================================================================================================
*/
$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 SISTEMA ====================\r\n";
$messages .= "=========================\t\tRECIBO: {$idrecibo}\t\t\t\t ====================\r\n";
//2011-01-26 : Agrega un recibo estadistico de control diario
$xNRec = new cReciboDeOperacion(10);
$diaSig = $xF->setSumarDias(1);
$xIdNRec = $xNRec->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, $diaSig, 1, 10, "MOVIMIENTOS_ESTADISTICOS_DEL_DIA", "NA", "ninguno", "NA", DEFAULT_GRUPO);
//actualiza la configuracion del sistema
$xCx = new cConfiguration();
$xUtil = new cUtileriasParaOperaciones();
$xCx->set("numero_de_recibo_por_defecto", $xIdNRec);
$messages .= date("Y-m-d") . "\tSe Agrego el Recibo {$xIdNRec} para ESTADISTICOS del proximo dia( {$diaSig} )\n";
//=================================
$messages .= $xUtil->setEliminarRecibosDuplicados();
$x20 = setFoliosAlMaximo();
$messages .= date("Y-m-d") . "\tSe llevaron Folios al Maximo, los recibos quedaron en " . $x20["recibos"] . " \n";
$messages .= date("Y-m-d") . "\tSe llevaron la Cuenta de Polizas Contables al Maximo \n";
setSociosAlMaximo();
clearCacheSessions();
$messages .= date("Y-m-d") . "\tSe limpio la Cache de sessiones\n";
$messages .= date("Y-m-d") . "\tSe llevaron los socios al Maximo \n";
if ($xF->getDiaFinal() == $xF->get()) {
$messages .= CongelarSaldos($idrecibo);
} else {
$messages .= date("Y-m-d") . "\tNO SE CONGELAN SALDOS, NO ES FIN DE MES\r\n";
$msg .= "============\t\r\n";
$msg .= "============\tGENERAR POLIZA CONTABLE DEL RECIBO {$Recibo} \r\n";
$msg .= "============\t\r\n";
$msg .= $xUCont->setPolizaPorRecibo($Recibo);
//
break;
case 1104:
//
$cajero = $id;
$fecha = $id2;
$numero_de_poliza = $id3 == "NUMERO_DE_POLIZA" ? false : $id3;
$xUCont = new cUtileriasParaContabilidad();
//$msg .= $xUCont->setPolizaPorCajero( $cajero, $fecha, $numero_de_poliza );
break;
case 501:
$xop = new cUtileriasParaOperaciones();
$msg .= $xop->setGenerarRecibosGlobales();
break;
case 13001:
$ForzarCorreccion = strtoupper($id) == "SI" ? true : false;
$xPerUtils = new cPersonas_utils();
$msg .= $xPerUtils->setCorregirActividadEconomica($ForzarCorreccion);
break;
//===============genera colonias por localidades
//===============genera colonias por localidades
case 13002:
$ql = new MQL();
$rs = $ql->getDataRecord("SELECT * FROM `catalogos_localidades`");
$xLoc = new cCatalogos_localidades();
$xCol = new cGeneral_colonias();
foreach ($rs as $rw) {
/**
* @deprecated 2012.03
*/
function setPurgeFromDuplicatedRecibos()
{
$xop = new cUtileriasParaOperaciones();
$msg = $xop->setEliminarRecibosDuplicados();
return $msg;
}
