function jsaSetCreditosADespedidos($credito, $fecha, $observaciones)
{
$msg = "";
$xCred = new cCredito($credito);
$xCred->init();
$xdat = new cFecha(0);
$fecha = $xdat->getFechaISO($fecha);
$xCred->init();
$socio = $xCred->getClaveDePersona();
$xSoc = new cSocio($socio);
$xSoc->init();
$xCred->setCambioProducto(CREDITO_PRODUCTO_DESTINO_DESCARTADOS);
$xCred->setResetPersonaAsociada($fecha, $observaciones);
//Agregar operacion de desvinculacion
$xRe = new cReciboDeOperacion(RECIBOS_TIPO_ESTADISTICO, false, DEFAULT_RECIBO);
$xRe->init();
$xRe->setNuevoMvto($fecha, $xCred->getSaldoActual(), OPERACION_CLAVE_DESVINCULACION, $xCred->getPeriodoActual(), "", 1, false, $socio, $credito, $fecha);
$xRe->setFinalizarRecibo();
$msg .= $xSoc->getMessages(OUT_TXT);
$msg .= $xCred->getMessages(OUT_TXT);
$msg .= $xRe->getMessages(OUT_TXT);
$xRN = new cReglaDeNegocio();
$xEmp = new cEmpresas($xCred->getClaveDeEmpresa());
$xEmp->init();
$oP = $xCred->getOPersona();
$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_DESPEDIR);
$xF = new cFileLog();
$xF->setWrite($msg);
$xF->setClose();
return $xF->getLinkDownload("Descarga de Log");
}
function jsaGetIDE($socio, $monto, $tipo_de_pago)
{
$xSoc = new cSocio($socio);
$xSoc->init();
$x = $xSoc->getIDExPagarByPeriodo(false, $monto, $tipo_de_pago);
$tab = new TinyAjaxBehavior();
$tab->add(TabSetValue::getBehavior("idide", $x));
return $tab->getString();
}
function jsaGuardarVerificacion($fecha, $oficial, $tipo, $id, $notas, $socio)
{
$xF = new cFecha();
$fecha = $xF->getFechaISO($fecha);
$tipo = $tipo == "d" ? TPERSONAS_DIRECCIONES : TPERSONAS_ACTIVIDAD_ECONOMICA;
$xSoc = new cSocio($socio);
$xSoc->init();
$xSoc->setVerificacion($tipo, $id, $fecha, $notas, $oficial);
return $xSoc->getMessages(OUT_HTML);
}
function jsaGetNumeroBeneficiarios($idsocio)
{
$xSoc = new cSocio($idsocio);
$xSoc->init();
$beneficiarios = $xSoc->getNumeroDeBeneficiarios();
if (!isset($beneficiarios) or $beneficiarios == 0) {
return "<p class='warn'>El socio no tiene Beneficiario Registrado</p>";
} else {
return "El socio tiene {$beneficiarios} Beneficiarios Registrado";
}
}
function jsaGetDatosCuenta($cuenta, $socio, $dias)
{
$xInv = new cCuentaInversionPlazoFijo($cuenta, $socio);
$tasa = $xInv->getTasaAplicable($dias) * 100;
$xSoc = new cSocio($socio);
$xSoc->init();
$cuentainteres = $xSoc->getCuentaDeCaptacionPrimaria(CAPTACION_TIPO_VISTA, CAPTACION_PRODUCTO_INTERESES);
$tab = new TinyAjaxBehavior();
$tab->add(TabSetValue::getBehavior("idtasa", $tasa));
$tab->add(TabSetValue::getBehavior("idcuentainteres", $cuentainteres));
return $tab->getString();
}
/**
* Funcion que obtiene el Nombre del socio
*
* @param integer $params
* @return string
*/
function Common_695bad33e1f2af343f99c6a4ceb9d045($params)
{
$nombre = MSG_NO_PARAM_VALID;
$xT = new cTipos();
$socio = $xT->cInt($params);
$xSoc = new cSocio($socio);
if ($xSoc->existe($socio) == true) {
$xSoc->init();
$nombre = $xSoc->getNombreCompleto(OUT_TXT);
}
return $nombre;
}
function jsaGetCalculos($socio, $acciones, $tipo_de_pago)
{
$xSoc = new cSocio($socio);
$coste = COSTE_POR_ACCION * $acciones;
$monto = $tipo_de_pago == "efectivo" ? $coste : 0;
$ide = $tipo_de_pago == "efectivo" ? $xSoc->getIDExPagarByPeriodo(false, $monto) : 0;
$tab = new TinyAjaxBehavior();
$tab->add(TabSetValue::getBehavior("idCoste", getFMoney($coste)));
$tab->add(TabSetValue::getBehavior("idide", getFMoney($ide)));
//$tab -> add( TabSetValue::getBehavior("idObservaciones", $xSoc->getMessages("txt") ) );
return $tab->getString();
}
/**
* Funcion que Retorna la Cuenta Primaria
* @param $idchar
*/
function Common_82d8036ee2608f6745d1dbd2f808866f($idchar)
{
$xT = new cTipos(0);
$datos = explode("|", $idchar);
$idsocio = $xT->cInt($datos[0]);
$tipo = $xT->cInt($datos[1]);
$sub = $xT->cInt($datos[2]);
if ($datos[2] == "all") {
$sub = false;
}
if ($idsocio != 0 and $tipo != 0) {
$cSoc = new cSocio($idsocio);
return $cSoc->getCuentaDeCaptacionPrimaria($tipo, $sub);
}
}
function jsaGetValidacion($persona, $producto, $origen)
{
$html = "";
$xPd = new cCaptacionProducto($producto);
if ($xPd->getClase() == CAPTACION_TIPO_PLAZO) {
$html .= $xPd->getListaDeDias();
}
if ($xPd->getDestinoInteres() == CAPTACION_DESTINO_CTA_INTERES) {
$xTxt2 = new cHText();
$xSoc = new cSocio($persona);
$xSoc->init();
$html .= $xTxt2->getDeCuentaCaptacionInteres("", $xSoc->getCuentaDeCaptacionPrimaria(CAPTACION_TIPO_VISTA, CAPTACION_PRODUCTO_INTERESES));
}
//
return $html;
}
function jsaGetPerfilDeProducto($producto, $persona)
{
$OConv = new cProductoDeCredito($producto);
$OConv->init();
$tab = new TinyAjaxBehavior();
$xSoc = new cSocio($persona);
$pagos = $OConv->getNumeroPagosPreferente();
$periocidad = $OConv->getPeriocidadPrefente();
if ($xSoc->init() == true) {
if ($xSoc->getClaveDeEmpresa() != FALLBACK_CLAVE_EMPRESA) {
$xEmp = new cEmpresas($xSoc->getClaveDeEmpresa());
$xEmp->init();
$tab->add(TabSetValue::getBehavior('idproducto', $xEmp->getProductoPref()));
$periocidad = $xEmp->getPeriocidadPref();
}
}
$tab->add(TabSetValue::getBehavior('idnumerodepagos', $pagos));
$tab->add(TabSetValue::getBehavior('idperiocidad', $periocidad));
return $tab->getString();
}
}
$sqlrec = "SELECT * FROM operaciones_recibos WHERE idoperaciones_recibos={$idrecibo}";
//echo $sqlrec; exit;
$datos = obten_filas($sqlrec);
$idsocio = $datos["numero_socio"];
$tiporec = $datos["tipo_docto"];
$docto = $datos["docto_afectado"];
$eltitulo = eltipo("operaciones_recibostipo", $tiporec);
$sumaRecibo = $datos["total_operacion"];
$fechaRecibo = $datos["fecha_operacion"];
echo "\n\t<p class='bigtitle'>CONSTANCIA DE DEPOSITO A PLAZO</p>\n\t<hr />";
$totaloperacion = $datos["total_operacion"];
$total_fmt = number_format($totaloperacion, 2, '.', ',');
$montoletras = convertirletras($totaloperacion);
// obtiene datos del socio
$xSoc = new cSocio($idsocio);
$xSoc->init();
$DSoc = $xSoc->getDatosInArray();
$domicilio_del_socio = $xSoc->getDomicilio();
$nombre_del_socio = $xSoc->getNombreCompleto();
if ($idsocio != 1) {
$nombre = $nombre_del_socio;
} else {
$nombre = mifila($sqlrec, "cadena_distributiva");
}
$direccion = $domicilio_del_socio;
$rfc = $DSoc["rfc"];
$curp = $DSoc["curp"];
// obtiene datos del documento que ayudaran al detalle en contabilidad
$observaciones = mifila($sqlrec, "observacion_recibo");
//
function setActualizarRiesgoPorNucleo()
{
//si todos son riesgo
$xLi = new cSQLListas();
$xQL = new MQL();
$sql = $xLi->getListadoDePersonasExpuestas($this->mClaveDePersona);
$rs = $xQL->getDataRecord($sql);
$xCat = new cPersonasCatalogoOtrosDatos();
foreach ($rs as $rows) {
$idpersona = $rows["numero_socio"];
$afinidad = $rows["grado_de_afinidad"];
$consanguinidad = $rows["grado_de_consanguinidad"];
$vinculoeconom = $rows["tiene_vinculo_patrimonial"];
//agregar
$tipoaml = $consanguinidad > 0 ? $xCat->AML_PEP_CONSANGUINIDAD : "";
$tipoaml = ($afinidad > 0 and $tipoaml == "") ? $xCat->AML_PEP_AFINIDAD : $tipoaml;
$tipoaml = ($vinculoeconom > 0 and $tipoaml == "") ? $xCat->AML_PEP_VINCULO_ECONOM : $tipoaml;
if ($tipoaml != "") {
$xRel = new cSocio($idpersona);
if ($xRel->init() == true) {
$xRel->addOtrosParametros($tipoaml, "1");
$this->mMessages .= $xRel->getMessages();
}
}
}
}
<tr>
<td> </td>
<td></td>
<td></td>
</tr>
</thead>
</table> */
$cvs = "";
$xT = new cTipos();
$xFile = new cFileLog("reporte-patmir-II.del_{$fechaDeInicio}.al_{$fechaFinal}", true);
while ($r = mysql_fetch_array($rs)) {
//pacceso-socio-cont
$punto_de_acceso = $r["clave_de_centro"];
$socio = $r["codigo"];
$xSoc = new cSocio($socio);
$xSoc->init();
$fechaNac = date("Y/m/d", strtotime($r["fechanacimiento"]));
$tipoDato = "PERSONA";
$primerApellido = $r["apellidopaterno"];
$segundoApellido = $r["apellidomaterno"];
$primerApellido = strlen($primerApellido) == 0 ? $segundoApellido : $primerApellido;
$segundoApellido = strlen($primerApellido) == 0 ? "" : $segundoApellido;
$nombres = explode(" ", $r["nombrecompleto"]);
$primerNombre = $nombres[0];
$segundoNombre = isset($nombres[1]) ? $nombres[1] : "";
$tipoPersona = "0";
$fechaInscripcion = date("Y/m/d", strtotime($r["fechaalta"]));
$genero = $arrEquivGenero[$r["genero"]];
//datos del Domicilio
$DDom = $xSoc->getDatosDomicilio();
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;
}
$FechaInicial = parametro("fecha-0", $FechaInicial);
$FechaInicial = $FechaInicial == false ? FECHA_INICIO_OPERACIONES_SISTEMA : $xF->getFechaISO($FechaInicial);
$FechaFinal = parametro("off", false);
$FechaFinal = parametro("fecha-1", $FechaFinal);
$FechaFinal = $FechaFinal == false ? fechasys() : $xF->getFechaISO($FechaFinal);
$jsEvent = $out != OUT_EXCEL ? "initComponents()" : "";
$senders = getEmails($_REQUEST);
$titulo = "";
$archivo = "";
$xRPT = new cReportes($titulo);
$xRPT->setFile($archivo);
$xRPT->setOut($out);
//$xRPT->setSQL($sql);
$xRPT->setTitle($xHP->getTitle());
//============ Reporte
$xSoc = new cSocio($persona);
$xSoc->init();
$body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal);
$xRPT->setBodyMail($body);
$xRPT->addContent($body);
$xRPT->addContent($xSoc->getFicha(true));
//Bajo revision
$xAl = new cAml_alerts();
$xlistas = new cSQLListas();
$sql = $xlistas->getListadoDeAlertas(false, false, false, $persona, " AND `estado_en_sistema` =" . SYS_UNO);
$xT = new cTabla($sql);
$xRPT->addContent($xT->Show("TR.Alertas pendientes de verificar"));
//Descartados
$sql = $xlistas->getListadoDeAlertas(false, false, false, $persona, " AND `estado_en_sistema` =" . SYS_CERO);
$xT = new cTabla($sql);
$xRPT->addContent($xT->Show("TR.Alertas ignoradas"));
function jsaSetEnviarParaAsociada($idpersona)
{
$xSoc = new cSocio($idpersona);
$xSoc->init();
$xSoc->setMontoAhorroPreferente(0);
return $xSoc->getMessages();
}
function getDescripcion()
{
$xF = new cFecha(0);
if ($this->mReciboIniciado == false) {
$this->init();
}
$xSoc = new cSocio($this->mSocio);
$xSoc->init();
$desc = $this->mCodigoDeRecibo . "|" . $xF->getFechaCorta($this->mFechaDeOperacion) . "|" . $xSoc->getNombreCompleto();
return $desc;
}
$xTa->addTH("Apoderado");
$xTa->addTH("Es PEP");
$xTa->addTH("Lista Negra");
$xTa->addTH("Grado de Riesgo");
$xTa->addTH("Servicios");
$xTa->addTH("Monto Otorgado");
$xTa->addTH("Monto Actual");
$xTa->addTH("Perfil Transaccional");
$xTa->addTH("Numero Maximo de Operaciones");
$xTa->addTH("Monto Maximo de Operaciones");
$xTa->endRow();
$xT = new cFileImporter();
foreach ($rs as $rows) {
$xDSoc->setData($rows);
$codigo_de_socio = $xDSoc->codigo()->v();
$xSoc = new cSocio($codigo_de_socio);
$xSoc->init($rows);
$xSoc->getOEstats()->initDatosDeCredito();
$saldoCred = setNoMenorQueCero($xSoc->getCreditosComprometidos());
if ($saldoCred > 0) {
$xTa->initRow();
$xTa->addTD($xSoc->getSucursal());
$xTa->addTD(htmlentities($xSoc->getNombreCompleto()));
$xTa->addTD($xF->getFechaMX($xSoc->getFechaDeNacimiento()));
$xTa->addTD("MEXICANA");
$xTa->addTD($xSoc->getRFC());
$xOAE = $xSoc->getOActividadEconomica();
if ($xOAE == null) {
$xTa->addTD(" ");
$xTa->addTD(" ");
} else {
$personarelacionado = parametro("idpersonarelacionado", 0, MQL_INT);
$idtipoderelacion = parametro("idtipoderelacion", 0, MQL_INT);
$dependiente = parametro("dependiente", false, MQL_BOOL);
$idtipodeparentesco = parametro("idtipodeparentesco", DEFAULT_TIPO_CONSANGUINIDAD, MQL_INT);
if ($origen_relacion == iDE_CREDITO) {
$xCred = new cCredito($documentorelacionado);
$xCred->init();
$MontoAvalado = $xCred->getMontoAutorizado();
$addAval = $xCred->addAval($persona, $MontoAvalado, $idtipoderelacion, $idtipodeparentesco, $dependiente, $idobservaciones);
$msg .= $xCred->getMessages();
}
//captacion
//persona
if ($origen_relacion == iDE_SOCIO) {
if ($personarelacionado > 0) {
$xPer = new cSocio($personarelacionado);
if ($xPer->init() == true) {
$addRel = $xPer->addRelacion($persona, $idtipoderelacion, $idtipodeparentesco, $dependiente, $idobservaciones);
}
$msg .= $xPer->getMessages();
} else {
$msg .= "ERROR\tError al agregar a la Relacion, no existe relacionado \r\n";
}
}
}
$xCat = new cPersonasCatalogoOtrosDatos();
//AGREGAR PEP
if ($espep == true and setNoMenorQueCero($persona) > 0) {
$xSoc->addOtrosParametros($xCat->AML_PEP_PRINCIPAL, "1");
}
if ($esextranjero == true and setNoMenorQueCero($persona) > 0) {
$esrenovado = parametro("idrenovado", false, MQL_BOOL);
$tieneprops = parametro("idpropietario", false, MQL_BOOL);
//propietarios reales
$tieneprovs = parametro("idproveedor", false, MQL_BOOL);
//proveedores de recursos
$fecha_solicitud = $xFecha->getFechaISO($solicitado);
$fecha_ministracion = $xFecha->getFechaISO($ministrado);
$fecha_vencimiento = $xFecha->getFechaISO($vencido);
$oficial_de_credito = getUsuarioActual();
$xBtn = new cHButton();
$xFRM = new cHForm("frmcreditoautorizado");
$xFRM->setTitle($xHP->getTitle());
$xHP->init();
//Correccciones
$contrato_corriente = setNoMenorQueCero($contrato_corriente) <= 0 ? DEFAULT_CUENTA_CORRIENTE : $contrato_corriente;
$xSoc = new cSocio($persona);
$arrDatos = array("periocidad_de_pago" => $periocidad, "tipo_de_producto" => $tipoconvenio, "numero_de_pagos" => $numeropagos, "contrato_corriente_relacionado" => $contrato_corriente, "fecha_de_ministracion" => $ministrado, "fecha_de_vencimiento" => $vencido, "monto_solicitado" => $monto_solicitado);
$sucess = true;
if ($xSoc->isOperable() == true) {
$sucess = $xSoc->setPrevalidarCredito($arrDatos);
if ($xSoc->getUUID() != $_SESSION[SYS_UUID]) {
$msg .= "ERROR\tEl credito Validado no es el mismo que intenta guardar(" . $xSoc->getUUID() . "|" . $_SESSION[SYS_UUID] . ")\r\n";
$sucess = false;
}
} else {
$sucess = false;
}
if ($sucess == true) {
$grupo_asociado = $xSoc->getClaveDeGrupo();
if ($periocidad == CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) {
$dias_solicitados = $xFecha->setRestarFechas($fecha_vencimiento, $fecha_ministracion);
echo $xHP->getHeader();
if ($recibo == false) {
header("location:../404.php?i=" . DEFAULT_CODIGO_DE_ERROR);
}
$arrQ = array("aumento" => 1, "disminucion" => -1, "ninguna" => 0);
//capturar datos del recibo
$xRec = new cReciboDeOperacion(false, false, $recibo);
$xRec->init();
$DRec = $xRec->getDatosInArray();
$idsocio = $xRec->getCodigoDeSocio();
// $DRec["numero_socio"];
$numero_de_socio = $xRec->getCodigoDeSocio();
//$DRec["numero_socio"];
$afectaCaja = $arrQ[$DRec["afectacion_en_flujo_efvo"]];
//datos del socio
$cSoc = new cSocio($numero_de_socio);
$DSoc = $cSoc->getDatosInArray();
$numero_caja_local = $DSoc["cajalocal"];
$cCL = new cCajaLocal($numero_caja_local);
$caja_local = $cCL->getNombre();
$variable_nombre_del_socio = $idsocio == DEFAULT_SOCIO ? $DRec["cadena_distributiva"] : $cSoc->getNombreCompleto();
$tipo_de_pago = $xRec->getTipoDePago();
//$variable_nombre_del_cajero
//
$tipoderecibo = $DRec["tipo_docto"];
$docto = $xRec->getCodigoDeDocumento();
$origen = $xRec->getOrigen();
$variable_tipo_de_recibo = $xRec->getOTipoRecibo()->getNombre();
$totaloperacion = $xRec->getTotal();
//<------------- Verificar Si existe El Pago ----------------
$xCaja = new cCaja();
$nombregrupo = $lafila["nombre_gruposolidario"];
$presidenta = $lafila["representante_numerosocio"];
$mynom = getNombreSocio($presidenta);
$nomrep = $lafila["representante_nombrecompleto"];
$nomvv = $lafila["vocalvigilancia_nombrecompleto"];
if ($tipo_docto == 14) {
$title = "PLANEACION DEL CREDITO EN GRUPOS SOLIDARIOS EN ETAPA DE SOLICITUD";
$thTit = "Monto Solicitado";
}
echo "\n<p class='bigtitle'>{$title}</p>\n<hr />\n<table width='100%' border='0'>\n\t\t<tr>\n\t\t\t<th class='izq'>Referencia</th>\n\t\t\t<td>" . $rsr["idoperaciones_recibos"] . "</td>\n\t\t\t<th class='izq'>Fecha de Elaboracion</th>\n\t\t\t<td>" . getFechaLarga($rsr["fecha_operacion"]) . "</td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<th class='izq'>Codigo de Grupo</th>\n\t\t\t<td>{$idgrupo}</td>\n\t\t\t<th class='izq'>Nombre de Grupo</th>\n\t\t\t<td>{$nombregrupo}</td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<th class='izq'>Responsable del Grupo</td>\n\t\t\t<td>{$nomrep}</td>\n\t\t\t<th class='izq'>Vocal de Vigilancia del Grupo</td>\n\t\t\t<td>{$nomvv}</td>\n\t\t</tr>\n\t</table>\n\t<hr />";
$suma = 0;
$sqlsun = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\t\t\tWHERE recibo_afectado=" . $rsr["idoperaciones_recibos"] . "\n\t\t\t\t\t\t\t\t\t\tAND grupo_asociado={$idgrupo}";
$rss = mysql_query($sqlsun);
echo "<table width='100%' border='0'>\n\t\t<tr>\n <th>Socia(o)</th>\n <th>C.U.R.P.</th>\n\t\t <th>Nombre Completo</th>\n\t\t <th>{$thTit}</th>\n\t\t <th>Firma</th>\n </tr>";
while ($rws = mysql_fetch_array($rss)) {
$xSoc = new cSocio($rws["socio_afectado"], true);
$DS = $xSoc->getDatosInArray();
$socia = $xSoc->getNombreCompleto();
$curp = $DS["curp"];
$suma = $suma + $rws["afectacion_real"];
echo "<tr>\n\t\t\t\t<td class='ctr'>" . $rws["socio_afectado"] . "</td>\n\t\t\t\t<td>{$curp}</td>\n\t\t\t\t<td>{$socia}</td>\n\t\t\t\t<td class='mny'>" . getFMoney($rws["afectacion_real"]) . "</td>\n\t\t\t\t<td><br /><br /><br />______________________</td>\n\t\t\t\t</tr>";
}
$letters = convertirletras($suma);
$suma = getFMoney($suma);
echo "<td>SUMA DE LA PLANEACION</td><th>{$letters}</th><th>{$suma}</th></table>\n\t\t<p>Manifestamos Bajo Protesta de Decir Verdad que las personas que integramos este grupo, nos caracterizamos\n\t\tpor tener gran solvencia Moral, al ser Honestas y responsables, asi como tener la Suficiente solvencia\n\t\tEconomica para cubrir el Monto Manifestado en esta Cedula.</p>\n\t\t<p>El Total de la Planeacion del Credito sera considerado como el Monto del Credito Solicitado.</p>";
@mysql_free_result($rss);
echo "<hr /><table border='0' width='100%'>\n\t<tr>\n\t<td><center>Firma del Solicitante<br>\n\tBajo Protesta de Decir Verdad</center></td>\n\t<td><center>Procesa la Planeación</center></td>\n\t</tr>\n\t<tr>\n\t<td><br><br><br></td>\n\t</tr>\n\t<tr>\n\t<td><center>{$mynom}</center></td>\n\t<td><center>{$oficial}</center></td>\n\t</tr>\n\t</table>";
echo getRawFooter();
?>
</body>
</html>
$NotaOtorgante = "";
$xSTb = new cSAFETabla(TCREDITOS_REGISTRO);
$sql = $mql->getQueryInicialDeCreditos("", "", " \tAND (`creditos_solicitud`.`fecha_ministracion` <= '" . $FechaFinal . "' )\n\t\t\t\tAND\n\t\t\t\t(`creditos_solicitud`.`numero_socio` !=" . DEFAULT_SOCIO . ")\n\t\t\t\tAND\n\t\t\t\t(`creditos_solicitud`.`monto_autorizado` > " . TOLERANCIA_SALDOS . ")\n\t\t\t\tAND\t\n\t\t\t\t(`creditos_solicitud`.`estatus_actual` !=" . CREDITO_ESTADO_AUTORIZADO . " AND `creditos_solicitud`.`estatus_actual` !=" . CREDITO_ESTADO_SOLICITADO . ") \n\t\t\t\t{$ByPersona2}\n\t\t\t\t");
//exit($sql);
$arrEquivTipoDom = array(1 => "C", 2 => "N", 3 => "E", 99 => "O");
$arrEquivTipoRes = array(1 => 1, 2 => 2, 3 => 4, 4 => 3, 99 => "");
$arrEquivEstadoCiv = array(1 => "C", 2 => "S", 3 => "D", 4 => "L", 5 => "", 6 => "V", 7 => "E", 99 => "");
$arrEquivGenero = array(1 => "M", 2 => "F", 99 => "");
$version = 2;
$datos = $query->getDataRecord($sql);
$icnt = 0;
foreach ($datos as $rw) {
$linea = "{$ClaveOtorgante}|{$NombreOtorgante}|{$IdentificadorMedio}|{$FechaExtraccion}|{$NotaOtorgante}|{$version}|";
$idcredito = $rw["numero_solicitud"];
$idpersona = $rw["numero_socio"];
$xSoc = new cSocio($idpersona);
$xSoc->init();
$DSoc = $xSoc->getDatosInArray();
$xDom = $xSoc->getDatosDomicilio();
$xDAEconom = $xSoc->getDatosActividadEconomica();
$ODom = $xSoc->getODomicilio();
$OActE = $xSoc->getOActividadEconomica();
$sucres = $xSoc->getSucursal();
$ApellidoPaterno = $xCR->getText($xSoc->getApellidoPaterno());
$ApellidoMaterno = $xCR->getText($xSoc->getApellidoMaterno());
if (trim($ApellidoPaterno) == "") {
$ApellidoPaterno = trim($ApellidoMaterno) == "" ? "NO PROPORCIONADO" : $ApellidoMaterno;
$ApellidoMaterno = "NO PROPORCIONADO";
}
if (trim($ApellidoMaterno) == "") {
$ApellidoMaterno = "NO PROPORCIONADO";
}
$xRPT->setOut($out);
//filtrar domicilio -> socio -> credito -> letra
$sql = $xL->getListadoDeCobranza($idnomina);
$base_contrato = contrato(401, "texto_del_contrato");
$Dep = new cEmpresas($empresa);
$Dep->init();
$nempresa = $Dep->getNombre();
$TCobros = 0;
$rs = getRecordset($sql);
$ppn = 1;
$contar = 1;
while ($rw = mysql_fetch_array($rs)) {
//cargar datos de la parcialidad
$numero_de_socio = $rw["persona"];
$cSoc = new cSocio($numero_de_socio);
$cSoc->init();
$DSoc = $cSoc->getDatosInArray();
$ficha_socio = $cSoc->getFicha();
$numero_credito = $rw["credito"];
$xCred = new cCredito($numero_credito, $numero_de_socio);
$xCred->init();
$DCred = $xCred->getDatosInArray();
$svar_info_cred = $xCred->getShortDescription();
$variable_lugar = "";
$monto_inicial = 0;
$monto_inicial_letras = 0;
$numero_dias = 0;
$variable_fecha_vencimiento = "";
$nombre_mancomunados = "";
$variable_tasa_otorgada = "";
function jsRiesgoDelCredito($socio)
{
$xhtml = "";
if (isset($socio)) {
$xSoc = new cSocio($socio);
$xhtml .= "<fieldset><legend>DATOS DE ENDEUDAMIENTO</legend>";
$xhtml .= $xSoc->getRiesgoComunPorNucleoFamiliar(true);
$xhtml .= $xSoc->getRiesgoComunPorAvales(true);
$xhtml .= "</fieldset>";
}
return $xhtml;
}
$curp = $rw["curp"];
$hijos = " ";
if ($rw["estadocivil"] != 1) {
$regimen_matrimonial = " ";
}
if ($rw["tipo_de_identificacion"] == 1) {
$ife = $rw["documento_de_identificacion"];
} else {
$ife = " ";
}
/**
*composicion del estado laboral por consulta
**/
$estado_laboral = 99;
//Obtener la informaci�n laboral
$xSoc = new cSocio($socio);
$xSoc->init($rw);
$DLab = $xSoc->getDatosActividadEconomica();
$estado_laboral = $arrELaboral[$DLab["tipo_aeconomica"]];
//corrige valores vacios
if (!isset($estado_laboral)) {
$estado_laboral = 99;
}
//corrige la edad en a�os y asigna, si es menor de edad
$edad = floor(restarfechas(fechasys(), $rw["fechanacimiento"]) / 365);
if ($edad < 18) {
$estado_laboral = "07";
}
$tr .= "\t<tr>\n\t\t\t\t<td>{$socio}</td>\n\t\t\t\t<td>{$ife}</td>\n\t\t\t\t<td>{$nombre}</td>\n\t\t\t\t<td>{$apellidopaterno}</td>\n\t\t\t\t<td>{$apellidomaterno}</td>\n\t\t\t\t<td>{$genero}</td>\n\t\t\t\t<td>01</td>\n\t\t\t\t<td>412</td>\n\t\t\t\t<td>{$sucursal}</td>\n\t\t\t\t<td>{$fecha_de_alta}</td>\n\t\t\t\t<td>{$estado_civil}</td>\n\t\t\t\t<td>{$regimen_matrimonial}</td>\n\t\t\t\t<td>{$estado_laboral}</td>\n\t\t\t\t<td>{$fecha_nacimiento}</td>\n\t\t\t\t<td>412</td>\n\t\t\t\t<td>{$hijos}</td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td>{$rfc}</td>\n\t\t\t\t<td>{$curp}</td>\n\t\t\t</tr>";
}
echo "<table width='100%' >\n\t<tr>\n\t\t<th>Socio</th>\n\t\t<th>IFE</th>\n\t\t<th>Nombre</th>\n\t\t<th>Apellido Paterno</th>\n\t\t<th>Apellido Materno</th>\n\t\t<th>Sexo</th>\n\t\t<th>Idioma</th>\n\t\t<th>Nacionalidad</th>\n\t\t<th>Sucursal</th>\n\t\t<th>Fecha de Alta</th>\n\t\t<th>Estado Civil</th>\n\t\t<th>Regimen Matrimonial</th>\n\t\t<th>Estado Laboral</th>\n\t\t<th>Fecha de Nacimiento</th>\n\t\t<th>Pais de Nacimiento</th>\n\t\t<th>Numero de Hijos</th>\n\t\t<th>Fecha de Deceso</th>\n\t\t<th>R.F.C.</th>\n\t\t<th>C.U.R.P.</th>\n\t</tr>\n\t\t{$tr}\n</table>";
public $NACIONALIDAD = 23;
public $CIUDAD_NACIMIENTO = 24;
public $INGRESOS_MENSUALES = 25;
}
//Cedula de Identidad
$tmp = new cTmp();
$xFi->setCharDelimiter("|");
$xFi->setLimitCampos(26);
//var_dump($_FILES["f1"]);
if ($xFi->processFile($doc1) == true) {
$data = $xFi->getData();
$conteo = 1;
foreach ($data as $rows) {
if ($conteo > 1) {
$xFi->setDataRow($rows);
$xSoc = new cSocio(false);
/*$nombre, $apellidopaterno = "", $apellidomaterno = "",
$rfc = "POR_REGISTRAR", $curp = "POR_REGISTRAR", $cajalocal = 99,
$fecha_de_nacimiento = false, $lugar_de_nacimiento = "DESCONOCIDO",
$tipo_de_ingreso = FALLBACK_PERSONAS_TIPO_ING, $estado_civil = DEFAULT_ESTADO_CIVIL,
$genero = DEFAULT_GENERO, $dependencia = FALLBACK_CLAVE_EMPRESA, $regimen_conyugal = DEFAULT_REGIMEN_CONYUGAL,
$personalidad_juridica = 1, $grupo_solidario = DEFAULT_GRUPO, $observaciones = "",
$identificado_con = 1, $documento_de_identificacion = "0", $codigo = false, $sucursal = false,
$movil = "", $correo = "", $dependientes = 0, $fecha = false, $riesgo = AML_PERSONA_BAJO_RIESGO, $clave_fiel = "",
$pais = EACP_CLAVE_DE_PAIS
*/
$totalRemanenteDep = 0;
$totalDeterminados = 0;
$totalRecaudado = 0;
$totalOperaciones = 0;
$totalEnterado = 0;
$totalExcedente = 0;
$totalPendiente = 0;
$fecha_de_corte = $fecha_final;
$xT = new cTipos();
echo "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\n<DeclaracionInformativaMensualIDE denominacion=\"{$NombreEntidad}\" rfcDeclarante=\"{$RFC_Declarante}\" version=\"1.0\" xsi:noNamespaceSchemaLocation=\"ide_20080818.xsd\" xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\">\n\t<RepresentanteLegal rfc=\"{$RFC_Representante}\">\n\t\t<Nombre>\n\t\t\t<Nombres>{$RepNom}</Nombres>\n\t\t\t<PrimerApellido>{$RepAP}</PrimerApellido>\n\t\t\t</SegundoApellido>{$RepAM}</SegundoApellido>\n\t\t</Nombre>\n\t</RepresentanteLegal>\n\t<Normal ejercicio=\"{$ejercicio}\" periodo=\"{$periodo}\"/>\n\n\t<InstitucionDeCredito>\n";
echo "\n\t\t<ReporteDeRecaudacionYEnteroDiaria fechaDeCorte=\"{$fecha_de_corte}\">\n\t\t\t<RegistroDeDetalle>\n";
$sqlCaracter = "SELECT\n\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\n\t\t\t\t\t\t\t`operaciones_mvtos`.`socio_afectado`,\n\t\t\t\t\t\t\tSUM(`operaciones_mvtos`.`afectacion_real`) AS `monto`\n\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\t\t\t\tINNER JOIN `operaciones_mvtos` `operaciones_mvtos`\n\t\t\t\t\t\t\t\tON `eacp_config_bases_de_integracion_miembros`.`miembro` =\n\t\t\t\t\t\t\t\t`operaciones_mvtos`.`tipo_operacion`\n\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` =7001)\n\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t(\n\t\t\t\t\t\t\t\t(`operaciones_mvtos`.`fecha_operacion` >='{$fecha_inicial}')\n\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t\t(`operaciones_mvtos`.`fecha_operacion` <='{$fecha_final}')\n\t\t\t\t\t\t\t)\n\t\t\t\t\t\tGROUP BY\n\t\t\t\t\t\t\t`operaciones_mvtos`.`socio_afectado`\n\t\t\t\t\t\tORDER BY\n\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` ";
$rsMSoc = mysql_query($sqlCaracter, cnnGeneral());
while ($rx = mysql_fetch_array($rsMSoc)) {
$socio = $rx["socio_afectado"];
$xSoc = new cSocio($socio);
$xSoc->init();
$DSoc = $xSoc->getDatosInArray();
$curp = $DSoc["curp"];
$rfc = $DSoc["rfc"];
$xT = new cImpuestoIDE();
$xTi = new cTipos();
$nombre = $xTi->setNoAcentos($xSoc->getNombreCompleto());
$domicilio = $xSoc->getDomicilio();
//Ide Individual a la fecha de Corte
$IDEPend = $xT->getIDENoPagado($socio, $fecha_final);
// $xT = new cImpuestoIDE();
// $xF = new cFecha(0, $fecha);
// $FechaAnterior = $xF->getFechaMesAnterior();
//$IDEPerA = $xSoc->getIDEPeriodoAnterior($fecha_final);//IDE Periodos anteriores
//Remanente de periodos anteriores se refiere a la suma de Remanentes en los Meses Anteriores
$xTa->addTH("Es PEP");
$xTa->addTH("Lista Negra");
$xTa->addTH("Grado de Riesgo");
$xTa->addTH("Servicios");
$xTa->addTH("Monto Otorgado");
$xTa->addTH("Monto Actual");
$xTa->addTH("Perfil Transaccional");
$xTa->addTH("Numero Maximo de Operaciones");
$xTa->addTH("Monto Maximo de Operaciones");
$xTa->endRow();
$xT = new cFileImporter();
$xClean = new cTiposLimpiadores();
foreach ($rs as $rows) {
$xDSoc->setData($rows);
$codigo_de_socio = $xDSoc->codigo()->v();
$xSoc = new cSocio($codigo_de_socio);
$xSoc->init($rows);
$xSoc->getOEstats()->initDatosDeCredito();
$saldoCred = setNoMenorQueCero($xSoc->getCreditosComprometidos());
if ($saldoCred > 0) {
$xTa->initRow();
$xTa->addTD($xSoc->getSucursal());
$xTa->addTD(htmlentities($xSoc->getApellidoPaterno()));
$xTa->addTD(htmlentities($xSoc->getApellidoMaterno()));
$xTa->addTD($xSoc->getNombre());
$genero = isset($DGenero[$xSoc->getGenero()]) ? $DGenero[$xSoc->getGenero()] : "";
$xTa->addTD($genero);
$xTa->addTD($xF->getFechaMX($xSoc->getFechaDeNacimiento()));
$pais = isset($DPaises[$xSoc->getPaisDeOrigen()]) ? $DPaises[$xSoc->getPaisDeOrigen()] : "";
$xTa->addTD(htmlentities($pais));
$xTa->addTD(htmlentities($xSoc->getLugarDeNacimiento()));
?>
</td>
</tr>
</tbody>
</table>
</fieldset>
<?php
$sqlconyuge = "SELECT numero_socio, CONCAT(nombres, ' ', apellido_paterno, ' ', apellido_materno)\n\t\t\t\t\tAS 'Nombre_Completo',\n\t \t\t\t\tCONCAT( telefono_residencia, ', ', telefono_movil) as 'telefonos', ocupacion\n\t\t\t\t\tfrom socios_relaciones where consanguinidad=3\n\t\t\t\t\tAND socio_relacionado={$idsocio}";
$conyuge = obten_filas($sqlconyuge);
$txtConyuge = "";
//$conyuge[0] - $conyuge[1] - Tel(s): $conyuge[2] Ocupación: $conyuge[3]
$rwy = $xSocio->getDatosInArray();
$idconyuge = $xSocio->getClaveDePersonaDeConyuge();
if ($conyuge > 0) {
$xCon = new cSocio($idconyuge);
$xCon->init();
$DConT = $xCon->getTelefonos();
$txtConyuge .= $idconyuge . "-" . $xCon->getNombreCompleto();
$txtConyuge .= " TEL(S): " . $DConT["principal"];
$conyuge_ocup = $xCon->getDatosActividadEconomica();
$txtConyuge .= " OCUPACIÓN: " . $conyuge_ocup["puesto"];
}
$genero = eltipo("socios_genero", $rwy[15]);
$civil = eltipo("socios_estadocivil", $rwy[14]);
$ocupacion = volcartabla("socios_aeconomica", 18, "socio_aeconomica={$idsocio}");
$edad = (int) (restarfechas($nowdate, $rwy[11]) / 365) . " Años";
$dependientes = $rwy["dependientes_economicos"];
$telp = $rwy["telefono_principal"];
$mail = $rwy["correo_electronico"];
$grupo_assoc = $rwy["grupo_solidario"];