/** * Funcion que establece un estatus segun los criterios sobre politicas de creditos * * @param integer $recibo //Numero numero de recibo al que se agregan los movimientos * @param date $fecha //Fecha de Operacion * @param date $AppSucursal //si Aplica para todas las sucursales * @return string $msg //Mensages del LOG */ function setEstatusDeCreditos($recibo, $fecha = false, $AppSucursal = true, $force_updates = false, $credito = false) { $fecha = $fecha == false ? fechasys() : $fecha; $cierre_sucursal = ""; $credito = setNoMenorQueCero($credito); $ql = new MQL(); $xLi = new cSQLListas(); $xLog = new cCoreLog(); if ($AppSucursal == true) { //$cierre_sucursal = "AND (`creditos_solicitud`.`sucursal`='" . getSucursal() . "')"; } $xLog->add("==\t\t\tMODIFICACION_DE_ESTATUS_EN_CREDITOS\r\n", $xLog->DEVELOPER); if ($force_updates == true) { $xLog->add("==\tSe Actualizaran ESTADOS\r\n", $xLog->DEVELOPER); } $xRec = new cReciboDeOperacion(10); $tolerancia_en_pesos = TOLERANCIA_SALDOS; $ByCredito = $xLi->OFiltro()->CreditoPorClave($credito); $sqlH = "SELECT\n\t\t\t\t`historial_de_pagos`.* FROM\n\t\t\t`historial_de_pagos` `historial_de_pagos` INNER JOIN `creditos_solicitud` `creditos_solicitud` \n\t\t\t\tON `historial_de_pagos`.`credito` = `creditos_solicitud`.\n\t\t\t\t`numero_solicitud` WHERE (`creditos_solicitud`.`estatus_actual`!=50) {$cierre_sucursal} {$ByCredito} AND (`creditos_solicitud`.`saldo_actual`>{$tolerancia_en_pesos}) ORDER BY `creditos_solicitud`.`fecha_vencimiento` "; $rsPagos = $ql->getDataRecord($sqlH); $DPagos = array(); foreach ($rsPagos as $rwpagos) { $id = $rwpagos["credito"]; $DPagos[$id][] = $rwpagos; } $rsPagos = null; //setLog($sqlH); /*INICIALIZA EL RECIBO*/ /** @since 2010-12-27 */ $sql = $xLi->getInicialDeCreditos() . " WHERE (`creditos_solicitud`.`estatus_actual`!=50) {$cierre_sucursal} {$ByCredito} AND (`creditos_solicitud`.`saldo_actual`>{$tolerancia_en_pesos}) ORDER BY `creditos_solicitud`.`fecha_vencimiento` "; $rs = $ql->getDataRecord($sql); $xDD = new cCreditos_solicitud(); foreach ($rs as $rw) { $xDD->setData($rw); $idcredito = $xDD->numero_solicitud()->v(); $xCred = new cCredito($idcredito); $xCred->init($rw); $DPago = isset($DPagos[$idcredito]) ? $DPagos[$idcredito] : false; $xCred->setDetermineDatosDeEstatus($fecha, false, $force_updates, $DPago); $xLog->add($xCred->getMessages(), $xLog->DEVELOPER); } $DPagos = null; $this->mMessages .= $xLog->getMessages(); return $xLog->getMessages(); }
/** * Retorna un Listado en Formato Pedido de los Creditos Actuales */ function initDatosDeCredito() { $sql = "SELECT `creditos_solicitud`.* FROM `creditos_solicitud` WHERE (`creditos_solicitud`.`numero_socio` =" . $this->mPersona . ") "; $xCred = new cCreditos_solicitud(); $mql = new MQL(); $data = $mql->getDataRecord($sql); foreach ($data as $row) { $xCred->setData($row); if ($xCred->saldo_actual()->v() > TOLERANCIA_SALDOS) { $this->mTCredsActivos++; $this->mTCredsSaldo += $xCred->saldo_actual()->v(); //$this->mAListaDeCreds[ $xCred->numero_solicitud()->v() ][SYS_MONTO] = $xCred->saldo_actual()->v(); $this->mAListaDeCreds[$xCred->numero_solicitud()->v()] = $row; $this->mTCredsActivosAut += $xCred->monto_autorizado()->v(); //TODO: Acompletar } $this->mTCredsNum++; } }
function setClonar($saldo = false, $autorizado = false) { $saldo = $saldo == false ? $this->getSaldoActual() : $saldo; $autorizado = $autorizado == false ? $this->getMontoAutorizado() : $autorizado; //retorna numero de credito $xS = new cSocio($this->getClaveDePersona()); $xS->init(); $nuevoID = $xS->getIDNuevoDocto(iDE_CREDITO); $xCD = new cCreditos_solicitud(); $xCD->numero_solicitud($nuevoID); $xCD->numero_socio($this->getClaveDePersona()); $xCD->causa_de_mora($this->mCausaDeMora); $xCD->contrato_corriente_relacionado($this->mContratoCorriente); $xCD->descripcion_aplicacion($this->mDescripcionDestino); $xCD->destino_credito($this->mTipoDeDestino); $xCD->dias_autorizados($this->mDiasAutorizados); $xCD->docto_autorizacion("CLONADO DEL CREDITO " . $this->mNumeroCredito); $xCD->eacp(EACP_CLAVE); $xCD->estatus_actual($this->getEstadoActual()); //$xCD->estatus_de_negociacion() $xCD->fecha_autorizacion($this->mFechaDeAutorizacion); $xCD->fecha_castigo("2018-01-01"); $xCD->fecha_conciliada(fechasys()); $xCD->fecha_ministracion($this->mFechaMinistracion); $xCD->fecha_mora($this->mFechaMora); $xCD->fecha_revision(fechasys()); $xCD->fecha_solicitud($this->mFechaDeSolictud); $xCD->fecha_ultimo_mvto($this->mFechaUltimoMvtoCapital); $xCD->fecha_vencimiento($this->mFechaVencimiento); $xCD->fecha_vencimiento_dinamico($this->mFechaVencimientoLegal); $xCD->grupo_asociado($this->mGrupoAsociado); $xCD->idusuario(getUsuarioActual()); $xCD->interes_diario($this->mInteresDiario); $xCD->interes_moratorio_devengado($this->mInteresMoratorioDev); $xCD->interes_moratorio_pagado($this->mInteresMoratorioPag); $xCD->interes_normal_devengado($this->mInteresNormalDevengado); $xCD->interes_normal_pagado($this->mInteresNormalPagado); $xCD->monto_autorizado($autorizado); $xCD->monto_parcialidad($this->mMontoFijoParcialidad); $xCD->monto_solicitado($autorizado); //igual que el autorizado $xCD->numero_pagos($this->getPagosAutorizados()); $xCD->saldo_actual($saldo); $xCD->saldo_conciliado($saldo); $xCD->saldo_vencido(0); $xCD->sdo_int_ant(0); $xCD->sucursal(getSucursal()); $xCD->pagos_autorizados($this->getPagosAutorizados()); $xCD->periocidad_de_pago($this->getPeriocidadDePago()); $xCD->periodo_notificacion(0); $xCD->periodo_solicitudes(EACP_PER_SOLICITUDES); $xCD->plazo_en_dias($this->mDiasAutorizados); $xCD->tipo_credito($this->mModalidadDeCredito); $xCD->tipo_autorizacion($this->mTipoDeAutorizacion); $xCD->tasa_ahorro($this->mTasaAhorro); $xCD->tasa_interes($this->mTasaInteres); $xCD->tasa_moratorio($this->mTasaMoratorio); $xCD->tipo_convenio($this->mTipoDeConvenio); $xCD->tipo_de_calculo_de_interes($this->mTipoDeCalculoDeInteres); $xCD->tipo_de_pago($this->mTipoDePago); $xCD->ultimo_periodo_afectado($this->mParcialidadActual); $xCD->query()->insert()->save(); return $nuevoID; }
$ministracion = $xF->getFechaISO($datos[10]); $fechaSolicitado = $xF->getFechaISO($datos[5]); $descDestino = $cT->cChar($datos[9]); $tasa = $cT->cFloat($datos[15]); $tasa = $tasa / 100; $dias = $periocidad * $pagos; $aplicacion = $cT->cChar($datos[17]) == "S" ? 501 : 100; $vencimiento = $xF->setSumarDias($dias, $ministracion); //$cT->cFecha($datos[5]); $saldo = $cT->cFloat($datos[11]); $UltimaOperacion = fechasys(); //$cT->cFecha($datos[9]); $ContratoCorriente = CTA_GLOBAL_CORRIENTE; //$cT->cInt($datos[10]); //Eliminar créditos anteriores $Creds = new cCreditos_solicitud(); $rs = $Creds->query()->select()->exec("numero_socio={$socio}"); foreach ($rs as $data) { /*$Creds->setData($data); $solicitud = $Creds->numero_solicitud()->v(); $socio = $Creds->numero_socio()->v(); $xCred = new cCredito($solicitud, $socio); $msg .= $xCred->setDelete();*/ } if ($socio == 0) { $msg .= "{$iReg}\t\tERROR\tLa Linea({$iReg}) no se leyo({$bufer})\r\n"; } else { $sqls = "UPDATE socios_general SET dependencia=" . DEFAULT_EMPRESA . " WHERE codigo={$socio}"; my_query($sqls); $xCred = new cCredito(); $xConv = new cProductoDeCredito($producto);
function jsaGetDatos($solicitud) { if ($solicitud != 0 and $solicitud != '') { $xCred = new cCreditos_solicitud(); $xCred->setData($xCred->query()->getRow("numero_solicitud={$solicitud}")); $pagos = $xCred->numero_pagos()->v(); $monto = $xCred->monto_solicitado()->v(); $periocidad = $xCred->periocidad_de_pago()->v(); $tasa = $xCred->tasa_interes()->v(); $xF = new cFecha(); $xT = new cTipos(); $tab = new TinyAjaxBehavior(); $tab->add(TabSetvalue::getBehavior('idpagos', $pagos)); $tab->add(TabSetvalue::getBehavior('idmonto', $monto)); $tab->add(TabSetvalue::getBehavior('idtasa', $tasa * 100)); $tab->add(TabSetvalue::getBehavior('idperiocidad', $periocidad)); $tab->add(TabSetvalue::getBehavior('idtipodepago', $xCred->tipo_de_pago()->v())); //Fechas de ministracion $tab->add(TabSetvalue::getBehavior('idfecha1', $xF->getFechaMX($xCred->fecha_autorizacion()->v(), "-"))); $tab->add(TabSetvalue::getBehavior('idfecha2', $xF->getFechaMX($xCred->fecha_ministracion()->v(), "-"))); $tab->add(TabSetvalue::getBehavior('idautorizacion', $xCred->docto_autorizacion()->v())); $tab->add(TabSetvalue::getBehavior('idtipodeautorizacion', $xCred->tipo_autorizacion()->v())); return $tab->getString(); } }