/**
* 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;
}
/** ---------------------------- Devuelve el Nombre del Socio---------------------------- */
function nombre($idsoc)
{
$nombre = "";
if (isset($idsoc)) {
$idsoc = trim($idsoc);
settype($idsoc, "integer");
$xSoc = new cSocio($idsoc);
$xSoc->init();
$nombre = $xSoc->getNombreCompleto();
}
return $nombre;
}
$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>
$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
$RemPerA = 0;
$IDERet = $xSoc->getIDEPagadoByPeriodo($fecha_final);
$MontoGrav = $xSoc->getBaseGravadaIDE($fecha_final);
$IDECalc = $xSoc->getIDECalculado($fecha_final);
$totalExcedente += $MontoGrav;
$totalOperaciones++;
$totalPendiente += $IDEPend;
$numero_parcialidad = setNoMenorQueCero($rw["letra"]) == 0 ? 1 : $rw["letra"];
$numero_de_pagos = $rw["pagos"];
//$DCred[""];
$periocidad_titulo = $xTPer->getNombre();
$tipo_de_credito = "";
$monto_ministrado = "";
$DOficial = $xCred->getDatosOficialDeCredito_InArray();
$oficial = $DOficial["nombre_completo"];
$variable_oficial = $DOficial["nombre_completo"];
$fecha_de_vencimiento = "";
$tasa_interes_mensual_ordinario = "";
$tasa_garantia_liquida = "";
$tasa_interes_mensual_moratorio = 0;
$fecha_de_ministracion = "";
//cargar Datos de la Empresa
$vars = array("variable_nombre_del_socio" => $cSoc->getNombreCompleto(), "variable_nombre_de_la_sociedad" => EACP_NAME, "variable_nombre_de_la_entidad" => EACP_NAME, "variable_domicilio_del_socio" => trim(substr($cSoc->getDomicilio(), 0, 60)), "variable_documento_de_constitucion_de_la_sociedad" => EACP_DOCTO_CONSTITUCION, "variable_rfc_de_la_entidad" => EACP_RFC, "variable_rfc_del_socio" => $DSoc["rfc"], "variable_curp_del_socio" => $DSoc["curp"], "variable_nombre_del_representante_legal_de_la_sociedad" => EACP_REP_LEGAL, "variable_informacion_del_credito" => $svar_info_cred, "variable_domicilio_de_la_entidad" => EACP_DOMICILIO_CORTO, "variable_acta_notarial_de_poder_al_representante" => EACP_DOCTO_REP_LEGAL, "variable_numero_de_socio" => $numero_de_socio, "variable_tipo_de_credito" => $tipo_de_credito, "variable_monto_ministrado" => getFMoney($monto_ministrado), "variable_tasa_mensual_de_interes_ordinario" => $tasa_interes_mensual_ordinario, "variable_credito_fecha_de_vencimiento" => getFechaLarga($fecha_de_vencimiento), "variable_tasa_mensual_de_interes_moratorio" => $tasa_interes_mensual_moratorio . " %", "variable_tasa_de_garantia_liquida" => $tasa_garantia_liquida . " %", "variable_horario_de_trabajo_de_la_entidad" => EACP_HORARIO_DE_TRABAJO, "variable_testigo_del_acto" => $oficial, "variable_fecha_larga_actual" => fecha_larga(), "variable_nombre_de_presidente_de_vigilancia_de_la_entidad" => EACP_PDTE_VIGILANCIA, "variable_en_letras_monto_ministrado" => convertirletras($monto_ministrado), "variable_credito_fecha_de_ministracion" => getFechaLarga($fecha_de_ministracion), "variable_informacion_del_socio" => $ficha_socio, "variable_oficial" => $variable_oficial, "variable_lugar" => $variable_lugar, "variable_lugar_actual" => $variable_lugar, "variable_monto_inicial_en_numero" => $monto_inicial, "variable_monto_inicial_en_letras" => $monto_inicial_letras, "variable_numero_de_dias" => $numero_dias, "variable_fecha_de_vencimiento" => $variable_fecha_vencimiento, "variable_tasa_otorgada" => $variable_tasa_otorgada, "variable_nombre_empresa" => $nempresa, "variable_numero_de_pagos" => $numero_de_pagos, "variable_numero_parcialidad_actual" => $numero_parcialidad, "variable_monto_parcialidad" => getFMoney($monto_parcialidad), "variable_monto_letras_parcialidad" => convertirletras($monto_parcialidad), "variable_encabezado_de_reporte" => getRawHeader(false, $out), "variable_pie_de_reporte" => getRawFooter(false, $out), "variable_paginas" => $contar);
if ($out == OUT_DOC) {
$vars["<hr />"] = "";
}
$texto_contrato = $base_contrato;
foreach ($vars as $key => $value) {
$texto_contrato = str_replace($key, $value, $texto_contrato);
}
if ($monto_parcialidad > 0) {
$xRPT->addContent($texto_contrato);
$ppn++;
if ($ppn == 2) {
if ($out == OUT_DOC) {
} else {
$xRPT->addContent("<hr class='divisormedio' />\n");
}
$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 {
$idclave = $xOAE->getClaveDeActividad();
$actividad = isset($DActividades[$idclave]) ? htmlentities($DActividades[$idclave]) : "";
$actividad = strtoupper($xT->cleanString($actividad));
$actividad = $actividad == "DESCONOCIDO_MIGRADO" ? "" : $actividad;
$xTa->addTD($actividad);
//$xTa->addTD( $xOAE->getPuesto(true) );
}
function setGenerarIDExPagar($fecha)
{
$fecha_inicial = date("Y-m-", strtotime($fecha)) . "01";
$fecha_final = date("Y-m-t", strtotime($fecha));
$sql = "SELECT\r\n\t\t\t\t\t\t`operaciones_mvtos`.`socio_afectado`,\r\n\t\t\t\t\t\t`operaciones_recibos`.`tipo_pago`,\r\n\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\r\n\t\t\t\t\t\tSUM(`operaciones_mvtos`.`afectacion_real`) AS 'monto'\r\n\t\t\t\t\tFROM\r\n\t\t\t\t\t\t`operaciones_mvtos` `operaciones_mvtos`\r\n\t\t\t\t\t\t\tINNER JOIN `operaciones_recibos` `operaciones_recibos`\r\n\t\t\t\t\t\t\tON `operaciones_mvtos`.`recibo_afectado` = `operaciones_recibos`.\r\n\t\t\t\t\t\t\t`idoperaciones_recibos`\r\n\t\t\t\t\t\t\t\tINNER JOIN `eacp_config_bases_de_integracion_miembros`\r\n\t\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`\r\n\t\t\t\t\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` =\r\n\t\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`miembro`\r\n\t\t\t\tWHERE\r\n\t\t\t\t\t(`operaciones_mvtos`.`fecha_afectacion` >='{$fecha_inicial}')\r\n\t\t\t\t\tAND\r\n\t\t\t\t\t(`operaciones_mvtos`.`fecha_afectacion` <='{$fecha_final}')\r\n\t\t\t\t\tAND\r\n\t\t\t\t\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` = 2600)\r\n\t\t\t\t\tAND\r\n\t\t\t\t\t(`operaciones_recibos`.`tipo_pago` = 'efectivo' )\r\n\t\t\t\t\t{$BySucursal}\r\n\t\t\t\t\tGROUP BY\r\n\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\r\n\t\t\t\t\t`operaciones_mvtos`.`socio_afectado`,\r\n\t\t\t\t\t`operaciones_recibos`.`tipo_pago`";
$rsIDE = mysql_query($sql, cnnGeneral());
while ($rwIDE = mysql_fetch_array($rsIDE)) {
$socio = $rwIDE["socio_afectado"];
$monto = $rwIDE["monto"];
if ($monto > EXCENCION_IDE) {
$cSoc = new cSocio($socio, true);
$nombre = $cSoc->getNombreCompleto();
$DSoc = $cSoc->getDatosInArray();
$rfc = $DSoc["rfc"];
$ide_pagado = $cSoc->getIDEPagadoByPeriodo($fecha_final);
$ide_pendiente = $cSoc->getIDExPagarByPeriodo($fecha_final);
$base_gravada = $cSoc->getBaseGravadaIDE();
}
}
}
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;
}
function getSimilaresPorNombre($nombre = "", $apellido1 = "", $apellido2 = "", $soloBusqueda = false)
{
if ($nombre == "") {
$xSoc = $this->getOPersona();
// new cSocio($this->mClaveDePersona);
$nombre = $xSoc->getNombre();
$apellido1 = $xSoc->getApellidoPaterno();
$apellido2 = $xSoc->getApellidoMaterno();
}
$nombre = strtoupper($nombre);
$apellido1 = strtoupper($apellido1);
$PersonaDeOrigen = $this->getCodigoDePersona();
$xPO = $this->getOPersona();
$NombreDeOrigen = $xPO->getNombreCompleto();
$snom = substr($nombre, 0, 3);
$sapp1 = substr($apellido1, 0, 3);
$apellido2 = strtoupper($apellido2);
$sapp2 = substr($apellido2, 0, 3);
$sql = "SELECT * FROM socios_general WHERE (`socios_general`.`nombrecompleto` LIKE '%{$snom}%') ";
if ($apellido1 != "") {
$sql = " AND (`socios_general`.`apellidopaterno` LIKE '%{$sapp1}%') ";
}
if ($apellido2 != "") {
$sql .= " AND (`socios_general`.`apellidomaterno` LIKE '%{$sapp2}%') ";
}
$this->mMessages .= "WARN\tBuscando similitudes para {$nombre} {$apellido1} {$apellido2} \r\n";
$xPer = new cSocios_general();
$xMql = new MQL();
$data = $xMql->getDataRecord($sql);
foreach ($data as $rows) {
$xPer->setData($rows);
$PersonaCoincide = $xPer->codigo()->v();
$PersonaDeDestino = AML_OFICIAL_DE_CUMPLIMIENTO;
$TipoDeAlerta = 901002;
$minimo = 90;
$parecido = 0;
$mNombre = strtoupper($xPer->nombrecompleto()->v());
$mApp1 = strtoupper($xPer->apellidopaterno()->v());
$mApp2 = strtoupper($xPer->apellidomaterno()->v());
$divisor = 1;
$parecido_a2 = 0;
$parecido_a1 = 0;
similar_text($mNombre, $nombre, $parecido_n);
similar_text($mApp1, $apellido1, $parecido_a1);
if ($apellido1 != "") {
similar_text($mApp1, $apellido1, $parecido_a1);
$divisor = 2;
$minimo = 80;
}
if ($apellido2 != "") {
similar_text($mApp2, $apellido2, $parecido_a2);
$divisor = 3;
$minimo = 70;
}
$parecido = ($parecido_n + $parecido_a1 + $parecido_a2) / $divisor;
if ($parecido > 51) {
if ($parecido >= $minimo) {
$xAML = new cAML();
$xSocP = new cSocio($PersonaCoincide);
$xSocP->init();
$origenN = $xSocP->getNombreCompleto();
$mensaje = "{$NombreDeOrigen} .- Concidencia({$mNombre}|{$mApp1}|{$mApp2}) del {$parecido} con la persona {$origenN} ";
if ($xSocP->getEsPersonaSDN() == true) {
//aviso inminente
$xAML->setForceRegistroRiesgo();
$xAML->setForceAlerts();
$xAML->sendAlerts($PersonaDeOrigen, $PersonaDeDestino, 901002, $mensaje);
} elseif ($xSocP->getEsPersonaPoliticamenteExpuesta() == true) {
//enviar a oficial de cumplimiento
$xAML->setForceAlerts();
$xAML->sendAlerts($PersonaDeOrigen, $PersonaDeDestino, 901010, $mensaje);
//registro pep
} else {
//enviar a oficial de cumplimiento
$xAML->setForceAlerts();
$xAML->sendAlerts($PersonaDeOrigen, $PersonaDeDestino, 901010, $mensaje);
//registro pep
}
$this->mMessages .= $xSocP->getMessages();
$this->mMessages .= $xAML->getMessages();
} else {
$this->mMessages .= "WARN\tEl parecido con {$mNombre} {$mApp1} {$mApp2} es {$parecido} %\r\n";
}
}
}
}
echo $xHP->getJsBack($aviso, $strGet);
} else {
$msg = "El Registro se ha Guardado Exitosamente";
}
}
if ($cargar != "" and $origen = "recibo") {
$xRec = new cReciboDeOperacion(false, true, $cargar);
$xRec->init();
$monto = $xRec->getTotal();
$documento = $xRec->getCodigoDeDocumento();
$recibo = $cargar;
$fecha = $xRec->getFechaDeRecibo();
$operacion = BANCOS_OPERACION_DEPOSITO;
$socio = $xRec->getCodigoDeSocio();
$xSoc = new cSocio($socio, true);
$beneficiario = $xSoc->getNombreCompleto();
}
$jsb = new jsBasicForm("bancos_operaciones", iDE_OPERACION);
$jsb->setIncludeOnlyCommons();
//$jsb->show();
//$jxc ->drawJavaScript(false, true);
echo $jsb->setIncludeJQuery();
echo $xHP->setBodyinit();
$xTxt = new cHText();
$xBtn = new cHButton();
$xFRM = new cHForm("bancos_operaciones", "movimientos_bancarios.frm.php");
//id, label value, size, class, options[])
$xSel = new cSelect("idcuenta", "idcuenta", TBANCOS_CUENTAS);
$xSel->setOptionSelect($numero_de_cuenta);
$xHSel = new cHSelect();
$xHSel->addOptions(array("cheque" => "Cheque", "deposito" => "Deposito", "retiro" => "Retiro"));
function jsaGetNombreDirector($persona)
{
$xSocio = new cSocio($persona);
$xSocio->init();
//idelmes0 idelanno0 ideldia0
$tab = new TinyAjaxBehavior();
//$tab -> add(TabSetvalue::getBehavior("idNumeroSocio", $socio));
$tab->add(TabSetvalue::getBehavior("idnombredependencia", $xSocio->getNombreCompleto()));
//$tab -> add(TabSetvalue::getBehavior('idObservaciones', $xSoc->getMessages() ));
return $tab->getString();
}
}
// Si es Inversion la Cuenta Estara Inactiva
if (setNoMenorQueCero($man1) > 0) {
$xMan1 = new cSocio($man1);
if ($xMan1->init() == true) {
//agregar relacion
$xSoc->addRelacionPorDocumento($man1, $idcuenta, PERSONAS_REL_MANCOMUNADO);
$man1 = "{$man1}|" . $xMan1->getNombreCompleto();
}
}
if (setNoMenorQueCero($man2) > 0) {
$xMan2 = new cSocio($man2);
if ($xMan2->init() == true) {
//agregar relacion
$xSoc->addRelacionPorDocumento($man2, $idcuenta, PERSONAS_REL_MANCOMUNADO);
$man2 = "{$man2}|" . $xMan2->getNombreCompleto();
}
}
$xCta = new cCuentaDeCaptacion($idcuenta, $idsocio, $dias, $tasa, $fechaalta);
$idcuenta = $xCta->setNuevaCuenta($origencuenta, $subpdto, $idsocio, $observacion, $idsolicitud, $man1, $man2, $idgrupo, $fechaalta, $tipocuenta, $tipotitulo, $dias, $tasa, $cuentaDeIntereses, $fechaalta);
$xCta->init();
$xFRM->addHTML($xCta->getFicha(true));
$contrato = $xCta->getURLContrato();
$msg .= $xCta->getMessages();
}
$msg .= $xSoc->getMessages();
if (MODO_DEBUG == true) {
//$xCta->getMessages(
$xFL = new cFileLog(false, true);
$xFL->setWrite($msg);
$xFL->setClose();
function setVocal($clave_de_persona)
{
if (setNoMenorQueCero($clave_de_persona) > DEFAULT_SOCIO) {
$xPer = new cSocio($clave_de_persona);
if ($xPer->init() == true) {
$codigo = $xPer->getCodigo();
$nombre = $xPer->getNombreCompleto();
$this->setUpdate(array("vocalvigilancia_numerosocio" => $codigo, "vocalvigilancia_nombrecompleto" => $nombre));
$this->addIntegrante($clave_de_persona);
}
}
}
$AppByFechas = parametro("f73");
//Boolean por fechas
$fecha_inicial = parametro("on", EACP_FECHA_DE_CONSTITUCION);
$fecha_final = parametro("off", $xF->getFechaMaximaOperativa());
$output = parametro("out", SYS_DEFAULT);
$es_por_fechas = "";
$xCuenta = new cCuentaALaVista($idcuenta);
$xCuenta->init();
//Datos de la Cuenta
$rwc = $xCuenta->getDatosInArray();
// datos generales del socio
$idsocio = $rwc["numero_socio"];
// Numero de Socio
$CSocio = new cSocio($idsocio);
$CSocio->init();
$mynom = $CSocio->getNombreCompleto();
$xRPT->addContent($CSocio->getFicha());
//Verifica el FORZADO de el Cuadre de Saldos
// datos de la cuenta
$tipocuenta = eltipo("captacion_cuentastipos", $rwc[4]);
$tasa = $rwc[14] * 100;
$saldo = $rwc["saldo_cuenta"];
$sdoact = number_format($rwc[9], 2, '.', ',');
$depositos = 0;
$retiros = 0;
$sdo_i = 0;
$sdo_f = 0;
/* echo "<hr />
<table width='100%'>
<tr>
<td class='ths'>Numero de cuenta</td><td>$idcuenta</td>
function getListadoDeAvales($credito)
{
//TODO: Terminar
$mSQL = new cSQLListas();
$mql = new MQL();
$sql = $mSQL->getListadoDeAvales($credito, $this->mPersona);
$rs = $mql->getDataRecord($sql);
//setLog($sql);
$forma = 8001;
$firma = 8002;
$friesgo = 5001;
$cficha = "";
$cfirmas = "";
$criesgo = "";
$clista = "";
//$xAval = new cSocios_relaciones();
foreach ($rs as $rows) {
$persona = $rows["numero_socio"];
$idrelacion = $rows["num"];
$xSoc = new cSocio($persona);
$xRel = new cPersonasRelaciones($idrelacion, $persona);
$xRel->init();
if ($xSoc->init() == true) {
$avalDom = $xSoc->getODomicilio();
$avalEc = $xSoc->getOActividadEconomica();
$vars = array("aval_nombre_completo" => $xSoc->getNombreCompleto(), "aval_domicilio_localidad" => "", "aval_direccion_calle_y_numero" => "", "aval_direccion_estado" => "", "aval_direccion_completa" => "", "aval_ocupacion" => "", "aval_fecha_de_nacimiento" => $xSoc->getFechaDeNacimiento(), "aval_id_fiscal" => $xSoc->getRFC(), "aval_lugar_de_nacimiento" => $xSoc->getLugarDeNacimiento(), "aval_empresa_de_trabajo" => "", "aval_estado_civil" => $xSoc->getEstadoCivil(), "aval_tipo_de_relacion" => $xRel->getNombreRelacion(), "aval_tipo_de_parentesco" => $xRel->getNombreParentesco(), "aval_porcentaje_relacionado" => $xRel->getPorcientorelacionado() * 100);
if ($avalDom != null) {
$vars["aval_direccion_completa"] = $xSoc->getDomicilio();
$vars["aval_domicilio_localidad"] = $xSoc->getODomicilio()->getCiudad();
$vars["aval_direccion_calle_y_numero"] = $xSoc->getODomicilio()->getCalleConNumero();
$vars["aval_direccion_estado"] = $xSoc->getODomicilio()->getEstado(OUT_TXT);
}
if ($avalEc != null) {
$vars["aval_ocupacion"] = $xSoc->getOActividadEconomica()->getPuesto();
$vars["aval_empresa_de_trabajo"] = $xSoc->getOActividadEconomica()->getNombreEmpresa();
}
$texto_ficha = contrato($forma, "texto_del_contrato");
$texto_firma = contrato($firma, "texto_del_contrato");
$texto_aut = contrato($friesgo, "texto_del_contrato");
$vars = array_merge($vars, $this->mBasicVars);
foreach ($vars as $key => $value) {
$texto_ficha = str_replace($key, $value, $texto_ficha);
$texto_firma = str_replace($key, $value, $texto_firma);
$texto_aut = str_replace($key, $value, $texto_aut);
}
$cficha .= $texto_ficha;
$cfirmas .= $texto_firma;
$criesgo .= $texto_aut;
$clista .= $xSoc->getNombreCompleto(OUT_TXT) . ": " . $xSoc->getDomicilio() . "; ";
//setLog($texto_ficha);
}
//setLog($xSoc->getMessages());
}
$this->mFichasAvales = $cficha;
$this->mFirmasAvales = $cfirmas;
$this->mFichaRiesgoAv = $criesgo;
$this->mLAvalesConDir = $clista;
}
$socio = $xT->cInt($cadena[0]);
$credito = $xT->cInt($cadena[1]);
$letra = $xT->cInt($cadena[2]);
$capital = round($xT->cFloat($cadena[3]), 2);
$interes = round($xT->cFloat($cadena[4]), 2);
$iva = round($xT->cFloat($cadena[5]), 2);
$ahorro = round($xT->cFloat($cadena[6]), 2);
$observaciones = $xT->cChar($cadena[7]);
$total = $capital + $ahorro + $interes + $iva;
if (isset($socio) and isset($credito) and !empty($socio) and !empty($credito)) {
$DSoc = new cSocio($socio);
$SocioExiste = $DSoc->existe($socio);
$CreditoExiste = $DSoc->existeCredito($credito);
if ($SocioExiste == true and $CreditoExiste == true) {
$DSoc->init();
$nombre = $DSoc->getNombreCompleto();
$nombre = substr($nombre, 0, 25);
//Verificar el Saldo del Credito
$CCred = new cCredito($credito, $socio);
//echo "$credito ---- $socio<br>";
$CCred->init();
$DCred = $CCred->getDatosDeCredito();
$saldo = $DCred["saldo_actual"];
if (!isset($saldo) or $saldo == 0) {
//$socio = "";
if ($saldo != 0 && $capital != 0) {
$msg .= "{$iReg}\t{$socio}\t{$credito}\tDIF1\tEL Saldo({$saldo}) es menor al abono({$capital}), difiere por " . getFMoney($saldo - $capital) . " \r\n ";
}
$saldo = 0;
$diferencias += $capital;
$capital = 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();
$TesMontoPagado = $xCaja->getReciboEnCorte($recibo);
$eventOnLoad = "";
$scripts = "";
//TODO: Resolver ajuste y permisos de ajuste
if (MODULO_CAJA_ACTIVADO == true and $xRec->isPagable() == true) {
function setPolizaPorCajero($cajero, $FechaDeCorte, $NumeroDePoliza = false, $TipoDePoliza = 1, $TipoDePago = "efectivo", $generador = false)
{
$sucess = true;
$msg = "=======\tGENERAR POLIZA POR USUARIO NUM {$cajero}\r\n";
//if (GENERAR_CONTABILIDAD == true){
//($generador == GENERAR_POLIZAS_AL_CIERRE) AND
if (isset($cajero)) {
$xUsr = new cOficial($cajero);
$DUsr = $xUsr->getDatos();
$UsrName = $DUsr["nombres"] . " " . $DUsr["apellidopaterno"];
$tipo_de_poliza = $TipoDePoliza;
$xD = new cFecha(0, $FechaDeCorte);
$fecha_de_poliza = $FechaDeCorte;
$ejercicio_de_poliza = $xD->anno();
$periodo_de_poliza = $xD->mes();
$numero_de_poliza = $NumeroDePoliza == false ? false : $NumeroDePoliza;
$concepto_poliza = "{$UsrName}.-Movimientos del Corte de Fecha {$FechaDeCorte}";
//Obten datos de la Poliza
$sqlRec = "SELECT\r\n\t\t\t\t\t\t\t\t\t`operaciones_recibos`.*,\r\n\t\t\t\t\t\t\t\t\t`operaciones_recibostipo`.`tipo_poliza_generada`,\r\n\t\t\t\t\t\t\t\t\t`operaciones_recibostipo`.`afectacion_en_flujo_efvo`\r\n\t\t\t\t\t\t\t\tFROM\r\n\t\t\t\t\t\t\t\t\t`operaciones_recibos` `operaciones_recibos`\r\n\t\t\t\t\t\t\t\t\t\tINNER JOIN `operaciones_recibostipo`\r\n\t\t\t\t\t\t\t\t\t\t`operaciones_recibostipo`\r\n\t\t\t\t\t\t\t\t\t\tON `operaciones_recibos`.`tipo_docto` =\r\n\t\t\t\t\t\t\t\t\t\t`operaciones_recibostipo`.\r\n\t\t\t\t\t\t\t\t\t\t`idoperaciones_recibostipo`\r\n\t\t\t\t\t\t\t\tWHERE\r\n\t\t\t\t\t\t\t\t\t(`operaciones_recibos`.`idusuario` = {$cajero} )\r\n\t\t\t\t\t\t\t\t\tAND\r\n\t\t\t\t\t\t\t\t\t(`operaciones_recibos`.`fecha_operacion` = '{$FechaDeCorte}' )\r\n\t\t\t\t\t\t\t\t\tAND\r\n\t\t\t\t\t\t\t\t\t(`operaciones_recibostipo`.`tipo_poliza_generada` = {$TipoDePoliza} )\r\n\t\t\t\t\t\t\t\t\tAND\r\n\t\t\t\t\t\t\t\t\t(`operaciones_recibos`.`tipo_pago` = '{$TipoDePago}' )\r\n\t\t\t\t\t\t\t\tORDER BY\r\n\t\t\t\t\t\t\t\t\t`operaciones_recibos`.`tipo_pago`,\r\n\t\t\t\t\t\t\t\t\t`operaciones_recibos`.`idusuario`,\r\n\t\t\t\t\t\t\t\t\t`operaciones_recibos`.`idoperaciones_recibos`\r\n\t\t\t\t\t\t\t\t\t";
//$msg .= "$sqlRec\r\n";
$rsP = getRecordset($sqlRec);
//Obtener el la Ultima Poliza Registrada
//------------------ Agregar Poliza
$xPol = new cPoliza($tipo_de_poliza, $numero_de_poliza, $ejercicio_de_poliza, $periodo_de_poliza);
if ($numero_de_poliza != false and $xPol->getCountPolizaByNumero($numero_de_poliza) > 1) {
$xPol->setDeletePoliza();
}
$msg .= $xPol->add($concepto_poliza, $fecha_de_poliza, $numero_de_poliza, 0, 0, $cajero);
$numero_de_poliza = $xPol->get();
$msg .= "=====\tPOLIZA NUM: {$numero_de_poliza} | TIPO: {$tipo_de_poliza} | EJERCICIO: {$ejercicio_de_poliza} | PERIODO: {$periodo_de_poliza}\r\n";
$sucess = $xPol->mRaiseError == true ? false : true;
//seleccionar todos los recibos
while ($rwP = mysql_fetch_array($rsP)) {
$dRec = $rwP;
$numero_de_recibo = $dRec["idoperaciones_recibos"];
$recibo_fiscal = strlen($dRec["recibo_fiscal"]) > 2 ? ";RF:" . trim($dRec["recibo_fiscal"]) : "";
$observacion_recibo = $dRec["observacion_recibo"];
$flujo_efectivo = $dRec["afectacion_en_flujo_efvo"];
$cheque = strlen($dRec["cheque_afectador"]) > 2 ? ";Ch:" . $dRec["cheque_afectador"] : "";
$socio = $dRec["numero_socio"];
$concepto_mvto = substr("R:" . $numero_de_recibo . $recibo_fiscal . $cheque . ";" . $dRec["observacion_recibo"], 0, 80);
$msg .= "{$numero_de_recibo}\tRECIBO TIPO: " . $dRec["tipo_docto"] . " SUMA: " . $dRec["total_operacion"] . " \r\n";
//regenera el perfil contable
//if ( $Regenerar == true ){
$xUCont = new cUtileriasParaContabilidad();
$msg .= $xUCont->setRegenerarPrepolizaContable($dRec["fecha_operacion"], $numero_de_recibo);
//}
//------------------ Leer la PROFORMA
$sqlMvtosToPoliza = "SELECT\r\n\t\t\t\t\t`contable_polizas_proforma`.*,\r\n\t\t\t\t\t`operaciones_tipos`.*\r\n\t\t\r\n\t\t\t\t\tFROM\r\n\t\t\t\t\t`operaciones_tipos` `operaciones_tipos`\r\n\t\t\t\t\t\tINNER JOIN `contable_polizas_proforma`\r\n\t\t\t\t\t\t`contable_polizas_proforma`\r\n\t\t\t\t\t\tON `operaciones_tipos`.`idoperaciones_tipos` =\r\n\t\t\t\t\t\t`contable_polizas_proforma`.`tipo_de_mvto`\r\n\t\t\t\t\t\tAND `contable_polizas_proforma`.`numero_de_recibo` = {$numero_de_recibo}\r\n\t\t\t\t\tORDER BY\r\n\t\t\t\t\t\t`contable_polizas_proforma`.`contable_operacion` DESC,\r\n\t\t\t\t\t\t`contable_polizas_proforma`.`socio`,\r\n\t\t\t\t\t\t`contable_polizas_proforma`.`documento`,\r\n\t\t\t\t\t\t`contable_polizas_proforma`.`tipo_de_mvto`\t\t\t\r\n\t\t\t\t\t";
if ($sucess == true) {
//$msg .= "$sqlMvtosToPoliza\r\n";
$rs = mysql_query($sqlMvtosToPoliza, cnnGeneral());
if (!$rs) {
//error en MYSQL
$sucess = false;
saveError(2, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Depurar :" . mysql_error() . "|Numero: " . mysql_errno() . "|Instruccion SQL:" . $sqlMvtosToPoliza . "|EN:" . $_SESSION["current_file"]);
}
while ($rw = mysql_fetch_array($rs)) {
$cuenta = CUENTA_DE_CUADRE;
$nombre = "";
$socio = $rw["socio"];
if (CONTABLE_CUENTAS_POR_SOCIO == true) {
$xSoc = new cSocio($socio, true);
$nombre = $xSoc->getNombreCompleto();
}
//si la cuenta es de efectivo o similar
$documento = $rw["documento"];
$monto_movimiento = $rw["monto"];
$tipoOp = $rw["tipo_de_mvto"];
$tipo_movimiento = $rw["contable_operacion"];
$cargo_movimiento = 0;
$abono_movimiento = 0;
if ($tipo_movimiento == TM_CARGO) {
$cargo_movimiento = $monto_movimiento;
$abono_movimiento = 0;
} else {
$cargo_movimiento = 0;
$abono_movimiento = $monto_movimiento;
}
$formula = $rw["cuenta_contable"];
//Corregir de urgencia: OK: 06Oct2011
$sForms = new cValorarFormulas();
$cuenta = $sForms->getCuentaContable($socio, $documento, $formula, $cajero);
$msg .= $sForms->getMessages();
if ($cuenta != "NO_CONTABILIZAR") {
$xCuenta = new cCuentaContable($cuenta);
$cuenta = $xCuenta->get();
//Carga los datos del Oficial
if ($xCuenta->getEsCuentaDeCirculante() == true) {
$nombre = "EFVO:{$UsrName}";
$msg .= "CUENTA_ADD\tLa Cuenta {$cuenta} de Carga por Cajero [ {$nombre} ]\r\n";
} else {
$msg .= "CUENTA\tLa Cuenta de Trabajo es {$cuenta} Originado del Socio {$socio}\r\n";
}
//verifica para dar de alta a la cuenta
$Existentes = $xCuenta->getCountCuenta();
if ($Existentes == false) {
$msg .= "{$numero_de_recibo}\tCUENTA_ADD\tLa Cuenta de Trabajo {$cuenta} NO EXISTE, Se AGREGA\r\n";
$cuenta = $xCuenta->add($nombre);
if ($xCuenta->mRaiseError == true) {
//$msg .= "ERROR\tLa Cuenta de Trabajo $cuenta NO EXISTE\r\n";
//$msg = $xCuenta->getMessages();
}
}
$xCuenta->init();
$msg .= $xCuenta->getMessages();
$msg .= $xPol->addMovimiento($cuenta, $cargo_movimiento, $abono_movimiento, "{$socio}:{$documento}:{$tipoOp}", $concepto_mvto);
} else {
$msg .= "{$numero_de_recibo}\tNO_CONT\tEl Movimiento de {$socio} | {$documento} | {$tipoOp} de Monto {$monto_movimiento} se OMITE\r\n";
}
}
//END MOVIMIENTOS
} else {
$msg .= "{$numero_de_recibo}\tEXISTE UN ERROR AL CARGAR EL RECIBO\r\n";
}
// END SUCESS
}
// END RECIBOS
$xPol->setReestructurarEfvo();
$msg .= $xPol->setFinalizar();
$msg .= $xPol->getMessages();
$this->mIDDePoliza = $xPol->getCodigo();
}
// END VALUE.- GENERAR AL CIERRE DEL DIA
//} // END VALUE.- GENERAR CONTABILIDAD
return $msg;
}
</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"];
//$regimen_mat =
$DDom = $xSocio->getDatosDomicilio(99);
$eldom = "<tr>\n\t\t\t\t\t\t<th >Calle/Codigo Postal</th>\n\t\t\t\t\t\t<td>" . $DDom["calle"] . "/" . $DDom["codigo_postal"] . "</td>\n\t\t\t\t\t\t<th >Num. Ext./Int.</th>\n\t\t\t\t\t\t<td>" . $DDom["numero_exterior"] . "/" . $DDom["numero_interior"] . "</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th >Colonia</th>\n\t\t\t\t\t\t<td>" . $DDom["colonia"] . "</td>\n\t\t\t\t\t\t<th >Telefono(s)</th>\n\t\t\t\t\t\t<td>" . $DDom["telefono_residencial"] . "/" . $DDom["telefono_movil"] . "</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th >Localidad</th>\n\t\t\t\t\t\t<td>" . $DDom["localidad"] . "</td>\n\t\t\t\t\t\t<th >Municipio/Estado</th>\n\t\t\t\t\t\t<td>" . $DDom["municipio"] . "/" . $DDom["estado"] . "</td>\n\t\t\t\t\t</tr>";
$score2 = metaphone($apaterno) . "/" . metaphone($app1);
}
//JaroWinkler($string1, $string2)
$xTbl->addTD("{$score1} & {$score2} & {$score3}");
break;
}
//$xTbl->endRow();
//sdn id
//
$xTbl->endRow();
//
//nombres
$xTbl->initRow();
$xTbl->addTD($id);
$xTbl->addTH($xLng->getT("TR.Nombre"));
$xTbl->addTD($xSoc->getNombreCompleto());
//alias
$xTbl->addTH($xLng->getT("TR.Alias"));
$xTbl->addTD($xSoc->getAlias());
$xTbl->endRow();
//direcciones
//marcadores
$xTbl->addRaw("<tr><td colspan='3'>" . $xSoc->getObservaciones() . "</td></tr>");
//$xTbl->initRow();
$rsdr = $mql->getDataRecord("SELECT * FROM `socios_vivienda` WHERE `socio_numero`={$id}");
$adr = "";
foreach ($rsdr as $rwr) {
$xDom = new cPersonasVivienda();
$xDom->init(false, $rwr);
$adr .= $xDom->getFicha();
}
/**
* Funcion que asiste en la Ministracion del Credito
*/
function setMinistrar($recibo_fiscal, $cheque, $monto_cheque = 0, $cuenta_cheques = false, $cheque2 = 0, $cuenta_cheques2 = 0, $observaciones = "", $fecha = false, $recibo = false, $tipo_de_pago = TESORERIA_PAGO_CHEQUE)
{
$sucess = true;
$monto_cheque = $monto_cheque == 0 ? $this->getMontoAutorizado() : $monto_cheque;
$cuenta_cheques = $cuenta_cheques == false ? DEFAULT_CUENTA_BANCARIA : $cuenta_cheques;
$cheque = setNoMenorQueCero($cheque);
$xSocio = new cSocio($this->mNumeroSocio);
$xSocio->init();
//Corrige la Inicializacion del credito
if (!isset($this->mNumeroSocio) or $this->mNumeroSocio == 1) {
$this->init();
}
$DIngreso = $xSocio->getDatosDeIngreso_InArray();
$msg = "";
//$tipo_de_pago = TESORERIA_PAGO_CHEQUE;
$recibo = setNoMenorQueCero($recibo);
$DConvenio = $this->getDatosDeProducto();
$idsolicitud = $this->mNumeroCredito;
$solicitud = $this->mNumeroCredito;
/* ------------------------------ obtiene el Monto Autorizado ---------------------------------- */
$dsol = $this->getDatosDeCredito();
$montoaut = $this->getMontoAutorizado();
// $dsol["monto_autorizado"]; // Monto Autorizado
$fvcred = $dsol["fecha_vencimiento"];
$modpagos = $this->getPeriocidadDePago();
$tasacred = $this->getTasaDeInteres();
$totalop = $montoaut;
$tipoaut = $dsol["tipo_autorizacion"];
$socio = $this->mNumeroSocio;
$intdi = $dsol["interes_diario"];
$diasa = $dsol["dias_autorizados"];
$tipoconvenio = $dsol["tipo_convenio"];
$elgrupo = $dsol["grupo_asociado"];
$grupo = $elgrupo;
$idsocio = $socio;
$fecha_propuesta = $dsol["fecha_ministracion"];
$tasa_ordinaria_de_interes = $tasacred;
$monto_autorizado_a_ministrar = $dsol["monto_autorizado"];
$grupo = $this->mGrupoAsociado;
if ($fecha == false) {
$fecha = $this->mFechaOperacion;
}
$socio = $this->mNumeroSocio;
//Valores conservados
$fechavcto = $fvcred;
$diasaut = $diasa;
$intdiario = $intdi;
/**
* Corrige la opcion de que el Cheque es Igual a Cero
*/
if ($monto_cheque == 0) {
$monto_cheque = $montoaut;
}
//Corrige el dato de recibo no valido
if ($recibo <= 0 and setNoMenorQueCero($this->mReciboDeOperacion) > 0) {
$recibo = $this->mReciboDeOperacion;
}
/* --------------------------------------------------------------------------------------------------------- */
$OConv = $this->getOProductoDeCredito($tipoconvenio);
if ($this->mForceMinistracion == false) {
// Checa si el credito ya fue Ministrado
//Modificar
$montomin = $this->getSumMovimiento(OPERACION_CLAVE_MINISTRACION);
if ($montomin > 1) {
$msg .= "ERROR\tEl credito se ha ministrado de forma parcial / Total, o se ha forzado su edicion; el Monto Ministrado es {$montomin} \r\n";
$sucess = false;
}
}
// verificar si tiene aportaciones sociales
if ($this->mForceMinistracion == false) {
$aportaciones = $xSocio->getAportacionesSociales();
$cuotas = $DIngreso["parte_social"] + $DIngreso["parte_permanente"];
if ($aportaciones < $cuotas) {
$msg .= "ERROR\tNo ha Pagado sus Cuotas Sociales por {$cuotas}, ha pagado {$aportaciones} \r\n";
$sucess = false;
}
}
// verificar si pago su fondo de defuncion. // SI ES DIFERENTE A AUTOMATIZADO
if ($this->mForceMinistracion == false) {
$fondo_def_ob = $DConvenio["monto_fondo_obligatorio"];
$fondo_def_pag = $xSocio->getFondoDeDefuncion();
if ($fondo_def_pag < $fondo_def_pag) {
$msg .= "ERROR\tNo ha Pagado sus Fondo de Defuncion por {$fondo_def_pag}, ha pagado {$fondo_def_pag} \r\n";
$sucess = false;
}
}
// condiciones del credito autorizado por sesion de credito.
//si el convenio Aplica Gtos Notariales
$aplica_gtos_not = $DConvenio["aplica_gastos_notariales"];
if ($aplica_gtos_not == 1 and $this->mForceMinistracion == false) {
$gastos_not_pagados = $this->getPagoDeGastosNotariales();
if ($gastos_not_pagados < TOLERANCIA_SALDOS) {
$msg .= "ERROR\tNo ha Pagado sus Gastos Notariales\r\n";
$sucess = false;
}
}
// verificar si tiene garantia liquida
$porc_garantia_liquida = $OConv->getTasaDeGarantiaLiquida();
if ($porc_garantia_liquida > 0 and $this->mForceMinistracion == false) {
$msg .= "WARN\tLa Garantia Liquida es de {$porc_garantia_liquida} sobre el Monto Autorizado\r\n";
if ($OConv->getEsProductoDeGrupos() == true) {
$condicionante_de_garantia_liquida = " (`socios_general`.`grupo_solidario` = {$elgrupo}) ";
$msg .= "WARN\tLa Garantia Liquida es valuado por GRUPO \r\n";
} else {
$condicionante_de_garantia_liquida = " (`socios_general`.`codigo` = {$idsocio})";
$msg .= "WARN\tLa Garantia Liquida es valuado por SOCIO \r\n";
}
$tgtia = $montoaut * $porc_garantia_liquida;
$subproducto_de_ahorro_inicial = CAPTACION_PRODUCTO_GARANTIALIQ;
$sqlSUMDepInicial = "\n\t\t\t\t\t\t\t\t\t\t\t\tSELECT\n\t\t\t\t\t\t\t\t\t\t\t\t\t`socios_general`.`grupo_solidario`,\n\t\t\t\t\t\t\t\t\t\t\t\t\tSUM(`captacion_cuentas`.`saldo_cuenta`) AS 'sumas'\n\t\t\t\t\t\t\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t\t\t\t\t\t\t`socios_general` `socios_general`\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tINNER JOIN `captacion_cuentas` `captacion_cuentas`\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tON `socios_general`.`codigo` = `captacion_cuentas`.`numero_socio`\n\t\t\t\t\t\t\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t\t\t\t\t\t\t(`captacion_cuentas`.`tipo_subproducto` ={$subproducto_de_ahorro_inicial})\n\t\t\t\t\t\t\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t\t\t\t\t\t\t{$condicionante_de_garantia_liquida}\n\t\t\t\t\t\t\t\t\t\t\t\tGROUP BY\n\t\t\t\t\t\t\t\t\t\t\t\t\t`socios_general`.`grupo_solidario`,\n\t\t\t\t\t\t\t\t\t\t\t\t\t`captacion_cuentas`.`tipo_cuenta` ";
$garliq = mifila($sqlSUMDepInicial, "sumas");
if ($garliq < $tgtia - TOLERANCIA_SALDOS) {
$msg .= "ERROR\tNo ha depositado el su totalidad la Garantia Liquida, ha Depositado {$garliq} de un total de {$tgtia} \r\n";
$msg .= "WARN\tRecuerde que el DEPOSITO DE LA GARANTIA LIQUIDA se efectua en el Modulo de Captacion \r\n";
$sucess = false;
}
}
//END: verificar Garantia
// VERIFICA LA GARANTIA SEGUN TIPO CONVENIO.- La seleccion se hace segun el Numero de Socio y no debe estar entregada
// NO APLICA EN GRUPOS SOLIDARIOS
$razon_garantias = $DConvenio["razon_garantia"];
if ($razon_garantias > 0 and $this->mForceMinistracion == false) {
$monto_garantizado = $xSocio->getGarantiasFisicasDepositadas();
$monto_a_garantizar = $montoaut * $razon_garantias;
if ($monto_garantizado < $monto_a_garantizar) {
$msg .= "ERROR\tNo ha garantizado el Total del Credito, se debe garantizar {$monto_a_garantizar} y solamente se tiene en resguardo {$monto_garantizado} \r\n";
$sucess = false;
}
}
// SI EL CREDITO ES AUTOMATIZADO
if ($modpagos == CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) {
$diasaut = restarfechas($fechavcto, $fecha);
//$dsol["dias_autorizados"]; // Dias Autorizados.
$msg .= "WARN\tLos dias Autorizados se cambian a {$diasaut}\r\n";
//$fechavcto = sumardias($fecha, $diasaut); // Fecha del Sistema + Dias Autorizados
$intdiario = $montoaut * $tasacred / EACP_DIAS_INTERES;
} else {
//Verifica si existe el Plan de Pagos:
$sqlck = "SELECT COUNT(tipo_docto) AS 'planes' FROM operaciones_recibos WHERE docto_afectado={$idsolicitud} AND tipo_docto=11";
$plan = $this->getNumeroDePlanDePagos();
if (!isset($plan) or empty($plan)) {
$msg .= "ERROR\tNo se ha Generado el PLAN DE PAGOS \r\n";
$sucess = false;
}
if (strtotime($fecha) != strtotime($fecha_propuesta)) {
$msg .= "ERROR\tNo se puede ministrar el Credito({$fecha}), ya que el PLAN DE PAGO de calcula desde la fecha " . getFechaLarga($fecha_propuesta) . ", vuelva a elaborar el PLAN DE PAGOS\r\n";
$sucess = false;
}
}
//VERIFICA EL ICA A PAGAR
$razon_interes_anticipado = $DConvenio["porcentaje_ica"];
$iva_incluido = $DConvenio["iva_incluido"];
$tasa_iva = $DConvenio["tasa_iva"];
//RULE: Modificar segun el Tipo de pago
if ($razon_interes_anticipado > 0 and $this->mForceMinistracion == false) {
// verifica si tiene el Pago de Int Anticipado
$sumia = $dsol["sdo_int_ant"];
$mIntDiario = $monto_autorizado_a_ministrar * $tasa_ordinaria_de_interes / EACP_DIAS_INTERES;
$mntia = $mIntDiario * $diasa * $razon_interes_anticipado - TOLERANCIA_SALDOS;
$MontoICA = $mntia;
if ($iva_incluido == '1') {
$MontoICA = $MontoICA * (1 / (1 + $tasa_iva));
}
if ($sumia < $MontoICA) {
$msg .= "ERROR\tNo se ha cubierto el Interes Anticipado, se ha pagado {$sumia} de {$MontoICA} \r\n";
$sucess = false;
} else {
//
}
}
if ($this->mForceMinistracion == true) {
$sucess = true;
$msg .= "WARN\tLa Ministracion es FORZADA \r\n";
}
/*------------------------------- AFECTACIONES ------------------------------------------------- */
if ($sucess == true) {
$monto = $montoaut;
$parcialidad = 1;
if ($monto != 0) {
$CRecibo = new cReciboDeOperacion(RECIBOS_TIPO_MINISTRACION, true, $recibo);
//Set a Mvto Contable
//$CRecibo->setGenerarPoliza();
$CRecibo->setGenerarTesoreria();
$CRecibo->setGenerarBancos(true);
//Agregar recibo si no hay
if (setNoMenorQueCero($recibo) <= 0) {
$recibo = $CRecibo->setNuevoRecibo($socio, $solicitud, $fecha, $parcialidad, RECIBOS_TIPO_MINISTRACION, $observaciones, $cheque, $tipo_de_pago, $recibo_fiscal, $grupo);
//Checar si se agrego el recibo
if (setNoMenorQueCero($recibo) > 0) {
$this->mMessages .= "OK\tSe Agrego Exitosamente el Recibo {$recibo} de la Cuenta " . $this->mNumeroCredito . " \r\n";
$this->mReciboDeOperacion = $recibo;
$this->mSucess = true;
} else {
$this->mMessages .= "ERROR\tSe Fallo al Agregar el Recibo {$recibo} de la Cuenta " . $this->mNumeroCredito . " \r\n";
$this->mSucess = false;
}
}
$this->mReciboDeOperacion = $recibo;
if (setNoMenorQueCero($recibo) > 0) {
//Agregar el Movimiento
$CRecibo->setNuevoMvto($fecha, $monto, OPERACION_CLAVE_MINISTRACION, $parcialidad, $observaciones, 1, TM_CARGO, $socio, $solicitud);
/** @since 2010-11-21 */
$this->addSDPM(0, 0, $fecha, 0, CREDITO_ESTADO_VIGENTE, $fecha, OPERACION_CLAVE_MINISTRACION);
//$this->mMessages .= $CRecibo->getMessages();
$this->mSucess = true;
} else {
$this->mMessages .= "ERROR\tNo Existe Recibo con el cual trabajar ({$recibo}) \r\n";
}
$CRecibo->setFinalizarRecibo(true);
$this->mMessages .= $CRecibo->getMessages();
}
// Actualiza el estatus del credito a Vigente, la fecha de Operacion y la de vencimiento.
$arrAct = array("fecha_ministracion" => $fecha, "fecha_ultimo_mvto" => $fecha, "estatus_actual" => CREDITO_ESTADO_VIGENTE, "fecha_vencimiento" => $fechavcto, "plazo_en_dias" => $diasaut, "dias_autorizados" => $diasaut, "interes_diario" => $intdiario, "saldo_actual" => $montoaut);
$this->setUpdate($arrAct);
// --------------------------------- ENVIA LAS SENTENCIAS SQL----------------------------------------
//verifica la dif entre cheque 1 y el monto a ministrar
if ($monto_cheque <= 0) {
$monto_cheque = $montoaut;
}
$difCheque = $montoaut - $monto_cheque;
$beneficiario = $xSocio->getNombreCompleto();
$descuento = 0;
//Separar la generación del cheque
setNuevoCheque($cheque, $cuenta_cheques, $recibo, $beneficiario, $monto_cheque, $fecha, false, $descuento);
setUltimoCheque($cuenta_cheques, $cheque);
if ($difCheque > 0) {
//setPolizaProforma($recibo, 9200, $difCheque, $socio, $idsolicitud, TM_ABONO);
setNuevoCheque($cheque2, $cuenta_cheques2, $recibo, $beneficiario, $difCheque, $fecha, false, $descuento);
setUltimoCheque($cuenta_cheques2, $cheque2);
}
//Agregar Avisos de Credito por renovacion
if ($this->getTipoDeAutorizacion() == CREDITO_TIPO_AUTORIZACION_RENOVACION) {
//$xSoc = $this->getOPersona();
$xSocio->initDatosDeCredito();
$DCreds = $xSocio->getDatosDeCreditos();
$xCred = new cCreditos_solicitud();
foreach ($DCreds as $clave => $valores) {
$xCred->setData($valores);
if ($xCred->saldo_actual()->v() >= TOLERANCIA_SALDOS) {
if ($xCred->numero_solicitud()->v() != $this->getNumeroDeCredito()) {
//agregar aviso
$xSocio->addMemo(MEMOS_TIPO_NOTA_RENOVACION, "Credito Renovado en la solicitud #" . $this->getNumeroDeCredito(), $xCred->numero_solicitud()->v(), $fecha);
$msg .= $xSocio->getMessages();
}
}
}
}
//ejecutar alertas por Ministracion de Reglas de Negocios
//Ministracion de Credito de la persona {clave_de_persona} {nombre_de_persona}
//credito numero {clave_de_credito} con monto {monto_de_credito} y tipo de autorizacion {tipo_de_autorizacion}.
$OTipoAut = new cCreditos_tipo_de_autorizacion();
$OTipoAut->setData($OTipoAut->query()->initByID($this->getTipoDeAutorizacion()));
$xRegla = new cReglaDeNegocio();
$xRegla->setVariables(array("clave_de_persona" => $xSocio->getCodigo(), "nombre_de_persona" => $xSocio->getNombreCompleto(), "clave_de_credito" => $this->getNumeroDeCredito(), "monto_de_credito" => $this->getMontoAutorizado(), "tipo_de_autorizacion" => $OTipoAut->descripcion_tipo_de_autorizacion()->v(OUT_TXT)));
$xRegla->setExecuteActions($xRegla->reglas()->RN_MINISTRAR_CREDITO);
} else {
$msg .= "ERROR\tNo se efectua operacion alguna\r\n";
}
$this->mMessages .= $msg;
return $recibo;
}
function getNombreSocio($codigo)
{
$xSoc = new cSocio($codigo);
$xSoc->init();
return $xSoc->getNombreCompleto();
}
$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");
//
$sql_d_mvto = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE recibo_afectado={$idrecibo}\n\t\t\t\t\t\tAND tipo_operacion=500 ";
$sql_d_inv = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE recibo_afectado={$idrecibo}\n\t\t\t\t\t\tAND tipo_operacion=223 ";
$sql_d_ide = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE\n\t\t\t\t\t\tfecha_operacion = '{$fechaRecibo}'\n\t\t\t\t\t\tAND docto_afectado = {$docto}\n\t\t\t\t\t\tAND tipo_operacion=235 ";
$xInv = new cCuentaInversionPlazoFijo($docto, $idsocio);
function getFicha($fieldset = false, $trTool = "", $extendido = false)
{
$Dcta = $this->getDatosInArray();
$xF = new cFecha();
$xLi = new cSQLListas();
$xQL = new MQL();
$rw = $Dcta;
$cuenta = $rw["numero_cuenta"];
$modalidad = $rw["tipo"];
$FApertura = getFechaMX($rw["fecha_apertura"]);
$tasa = $rw["tasa_otorgada"];
$producto = $rw["subproducto"];
$saldo = $rw["saldo_cuenta"];
$mancomunantes = $this->mNombreMancomunados;
$observaciones = $rw["observaciones"];
$tool = $trTool;
$thead = "";
$xL = new cLang();
if ($extendido == true) {
$xSoc = new cSocio($this->getClaveDePersona());
$xSoc->init();
$nombrepersona = $xSoc->getNombreCompleto();
$thead .= "<tr><th class='izq'>" . $xL->getT("TR.nombre completo") . "</th>";
$thead .= "<td colspan='3'>{$nombrepersona}</td><tr>";
}
//eOperations = false;
if (trim($mancomunantes) == "") {
} else {
$tool .= "<tr><th>" . $xL->getT("TR.Mancomunados") . "</th><td colspan='3'>{$mancomunantes}</td><tr>";
}
//Obtener Mancomunantes
/*$SQLMan = $xLi->getListadoDeRelaciones($this->getClaveDePersona(), $this->getNumeroDeCuenta(), PERSONAS_REL_MANCOMUNADO );
$rsMan = $xQL->getDataRecord($SQLMan);
if($xQL->getNumberOfRows() > 0){
$tool .= "<tr><th colspan='4'>" . $xL->getT("TR.Mancomunados") . "</th><tr>";
foreach ($rsMan as $rowM){
//$idmanco =
$tool .= "<tr>";
$tool .= "<td>";
$tool .= "</tr>";
}
}*/
if ($this->mTipoDeCuenta == CAPTACION_TIPO_PLAZO) {
$thead = $thead == "" ? "" : "<thead>{$thead}</thead>";
$exoFicha = "\n\t\t\t\t<table id='ficha-captacion'>\n\t\t\t\t\t{$thead}\n\t\t\t\t<tbody>\n\t\t\t\t<tr>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.clave_de_cuenta") . "</th>\n\t\t\t\t\t<td>" . $this->mNumeroCuenta . "</td>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.Producto") . "</th>\n\t\t\t\t\t<td>" . $Dcta["subproducto"] . "</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.Fecha de Operacion") . "</th>\n\t\t\t\t\t<td>" . $xF->getFechaCorta($Dcta["apertura"]) . "</td>\n\t\t\t\t\t<th class='izq'>Fecha de Vencimiento</th>\n\t\t\t\t\t<td>" . $xF->getFechaCorta($Dcta["vencimiento"]) . "</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.tasa actual") . "</th>\n\t\t\t\t\t<td class='mny'> % " . $Dcta["tasa"] * 100 . "</td>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.dias de Inversion") . "</th>\n\t\t\t\t\t<td class='mny'>" . $Dcta["dias"] . "</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.saldo") . "</th><td class='mny'>" . getFMoney($Dcta["saldo"]) . "</td>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.observaciones") . "</th><td>" . $Dcta["observaciones"] . "</td>\n\t\t\t\t</tr>\n\t\t\t\t{$tool}\n\t\t\t\t</tbody>\n\t\t\t\t</table>";
} elseif ($this->mTipoDeCuenta == CAPTACION_TIPO_VISTA) {
$thead = $thead == "" ? "" : "<thead>{$thead}</thead>";
$exoFicha = "\n\t\t\t\t<table id='ficha-captacion'>\n\t\t\t\t{$thead}\n\t\t\t\t<tbody>\n\t\t\t\t<tr>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.clave_de_cuenta") . "</th><td>{$cuenta}</td>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.Fecha de Registro") . "</th><td>" . $xF->getFechaCorta($FApertura) . "</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.tipo") . "</th><td>{$modalidad}</td>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.producto") . "</th><td>{$producto}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.tasa") . "</th><td class='mny'>% " . getFMoney($tasa * 100) . "</td>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.saldo") . "</th><td class='mny'>" . getFMoney($saldo) . "</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.notas") . "</th><td colspan='3'>{$observaciones}</td>\n\t\t\t\t</tr>\n\t\t\t\t{$tool}\n\t\t\t\t</tbody>\n\t\t\t\t</table>";
} else {
}
if ($fieldset == true) {
$exoFicha = "<fieldset>\n\t\t\t\t\t\t\t\t<legend> " . $xL->getT("TR.Ficha de datos") . " </legend>\n\t\t\t\t\t\t\t\t{$exoFicha}\n\t\t\t\t\t\t\t</fieldset>";
}
return $exoFicha;
}
$xCred = new cCredito($idsolicitud);
$xCred->initCredito();
$acreditante = $xCred->getClaveDePersona();
$xFMT = new cFormato($formato);
$xFMT->setCredito($idsolicitud);
$xFMT->setProcesarVars();
echo $xFMT->get();
$mSQL = new cSQLListas();
$mql = new MQL();
$sql = $mSQL->getListadoDeAvales($idsolicitud, $acreditante);
$rs = $mql->getDataRecord($sql);
//setLog($sql);
$forma = 5002;
//$xAval = new cSocios_relaciones();
foreach ($rs as $rows) {
echo "<br class='nuevapagina' />";
$persona = $rows["numero_socio"];
$idrelacion = $rows["num"];
$xSoc = new cSocio($persona);
//$xRel = new cPersonasRelaciones($idrelacion); $xRel->init();
if ($xSoc->init() == true) {
$xFMT2 = new cFormato($forma);
$xFMT2->setCredito($idsolicitud);
$xFMT2->setProcesarVars(array("aval_nombre_completo" => $xSoc->getNombreCompleto()));
echo $xFMT2->get();
}
}
?>
</body>
</html>
$xFRM->addHElem("<hr />");
$DDOM = $xSoc->getODomicilio();
if ($DDOM == null) {
} else {
$DEstado = $DDOM->getOEstado();
$xFRM->addHElem("<p>El Nombre es " . $DDOM->getEstado() . "</p>");
$xFRM->addHElem("<p>La clave SIC es " . $DDOM->getClaveDeEstadoEnSIC() . "</p>");
}
$xFRM->addHTML("<p class='aviso'>" . $xColonia->getMessages(OUT_HTML) . "</p>");
$xFRM->addHTML("<h3>DATOS FISCALES</h3>");
$xFRM->addHTML("<p class='aviso'>RFC evaluado : " . $xSoc->getRFC(true) . "</p>");
$xFRM->addHTML("<p class='aviso'>RFC evaluado/ret: " . $xSoc->getRFC(true, true) . "</p>");
$xFRM->addHTML("<p class='aviso'>RFC : " . $xSoc->getRFC() . "</p>");
//Iniciar por CURP
if ($xSoc->initByIDLegal("RACD-890730- KC3") == true) {
$xFRM->addHElem("<p>El Nombre es por CURP ES " . $xSoc->getNombreCompleto() . "</p>");
$xID = new cIDLegal($xSoc->getCURP());
$xFRM->addHElem("<p>La fecha por CURP es " . $xID->getFechaCreacion() . "</p>");
}
$xLoc = new cDomicilioLocalidad(false);
$xLoc->setBuscar("MERXICA", 4, 1, "MX");
$xFRM->addAviso($xLoc->getNombre());
//$xC = new cSocios_general();
/*$query = $xC->query()->select();
$query->where("codigo > 0");
$rs = $query->exec();
foreach ($rs as $rows){
$xC->setData($rows);
echo $xC->nombrecompleto()->v();
}*/
$xFRM->addHElem("<hr />");
