$xLi = new cSQLListas();
$xSuc->init();
$aliasFil = getSucursal() . "-eventos-al-cierre-de-sistema-del-dia-{$fechaop}";
$xLog = new cFileLog($aliasFil);
$idrecibo = DEFAULT_RECIBO;
$xRec = new cReciboDeOperacion(12);
$xRec->setGenerarPoliza();
$xRec->setForceUpdateSaldos();
$idrecibo = $xRec->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, $fechaop, 1, 12, "CIERRE_DE_SISTEMA_{$fechaop}", "NA", "ninguno", "NA", DEFAULT_GRUPO);
$xRec->setNumeroDeRecibo($idrecibo);
//======================= cancelar todas las cajas a 0
$sqlCa = $xLi->getListadoDeCajasConUsuario(TESORERIA_CAJA_ABIERTA);
$rs = $ql->getDataRecord($sqlCa);
foreach ($rs as $rw) {
    $xCaja = new cCaja();
    $xCaja->init($rw["codigo"]);
    if ($xCaja->setActualizaFondosCobrados() > TOLERANCIA_SALDOS) {
        $messages .= "ERROR\t Caja No cerrada por tener fondos pendientes \r\n";
    } else {
        $xCaja->setCloseBox(getUsuarioActual(), 0);
    }
    $messages .= $xCaja->getMessages(OUT_TXT);
}
//Verificar lo Valores por defecto
if ($xSuc->existeSocio(DEFAULT_SOCIO) == false) {
    $cajaLocalR = $xSuc->getCajaLocalResidente();
    $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());
    $messages .= $xSoc->getMessages(OUT_TXT);
}
if ($xSuc->existeCredito(DEFAULT_CREDITO) == false) {
function jsaGetResumenDeCaja($caja)
{
    $xCaja = new cCaja();
    $xCaja->init($caja);
    return $xCaja->getResumenDeCaja();
}