function jsaGetNumeroDeCredito($idsocio) { $xSoc = new cSocio($idsocio); $xSoc->init(); $solicitud = $xSoc->getIDNuevoDocto(iDE_CREDITO); $tab = new TinyAjaxBehavior(); $tab->add(TabSetValue::getBehavior('iidsolicitud', $solicitud)); //tipo de credito y preferencia e pago //Mayo/2014 $xEmp = new cEmpresas($xSoc->getClaveDeEmpresa()); $xEmp->init(); $tab->add(TabSetValue::getBehavior('idtipoconvenio', $xEmp->getProductoPref())); $tab->add(TabSetValue::getBehavior('idperiocidadpagos', $xEmp->getPeriocidadPref())); return $tab->getString(); }
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; }
$dias = parametro("iddias", 0, MQL_INT); $tasa = 0; $sucursal = getSucursal(); $fechabaja = "2029-12-31"; $fechaalta = parametro("idfecha", fechasys()); $estatus = 10; $man1 = parametro("idsocio2", 0, MQL_INT); $man2 = parametro("idsocio3", 0, MQL_INT); $cuentaDeIntereses = parametro("idcuentainteres", DEFAULT_CUENTA_CORRIENTE, MQL_INT); $fechaalta = $xF->getFechaISO($fechaalta); $subpdto = parametro("idproductocaptacion"); $sucess = true; //Iniciar socio $xSoc = new cSocio($idsocio); if ($xSoc->init() == true) { $idcuenta = $xSoc->getIDNuevoDocto(iDE_CAPTACION, $subpdto); if ($xSoc->existeCredito($idcuenta) == true or $xSoc->existeCuenta($idcuenta) == true) { $idcuenta = $xSoc->getIDNuevoDocto(iDE_CAPTACION, $subpdto); $msg .= "WARN\tNumero de Cuenta Cambiada {$idcuenta}\r\n"; } //if( $xSoc->existeCuenta($idcuenta) ) $sqlPdto = "SELECT * FROM captacion_subproductos WHERE idcaptacion_subproductos={$subpdto}"; $dPdto = obten_filas($sqlPdto); $tipocuenta = $dPdto["tipo_de_cuenta"]; $destino_de_intereses = $dPdto["destino_del_interes"]; //la cuenta debe de ser de intereses $eCta = new cCuentaDeCaptacion($cuentaDeIntereses, $idsocio); $eCta->init(); $eTS = $eCta->getTipoDeSubproducto(); if ($destino_de_intereses == CAPTACION_DESTINO_CTA_INTERES and $eTS != CAPTACION_PRODUCTO_INTERESES) { $msg .= "ERROR\tLa Cuenta debe tener una CUENTA VALIDA PARA INTERESES, Si no Existe agrege una NUEVA y Asociela con esta Cuenta\r\n";