/**
  * 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;
 }