$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; }