本文整理汇总了PHP中cFecha::getInt方法的典型用法代码示例。如果您正苦于以下问题:PHP cFecha::getInt方法的具体用法?PHP cFecha::getInt怎么用?PHP cFecha::getInt使用的例子?那么恭喜您, 这里精选的方法代码示例或许可以为您提供帮助。您也可以进一步了解该方法所在类cFecha
的用法示例。
在下文中一共展示了cFecha::getInt方法的15个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的PHP代码示例。
示例1: jsaSetFecha
function jsaSetFecha($recibo, $fecha, $nuevoperiodo)
{
$xRec = new cReciboDeOperacion(false, true, $recibo);
$xF = new cFecha();
$fecha = $xF->getFechaISO($fecha);
$xRec->init();
if ($xF->getInt($fecha) != $xF->getInt($xRec->getFechaDeRecibo())) {
$xRec->setFecha($fecha, true);
}
if ($xRec->getPeriodo() != $nuevoperiodo) {
$xRec->setPeriodo($nuevoperiodo, true);
}
return $xRec->getMessages(OUT_HTML);
}
示例2: isset
$TipoDeResponsabilidad = isset($DTConv["SIC_TIPO_DE_RESPONSABILIDAD"]) ? $DTConv["SIC_TIPO_DE_RESPONSABILIDAD"] : "I";
//individual
$TipoDeCuenta = isset($DTConv["SIC_TIPO_DE_CUENTA"]) ? $DTConv["SIC_TIPO_DE_CUENTA"] : "F";
//Pagos fijos
$TipoDeContrato = strtoupper($xCred->getOProductoDeCredito()->getTipoDeContratoCR());
// isset($DTConv["SIC_TIPO_DE_CONTRATO"]) ? $DTConv["SIC_TIPO_DE_CONTRATO"] : "DESCONOCIDO";
$ClaveUnidadMonetaria = "MX";
$ValorActivoValuacion = 0;
$NumeroDePagos = $xCred->getPagosAutorizados();
$FrecuenciaDePagos = $xCR->getEPeriocidad($xCred->getPeriocidadDePago());
$MontoPagar = $xCR->getMonto($xCred->getSaldoActual($FechaFinal));
//Acabar, valor de la letra actual o saldo?
$FechaAperturaCuenta = $xCR->getDate($xCred->getFechaDeMinistracion());
$FechaUltimoPago = $xCR->getDate($xCred->getFechaUltimoDePago());
//setLog("1....$FechaUltimoPago");
if ($xF->getInt($xCred->getFechaUltimoDePago()) >= $xF->getInt($xCred->getFechaDeMinistracion())) {
//$FechaUltimoPago = $FechaAperturaCuenta;
$xF100 = new cFecha();
$FechaAperturaCuenta = $xCR->getDate($xF100->setRestarDias(2, $xCred->getFechaDeMinistracion()));
$FechaUltimoPago = $xCR->getDate($xF100->setRestarDias(1, $xCred->getFechaDeMinistracion()));
//setLog("2....$FechaUltimoPago");
}
$FechaUltimaCompra = $xCR->getDate($xCred->getFechaDeMinistracion());
$FechaCierreCuenta = "";
$FechaCorte = $FechaExtraccion;
$Garantia = "";
//TODO: Acabar garantia
$CreditoMaximo = $xCR->getMonto($xSoc->getCreditoMaximo());
$SaldoActual = $xCR->getMonto($xCred->getSaldoActual($FechaFinal));
$LimiteCredito = $xCR->getMonto($xSoc->getCreditoMaximo());
$SaldoVencido = 0;
开发者ID:Cywaithaka,项目名称:S.A.F.E.-Open-Source-Microfinance-Suite,代码行数:31,代码来源:circulo_de_credito.rpt.php
示例3: setReinversion
/**
* Genera un reinversion
*
* @param date $fecha Fecha de Cierre se refiere a la fecha que que se efectua la Reinversion
* @param boolean $cerrar Cerrar, indica si se cierra la inversion.
* @param float $tasa
* @param int $dias
* @return integer Numero de Recibo
*/
function setReinversion($fecha = false, $cerrar = false, $tasa = false, $dias = false, $InversionParcial = false, $invertido = 0)
{
$recibo = false;
$xF = new cFecha();
//en Monto de la reinversion sera despues de los depositos (Saldo Actual)
//si cerrar = false, no efectuar ninguno movimiento
if ($cerrar == true) {
$this->mPeriodoCuenta = setNoMenorQueCero($this->mPeriodoCuenta) + 1;
$this->mDiasInvertidos = setNoMenorQueCero($dias) > 0 ? $dias : $this->mDiasInvertidos;
//2012-01-09: correccion de dias menores a cero
$this->mDiasInvertidos = $this->mDiasInvertidos < INVERSION_DIAS_MINIMOS ? INVERSION_DIAS_MINIMOS : $this->mDiasInvertidos;
if ($tasa != false) {
if ($tasa > $this->mTasaInteres) {
$this->mTasaInteres = $tasa;
$this->mMessages .= "WARN\tTASA\tSe respeta una Tasa Especial de {$tasa} sobre " . $this->mTasaInteres . " que tenia Anteriormente \r\n";
}
}
$grupo = $this->mGrupoAsociado;
$observaciones = "REINVERSION AUTOMATICA # " . $this->mPeriodoCuenta;
$recibo_fiscal = "NA";
$tipo_de_pago = TESORERIA_COBRO_NINGUNO;
$cheque = "NA";
$tipo_de_recibo = 6;
//OK: Verificar Monto de la Operacion
$monto = ($InversionParcial == true and $invertido > 0) ? $invertido : $this->mNuevoSaldo;
//verificar Nuevamente la Tasa
$tasa = $this->mTasaInteres <= 0 ? $this->getTasaAplicable($this->mDiasInvertidos, 0, $monto) : $this->mTasaInteres;
//algoritmo de tasa incremental
eval($this->mModificadorTasa);
$this->mTasaInteres = $tasa;
if (setNoMenorQueCero($this->mSocioTitular) <= DEFAULT_SOCIO) {
$this->initCuentaByCodigo();
}
//2014-09-09 .- validar si el recibo se inicia y tiene fecha de hoy
if ($this->getOReciboInversion() == null) {
//El recibo no existe
$this->mMessages .= "WARN\tNo existe el Recibo de Inversion\r\n";
} else {
$dia_de_inversion = $this->getOReciboInversion()->getFechaDeRecibo();
$recibo_anterior = $this->getOReciboInversion()->getCodigoDeRecibo();
if ($xF->getInt($dia_de_inversion) == $xF->getInt($fecha)) {
$this->mMessages .= "WARN\tLa fecha de reinversion[{$fecha}] es igual al recibo anterior[{$recibo_anterior} - " . $dia_de_inversion . "] se Eliminara\r\n";
$this->getOReciboInversion()->setRevertir(true);
$this->mMessages .= $this->getOReciboInversion()->getMessages();
}
}
if ($fecha == false) {
if (isset($this->mFechaOperacion) and $this->mFechaOperacion != false) {
$fecha = $this->mFechaOperacion;
} else {
$fecha = fechasys();
}
}
//Corrige el Dia Inhabil
//$this->mFechaVencimiento;
//corrige la fecha de Vencimiento, si es menor a la actual
if (strtotime($fecha) >= strtotime($this->mFechaVencimiento)) {
$this->mMessages .= "WARN\tLa fecha de reinversion[{$fecha}] es mayor a la de vencimiento[" . $this->mFechaVencimiento . "]\r\n";
if ($this->mDiasInvertidos > 0) {
$this->mFechaVencimiento = $xF->setSumarDias($this->mDiasInvertidos, $fecha);
}
}
$this->mFechaVencimiento = $xF->getDiaHabil($this->mFechaVencimiento);
$diasCalculados = $xF->setRestarFechas($this->mFechaVencimiento, $fecha);
if ($diasCalculados > $this->mDiasInvertidos) {
$this->mDiasInvertidos = $diasCalculados;
$this->mMessages .= "WARN\tSe Actualizan los Dias de Inversion a {$diasCalculados}\r\n";
}
$socio = $this->mSocioTitular;
//Inicializar el Recibo
$CRecibo = new cReciboDeOperacion($tipo_de_recibo, true);
//Agregar recibo si no hay
if (setNoMenorQueCero($recibo) <= 0) {
$recibo = $CRecibo->setNuevoRecibo($socio, $this->mNumeroCuenta, $this->mFechaOperacion, $this->mPeriodoCuenta, $tipo_de_recibo, $observaciones, $cheque, $tipo_de_pago, $recibo_fiscal, $grupo);
//Checar si se agrego el recibo
if (setNoMenorQueCero($recibo) > 0) {
$this->mMessages .= "SUCESS\tSe Agrego Exitosamente el Recibo {$recibo} de la Cuenta " . $this->mNumeroCuenta . " \r\n";
$this->mReciboDeReinversion = $recibo;
$this->mSucess = true;
} else {
$this->mMessages .= "ERROR\tSe Fallo al Agregar el Recibo {$recibo} de la Cuenta " . $this->mNumeroCuenta . " \r\n";
$this->mSucess = false;
}
} else {
}
$this->mReciboDeReinversion = $recibo;
//Calcular el Interes
$interes = $monto * $this->mTasaInteres * $this->mDiasInvertidos / EACP_DIAS_INTERES;
//OK: Ejecutar modificador de interes
eval($this->mModificadorDeInteres);
//si hay recibo, agregar
//.........这里部分代码省略.........
示例4: jsaGetControlDias
function jsaGetControlDias($mod, $Msolicitud)
{
$txt = "";
if (isset($mod) and isset($Msolicitud)) {
$mod = intval($mod);
$periocidad = 15;
$p_quincena = PQ_DIA_PRIMERA_QUINCENA;
$s_quincena = PQ_DIA_SEGUNDA_QUINCENA;
$xF = new cFecha();
$xT = new cTipos();
//---------------------------------------------------------
$xCred = new cCredito($Msolicitud);
$xCred->init();
$periocidad = $xCred->getPeriocidadDePago();
//cargar si es Nomina
$xPlanGen = new cPlanDePagosGenerador();
$xPlanGen->initPorCredito($Msolicitud);
switch ($mod) {
case CREDITO_TIPO_DIAS_DE_PAGO_PERSONALIZADOS:
if ($periocidad == CREDITO_TIPO_PERIOCIDAD_QUINCENAL) {
$p_quincena = $xPlanGen->getDiaAbono1();
$s_quincena = $xPlanGen->getDiaAbono2();
$txt = "\n\t\t\t\t\t\t<th>Primer Dia de Abono en el Mes</th>\n\t\t\t\t\t\t<td><input type=\"text\" name=\"dia_primer_abono\" id=\"iddia_primer_abono\" size=\"3\" class=\"mny\" value=\"{$p_quincena}\" /></td>\n\n\t\t\t\t\t\t<th>Segundo Dia de Abono en el Mes</th>\n\t\t\t\t\t\t<td><input type=\"text\" name=\"dia_segundo_abono\" id=\"iddia_segundo_abono\" size=\"3\" class=\"mny\" value=\"{$s_quincena}\" /></td>\n\t\t\t\t\t\t";
} elseif ($periocidad == CREDITO_TIPO_PERIOCIDAD_SEMANAL) {
$txt = "\n\t\t\t\t\t\t<td>Primer Dia de Abono</td>\n\t\t\t\t\t\t<td><select name=\"dia_primer_abono\" id=\"iddia_primer_abono\" >\n\t\t\t\t\t\t\t<option value=\"1\">Lunes</option>\n\t\t\t\t\t\t\t<option value=\"2\">Martes</option>\n\t\t\t\t\t\t\t<option value=\"3\">Miercoles</option>\n\t\t\t\t\t\t\t<option value=\"4\">Jueves</option>\n\t\t\t\t\t\t\t<option value=\"5\">Viernes</option>\n\t\t\t\t\t\t\t<option value=\"6\">Sabado</option>\n\t\t\t\t\t\t</select> </td>";
} elseif ($periocidad == CREDITO_TIPO_PERIOCIDAD_DECENAL) {
$txt = "<td>Dias de Abono(Decenal)</td>\n\t\t\t\t\t\t<td><input type=\"text\" name=\"dia_primer_abono\" onblur=\"jsCambiarDiaPago(this)\" id=\"iddia_primer_abono\" value=\"10,20,30\" /></td>";
} else {
$pago_mensual = PM_DIA_DE_PAGO;
$xF->set($xCred->getFechaDeMinistracion());
$pago_mensual = date("j", $xF->getInt());
$pago_mensual = $xPlanGen->getDiaAbono1();
$txt = "<td>Dia de Abono</td>\n\t\t\t\t\t\t<td><input type=\"number\" name=\"dia_primer_abono\" onblur=\"jsCambiarDiaPago(this)\" id=\"iddia_primer_abono\" value=\"" . $pago_mensual . "\" /></td>";
}
break;
}
}
return $txt;
}
开发者ID:Cywaithaka,项目名称:S.A.F.E.-Open-Source-Microfinance-Suite,代码行数:39,代码来源:frmcreditosplandepagos.php
示例5: header
$errors = $msg == "" ? false : true;
if ($preguntar == true) {
header('Content-type: application/json');
$arr = array("mensajes" => $msg, "registros" => $operaciones, "errores" => $totalerrores);
echo json_encode($arr);
} else {
if ($production == true and $errors == false and $operaciones > 0) {
$archivo = $xLayout->getClave() . $xT->cSerial(6, $casfin) . $FechaTitulo . "." . $xT->cSerial(3, $supervisor);
//header("Content-type: text/x-csv");
header("Content-type: text/plain");
//header("Content-type: application/csv");
header("Content-Disposition: attachment; filename={$archivo}");
echo $rpt;
if ($definitivo == true) {
//Guardar
$sqlUpdate = " UPDATE `aml_risk_register` SET `estado_de_envio` = 1, `fecha_de_envio`= " . $xF->getInt() . "\n\t\t\tWHERE (SELECT `tipo_de_riesgo` FROM `aml_risk_catalog` WHERE\n\t\t\t(`clave_de_control`= `aml_risk_register`.`tipo_de_riesgo`= " . AML_CLAVE_OPERACIONES_INTERNAS . "\n\t\t\t\tOR\n\t\t\t`clave_de_control`= `aml_risk_register`.`tipo_de_riesgo`= " . AML_CLAVE_OPERACIONES_INUSUALES . ")\n\t\t\tAND (getFechaByInt(`aml_risk_register`.`fecha_de_reporte`) <='{$FechaFinal}')\n\t\t\tAND (`aml_risk_register`.`estado_de_envio` =0)\n\t\t\tAND (`aml_risk_register`.`reporte_inmediato` =1)\t\t\t\n\t\t\t";
$query->setRawQuery($sqlUpdate);
//enviar por mail al administrador
$xMail = new cNotificaciones();
$xMail->sendMail($archivo, $rpt, ADMIN_MAIL);
}
} else {
$xRPT = new cReportes();
$xRPT->setOut(OUT_HTML);
$xRPT->addContent($xRPT->getHInicial($xHP->getTitle(), $FechaInicial, $FechaFinal));
$arrTitulos = array();
foreach ($Estructura as $indice => $propiedades) {
$xCampo = new cReportes_LayoutTipos($propiedades);
$arrTitulos[] = $xCampo->getNombre();
}
$xHTable->addTitles($arrTitulos);
开发者ID:Cywaithaka,项目名称:S.A.F.E.-Open-Source-Microfinance-Suite,代码行数:31,代码来源:operaciones_reporte24horas.rpt.php
示例6: initPorCredito
function initPorCredito($idcredito, $dataCredito = false)
{
$xCred = new cCredito($idcredito);
$xCred->init($dataCredito);
$xF = new cFecha();
if ($xCred->getTipoEnSistema() == CREDITO_PRODUCTO_NOMINA) {
//cargar datos de la empresa
$idemp = $xCred->getClaveDeEmpresa();
$periocidad = $xCred->getPeriocidadDePago();
$this->setPeriocidadDePago($periocidad);
$this->mTipoCreditoSis = $xCred->getTipoEnSistema();
$this->mClaveDePlan = setNoMenorQueCero($xCred->getNumeroDePlanDePagos());
if ($this->mClaveDePlan > 0) {
//TODO: validar fecha de primer pago en calculos automaticos
$this->mFechaPrimerPago = $xCred->getFechaPrimeraParc();
} else {
$this->mFechaPrimerPago = $this->getFechaDePago($xCred->getFechaDeMinistracion(), 1);
}
if ($xCred->getFechaPrimeraParc() == $this->mFechaFail or $xF->getInt($xCred->getFechaPrimeraParc()) <= $xF->getInt($xCred->getFechaDeMinistracion())) {
$this->mFechaPrimerPago = $this->getFechaDePago($xCred->getFechaDeMinistracion(), 1);
}
$xEmp = new cEmpresas($idemp);
$xEmp->init();
$DDias = $xEmp->getDiasDeNomina($periocidad);
$this->mDiaDeAbono1 = isset($DDias[0]) ? setNoMenorQueCero($DDias[0]) : $this->mDiaDeAbono1;
$this->mDiaDeAbono2 = isset($DDias[1]) ? setNoMenorQueCero($DDias[1]) : $this->mDiaDeAbono2;
$this->mDiaDeAbono3 = isset($DDias[2]) ? setNoMenorQueCero($DDias[2]) : $this->mDiaDeAbono3;
} else {
$this->mFechaPrimerPago = $this->getFechaDePago($xCred->getFechaDeMinistracion(), 1);
}
}
开发者ID:Cywaithaka,项目名称:S.A.F.E.-Open-Source-Microfinance-Suite,代码行数:31,代码来源:core.creditos.pagos.inc.php
示例7: setProcesarProgramacion
function setProcesarProgramacion($id, $arrVars = false, $data = false, $fecha = false)
{
$xF = new cFecha();
$xT = new cTipos();
$xLog = new cCoreLog();
$arrVars = $arrVars == false ? $this->mArrVars : $arrVars;
//idprograma, nombre_del_aviso, forma_de_creacion, programacion, destinatarios, microformato, tipo_de_medios, intent_check, intent_command
$sql = "SELECT *\tFROM sistema_programacion_de_avisos WHERE idprograma={$id} LIMIT 0,1";
$d = $data == false ? obten_filas($sql) : $data;
$mOb = new cSistema_programacion_de_avisos();
$mOb->setData($d);
$emails = array();
$tels = array();
$enviar = false;
$fecha = $fecha == false ? fechasys() : $fecha;
$nombredia = $xF->getDayName();
$diadelmes = date("j", $xF->getInt());
$EnviarNota = true;
$EnviarMail = true;
$EnviarSMS = false;
$xLoc = new cLocal();
//procesar cuerpo del contenido
$arrVars["fecha"] = !isset($arrVars["fecha"]) ? $fecha : $arrVars["fecha"];
$arrVars["fecha_dia_siguiente"] = $xF->setSumarDias(1, $fecha);
$arrVars["fecha_inicio_de_semana"] = $xF->getFechaDeInicioDeSemana($fecha);
$arrVars["fecha_inicio_de_mes"] = $xF->getDiaInicial($fecha);
//Dia de la semana inicial
$arrVars["hora"] = date("H");
$arrVars["usuario"] = $xLoc->getNombreUsuario();
$arrVars["clave_de_usuario"] = !isset($arrVars["clave_de_usuario"]) ? getUsuarioActual() : $arrVars["clave_de_usuario"];
//interpretar DIA
if (strtoupper($mOb->forma_de_creacion()->v()) == SYS_ALERTA_POR_EVENTO) {
$enviar = true;
} else {
//if($mOb->programacion())
$programacion = strtoupper($mOb->programacion()->v());
$periodo = explode(":", $programacion);
//INTERPRETAR DIA
if ($periodo[0] == "PROGRAMACION_SEMANAL") {
if (strpos($nombredia, $programacion) !== false) {
$enviar = true;
}
} else {
if ($periodo[0] == "PROGRAMACION_DIARIA") {
$enviar = true;
} else {
if (isset($periodo[1])) {
$dias = explode(",", $periodo[1]);
foreach ($dias as $dias => $iddia) {
$mes = $xF->mes();
$anno = $xF->anno();
if (date("Y-m-d", strtotime("{$anno}-{$mes}-{$iddia}")) == $fecha) {
$enviar = true;
}
}
}
}
}
}
//1.- extraer emails
$destinatarios = explode("|", $mOb->destinatarios()->v());
foreach ($destinatarios as $key => $cnt) {
if (trim($cnt) != "") {
//1.1 Desfragmentar destinos
$DS = explode(":", $cnt);
$mdestino = isset($DS[0]) ? strtoupper($DS[0]) : "";
switch ($mdestino) {
case "OFICIALES":
if (isset($DS[1])) {
$oficiales = explode(",", $DS[1]);
foreach ($oficiales as $ofc => $ofkey) {
$xOf = new cOficial($ofkey);
$xOf->init();
$mail = $xOf->getEmail();
$emails[] = $mail;
$xLog->add("OK\tOFICIAL\tAgregar mail {$mail} \r\n", $xLog->DEVELOPER);
}
}
break;
case "EMPRESAS":
if (isset($DS[1])) {
$empresas = explode(",", $DS[1]);
foreach ($empresas as $emp => $empkey) {
$xEmp = new cEmpresas($empkey);
$xEmp->init();
//$mail = $xEmp->getEmailsDeEnvio();
//$emails[] = $mail;
$emails = array_merge($emails, $xEmp->getEmailsDeEnvio());
$xLog->add("OK\tEMPRESAS\tAgregar mail de la empresa {$empkey} \r\n", $xLog->DEVELOPER);
}
}
break;
case "PERSONAS":
if (isset($DS[1])) {
$personas = explode(",", $DS[1]);
foreach ($personas as $ofc => $ofkey) {
$xSoc = new cSocio($ofkey);
$xSoc->init();
$mail = $xSoc->getCorreoElectronico();
$emails[] = $mail;
//.........这里部分代码省略.........
开发者ID:Cywaithaka,项目名称:S.A.F.E.-Open-Source-Microfinance-Suite,代码行数:101,代码来源:core.seguimiento.inc.php
示例8: setDescartaAlerta
function setDescartaAlerta($notas = "", $fecha = false)
{
$fecha = $fecha == false ? fechasys() : $fecha;
$xF = new cFecha();
$fecha = $xF->getInt($fecha);
$clave = $this->mCodigo;
//Actualizar la alerta
$sql = "UPDATE aml_alerts SET fecha_de_checking={$fecha}, estado_en_sistema=" . SYS_CERO . ", notas_de_checking=\"{$notas}\" WHERE clave_de_control={$clave}";
my_query($sql);
$this->mMessages .= "WARN\tAlerta # {$clave} descartada\r\n";
}
示例9: IsNULL
}
/**
* Actualiza Recibos de Operaciones
**/
$sqlS = "UPDATE operaciones_recibos SET tipo_pago = \"ninguno\" WHERE tipo_pago = \"\" OR IsNULL(tipo_pago) ";
my_query($sqlS);
/**
* Actualiza los Periodos a Formatos Validos en el Caso que el sistema les haya asigando otro valor
*/
$sqlPeriodosCorrectos = "UPDATE operaciones_mvtos\r\n\t\t\t\t\t\t\t\tSET periodo_mensual = DATE_FORMAT(fecha_afectacion, '%c'),\r\n\t\t\t\t\t\t\t\tperiodo_anual = DATE_FORMAT(fecha_afectacion, '%Y'),\r\n\t\t\t\t\t\t\t\tperiodo_semanal = DATE_FORMAT(fecha_afectacion, '%w')\r\n\t\t\t\t\t\t\t\t";
$x1 = my_query($sqlPeriodosCorrectos);
$messages .= $x1[SYS_INFO];
$xSys = new cSystemTask();
$xDB = new cSAFEData();
//crear backup //
if ($xF->getDiaFinal() == $xF->get() or date("N", $xF->getInt()) == 5) {
$messages .= "BACKUP\tRespaldo a la fecha " . $xF->getFechaDDMM() . "\r\n";
$xDB->setCheckDatabase();
$messages .= $xSys->setBackupDB_WithMail();
}
//cerrar el log
$xLog->setWrite($messages);
$xLog->setClose();
if (ENVIAR_MAIL_LOGS == true) {
$xLog->setSendToMail("TR.Eventos del Cierre del Sistema");
}
//Stored procedures
$ql->setRawQuery("CALL `proc_listado_de_ingresos` ");
//$ql->setRawQuery("CALL `proc_historial_de_pagos` ");
$ql->setRawQuery("CALL `sp_clonar_actividades` ");
$ql->setRawQuery("CALL `proc_perfil_egresos_por_persona` ");
开发者ID:Cywaithaka,项目名称:S.A.F.E.-Open-Source-Microfinance-Suite,代码行数:31,代码来源:cierre_de_sistema.frm.php
示例10: add
function add($tipo, $pagina, $observaciones, $contrato = false, $persona = false, $documento = false, $fecha = false)
{
$xF = new cFecha();
$fecha = $fecha == false ? fechasys() : $fecha;
$documento = $documento == false ? $this->mNombreArchivo : $documento;
$persona = $persona == false ? $this->mPersona : $persona;
$contrato = $contrato == false ? DEFAULT_CREDITO : $contrato;
$fecha = $xF->getInt($fecha);
$user = getUsuarioActual();
$suc = getSucursal();
$ent = EACP_CLAVE;
$sql = "INSERT INTO personas_documentacion(\n\t\t\tclave_de_persona, tipo_de_documento, fecha_de_carga, observaciones, archivo_de_documento, valor_de_comprobacion, \n\t\t\testado_en_sistema, fecha_de_verificacion, oficial_que_verifico, \n\t\t\tresultado_de_la_verificacion, notas, version_de_documento, numero_de_pagina, usuario, sucursal, entidad, documento_relacionado)\n\t\tVALUES({$persona}, {$tipo}, {$fecha}, '{$observaciones}', '{$documento}', '',\n\t\t 1, 0, 0, 0, '', '', {$pagina}, {$user}, '{$suc}', '{$ent}', {$contrato})";
$rs = my_query($sql);
if ($rs[SYS_ESTADO] == false) {
$this->mMessages .= "ERROR\t \r\n";
} else {
$this->mMessages .= "OK\t \r\n";
}
return $rs[SYS_ESTADO];
}
示例11: getDate
function getDate($fecha)
{
$xF = new cFecha();
return $this->mOut == OUT_CSV ? date("Ymd", $xF->getInt($fecha)) : "" . date("Ymd", $xF->getInt($fecha));
}
示例12: isset
$cajero = isset($_GET["f3"]) ? $_GET["f3"] : getUsuarioActual();
// Numero de Cajero
$cajero = parametro("cajero", $cajero, MQL_RAW);
$out = parametro("out", OUT_HTML, MQL_RAW);
$mails = getEmails($_REQUEST);
$ByCajero = "";
$ByAll = "";
$xCaja = new cCaja();
$xCaja->initByFechaUsuario($fecha_final, $cajero);
if (isset($_REQUEST["fechaMX"])) {
$fecha_inicial = $xF->getFechaISO($_REQUEST["fechaMX"]);
$fecha_final = $xF->getFechaISO($_REQUEST["fechaMX"]);
}
if (count($mails) <= 0) {
if (MODULO_CAJA_ACTIVADO == true) {
if ($xF->getInt($fecha_final) > $xF->getInt(fechasys())) {
if ($xCaja->getEstatus() == TESORERIA_CAJA_ABIERTA) {
$xHP->goToPageError(70102);
}
}
}
}
$xUsr = new cSystemUser($cajero);
$xUsr->init();
$nombre = $xUsr->getNombreCompleto();
$ByDependencia = (isset($_GET["dependencia"]) and $_GET["dependencia"] != SYS_TODAS) ? " AND `socios`.`iddependencia`=" . $_GET["dependencia"] : "";
$xRPT = new cReportes();
$title = $xHP->getTitle();
$xRPT->setTitle($title);
$xRPT->setOut($out);
$xRPT->setSenders($mails);
示例13: setReestructurarSDPM
//.........这里部分代码省略.........
}
$msg .= "------------------------\tNUEVO_CREDITO : {$credito}------------------------------\r\n";
if ($EliminarTodo == false) {
my_query("DELETE FROM creditos_sdpm_historico WHERE numero_de_credito = {$credito} {$wFecha2}");
}
} else {
$IsCredNew = false;
}
$OProd = $xCred->getOProductoDeCredito();
$recibo = $rw["recibo"];
$operacion = $rw["operacion"];
$afectacion = $rw["afectacion"];
$monto = $xT->cFloat($rw["monto"], 2);
$periocidad = $xCred->getPeriocidadDePago();
$FechaVencimiento = $xCred->getFechaDeVencimiento();
//(!isset( $DCred["fecha_vencimiento_dinamico"])) ? $xCred->getFechaDeVencimiento() : $DCred["fecha_vencimiento_dinamico"];
$DiaInteresMax = $xF->setSumarDias(INTERES_DIAS_MAXIMO_A_DEVENGAR, $FechaVencimiento);
$dias_transcurridos = $xF->setRestarFechas($fecha, $FECHA_DE_ULTIMO_PAGO);
$saldo_calculado = $dias_transcurridos * $saldo;
//No poner la afectacion
$saldo += $xT->cFloat($monto * $afectacion, 2);
// si es normal, calcular normal, si es mora: Calcular mora y normal, si es vencido: calcular normal y mora
$interes = 0;
$moratorio = 0;
$TASA_NORMAL = $xCred->getTasaDeInteres();
$TASA_MORA = $xCred->getTasaDeMora();
$TIPO_DE_PAGO = $xCred->getTipoDePago();
$PAGOS_SIN_CAPITAL = $xCred->getPagosSinCapital();
$MONTO_ORIGINAL_DE_CREDITO = $xCred->getMontoAutorizado();
$saldoBase = $xT->cFloat($saldo, 2);
if ($operacion == OPERACION_CLAVE_PAGO_CAPITAL and $saldo == 0) {
$saldoBase = $CREDITO_SALDO_ANTERIOR;
}
if ($MvtoAnterior == OPERACION_CLAVE_MINISTRACION) {
$saldoBase = $CREDITO_SALDO_ANTERIOR;
$saldo_calculado = $dias_transcurridos * $CREDITO_SALDO_ANTERIOR;
}
$SALDO_ACTUAL = $xCred->getSaldoActual();
$BASE_NORMAL = $saldo_calculado;
$BASE_MORA = $saldo_calculado;
eval($OProd->getPreModInteres());
//considerar si es un maximo de x dias devengar en vencidos
switch ($ESTADO_ACTUAL) {
case CREDITO_ESTADO_VIGENTE:
$interes = $BASE_NORMAL * $TASA_NORMAL / $DIVISOR_DE_INTERESES;
break;
case CREDITO_ESTADO_VENCIDO:
//validar si tiene un maximo de dias transcurridos de devengado
if ($xF->getInt($fecha) <= $xF->getInt($DiaInteresMax)) {
$interes = $BASE_NORMAL * $TASA_NORMAL / $DIVISOR_DE_INTERESES;
$moratorio = $BASE_MORA * $TASA_MORA / $DIVISOR_DE_INTERESES;
} else {
$interes = 0;
$moratorio = 0;
$nota = "Despues del {$DiaInteresMax} no se acumula Interes, Vencimiento : {$FechaVencimiento}";
}
break;
case CREDITO_ESTADO_MOROSO:
$interes = $BASE_NORMAL * $TASA_NORMAL / $DIVISOR_DE_INTERESES;
$moratorio = $BASE_MORA * $TASA_MORA / $DIVISOR_DE_INTERESES;
break;
}
//END_SWITCH
$interes = $xT->cFloat($interes, 2);
if ($periocidad == CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) {
$moratorio = $xT->cFloat($moratorio, 2);
//0; //2012-04-10
} else {
//$moratorio = 0;
}
eval($OProd->getPosModInteres());
$msg .= "{$socio}\t{$credito}\t{$fecha}\t{$monto}\t{$saldo}\t{$dias_transcurridos}\t{$operacion}\t{$ESTADO_ACTUAL}\t{$interes}\t{$moratorio}\t{$nota}\r\n";
if ($xF->getInt($fecha) <= $xF->getInt(SYS_FECHA_DE_MIGRACION)) {
$interes = 0;
$moratorio = 0;
if (MODO_DEBUG == true) {
$msg .= "WARN\tOMITIR Interes {$interes} y MORA por {$moratorio} por estar antes de la migracion {$fecha}\r\n";
}
}
if ($xF->getInt($fecha) <= $xF->getInt($fechaCorte)) {
$msgSDPM = $xCred->addSDPM($interes, $moratorio, $FECHA_DE_ULTIMO_PAGO, $saldo, $ESTADO_ACTUAL, $fecha, $operacion, $saldo_calculado);
//if(MODO_DEBUG == true){ $msg .= $msgSDPM; }
}
if ($saldo <= TOLERANCIA_SALDOS) {
$msg .= "------------------------------------------------------\r\n";
}
$creditoA = $credito;
$FECHA_DE_ULTIMO_PAGO = $fecha;
$CREDITO_SALDO_ANTERIOR = $saldo;
$MvtoAnterior = $operacion;
/*
* si existe la operacion de cambio de estatus, validar en el array, y actualizar el valor
* Este estatus se aplicara en el siguiente
*/
if (in_array($operacion, $arrEstatusD)) {
$ESTADO_ACTUAL = $arrEstatus[$operacion];
}
}
return $msg;
}
开发者ID:Cywaithaka,项目名称:S.A.F.E.-Open-Source-Microfinance-Suite,代码行数:101,代码来源:core.creditos.utils.inc.php
示例14: setNoMenorQueCero
*/
$rsm = $ql->getDataRecord($SQLBody);
foreach ($rsm as $rwm) {
$pendiente = 0;
$title = $rwm["descripcion_operacion"];
$monto = $xT->cFloat($rwm["total_operacion"], 2);
$MTipo = $rwm["tipo_operacion"];
$cls = "";
$xLog->add("WARN\tIX\tEl Movimiento es {$MTipo}\r\n", $xLog->DEVELOPER);
//Omite los Intereses Pactados y tod lo concerniente al credito segun la base
if (in_array($MTipo, $arrINTS)) {
$xLog->add("WARN\t{$MTipo}\tINTERES\tEl Monto por {$monto} Del Movimiento {$MTipo} se lleva a CERO\r\n", $xLog->DEVELOPER);
$monto = 0;
}
if ($MTipo == OPERACION_CLAVE_PLAN_INTERES) {
if ($xCred->getPagosSinCapital() == true and $xF->getInt($fecha_operacion) < $xF->getInt($fecha_de_pago)) {
$interes_calculado = $interes_normal_devengado - $interes_normal_pagado + $interes_normal_calculado;
if ($monto > $interes_calculado) {
$xLog->add("WARN\t{$MTipo}\tINT.DEV\tInteres de la Letra Ajustado de {$monto} a {$interes_calculado} por ser menos\r\n", $xLog->COMMON);
$monto = $interes_calculado > 0 ? $interes_calculado : 0;
$cls = " class='warn' ";
}
} else {
if ($pago_total == false) {
$xLog->add("WARN\tSin cambios en Intereses {$MTipo}\r\n", $xLog->DEVELOPER);
} else {
$interes_normal = setNoMenorQueCero($interes_normal - $monto);
}
}
}
if (in_array($MTipo, $aActosDeIva)) {
示例15: cFecha
function check5Cierres($fecha_final, $alCerrar = false)
{
$xF = new cFecha();
$fecha_inicio_sistema = FECHA_INICIO_OPERACIONES_SISTEMA;
$dias_a_revisar = REVISAR_DIAS_DE_CIERRE;
$fecha_inicial = $xF->setRestarDias($dias_a_revisar, $fecha_final);
$res = array();
$ok = false;
$xSuc = new cSucursal();
for ($i = 0; $i <= $dias_a_revisar; $i++) {
$fecha = $xF->setSumarDias($i, $fecha_inicial);
if ($xF->getInt($fecha_inicio_sistema) >= $xF->getInt($fecha)) {
$this->mMessages .= "WARN\tFecha {$fecha} OMITIDO por ser menor al inicio de operaciones\r\n";
$res[$fecha] = true;
$ok = true;
} elseif ($xF->getInt($fecha) == $xF->getInt(fechasys())) {
$this->mMessages .= "WARN\tFecha {$fecha} OMITIDO por ser Fecha Actual\r\n";
$res[$fecha] = true;
$ok = true;
if ($alCerrar == true) {
if ((int) date("H") < (int) $xSuc->getHorarioDeCierre()) {
//considerar si es dia festivo
$this->mMessages .= "ERROR\tNO ES EL HORARIO MINIMO DE CIERRE PARA LA FECHA {$fecha} SON LAS " . date("H") . " HRS. DE " . $xSuc->getHorarioDeCierre() . ", MINIMO DE CIERRE\r";
$res[$fecha] = false;
$ok = false;
}
}
} else {
//$this->mMessages .= "WARN\tFecha $fecha OMITIDO por ser menor al inicio de operaciones\r\n";
if ($this->checkCierre($fecha) == false) {
$res[$fecha] = false;
$ok = false;
$this->mMessages .= "ERROR\tFecha {$fecha} No existe en el sistema\r\n";
if ($xF->getInt($fecha) == $xF->getInt($fecha_final)) {
$this->mMessages .= "ERROR\tPROCESAR LA FECHA {$fecha_final}|{$fecha} LAS FECHAS SON LAS MISMAS A " . fechasys() . "\r\n";
$res[$fecha] = true;
$ok = true;
}
} else {
$res[$fecha] = true;
$ok = true;
$this->mMessages .= "OK\tFecha {$fecha} existente\r\n";
}
}
$xCaja = new cCaja();
if ($alCerrar == true) {
if ($xCaja->getCajasAbiertas($fecha) > 0) {
$ok = false;
$res[$fecha] = false;
$this->mMessages .= "OK\tFecha {$fecha} tiene cortes pendientes\r\n";
}
}
}
unset($res[fechasys()]);
foreach ($res as $dateme => $rs) {
if ($dateme != SYS_ESTADO) {
if ($rs == false) {
$this->mMessages .= "ERROR\tFecha {$dateme} tiene cortes pendientes.-2\r\n";
$ok = false;
}
}
}
if (MODO_DEBUG == true) {
setLog($this->mMessages);
}
$res[SYS_ESTADO] = $ok;
return $res;
}