function jsGetSaldoCuenta($cuenta, $socio)
{
$xCta = new cCuentaDeCaptacion($cuenta, $socio);
$DC = $xCta->getDatosInArray();
$montoRet = $DC["saldo_cuenta"];
//$xCta->getMaximoRetirable();
$tab = new TinyAjaxBehavior();
$tab->add(TabSetValue::getBehavior("idMonto", $montoRet));
$tab->add(TabSetValue::getBehavior("idLetras", convertirletras($montoRet)));
return $tab->getString();
}
$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>
$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");
}
$iduser = $_SESSION["log_id"];
//=====================================================================================================
//$xH = new cHObject(HP_SERVICE);
$xInit = new cHPage(HP_SERVICE);
//header("Content-type: text/xml");
header('Content-type: application/json');
$txt = "";
$action = "";
$DDATA = $_REQUEST;
$action = isset($DDATA["action"]) ? $DDATA["action"] : SVC_LIST;
$arg = parametro("arg1", 0, MQL_FLOAT);
$arg2 = parametro("arg2", AML_CLAVE_MONEDA_LOCAL);
$rs = array();
$money = new cTesoreria_monedas();
$money->setData($money->query()->initByID($arg2));
$valor_local = $money->quivalencia_en_moneda_local()->v();
$valor = $arg * $valor_local;
$letras = convertirletras($valor, $arg2);
$rs["equivalencia"] = $valor;
$rs["letras"] = $letras;
$rs["cotizacion"] = $valor_local;
echo json_encode($rs);
//echo "{ \"valor\" : $valor, \"letras\" : \"$letras\" }";
//$xLog = new cSystemLog();
//$xLog->setRotate();
//$xLog->setSave($sql);
//$xT->clave_de_actividad()
//print json_encode($jTableResult);
/*
echo "<?xml version =\"1.0\" ?>\n<data>\n" . $txt . "</data>";
*/
$imora = $rt["tasa_moratorio"];
$idgrupo = $rt["grupo_asociado"];
$codigorep = $rt["numero_socio"];
$periocidad = $rt["periocidad_de_pago"];
}
if (EACP_INCLUDE_INTERES_IN_PAGARE == true) {
if ($periocidad == 360) {
$monto = $monto + $idiario * $dias;
} else {
$sqlInt = "SELECT\n\t\t\t\t\t\t`operaciones_mvtos`.`docto_afectado`,\n\t\t\t\t\t\t`operaciones_mvtos`.`tipo_operacion`,\n\t\t\t\t\t\tCOUNT(`operaciones_mvtos`.`idoperaciones_mvtos`) AS `mvtos`,\n\t\t\t\t\t\t\tSUM(`operaciones_mvtos`.`afectacion_real` *\n\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`afectacion`) AS 'monto'\n\t\t\t\t\tFROM\n\t\t\t\t\t`operaciones_mvtos` `operaciones_mvtos`\n\t\t\t\t\t\tINNER JOIN `eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` =\n\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`miembro`\n\t\t\t\t\tWHERE\n\t\t\t\t\t\t(`operaciones_mvtos`.`docto_afectado` = {$idsolicitud})\n\t\t\t\t\t\tAND\n\t\t\t\t\t\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` = 2601)\n\t\t\t\t\t\tGROUP BY\n\t\t\t\t\t\t\t`operaciones_mvtos`.`docto_afectado`,\n\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`\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`,\n\t\t\t\t\t\t\t`operaciones_mvtos`.`fecha_afectacion`,\n\t\t\t\t\t\t\t`operaciones_mvtos`.`socio_afectado`\n\t\t\t\t\t";
$xF = obten_filas($sqlInt);
$monto = $xF["monto"];
}
}
$tasamor = $imora * 100 / 12;
$montoletras = convertirletras($monto);
$monto = getFMoney($monto);
$nombrerep = getNombreSocio($codigorep);
$domrep = sociodom($codigorep);
$isnow = fecha_larga();
$fecha = fecha_larga($fecha);
echo "<table width='100%' border='0'>\n <tr>\n <td bordercolor='#000000' class='bigtitle'>PAGARE</td>\n <td></td>\n <td>Numero 01/01</td>\n <td></td>\n <td class='midtitle'>Bueno por : </td>\n <td class='midtitle'>\$ {$monto}</td>\n </tr>\n\t\t<tr>\n\t\t <td> </td>\n\t\t <td> </td>\n\t\t <td> </td>\n\t\t <td> </td>\n\t\t <td class='numc'>EN " . DEFAULT_NOMBRE_LOCALIDAD . ", " . DEFAULT_NOMBRE_ESTADO . " a:</td>\n\t\t <td class='numc'>{$isnow}</td>\n\t </tr>\n\t\t<tr>\n\t\t <td colspan='6' class='legal'>Debo(emos) y Pagare(mos) incondicionalmente por este PAGARE\n\t\t a la orden de <b>" . EACP_NAME . "</b> ubicada en <b>" . EACP_DOMICILIO_CORTO . "</b> o\n\t\t en cualquier otra que se me(nos) solicite el pago, el dia <b>{$fecha}</b> la cantidad de <b>\$ {$monto}</b>\n\t\t - - - - - - - - - - - - - - - - - - - - - -\n\t\t <b>son:({$montoletras})</b> - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -\n\t\t - - - - - - - - - - - - - - - - - - - - - - - - - - - - Valor recibido a mi(nuestra) entera\n\t\t satisfacción. Este PAGARÉ forma parte de una serie numerada del 01/01 y todos estan sujetos\n\t\t a la condición de que, al no pagarse cualquiera de ellos a su vencimiento, seran exigibles\n\t\t todos los que sigan en número, ademas de los ya vencidos. Desde la fecha de este documento\n\t\t hasta el dia de su liquidacion, causara intereses moratorios al tipo de <b>{$tasamor} % </b> Mensual, pagadero\n\t\t en esta ciudad o cualquier otra plaza donde me(nos) sea exigido, conjuntamente con el principal.</td>\n\t </tr>\n\t\t<tr>\n\t\t <td colspan='6'> </td>\n\t </tr>\n\t</table>\n\t<p class='order'>\n\tAcepto\n\t<br />\n\t<br />\n\t<br />\n\t<br />\n\t____________________________________\n\t<br />\n\t{$nombrerep}<br />\n\t{$domrep}<br />\n\t</p>\n<p class='bigtitle'>AVAL(ES)</b>\n";
$segpo = "SELECT codigo FROM socios_general WHERE grupo_solidario={$idgrupo} AND codigo!={$codigorep}";
$rsgpo = mysql_query($segpo);
while ($rwg = mysql_fetch_array($rsgpo)) {
$name = getNombreSocio($rwg[0]);
$dom = sociodom($rwg[0]);
echo "\t<p class='order'>\n\tAcepto Incondicionalmente las Obligaciones de este Pagaré, como si del deudor Principal se tratará<br>\n\t<br>\n\t<br>\n\t<br>\n\t____________________________________<br>\n\t{$name}<br>\n\tDireccion: {$dom}<br>\n\t</p>";
}
@mysql_free_result($rsgpo);
?>
function letras()
{
return convertirletras($this->mValor, $this->mMoneda);
}
$dmvto = obten_filas($sql_d_mvto);
$dInv = obten_filas($sql_d_inv);
$dIDE = obten_filas($sql_d_ide);
//
$iSocio = new cFicha(iDE_SOCIO, $idsocio);
$iSocio->setTableWidth();
$iSocio->show();
echo "<hr />";
$cInv = new cFicha(iDE_CINVERSION, $docto);
$cInv->setTableWidth();
$cInv->show();
?>
<hr />
<?php
$tasa = getFMoney($dcuentas["tasa_otorgada"] * 100);
$interes = getFMoney($dmvto["afectacion_real"]);
//$capital = getFMoney($dInv["afectacion_real"]);
$capital = getFMoney($dcuentas["saldo_cuenta"]);
$dias = $dcuentas["dias_invertidos"];
$isr = getISRByInversion($dcuentas["saldo_cuenta"], $dias);
$isr = round($isr, 2);
$ide = $dIDE["afectacion_real"];
//$ide = 0;
$aliquidar = $dInv["afectacion_real"] + $dmvto["afectacion_real"] - ($isr + $ide);
$vencimiento = $dcuentas["inversion_fecha_vcto"];
echo "\n<table width='75%'>\n <tr>\n <td width='15%'> </td>\n <td width='15%'> </td>\n\n <th>Fecha de Apertura:</th>\n <td>{$dcuentas['5']}</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Fecha de Vencimiento:</th>\n <td>{$vencimiento}</td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <td></td>\n <td></td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Dias Invertidos:</th>\n <td class='mny'>{$dias}</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Tasa Otorgada</th>\n <td class='mny'>{$tasa} %</td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <td></td>\n <td></td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Capital Invertido:</th>\n <td class='mny'>{$capital}</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Interes Generado:</th>\n <th class='mny'>{$interes}</th>\n <td></td>\n </tr>\n<!-- ISR -->\n <tr>\n <td> </td>\n <td> </td>\n\n <th>ISR a Retener:</th>\n <th class='mny'>(" . getFMoney($isr) . ")</th>\n <td></td>\n </tr>\n\n<!-- IDE -->\n<!-- <tr>\n <td> </td>\n <td> </td>\n\n <th>IDE Retenido:</th>\n <th class='mny'>(" . getFMoney($ide) . ")</th>\n <td></td>\n </tr> -->\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>A Liquidar</th>\n <td class='mny'>" . getFMoney($aliquidar) . "</td>\n <td> </td>\n </tr>\n <tr>\n \t<td />\n \t<td />\n \t<th colspan='3'>" . convertirletras($aliquidar) . "</th>\n </tr>\n</table>\n<p class='legal'>El Impuesto a Depositos en Efectivo Cobrado en esta transaccion es de " . getFMoney($ide) . " </p>\n<hr />\n<table border='0' width='100%'>\n\t<tr>\n\t<td><center>Firma de CONFORMIDAD</td>\n\t<td><center>GENERO LA REINVERSION</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>{$nombre}\n\t</td>\n\t\t<td><center>{$oficial}</center></td>\n\t</tr>\n</table>\n";
echo getRawFooter();
?>
</body>
</html>
$idsocio = $datos_de_la_cuenta["numero_socio"];
$tasa = $datos_de_la_cuenta["tasa_otorgada"];
$tasa = $tasa * 100;
$xSoc = new cSocio($idsocio);
$xSoc->init();
$DSoc = $xSoc->getDatosInArray();
$domicilio_del_socio = $xSoc->getDomicilio();
$nombre_del_socio = $xSoc->getNombreCompleto();
$numero_de_socio = $idsocio;
$caja_local = eltipo("socios_cajalocal", $DSoc["cajalocal"]);
/**
* Busca el Primer Deposito del Socio.
*/
$datos_primer_deposito = obten_filas("SELECT * FROM operaciones_mvtos WHERE docto_afectado={$idcuenta} ORDER BY fecha_operacion LIMIT 0,1");
$monto_inicial = $datos_primer_deposito[7];
$monto_inicial_letras = convertirletras($monto_inicial);
$numero_dias = $datos_primer_deposito[29];
$variable_lugar = $eacp_estado . ", " . $eacp_municipio;
$variable_fecha_actual = fecha_larga();
$variable_tasa_otorgada = $datos_de_la_cuenta["tasa_otorgada"] * 100;
$variable_fecha_vencimiento = fecha_larga($datos_primer_deposito[11]);
$variable_oficial = $oficial;
/**
* Obtiene la Lista de Beneficiados
*/
$beneficiados = "";
$sql_beneficiados = "SELECT * FROM socios_relaciones WHERE tipo_relacion=11 AND socio_relacionado={$idsocio} LIMIT 0,100";
$rs_beneficiados = mysql_query($sql_beneficiados);
while ($row_beneficiado = mysql_fetch_array($rs_beneficiados)) {
$beneficiados = $beneficiados . "<li>{$row_beneficiado['6']} {$row_beneficiado['7']} {$row_beneficiado['5']}</li> ";
}
$xFRM = new cHForm("frmTest", "./test.php");
$xHTxt = new cHText("");
$xHChk = new cHCheckBox();
$xFRM->setTitle("TR.Pruebas HTML");
//$xFRM->addHTML("<p>Esto es un parrafo de prueba</p>");
$xFRM->addHElem($xHChk->get("id1"));
$xFRM->addHElem($xHChk->get("id2"));
$xFRM->addHElem($xHChk->get("id3"));
$xFRM->addHElem($xHChk->get("id4"));
$xSoc = new cSocios_general();
$xSoc->setData($xSoc->query()->initByID(DEFAULT_SOCIO));
var_dump($xSoc->query()->getCampos());
//$xFRM->addAviso( $xSoc->query()->getListaDeCampos() );
$xFRM->OMoneda("ix", 4500, convertirletras("4,455.05"));
$xFRM->OMoneda("ix", 4500, convertirletras("4454.455.05"));
$xFRM->OMoneda("ix", 4500, convertirletras(45000));
//echo $xFRM->get();
$xTabla = new cCreditos_tipoconvenio();
$xFRM = new cHForm("frmcreditos_tipoconvenio", "creditos_tipoconvenio");
$xFRM->addSubmit();
$xEmp = new cEmpresas(100);
$xEmp->init();
if ($xEmp->getOPersona() == null) {
$xFRM->OText("idper", "SIN PERSONA", "TR.Persona");
} else {
$xPer = $xEmp->getOPersona()->init();
$xFRM->OText("idper", $xEmp->getOPersona()->getNombreCompleto(), "TR.Persona");
}
echo $xFRM->get();
#require('lib/gantti.php');
#date_default_timezone_set('UTC');
$fechaaut = $rwc[2];
$taut = $rwc[13];
$tipoaut = " ANALITICA MEDIANTE COMITE U OFICIAL DE CREDITO, CERTIFICADO CON EL DOCUMENTO {$rwc['6']}";
if ($taut == 2) {
$tipoaut = " AUTOMATIZADA; POR TENER LOS FONDOS SUFICIENTES";
}
$perpagos = eltipo("creditos_periocidadpagos", $rwc[10]);
$modal = eltipo("creditos_modalidades", $rwc[11]);
$eldest = eltipo("creditos_destinos", $rwc[19]);
$tconvenio = eltipo("creditos_tipoconvenio", $rwc[19]);
$montoaut = number_format($rwc[4], 2, '.', ',');
$montosol = number_format($rwc[3], 2, '.', ',');
$numpagos = $rwc[16];
// pagos aut...
$fechavenct = $rwc["fecha_vencimiento"];
$montol = convertirletras($rwc[4]);
$diasaut = $rwc[17];
$tasa = $rwc[9] * 100;
$fechamin = $rwc["fecha_ministracion"];
}
// end while
@mysql_free_result($rscred);
?>
<p class="bigtitle">ORDEN DE DESEMBOLSO</p>
<?php
echo "<p class='order'>NUMERO DE ORDEN: {$idsolicitud} </p>";
?>
<br>
<?php
echo "<p class='p_right'>" . DEFAULT_NOMBRE_LOCALIDAD . ", " . DEFAULT_NOMBRE_ESTADO . "; A " . fecha_larga() . "</p>";
?>
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);
}
//el socio no existe
$msg .= "{$iReg}\t{$socio}\t{$credito}\tERROR\tLa Persona o el Credito NO EXISTE, Verifique su informacion\r\n";
}
} else {
$msg .= "{$iReg}\t{$socio}\t{$credito}\tERROR\tEl credito {$credito} de la persona {$socio} no se pudo leer\r\n";
}
if (!$socio or $socio == "") {
$td = "";
$msg .= "{$iReg}\t.\t.\tALERTA\tLa Linea({$iReg}) no se Imprimio ({$bufer})\r\n";
} else {
echo $td;
$iReg++;
}
}
fclose($gestor);
echo "\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<th />\n\t\t\t\t\t\t\t\t\t<th colspan='3'>SUMAS</th>\n\t\t\t\t\t\t\t\t\t<th />\n\t\t\t\t\t\t\t\t\t<th class='mny'>" . getFMoney($SCapital) . "</th>\n\t\t\t\t\t\t\t\t\t<th class='mny'>" . getFMoney($SInteres) . "</th>\n\t\t\t\t\t\t\t\t\t<th class='mny'>" . getFMoney($SIva) . "</th>\n\t\t\t\t\t\t\t\t\t<th class='mny'>" . getFMoney($SAhorro) . "</th>\n\t\t\t\t\t\t\t\t\t<th class='mny'>" . getFMoney($STotal) . "</th>\n\t\t\t\t\t\t\t\t\t<th />\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<th />\n\t\t\t\t\t\t\t\t\t<th colspan='8'>" . convertirletras($STotal) . "</th>\n\t\t\t\t\t\t\t\t\t<th>Diferencias</th>\n\t\t\t\t\t\t\t\t\t<th class='warn'>" . getFMoney($diferencias) . "</th>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<th />\n\t\t\t\t\t\t\t\t\t<th colspan='2'>Numero de Cheque</th>\n\t\t\t\t\t\t\t\t\t<th><input type=\"text\" id=\"cCheque\" value=\"\" size='8' /></th>\n\t\t\t\t\t\t\t\t\t\n\t\t\t\t\t\t\t\t\t<th colspan='2'>Observaciones</th>\n\t\t\t\t\t\t\t\t\t<th colspan='3'><input type=\"text\" id=\"cObservaciones\" value=\"\" size='35' /></th>\n\t\t\t\t\t\t\t\t\t<th id=\"idThGo\"><input type=\"button\" value=\"Enviar Pago\" onclick=\"addNewMvto()\" id=\"idButtonGo\" /></th>\n\t\t\t\t\t\t\t\t\t<th />\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t</tbody>\n\n\t\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t\t\t<input type=\"hidden\" name=\"maxCounts\" value=\"{$iReg}\" />";
$html = new cHObject();
$hmsg = $html->Out($msg, "html");
echo "<p class ='aviso'>{$hmsg}</p>";
//echo $msg;
}
$xLog = new cFileLog("recibo_masivo_num_" . $_SESSION["recibo_en_proceso"]);
$xLog->setWrite($msg);
} else {
echo "<p class='aviso'>EL TIPO DE ARCHIVO DE " . $usrFiles[$i]['name'] . "(" . $mExt . ") NO SE ACEPTA</p>";
}
}
}
}
if (!isset($iReg)) {
$iReg = 0;
$codigo_rep_social = $InfoGrupo["representante_numerosocio"];
$nombre_voc_vigila = $InfoGrupo["vocalvigilancia_nombrecompleto"];
$nombre_del_grupo = $InfoGrupo["nombre_gruposolidario"];
$nivel_ministracion = $InfoGrupo["nivel_ministracion"];
$domicilio_rep_social = domicilio($codigo_rep_social);
$tabla_asociadas = "";
$lista_asociadas = "";
if ($DCred["grupo_asociado"] != 99) {
$SQL_get_grupo = "SELECT\n\t\t\t\t\t\t\t\t`socios_general`.`codigo`,\n\t\t\t\t\t\t\t\tCONCAT(`socios_general`.`nombrecompleto`, ' ',\n\t\t\t\t\t\t\t\t`socios_general`.`apellidopaterno`, ' ',\n\t\t\t\t\t\t\t\t`socios_general`.`apellidomaterno`) AS 'nombre_completo'\n\t\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t`socios_general` `socios_general`\n\t\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t\t(`socios_general`.`grupo_solidario` =" . $DCred["grupo_asociado"] . ")";
$rsg = mysql_query($SQL_get_grupo, cnnGeneral());
$il = 0;
while ($rwt = mysql_fetch_array($rsg)) {
if ($il == 0) {
$lista_asociadas .= "" . $rwt["nombre_completo"];
} else {
$lista_asociadas .= ", " . $rwt["nombre_completo"];
}
$il++;
}
}
//variable_firmas_de_obligados_solidarios
$vars = array("variable_nombre_del_socio" => $DCred["apellidopaterno"] . " " . $DCred["apellidomaterno"] . " " . $DCred["nombrecompleto"], "variable_nombre_de_la_sociedad" => EACP_NAME, "variable_nombre_de_la_entidad" => EACP_NAME, "variable_domicilio_del_socio" => $domicilio_del_socio, "variable_documento_de_constitucion_de_la_sociedad" => EACP_DOCTO_CONSTITUCION, "variable_rfc_de_la_entidad" => EACP_RFC, "variable_rfc_del_socio" => $DCred["rfc"], "variable_curp_del_socio" => $DCred["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_lista_de_beneficiados" => $lst_beneficiados, "variable_numero_de_socio" => $numero_de_socio, "variable_nombre_caja_local" => $caja_local, "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" => $fecha_de_vencimiento, "variable_monto_garantia_liquida" => getFMoney($monto_garantia_liquida), "variable_tasa_mensual_de_interes_moratorio" => $tasa_interes_mensual_moratorio . " %", "variable_tasa_de_garantia_liquida" => $tasa_garantia_liquida . " %", "variable_plan_de_pagos" => $splan_pagos, "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_nombre_de_la_representante_social" => $nombre_rep_social, "variable_listado_de_integrantes" => $lista_asociadas, "variable_nombre_de_la_vocal_de_vigilancia" => $nombre_voc_vigila, "variable_nombre_del_grupo_solidario" => $nombre_del_grupo, "variable_domicilio_de_la_representante_social" => $domicilio_rep_social, "variable_meses_de_duracion_del_credito" => $meses_del_credito, "variable_en_letras_monto_ministrado" => convertirletras($monto_ministrado), "variable_grupo_nivel_ministracion" => $nivel_ministracion, "variable_credito_fecha_de_ministracion" => getFechaLarga($fecha_de_ministracion));
$texto_contrato = contrato(5, "texto_del_contrato");
foreach ($vars as $key => $value) {
$texto_contrato = str_replace($key, $value, $texto_contrato);
}
echo $texto_contrato;
echo getRawFooter();
?>
</body>
</html>
echo $xHP->setBodyinit();
echo getRawHeader();
$sqlrec = "SELECT * FROM operaciones_recibos WHERE idoperaciones_recibos={$recibo}";
$xRec = new cReciboDeOperacion();
$xRec->setNumeroDeRecibo($recibo, true);
$DRec = $xRec->getDatosReciboInArray();
$idsocio = $DRec["numero_socio"];
$tiporec = $DRec["tipo_docto"];
$docto = $DRec["docto_afectado"];
$oficial = $xRec->getOUsuario()->getNombreCompleto();
$eltitulo = eltipo("operaciones_recibostipo", $tiporec);
echo "<hr /><p class='bigtitle'>{$eltitulo}</p><h />";
// $anotacion = "";
$totaloperacion = $DRec["total_operacion"];
$total_fmt = getFMoney($totaloperacion);
$montoletras = convertirletras($totaloperacion);
// obtiene datos del socio
$xSoc = new cSocio($idsocio);
$xSoc->init();
$DSoc = $xSoc->getDatosInArray();
if ($idsocio != DEFAULT_SOCIO) {
$nombre = $xSoc->getNombreCompleto();
} else {
$nombre = $DRec["cadena_distributiva"];
}
$direccion = sociodom($idsocio);
$rfc = $DSoc["rfc"];
$curp = $DSoc["curp"];
// obtiene datos del documento que ayudaran al detalle en contabilidad
$observaciones = mifila($sqlrec, "observacion_recibo");
echo "<table width='100%' border='0'>\n <tr>\n <td class='title'>Clave de Persona</td>\n <td>{$idsocio}</td>\n <td class='title'>Nombre Completo</td>\n <td>{$nombre}</td>\n </tr>\n <tr>\n \t<td class='title'>Domicilio</td>\n \t<td colspan='3'>{$direccion}</td>\n </tr>\n <tr>\n <td class='title'>R. F. C.</td> <td>{$rfc}</td>\n <td class='title'>C. U. R. P.</td> <td>{$curp}</td>\n </tr>\n <tr>\n <td class='title'>Rec. Fiscal</td>\t<td><b>" . $DRec["recibo_fiscal"] . "</b></td>\n <td class='title'>Tipo de Pago</td> <td>" . strtoupper($DRec["tipo_pago"]) . "</td>\n </tr>\n</table>\n<hr>\n";
$fichas_de_avales = "_NO_APLICA_";
$fichas_de_respsolidarios = "_NO_APLICA_";
$firmas_de_respsolidarios = "_NO_APLICA_";
//Captacion
$numero_de_cuenta = "_NO_APLICA_";
$nombre_mancomunados = "_NO_APLICA_";
$variable_tasa_otorgada = "_NO_APLICA_";
$variable_fecha_vencimiento = "_NO_APLICA_";
$numero_dias = "_NO_APLICA_";
$monto_inicial_letras = "_NO_APLICA_";
$monto_inicial = "_NO_APLICA_";
$monto_letras = "_NO_APLICA_";
$variable_oficial = "_NO_APLICA_";
$descripcion_cajalocal = "_NO_APLICA_";
//Datos de tesoreria
$vars = array("variable_nombre_del_socio" => $variable_nombre_del_socio, "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_lista_de_beneficiados" => $variable_lista_beneficiados, "variable_numero_de_socio" => $numero_de_socio, "variable_nombre_caja_local" => $caja_local, "variable_caja_local" => $numero_caja_local, "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_monto_garantia_liquida" => getFMoney($monto_garantia_liquida), "variable_tasa_mensual_de_interes_moratorio" => $tasa_interes_mensual_moratorio . " %", "variable_tasa_de_garantia_liquida" => $tasa_garantia_liquida . " %", "variable_plan_de_pagos" => $splan_pagos, "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_nombre_de_la_representante_social" => $nombre_rep_social, "variable_listado_de_integrantes" => $lista_asociadas, "variable_nombre_de_la_vocal_de_vigilancia" => $nombre_voc_vigila, "variable_nombre_del_grupo_solidario" => $nombre_del_grupo, "variable_domicilio_de_la_representante_social" => $domicilio_rep_social, "variable_meses_de_duracion_del_credito" => $meses_del_credito, "variable_en_letras_monto_ministrado" => convertirletras($monto_ministrado), "variable_credito_fecha_de_ministracion" => getFechaLarga($fecha_de_ministracion), "variable_informacion_del_socio" => $ficha_socio, "variable_avales_en_fichas" => $fichas_de_avales, "variable_responsable_solidario_en_fichas" => $fichas_de_respsolidarios, "variable_firmas_de_obligados_solidarios" => $firmas_de_respsolidarios, "variable_numero_de_cuenta" => $numero_de_cuenta, "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_nombre_mancomunados" => $nombre_mancomunados, "variable_tasa_otorgada" => $variable_tasa_otorgada, "variable_nombre_del_cajero" => $variable_nombre_del_cajero, "variable_fecha_del_recibo" => $variable_fecha_del_recibo, "variable_monto_del_recibo_en_letras" => $variable_monto_del_recibo_en_letras, "variable_monto_del_recibo" => $variable_monto_del_recibo, "variable_tipo_de_recibo" => $variable_tipo_de_recibo, "variable_tipo_de_pago" => $variable_tipo_de_pago, "variable_observacion_del_recibo" => $variable_observacion_del_recibo, "variable_marca_de_tiempo" => $variable_marca_de_tiempo, "variable_datos_del_pago" => $variable_datos_de_pago, "variable_numero_de_recibo" => $variable_numero_de_recibo, "variable_docto_fecha_larga_actual" => $xF->getFechaLarga($xRec->getFechaDeRecibo()));
/*,
"variable_operacion_nombre_corto" => $variable_operacion_nombre_corto*/
$texto_contrato = contrato(400, "texto_del_contrato");
//$tamTexto = strlen($texto_contrato);
//Buscar la parte que define el formato de Movimientos
$IniMvtos = strpos($texto_contrato, "---");
$FinMvtos = strrpos($texto_contrato, "---");
$txtMvtos = str_replace("---", "", substr($texto_contrato, $IniMvtos, $FinMvtos - $IniMvtos));
$aSQL = explode("|", $txtMvtos);
//extrae la cadena del formato de movimientos
//eliminar esa parte del contrato
$texto_contrato = str_replace("---{$txtMvtos}---", "_AREA_DE_MOVIMIENTOS_", $texto_contrato);
//echo "$tamTexto .. $IniMvtos .. $FinMvtos <br >";
$equivTit = array("numero_del_movimiento" => "#Op.", "concepto_del_movimiento" => "Concepto", "monto_del_movimiento" => "Monto", "destino_del_movimiento" => "Destino");
//"concepto_nombre_corto" => "Concepto"
<?php
//=====================================================================================================
//=====> INICIO_H
include_once "../core/go.login.inc.php";
include_once "../core/core.error.inc.php";
include_once "../core/core.html.inc.php";
include_once "../core/core.init.inc.php";
$theFile = __FILE__;
$permiso = getSIPAKALPermissions($theFile);
if ($permiso === false) {
header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//<===== FIN_H
//=====================================================================================================
$xInit = new cHPage(HP_SERVICE);
//header("Content-type: text/xml");
header('Content-type: application/json');
$cantidad = parametro("cantidad", 0, MQL_FLOAT);
echo json_encode(array("letras" => convertirletras($cantidad)));
$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>";
echo "\n\t\t<fieldset>\n\t\t<legend>[ Datos Generales del Solicitante ]</legend>\n\t\t\t<table border='0' width='100%'>\n\t\t\t\t<tr>\n\t\t\t\t\t<th width='15%'>Clave de Persona</th>\n\t\t\t\t\t<td width='35%'>{$rwy['0']}</td>\n\t\t\t\t\t<th width='15%'>Nombre(s)</th>\n\t\t\t\t\t<td width='35%'>{$rwy['1']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Apellido Paterno</th><td>{$rwy['2']}</td>\n\t\t\t\t\t<th>Apellido Materno</th><td>{$rwy['3']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th>R. F. C.</th>\n\t\t\t\t\t<td>{$rwy['4']}</td>\n\t\t\t\t\t<th>C. U. R. P.</th>\n\t\t\t\t\t<td>{$rwy['5']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Genero</th>\n\t\t\t\t\t<td>{$genero}</td>\n\t\t\t\t\t<th>Estado Civil</th>\n\t\t\t\t\t<td>{$civil}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Edad</th><td>{$edad}</td>\n\t\t\t\t\t<th>Ocupación</th><td>{$ocupacion}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Teléfono Principal</th>\n\t\t\t\t\t<td>{$telp}</td>\n\t\t\t\t\t<th>Correo Electrónico</th>\n\t\t\t\t\t<td>{$mail}</td>\n\t\t\t\t</tr>\n{$eldom}\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Régimen Matrimonial</th>\n\t\t\t\t\t<td>{$rwy['22']}</td>\n\t\t\t\t\t<th>Conyuge</th>\n\t\t\t\t\t<td>{$txtConyuge}</td>\n\t\t\t\t</tr>\n\t\t\t</table>\n\t\t\t</fieldset>";
// datos de la solicitud
$perpagos = eltipo("creditos_periocidadpagos", $rwc[10]);
//$eldest = eltipo("creditos_destinos", $rwc[19]);
$montosol = number_format($rwc[3], 2, '.', ',');
$montoletras = convertirletras($rwc[3]);
//$descripcion_dest = $rwc[35];
$tasa = $rwc[9] * 100;
$plazo_en_meses = round($rwc["plazo_en_dias"] / 30.416666666666668, 0);
$credito_destino_extendido = $rwc["descripcion_aplicacion"];
$tasa_ahorro = $rwc["tasa_ahorro"];
$contrato_corriente = $rwc["contrato_corriente_relacionado"];
if ($contrato_corriente == CTA_GLOBAL_CORRIENTE) {
$contrato_corriente == "_NO_ASIGNADO_";
}
$tasa_ahorro = $tasa_ahorro * 100;
echo "\n\t\t<fieldset>\n\t\t<legend>[ Datos Generales del Credito ]</legend>\n\t<table width='100%'>\n\t\t<tr>\n\t\t\t<th>Numero de Solicitud</td>\n\t\t\t<td>{$rwc['0']}</td>\n\t\t\t<th>Periocidad de Pago</td>\n\t\t\t<td>{$perpagos}</td>\n\t\t</tr>\n\n\t\t<!-- <tr>\n\t\t\t<th>Clasificacion del Destino</td>\n\t\t\t<td></td>\n\t\t\t<th>Destino del Recurso</td>\n\t\t\t<td></td>\n\t\t</tr> -->\n<tr>\n\t<th>Plazo En Meses (Aprox)</td>\n\t<td><b>{$plazo_en_meses} Meses</b></td>\n</tr>\n\t\t<tr>\n\t\t\t<th>Destino del Recurso</td>\n\t\t\t<td colspan='3'>{$credito_destino_extendido}</td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<th>Tasa de Interes Anual Bruta</td>\n\t\t\t<td>{$tasa} %</td>\n\t\t\t<th>Numero de Pagos</td>\n\t\t\t<td>{$rwc['8']}</td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<th>Monto Solicitado</td>\n\t\t\t<td><b>{$montosol}</b></td>\n\t\t\t<th colspan='2'>( {$montoletras} )</td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<th>Contrato de Deposito Relacionado</td>\n\t\t\t<td>{$contrato_corriente}</td>\n\t\t\t<th>Tasa de Ahorro</td>\n\t\t\t<td>{$tasa_ahorro} %</td>\n\t\t</tr>\n\t\t</table>\n\t\t</fieldset>";
// dependientes economicos.
$sqlde = "SELECT\n\t\t\t`socios_relacionestipos`.`descripcion_relacionestipos` AS `tipo_de_relacion`,\n\t\t\t`socios_relaciones`.`curp`,\n\t\t\tCONCAT(`socios_relaciones`.`nombres`, ' ',\n\t\t `socios_relaciones`.`apellido_paterno`, ' ',\n\t\t `socios_relaciones`.`apellido_materno`) AS `nombre_completo`,\n\t\t\t`socios_relaciones`.`domicilio_completo` AS `domicilio`\n\t\t\n\t\tFROM\n\t\t\t`socios_relaciones` `socios_relaciones` \n\t\t\t\tINNER JOIN `socios_relacionestipos` `socios_relacionestipos` \n\t\t\t\tON `socios_relaciones`.`tipo_relacion` = `socios_relacionestipos`.\n\t\t\t\t`idsocios_relacionestipos` \n\t\tWHERE\n\t\t\t(`socios_relaciones`.`socio_relacionado` = {$idsocio}) AND consanguinidad != 99 AND estatus=10 AND `socios_relaciones`.tipo_relacion!=21";
$xTblPar = new cTabla($sqlde);
$xTblPar->Show("Dependientes Economicos y Familia del Solicitante", false);
function getLetras($total)
{
return $total > 0 ? "(" . convertirletras($total) . ")" : "";
}
$tasa = $dcuentas["tasa_otorgada"];
$capital = $dcuentas["saldo_cuenta"];
// + $ide);(
$vencimiento = sumardias($dcuentas["inversion_fecha_vcto"], $dias);
$interes = $capital * $dias * $tasa / EACP_DIAS_INTERES;
$xSoc = new cSocio($idsocio);
$xSoc->init();
$DSoc = $xSoc->getDatosInArray();
$domicilio_del_socio = $xSoc->getDomicilio();
$nombre_del_socio = $xSoc->getNombreCompleto();
$numero_de_socio = $idsocio;
$tasa = getFMoney($tasa * 100);
$isr = getISRByInversion($capital, $dias);
$aliquidar = $capital + $interes - $isr;
$nombre = $nombre_del_socio;
echo "\n\t<p class='bigtitle'>CONSTANCIA PROVISIONAL DE DEPOSITO A PLAZO</p>\n\t<hr />";
// obtiene datos del socio
$direccion = $domicilio_del_socio;
$rfc = $DSoc["rfc"];
$curp = $DSoc["curp"];
//
echo $xSoc->getFicha();
echo $xInv->getFicha(true);
?>
<hr />
<?php
echo "\n<table width='75%'>\n <tr>\n <td width='15%'> </td>\n <td width='15%'> </td>\n\n <th>Fecha de Apertura:</th>\n <td>{$dcuentas['5']}</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Fecha de Vencimiento:</th>\n <td>{$vencimiento}</td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <td></td>\n <td></td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Dias Invertidos:</th>\n <td class='mny'>{$dcuentas['15']}</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Tasa Otorgada</th>\n <td class='mny'>{$tasa} %</td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <td></td>\n <td></td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Capital Invertido:</th>\n <td class='mny'>" . getFMoney($capital) . "</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Interes Generado:</th>\n <th class='mny'>" . getFMoney($interes) . "</th>\n <td>{$dmvto['0']}</td>\n </tr>\n<!--ISR -->\n <tr>\n <td> </td>\n <td> </td>\n\n <th>ISR a Retener:</th>\n <th class='mny'>(" . getFMoney($isr) . ")</th>\n <td></td>\n </tr>\n<!-- IDE -->\n<!-- <tr>\n <td> </td>\n <td> </td>\n\n <th>IDE Retenido:</th>\n <th class='mny'>(" . getFMoney($ide) . ")</th>\n <td></td>\n </tr> -->\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>A Liquidar</th>\n <td class='mny'>" . getFMoney($aliquidar) . "</td>\n <td> </td>\n </tr>\n <tr>\n \t<td />\n \t<td />\n \t<th colspan='3'>" . convertirletras($aliquidar) . "</th>\n </tr>\n</table>\n<hr /><table border='0' width='100%'>\n\t<tr>\n\t<td><center>Firma de CONFORMIDAD</td>\n\t<td><center>GENERO LA REINVERSION</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>{$nombre}\n\t</td>\n\t\t<td><center>{$oficial}</center></td>\n\t</tr>\n\t</table>\n\t<p class='legal'>Comprobante Provisional de Reinversion, solo para fines Informativos,\n\tya que la informacion contenida en esta cedula es de caracter\n\tprovisional y suceptible a que el Aceptante modifique los montos y/o plazos durante el lapso del Dia Laboral.</p>\n\t<p class='legal'>El Impuesto a Depositos en Efectivo Cobrado en esta transaccion es de " . getFMoney($ide) . " </p>\n";
echo getRawFooter();
?>
</body>
</html>
$domicilio = sociodom($idsocio);
$x = getDatosSocio($idsocio);
$rfc = $x[4];
$curp = $x[5];
$iddocto = $rwrec["docto_afectado"];
if ($idsocio != 1) {
$nombre = getNombreSocio($idsocio);
} else {
$rfc = "N/A";
$curp = "N/A";
$domicilio = "PARTE RELACIONADA DE LA EMPRESA";
$nombre = mifila($sqlrec, "cadena_distributiva");
}
echo "<hr>\n\t\t<table border='0' width='100%'>\n\t\t<tr>\n\t\t\t<th width='10%'>Referencia:</th>\n\t\t\t<td with='10%'>{$idrecibo} | {$iddocto}</td>\n\t\t\t<td width='80%'>" . DEFAULT_NOMBRE_LOCALIDAD . ", " . DEFAULT_NOMBRE_ESTADO . "; " . fecha_larga($rwrec[1]) . "</td>\n\n\t\t</tr>\n\t\t<tr>\n\t\t\t<th>Socio</th>\n\t\t\t<td colspan='2'>[ {$idsocio} ] {$nombre}</td>\n\t\t\t\n\t\t</tr>\n\t\t<tr>\n\t\t\t<th>Domicilio</th>\n\t\t\t<td colspan='2'>{$domicilio}</td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<th>R.F.C./C.U.R.P.</th>\n\t\t\t<td>{$rfc} / {$curp}</td>\n\t\t\t<td />\n\t\t</tr>\n\t\t</table>\n\t\t<hr>";
$monto = getFMoney($rwrec[5]);
$letras = convertirletras($rwrec[5]);
$parrafo = "";
if ($rwrec[4] == 32) {
$parrafo = "<p>ESTA CANTIDAD TENDRA UN CARACTER DEVOLUTIVO, CONFORME A LAS POLITICAS VIGENTES DE LA SOCIEDAD;\n\t\t\t EN DADO CASO QUE NO LO RETORNE DIRECTAMENTE EN CAJA, SER&Acute; CARGADO A MI CUENTA Y SE DESCONTARA DIRECTAMENTE\n\t\t\t A MI SALARIO AL NO PRESENTAR PAGO ANTES DE LA FECHA DE VENCIMIENTO</p>";
} elseif ($rwrec[4] == 31) {
$parrafo = "<p>ESTA CANTIDAD TENDRA UN CARACTER DEVOLUTIVO, CONFORME A LAS POLITICAS VIGENTES DE LA SOCIEDAD;\n\t\t\t EN DADO CASO QUE NO LO RETORNE DIRECTAMENTE EN CAJA, SER� CARGADO A MI CUENTA Y SE DESCONTARA DIRECTAMENTE\n\t\t\t A MI SALARIO AL NO PRESENTAR PAGO ANTES DE LA FECHA DE VENCIMIENTO</p>";
} else {
$parrafo = "";
}
$tiporec = eltipo("operaciones_recibostipo", $rwrec[4]);
// RECIBO
echo "<table width ='100%'>\n\t\t\t\t<tr>\n\t\t\t\t\t<td> RECIBI DE <b>" . EACP_NAME . "</b> LA CANTIDAD DE \$ <b>{$monto}</b> --- SON :(<b>{$letras}</b>)---;\n\t\t\t\t\t\tCANTIDAD RECIBIDA POR CONCEPTO DE <b>{$tiporec}</b> EN EFECTIVO, A MI ENTERA SATISFACCION.\n\t\t\t\t\t</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td>\n\t\t\t\t\t\t{$parrafo}\n\t\t\t\t\t</td>\n\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td>OBSERVACIONES: {$rwrec['7']}<td>\n\t\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t</table>\n\t\t<hr>";
}
@mysql_free_result($rsrec);
echo "<table border='0' >\n\t<tr>\n\t<td><center>Firma de Conformidad</center></td>\n\t<td><center>Entrega el Recurso</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>{$nombre}</center></td>\n\t<td><center>{$oficial}</center></td>\n\t</tr>\n\t</table>";
echo getRawFooter();
function jsaGetLetrasByNumero($monto = 0)
{
return convertirletras($monto);
}
$oRec->init();
$oRec->setSumaDeRecibo($total_recibo);
$oRec->setFinalizarRecibo(true);
if (MODO_DEBUG == true) {
$msg .= $oRec->getMessages(OUT_TXT);
$msg .= $xCred->getMessages(OUT_TXT);
$xFL = new cFileLog(false, true);
$xFL->setWrite($msg);
$xFL->setClose();
if ($procesado != SYS_AUTOMATICO) {
$xFRM->addToolbar($xFL->getLinkDownload("TR.Archivo de sucesos", ""));
}
}
if ($procesado != SYS_AUTOMATICO) {
$xFRM->addHElem($oRec->getFicha(true));
$total_letras = convertirletras($total_recibo);
$xBtn = new cHButton("");
$xFRM->addToolbar($xBtn->getRegresar("./frmcobrosdecreditos.php", true));
$xFRM->addToolbar($xBtn->getBasic("TR.Imprimir Recibo", "printrec()", "imprimir", "cmdPrint", false));
$xFRM->addHTML("<table><tbody>{$tds}</tbody><tfoot><tr><th></th><th>TOTAL</th><th class='mny'>" . getFMoney($total_recibo) . "</th></tr><tr><th colspan=\"3\" class='warn'>{$total_letras}</th></tr></tfoot></table>");
echo $xFRM->get();
echo $oRec->getJsPrint(true);
?>
</body>
<script>
var Wo = new Gen();
function jsCloseRecibo(){ window.close(); }
function getEdoCtaCredito(){ Wo.w({url: "../rpt_edos_cuenta/rptestadocuentacredito.php?pb=" + mCredito}); }
</script>
</html>
<?php
