//2011-01-26 ; manejar fechas $xF = new cFecha(0, $fechaop); $xSuc = new cSucursal(); $ql = new MQL(); $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);
function getListaDeCajasAbiertas($id = "", $tipo = "") { $id = $id == "" ? "idcaja" : $id; $this->mLIDs[] = $id; $xli = new cSQLListas(); $sqlSc = $xli->getListadoDeCajasConUsuario(TESORERIA_CAJA_ABIERTA); //TODO : Probar con cSQListas //$sqlSc .= ($tipo == "") ? "" : " WHERE subclasificacion=$tipo "; $xS = new cSelect($id, $id, $sqlSc); $xS->setLabel("TR.Caja"); $xS->setNoMayus(); $xS->setEsSql(); return $xS; }