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); } }
function jsaSetDesvincularPersona($credito, $fecha, $observaciones) { $msg = ""; $xLng = new cLang(); $xCred = new cCredito($credito); $xCred->init(); $xdat = new cFecha(0); $fecha = $xdat->getFechaISO($fecha); $xCred->setResetPersonaAsociada($fecha, $observaciones); $oP = $xCred->getOPersona(); $xEmp = new cEmpresas($xCred->getClaveDeEmpresa()); $xEmp->init(); $xRN = new cReglaDeNegocio(); $xRN->setVariables(array("nombre_de_persona" => $oP->getNombreCompleto(), "mensaje" => $observaciones, "saldo_del_credito" => $xCred->getSaldoActual(), "nombre_de_la_empresa" => $xEmp->getNombreCorto())); $xRN->setExecuteActions($xRN->reglas()->RN_NOMINA_AL_DESVINCULAR); return $xLng->get(MSG_READY_SAVE); }
function initByCredito($ClaveCredito = false) { $ClaveCredito = $ClaveCredito == false ? $this->mCredito : $ClaveCredito; $xCred = new cCredito($ClaveCredito); $xCred->init(); $this->mClaveDeCredito = $xCred->getNumeroDeCredito(); $this->mClaveDePersona = $xCred->getClaveDePersona(); $this->mClaveDeGrupo = $xCred->getClaveDeGrupo(); $this->mClaveDeEmpresa = $xCred->getClaveDeEmpresa(); $this->mTasaDeIVA = $xCred->getTasaIVA(); $this->mTotalParciales = $xCred->getPagosAutorizados(); if ($this->mDiasTolerancia == 0) { $DProducto = $xCred->getOProductoDeCredito(); $this->mDiasTolerancia = $DProducto->getDiasTolerados(); } if ($xCred->getNumeroDePlanDePagos() != false) { $this->mNumeroDePlan = $xCred->getNumeroDePlanDePagos(); $this->init(); } $this->mIsInit = true; $this->mMessages .= $xCred->getMessages(OUT_TXT); return $this->mNumeroDePlan; }
/** * Agrega un Recibo Nuevo * @param integer $socio * @param integer $documento * @param date $fecha_operacion * @param integer $parcialidad * @param integer $tipo_docto * @param string $cadena * @param string $cheque_afectador * @param string $tipo_pago * @param string $recibo_fiscal * @param integer $grupo_asoc * @param integer $cuenta_bancaria */ function setNuevoRecibo($socio, $documento, $fecha_operacion, $parcialidad, $tipo_docto = false, $cadena = "", $cheque_afectador = "NA", $tipo_pago = "ninguno", $recibo_fiscal = "NA", $grupo_asoc = DEFAULT_GRUPO, $cuenta_bancaria = false, $moneda = false, $unidades_originales = 0, $persona_asociada = false) { $ql = new MQL(); $tipo_docto = setNoMenorQueCero($tipo_docto) <= 0 ? $this->mTipoDeRecibo : $tipo_docto; //----------------------------------DATOS DEL RECIBO------------------------ $total_operacion = 0; // Total Operacion $observaciones = $cadena; $indice_origen = 99; // Indice de Origen $sucursal = getSucursal(); $eacp = EACP_CLAVE; $moneda = $moneda == false ? $this->mMoneda : $moneda; $unidades_originales = $unidades_originales == 0 ? $this->mUnidadesOriginales : $unidades_originales; $persona_asociada = $persona_asociada == false ? $this->mClavePersonAsoc : $persona_asociada; $persona_asociada = setNoMenorQueCero($persona_asociada); //si es pago o ministracion if ($tipo_docto == RECIBOS_TIPO_PAGO_CREDITO and $persona_asociada <= DEFAULT_SOCIO) { $xCred = new cCredito($documento); if ($xCred->init() == true) { $persona_asociada = $xCred->getClaveDeEmpresa(); } } // $cuenta_bancaria = setNoMenorQueCero($cuenta_bancaria); if ($cuenta_bancaria > 0) { $this->setCuentaBancaria($cuenta_bancaria); } // DATOS GENERALES $idrecibo = getFolio(iDE_RECIBO); //Verificar la Cuenta Bancaria if (!isset($socio)) { $socio = $this->mSocio; } $iduser = getUsuarioActual(); $xDTab = new cSAFETabla(TOPERACIONES_RECIBOS); //----------------------------------------------------------------------------- clave_de_moneda, unidades_en_moneda $xRec = new cOperaciones_recibos(); $xRec->archivo_fisico(""); $xRec->cadena_distributiva($cadena); $xRec->cheque_afectador($cheque_afectador); $xRec->clave_de_moneda($moneda); $xRec->docto_afectado($documento); $xRec->eacp($eacp); $xRec->fecha_de_registro(fechasys()); $xRec->fecha_operacion($fecha_operacion); $xRec->grupo_asociado($grupo_asoc); $xRec->idoperaciones_recibos($idrecibo); $xRec->idusuario($iduser); $xRec->indice_origen($indice_origen); $xRec->numero_socio($socio); $xRec->observacion_recibo($observaciones); $xRec->origen_aml(0); $xRec->persona_asociada($persona_asociada); //empresa $xRec->recibo_fiscal($recibo_fiscal); $xRec->sucursal($sucursal); $xRec->tipo_docto($tipo_docto); $xRec->total_operacion($total_operacion); $xRec->unidades_en_moneda($unidades_originales); $xRec->tipo_pago($tipo_pago); if ($this->mAfectar == true) { $xsr = $xRec->query()->insert()->save(); // my_query($sql_i_rec); if ($xsr != false) { $this->mMessages .= "OK\tSe agrego exitosamente el Recibo : {$idrecibo} : del Documento {$documento}\r\n"; $this->mCodigoDeRecibo = $idrecibo; $this->setNumeroDeRecibo($idrecibo); $this->init(); } else { $this->mMessages .= "ERROR\tError al Agregar el Recibo {$idrecibo} del Documento {$documento} \r\n"; $idrecibo = false; } } else { $this->mMessages .= "WARN\tNo se agrega el Recibo por que es NO AFECTABLE \r\n"; } return $idrecibo; }
function setCredito($credito) { $this->mDocumento = $credito; $xFDE = new cFecha(); $xLng = new cLang(); $cCred = new cCredito($credito); $cCred->init(); $idsolicitud = $credito; $DCred = $cCred->getDatosDeCredito(); $DProd = $cCred->getOProductoDeCredito(); $OOParam = new cProductoDeCreditoOtrosDatosCatalogo(); $numero_de_socio = $cCred->getClaveDePersona(); $this->mPersona = $numero_de_socio; $cSoc = new cSocio($numero_de_socio); $cSoc->init(); $svar_info_cred = ""; $tblInfCred = new cFicha(iDE_CREDITO, $idsolicitud); $this->setPersona($numero_de_socio); $svar_info_cred = $tblInfCred->show(true); //Lista de Beneficiados $lst_beneficiados = ""; $this->getListadoDeAvales($idsolicitud); $SQLCBen = "SELECT `socios_relacionestipos`.`descripcion_relacionestipos` AS 'relacion', `socios_relaciones`.`nombres`,\t`socios_relaciones`.`apellido_paterno`,\t`socios_relaciones`.`apellido_materno`,\n\t\t\t`socios_consanguinidad`.`descripcion_consanguinidad` AS 'consaguinidad'\n\t\t\tFROM `socios_relaciones` `socios_relaciones` INNER JOIN `socios_consanguinidad` `socios_consanguinidad` ON `socios_relaciones`.`consanguinidad` = `socios_consanguinidad`.`idsocios_consanguinidad`\n\t\t\tINNER JOIN `socios_relacionestipos` `socios_relacionestipos` ON `socios_relaciones`.`tipo_relacion` = `socios_relacionestipos`.`idsocios_relacionestipos`\n\t\t\tWHERE (`socios_relaciones`.`socio_relacionado` ={$numero_de_socio}) AND (`socios_relaciones`.`credito_relacionado` ={$idsolicitud})\tAND\t(`socios_relaciones`.`tipo_relacion`=11)"; $tblCBen = new cTabla($SQLCBen); $lst_beneficiados = $tblCBen->Show(); $firmas_de_avales = $this->mFirmasAvales; // $cSoc->getCoResponsables("firmas", "avales", $idsolicitud ); //Plan de Pago segun SQL $splan_pagos = $cCred->getPlanDePago(OUT_HTML, true, true); //================================================================================== $fichas_de_avales = $this->mFichasAvales; //$cCred->getAvales_InText(); $fecha_larga_de_documento = $xFDE->getFechaLarga($cCred->getFechaDeMinistracion()); $fichas_de_respsolidarios = ""; //TODO: FALTA //Otros Datos $monto_ministrado = $cCred->getMontoAutorizado(); $tasa_interes_mensual_ordinario = round($cCred->getTasaDeInteres() / 12 * 100, 2); $tasa_interes_anual_ordinario = $cCred->getTasaDeInteres(); $fecha_de_vencimiento = $cCred->getFechaDeVencimiento(); $fecha_de_ministracion = $cCred->getFechaDeMinistracion(); $tasa_garantia_liquida = $DCred["porciento_garantia_liquida"] * 100; $monto_garantia_liquida = $monto_ministrado * $tasa_garantia_liquida; $tasa_interes_mensual_moratorio = round($cCred->getTasaDeMora() / 12 * 100, 2); $dias_del_credito = $cCred->getDiasAutorizados(); $meses_del_credito = sprintf("%02d", ceil($dias_del_credito / 30.416666666666668)); $periocidad = $cCred->getPeriocidadDePago(); //Tipo de Credito por SQL $SQLTCred = "SELECT * FROM creditos_modalidades WHERE idcreditos_modalidades=" . $DCred["tipo_credito"]; $tipo_de_credito = mifila($SQLTCred, "descripcion_modalidades"); //Datos del Grupo Solidarios por SQL $SQLGAsoc = "SELECT * FROM socios_grupossolidarios WHERE idsocios_grupossolidarios=" . $DCred["grupo_asociado"]; $InfoGrupo = obten_filas($SQLGAsoc); $nombre_rep_social = $InfoGrupo["representante_nombrecompleto"]; $codigo_rep_social = $InfoGrupo["representante_numerosocio"]; $nombre_voc_vigila = $InfoGrupo["vocalvigilancia_nombrecompleto"]; $nombre_del_grupo = $InfoGrupo["nombre_gruposolidario"]; $domicilio_rep_social = domicilio($codigo_rep_social); $tabla_asociadas = ""; $lista_asociadas = ""; $tasa_de_cat = $cCred->getCAT(); $DPeriocidad = new cPeriocidadDePago($cCred->getPeriocidadDePago()); $DPeriocidad->init(); $monto_con_interes = ""; $monto_con_interes_letras = ""; if ($DCred["grupo_asociado"] != DEFAULT_GRUPO) { $SQL_get_grupo = "SELECT `socios_general`.`codigo`, CONCAT(`socios_general`.`nombrecompleto`, ' ', `socios_general`.`apellidopaterno`, ' ', `socios_general`.`apellidomaterno`) AS 'nombre_completo'\n\t\t\t\t\t\t\t\t\tFROM `socios_general` `socios_general` WHERE (`socios_general`.`grupo_solidario` =" . $DCred["grupo_asociado"] . ")"; $rsg = getRecordset($SQL_get_grupo); while ($rwt = mysql_fetch_array($rsg)) { $lista_asociadas .= ", " . $rwt["nombre_completo"]; } } if (EACP_INCLUDE_INTERES_IN_PAGARE == true) { if ($periocidad == CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) { $monto_con_interes = $cCred->getMontoAutorizado() + $cCred->getInteresDiariogenerado() * $cCred->getDiasAutorizados(); } else { $sqlInt = "SELECT `operaciones_mvtos`.`docto_afectado`, `operaciones_mvtos`.`tipo_operacion`, COUNT(`operaciones_mvtos`.`idoperaciones_mvtos`) AS `mvtos`,\n\t\t\t\t\tSUM(`operaciones_mvtos`.`afectacion_real` *\t`eacp_config_bases_de_integracion_miembros`.`afectacion`) AS 'monto'\n\t\t\t\t\tFROM `operaciones_mvtos` `operaciones_mvtos` INNER JOIN `eacp_config_bases_de_integracion_miembros`\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` = `eacp_config_bases_de_integracion_miembros`.`miembro` WHERE (`operaciones_mvtos`.`docto_afectado` = {$idsolicitud})\n\t\t\t\t\tAND (`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` = 2601)\n\t\t\t\t\tGROUP BY `operaciones_mvtos`.`docto_afectado`, `eacp_config_bases_de_integracion_miembros`.`codigo_de_base`\n\t\t\t\t\tORDER BY `eacp_config_bases_de_integracion_miembros`.`codigo_de_base`, `operaciones_mvtos`.`fecha_afectacion`, `operaciones_mvtos`.`socio_afectado`\t"; $xF = obten_filas($sqlInt); $monto_con_interes = $xF["monto"]; } $monto_con_interes_letras = convertirletras($monto_con_interes); $monto_con_interes = getFMoney($monto_con_interes); } $this->mArr["variable_informacion_del_credito"] = $cCred->getFicha(); //"variable_lista_de_beneficiados" => $lst_beneficiados, $this->mArr["variable_tipo_de_credito"] = $tipo_de_credito; $this->mArr["variable_monto2_ministrado_con_intereses_en_letras"] = $monto_con_interes_letras; $this->mArr["variable_monto2_ministrado_con_intereses"] = $monto_con_interes; $this->mArr["variable_monto_ministrado"] = getFMoney($monto_ministrado); $this->mArr["variable_tasa_mensual_de_interes_ordinario"] = $tasa_interes_mensual_ordinario; $this->mArr["variable_credito_fecha_de_vencimiento"] = $xFDE->getFechaMediana($fecha_de_vencimiento); $this->mArr["variable_monto_garantia_liquida"] = getFMoney($monto_garantia_liquida); $this->mArr["variable_tasa_mensual_de_interes_moratorio"] = $tasa_interes_mensual_moratorio . ""; $this->mArr["variable_tasa_de_garantia_liquida"] = $tasa_garantia_liquida . ""; $this->mArr["variable_plan_de_pagos"] = $splan_pagos; $this->mArr["variable_docto_fecha_larga_actual"] = $fecha_larga_de_documento; $this->mArr["variable_nombre_de_la_representante_social"] = $nombre_rep_social; $this->mArr["variable_listado_de_integrantes"] = $lista_asociadas; $this->mArr["variable_nombre_de_la_vocal_de_vigilancia"] = $nombre_voc_vigila; $this->mArr["variable_nombre_del_grupo_solidario"] = $nombre_del_grupo; $this->mArr["variable_domicilio_de_la_representante_social"] = $domicilio_rep_social; $this->mArr["variable_meses_de_duracion_del_credito"] = $meses_del_credito; $this->mArr["variable_en_letras_monto_ministrado"] = convertirletras($monto_ministrado); $this->mArr["variable_credito_fecha_de_ministracion"] = $xFDE->getFechaCorta($fecha_de_ministracion); $this->mArr["variable_tasa_cat"] = $tasa_de_cat; $this->mArr["variable_credito_periocidad"] = $DPeriocidad->getNombre(); $this->mArr["variable_credito_monto_parcialidad_fija"] = getFMoney($cCred->getMontoDeParcialidad()); $this->mArr["variable_credito_numero_de_pagos"] = $cCred->getPagosAutorizados(); $this->mArr["variable_tasa_anual_de_interes_moratorio"] = $cCred->getTasaDeInteres() * 2 * 100 . "%"; $this->mArr["variable_tasa_anual_de_interes_ordinario"] = $cCred->getTasaDeInteres() * 100 . "%"; //sobreescribir datos de la empresa $xEmp = new cEmpresas($cCred->getClaveDeEmpresa()); $xEmp->init(); $this->mArr["variable_nombre_de_la_empresa"] = $xEmp->getNombre(); $this->mArr["variable_nombre_de_empresa"] = $xEmp->getNombre(); $this->mArr["variable_fecha_de_primer_pago"] = $xFDE->getFechaMediana($cCred->getFechaPrimeraParc()); $this->mArr["variable_avales_en_fichas"] = $fichas_de_avales; $this->mArr["variable_firmas_de_avales"] = $firmas_de_avales; $this->mArr["variable_avales_autorizacion_central_riesgo"] = $this->mFichaRiesgoAv; $this->mArr["variable_fecha_ultimo_abono"] = $xFDE->getFechaLarga($cCred->getFechaUltimaParc()); $this->mArr["variable_fecha_de_primer_abono"] = $xFDE->getFechaMediana($cCred->getFechaPrimeraParc()); //$this->mArr["variable_fecha_de_primer_abono"] = $this->mArr["variable_en_letras_tasa_mensual_de_interes_moratorio"] = convertirletras_porcentaje($tasa_interes_mensual_moratorio); $this->mArr["variable_lista_de_avales_con_domicilio"] = $this->mLAvalesConDir; /*variable_aval1_nombre_completo variable_aval1_domicilio_completo variable_aval1_domicilio_localidad variable_aval1_domicilio_municipio*/ //Cargar Avales $this->mArr["variable_listado_de_garantias"] = $this->getListadoDeGarantias(); //$this->mArr["variable_modalidad_de_credito"] = $cCred->getOEstado() $this->mArr["variable_estado_de_credito"] = $cCred->getOEstado()->descripcion_estatus()->v(OUT_TXT); //$this->mArr["variable_credito_num_de_pago_actual"] = $cCred->getPeriodoActual(); $this->mArr["variable_contrato_id_legal"] = $DProd->getOtrosParametros($OOParam->CONTRATO_ID_LEGAL); $this->mArr["variable_producto_comision_apertura"] = $DProd->getOtrosParametros($OOParam->TASA_DE_COMISION_AP); }
$percbza = EACP_PER_COBRANZA; // Periodo Cobranza. $perseg = EACP_PER_SEGUIMIENTO; // Period de Seguimiento. $permens = date("m"); // Periodo de dias en el mes $persem = date("N"); // Periodo de dias en la semana. $peranual = date("Y"); // Ao Natural. //Datos del Respeto al Plan de Pagos $OPdto = $xCred->getOProductoDeCredito(); $OPerx = $xCred->getOPeriocidad(); $OEstado = $xCred->getOEstado(); $respetar_plan_pagos = $xCred->getRespetarPlanDePago(); $empresa = $xCred->getClaveDeEmpresa(); $tasa_iva = $xCred->getTasaIVA(); $msg .= "WARN\tPLAN\tQue hacer con el Plan: {$respetar_plan_pagos}\r\n"; $contrato_captacion = $dsol["contrato_corriente_relacionado"]; $saldo_anterior = $xCred->getSaldoActual(); if ($grupo == 0 || !isset($grupo) || $grupo == "" || $grupo == false) { $grupo = DEFAULT_GRUPO; } $xNRec = new cReciboDeOperacion(RECIBOS_TIPO_PAGO_CREDITO); $xNRec->setNuevoRecibo($socio, $solicitud, $fecha_operacion, $parcialidad, RECIBOS_TIPO_PAGO_CREDITO, $observaciones, $cheque, $tipo_pago, $recibo_fiscal, $grupo, false, AML_CLAVE_MONEDA_LOCAL, 0, $empresa); $xNRec->init(); $msg .= $xNRec->getMessages(OUT_TXT); $recibo_pago = $xNRec->getCodigoDeRecibo(); if ($procesado == SYS_AUTOMATICO or $pempresa > 0) { $icxObs = $SRC["cobservaciones"]; $msg .= "WARN\tTOTAL AUTOMATICO\t:{$icxObs}\t{$totalAutomatico}\r\n";