PHP getFMoney函数代码示例

function getRiesgoComunPorAvales($socio, $explain = false)
{
    $sqlRxA = "SELECT\r\n\t`eacp_config_bases_de_integracion`.`descripcion`,\r\n\t`socios_relaciones`.`numero_socio`,\r\n\tCOUNT(`socios_relaciones`.`socio_relacionado`) AS `relaciones`,\r\n\tCOUNT(`creditos_solicitud`.`numero_solicitud`) AS `creditos`,\r\n\tSUM(`creditos_solicitud`.`saldo_actual`)       AS `riesgo`\r\nFROM\r\n\t`socios_relaciones` `socios_relaciones`\r\n\t\tINNER JOIN `eacp_config_bases_de_integracion_miembros` `eacp_config_bases_de_integracion_miembros`\r\n\t\tON `socios_relaciones`.`tipo_relacion` = `eacp_config_bases_de_integracion_miembros`.\r\n\t\t`miembro`\r\n\t\t\tINNER JOIN `eacp_config_bases_de_integracion` `eacp_config_bases_de_integracion`\r\n\t\t\tON `eacp_config_bases_de_integracion_miembros`.`codigo_de_base` = `eacp_config_bases_de_integracion`.\r\n\t\t\t`codigo_de_base`\r\n\t\t\t\tINNER JOIN `creditos_solicitud` `creditos_solicitud`\r\n\t\t\t\tON `socios_relaciones`.`socio_relacionado` =\r\n\t\t\t\t`creditos_solicitud`.`numero_socio`\r\nWHERE\r\n\t(`socios_relaciones`.`numero_socio` ={$socio}) AND\r\n\r\n\t(`creditos_solicitud`.`saldo_actual` >" . TOLERANCIA_SALDOS . ") AND\r\n\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` = 5002)\r\nGROUP BY\r\n\t`socios_relaciones`.`numero_socio`,\r\n\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`\r\n";
    $aRxN = obten_filas($sqlRxA);
    if ($explain == false) {
        return $aRxN["monto"];
    } else {
        return "<fieldset>\r\n\t\t\t\t\t<legend>Riesgo Comun por Avales Otorgados</legend>\r\n\t\t\t\t\t\tNumero de Personas Relacionados    : " . $aRxN["relaciones"] . " <br />\r\n\t\t\t\t\t\tNumero de Creditos Relacionados  : " . $aRxN["creditos"] . " <br />\r\n\t\t\t\t\t\tMonto de Creditos Relacionados   : " . getFMoney($aRxN["riesgo"]) . "\r\n\t\t\t\t</fieldset>";
    }
}

function calcula_ica($solicitud, $form)
{
    $sql = "SELECT * FROM creditos_solicitud WHERE numero_solicitud={$solicitud}";
    $mysolicitud = obten_filas($sql);
    $socio = $mysolicitud["numero_socio"];
    // Numero de Socio
    $diasaut = $mysolicitud["dias_autorizados"];
    // Dias Autorizados
    $montoMin = $mysolicitud["monto_autorizado"];
    // Monto Autorizado
    $tasaInt = $mysolicitud["tasa_interes"];
    // Monto Autorizado
    $tipoConv = $mysolicitud["tipo_convenio"];
    // Interes Diario */
    $ICA_pagado = $mysolicitud["sdo_int_ant"];
    // saldo ICA */
    $infoConv = get_convenio($tipoConv);
    $tasaICA = $infoConv["porcentaje_ica"];
    $intneto = 0;
    $inttotal = 0;
    $intpagado = 0;
    $intdiario = $montoMin * $tasaInt / EACP_DIAS_INTERES;
    /**
     * Consulta todos los creditos que aplican Interes Anticipado
     */
    $totaliva = 0;
    $nota = "";
    $intneto = $intdiario * $diasaut * $tasaICA;
    //Resta el Interes pagado
    $intneto -= $ICA_pagado;
    /**
     * @see Parche: Solo se Incluye la afectacion del Credito
     */
    $nota .= "Tasa ICA {$tasaICA}; Dias {$diasaut}, Int. Diario" . getFMoney($intdiario) . ", ICA Pag. {$ICA_pagado}";
    //Valor IVA, obtenido del tipo de solicitud
    $tasaiva = $infoConv["tasa_iva"];
    $iva_inc = $infoConv["iva_incluido"];
    if ($iva_inc == 1) {
        $intneto = $intneto * (1 / (1 + $tasaiva));
        $totaliva = $intneto * $tasaiva;
    } else {
        $totaliva = $intneto * $tasaiva;
    }
    $intneto = number_format($intneto, 2, '.', '');
    //getFMoney($intneto);
    $totaliva = number_format($totaliva, 2, '.', '');
    //getFMoney($totaliva);
    $tab = new TinyAjaxBehavior();
    $tab->add(TabSetValue::getBehavior("valorinteres", $intneto));
    $tab->add(TabSetValue::getBehavior("valoriva", $totaliva));
    $tab->add(TabSetValue::getBehavior("idobservaciones", $nota));
    $tab->add(TabSetValue::getBehavior("idTasaIva", $tasaiva));
    return $tab->getString();
}

function jsaGetCalculos($socio, $acciones, $tipo_de_pago)
{
    $xSoc = new cSocio($socio);
    $coste = COSTE_POR_ACCION * $acciones;
    $monto = $tipo_de_pago == "efectivo" ? $coste : 0;
    $ide = $tipo_de_pago == "efectivo" ? $xSoc->getIDExPagarByPeriodo(false, $monto) : 0;
    $tab = new TinyAjaxBehavior();
    $tab->add(TabSetValue::getBehavior("idCoste", getFMoney($coste)));
    $tab->add(TabSetValue::getBehavior("idide", getFMoney($ide)));
    //$tab -> add( TabSetValue::getBehavior("idObservaciones", $xSoc->getMessages("txt") ) );
    return $tab->getString();
}

function jsaGetLetras($idcredito)
{
    $idcred = setNoMenorQueCero($idcredito);
    $xF = new cFecha();
    if ($idcred > DEFAULT_CREDITO) {
        $xCred = new cCredito($idcred);
        $xCred->init();
        if ($xCred->getEsAfectable() == false or $xCred->getSaldoActual() <= 0) {
            if (MODO_CORRECION == true) {
                $xTxt = new cHText();
                $xTxt->setDivClass("");
                return $xTxt->getNumero("idparcialidad", $xCred->getPeriodoActual() + 1, "TR.Numero de Parcialidad");
            } else {
                return $xCred->getMessages();
            }
        } else {
            if ($xCred->getPeriocidadDePago() == CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) {
                //
                $xTxt = new cHText();
                $xTxt->setDivClass("");
                return $xTxt->getNumero("idparcialidad", $xCred->getPeriodoActual() + 1, "TR.Numero de Parcialidad");
            } else {
                $plan = $xCred->getNumeroDePlanDePagos();
                if ($plan != false) {
                    $xPlan = new cPlanDePagos($plan);
                    $xPlan->init();
                    $parcs = $xPlan->getParcsPendientes();
                    //$txt		= "";
                    $arrD = array();
                    foreach ($parcs as $p) {
                        //setLog( $p[SYS_NUMERO]. " " . $xF->getFechaDDMM($p[SYS_FECHA]) . " ". getFMoney($p[SYS_TOTAL]));
                        if (setNoMenorQueCero($p[SYS_TOTAL]) > 0) {
                            $arrD[$p[SYS_NUMERO]] = $p[SYS_NUMERO] . " " . $xF->getFechaDDMM($p[SYS_FECHA]) . " " . getFMoney($p[SYS_TOTAL]);
                        }
                    }
                    $xSel = new cHSelect();
                    $xSel->addOptions($arrD);
                    $xSel->setEnclose(false);
                    return $xSel->get("idparcialidad", "TR.Numero de Parcialidad", $xCred->getPeriodoActual() + 1);
                } else {
                    if (MODO_CORRECION == true) {
                        $xTxt = new cHText();
                        $xTxt->setDivClass("");
                        return $xTxt->getNumero("idparcialidad", $xCred->getPeriodoActual() + 1, "TR.Numero de Parcialidad");
                    }
                }
            }
        }
    }
}

}
if ($SUMIva == 0) {
    $thIVA = "";
    $tfIVA = 0;
}
foreach ($arrLetras as $parcial => $dat) {
    $txt = "<tr><th>" . $parcial . "</th>";
    $txt .= isset($dat[SYS_FECHA]) ? "<td>" . $xF->getDayName($dat[SYS_FECHA]) . "|" . $xF->getFechaCorta($dat[SYS_FECHA]) . "</td>" : "<td />";
    $txt .= isset($dat[SYS_CAPITAL]) ? "<td class='mny'>" . getFMoney($dat[SYS_CAPITAL]) . "</td>" : "<td />";
    $txt .= isset($dat[SYS_INTERES_NORMAL]) ? "<td class='mny'>" . getFMoney($dat[SYS_INTERES_NORMAL]) . "</td>" : "<td />";
    $txt .= isset($dat[SYS_GASTOS_DE_COBRANZA]) ? "<td class='mny'>" . getFMoney($dat[SYS_GASTOS_DE_COBRANZA]) . "</td>" : "";
    $txt .= isset($dat[SYS_IMPUESTOS]) ? "<td class='mny'>" . getFMoney($dat[SYS_IMPUESTOS]) . "</td>" : "";
    $txt .= isset($dat[SYS_AHORRO]) ? "<td class='mny'>" . getFMoney($dat[SYS_AHORRO]) . "</td>" : "";
    $txt .= "<td class='mny'>" . getFMoney($dat[SYS_TOTAL]) . "</td>";
    $netoNivel -= $dat[SYS_TOTAL];
    $txt .= "<th class='mny'>" . getFMoney($netoNivel) . "</th>";
    $txt .= "<tr>";
    $tmpcap = isset($dat[SYS_CAPITAL]) ? $dat[SYS_CAPITAL] : 0;
    if (setNoMenorQueCero($tmpcap) > 0 or $pagoactual == 0 or $xCred->getPagosSinCapital() == true) {
        $trs .= $txt;
    }
}
//<th>" . $xHP->lang("dia") . "</th>
$PlanBody .= "<table class='listado'>\n  <thead>\n    <tr>\n      <th>" . $xHP->lang("pago") . "</th>\n      \n      <th>" . $xHP->lang("fecha de", "pago") . "</th>\n      <th>" . $xHP->lang("capital") . "</th>\n      <th>" . $xHP->lang("interes") . "</th>\n      {$thOtros}\n      {$thIVA}\n     {$thAhorro}\n      <th>" . $xHP->lang("total") . "</th>\n      <th>" . $xHP->lang("saldo") . "</th>\n    </tr>\n    </thead>\n    <tbody>\n    {$trs}\n\t\n    <tr>\n      <td colspan='2'>" . $xHP->lang("sumas") . "</td>\n      <th class='mny'>" . getFMoney($SUMCap) . "</th>\n      <th class='mny'>" . getFMoney($SUMInt) . "</th>\n      {$tfOtros}\n      \n      {$tfIVA}\n      {$tfAhorro}\n      <th class='mny'>" . getFMoney($SumTotal) . "</th>\n      <td />\n    </tr>\n      \t\n\n    \n    </tbody>\n</table>";
$PlanBody .= "\n\t<table >\n\t<tr>\n\t<td><center>" . $xHP->lang("firma del", "solicitante") . "</td>\n\t<td><center>" . $xHP->lang("por la", "empresa") . "</center></td>\n\t</tr>\n\t<tr>\n\t<td>\n\t\t<br />\n\t\t<br />\n\t\t<br />\n\t</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<tr>\n\t\t<th>" . $xHP->lang("observaciones") . "</th><td>{$observaciones}</td>\n\t</tr>\n\t</table>";
echo $PlanBody;
echo getRawFooter();
?>
</body>
</html>

$rs = mysql_query($sql_notificaciones);
while ($rw = mysql_fetch_array($rs)) {
    $nombre = getNombreSocio($rw[1]);
    $domicilio = $rw[15];
    if ($domicilio == '0') {
        $domicilio = "NO EXISTE DOMICILIO DEFINIDO. CAPTURELO O EDITELO";
    }
    //Datos del Credito
    $sql_cred = "SELECT * FROM creditos_solicitud WHERE numero_solicitud={$rw['2']} AND numero_socio={$rw['1']} LIMIT 0,1";
    $dsol = obten_filas($sql_cred);
    $dias_venc = restarfechas(fechasys(), $dsol[15]);
    $interes = getFMoney($rw[9]);
    $moratorio = getFMoney($rw[10]);
    $otros_cargos = getFMoney($rw[11]);
    $capital = getFMoney($rw[8]);
    $total = getFMoney($rw[12]);
    echo getRawHeader();
    ?>
	<p class='bigtitle'>NOTIFICACION DE COBRO NUM. <?php 
    echo $rw[3];
    ?>
</p>
		<br />
		<div class='numc'>
		<table width="60%"   >
			  <tr>
			    <td><?php 
    echo $rw[1];
    ?>
</td>
			  </tr>

    $idparcialidad = $_POST["idparcialidad"];
    $iva = $_POST["iva_cargado"];
    //$idsocio 			= mifila($sqlvs, "numero_socio");
    $observaciones = $_POST["observaciones"];
    $fecha = fechasys();
    $cRec = new cReciboDeOperacion(97);
    $recibo = $cRec->setNuevoRecibo($idsocio, $idsolicitud, $fecha, $idparcialidad, 97, $observaciones);
    $cRec->setDefaultEstatusOperacion(40);
    $cRec->setNuevoMvto($fecha, $montoop, 601, $idparcialidad, $observaciones);
    $cRec->setNuevoMvto($fecha, $iva, 1202, $idparcialidad, $observaciones);
    $mSoc = new cFicha(iDE_SOCIO, $idsocio);
    $mSoc->setTableWidth();
    $mSoc->show();
    $cRec->setFinalizarRecibo(true);
    $cRec->getFicha();
    echo "<p class='aviso'>EL MONTO DEL CARGO FUE DE: \$ " . getFMoney($montoop) . ", SE PODRA DISMUIR DESDE EL MODULO DE DESCUENTOS</p>";
    echo $msg_rec_end;
}
?>
</body>
<script  >
	function printrec() {
		var elUrl= "../rpt_formatos/frmrecibogeneral.php?recibo=<?php 
echo $recibo;
?>
";
		rptrecibo = window.open( elUrl, "window");
		rptrecibo.focus();
	}
</script>
</html>

$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%'>&nbsp;</td>\n    <td width='15%'>&nbsp;</td>\n\n    <th>Fecha de Apertura:</th>\n    <td>{$dcuentas['5']}</td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>Fecha de Vencimiento:</th>\n    <td>{$vencimiento}</td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <td></td>\n    <td></td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>Dias Invertidos:</th>\n    <td class='mny'>{$dias}</td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>Tasa Otorgada</th>\n    <td class='mny'>{$tasa} %</td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <td></td>\n    <td></td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n\n   <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>Capital Invertido:</th>\n    <td class='mny'>{$capital}</td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>Interes Generado:</th>\n    <th class='mny'>{$interes}</th>\n    <td></td>\n  </tr>\n<!-- ISR -->\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</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>&nbsp;</td>\n    <td>&nbsp;</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>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>A Liquidar</th>\n    <td class='mny'>" . getFMoney($aliquidar) . "</td>\n    <td>&nbsp;</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>

</table>
<?php 
$rs = mysql_query($sql, cnnGeneral());
$gvalues = "";
$gnames = "";
$i = 0;
$tds = "";
$mnt = 0;
$sm = 0;
while ($rw = mysql_fetch_array($rs)) {
    $val[] = round($rw[1] / 1000, 2);
    $lbl[] = $rw[0];
    $sm += $rw[1];
    $tds = $tds . "<tr>\n\t<td>{$rw['0']}</td>\n\t<td class='mny'>" . getFMoney($rw[1]) . "</td>\n\n\t</tr>";
    $i++;
}
//echo $gnames;
//echo $gvalues;
$sm = getFMoney($sm);
echo "<table width='100%' aling='center'>\n\t<tr>\n\t\t<th>Concepto</th>\n\t\t<th>Monto</th>\n\t</tr>\n\n\t{$tds}\n\n\t<tr>\n\t\t<td>Sumas</td>\n\t\t<td>{$sm}</td>\n\t</tr>\n\n\t</table>";
$x = new SAFEChart();
$x->setValues($val);
$x->setLabels($lbl);
$x->setTitle("INGRESOS ACUMULADOS EN UN RANGO DE FECHAS(Miles)");
$mFile = $x->Chart3DBAR(10000);
open_flash_chart_object(768, 512, $mFile, true, "../");
echo getRawFooter();
?>
</body>
</html>

}
$ByStat = "";
$inputG = $_GET["outg"];
if ($Stat != "todas") {
    $ByStat = " AND\n\t\t\t\t(`creditos_solicitud`.`estatus_actual` ={$Stat})  ";
}
$sql = "SELECT\n\t`creditos_periocidadpagos`.`descripcion_periocidadpagos` AS `periocidad`,\n\tCOUNT(`creditos_solicitud`.`numero_solicitud`)           AS `numero`,\n\tSUM(`creditos_solicitud`.`saldo_actual`)                 AS\n\t`monto`,\n\t`creditos_solicitud`.`periocidad_de_pago`\nFROM\n\t`creditos_solicitud` `creditos_solicitud`\n\t\tINNER JOIN `creditos_periocidadpagos` `creditos_periocidadpagos`\n\t\tON `creditos_solicitud`.`periocidad_de_pago` =\n\t\t`creditos_periocidadpagos`.`idcreditos_periocidadpagos`\nWHERE\n\t(`creditos_solicitud`.`saldo_actual` >=0.99)\n\t{$ByStat}\n\t{$BySuc}\n\tGROUP BY\n\t\t`creditos_solicitud`.`periocidad_de_pago`";
$rs = mysql_query($sql, cnnGeneral());
$lbl = array();
$val = array();
while ($rw = mysql_fetch_array($rs)) {
    $val[] = round($rw["monto"] / 1000, 2);
    $lbl[] = $rw["destino"];
    $sm += $rw["monto"];
    $nm += $rw["numero"];
    $tds = $tds . "<tr>\n\t<td>" . $rw["periocidad"] . "</td>\n\t<td>" . $rw["numero"] . "</td>\n\t<td class='mny'>" . getFMoney($rw["monto"]) . "</td>\n\t</tr>";
    $i++;
}
//echo $gnames;
//echo $gvalues;
echo "<table align=\"center\" width='100%'>\n\t<tr>\n\t\t<th>Destino del Credito</th>\n\t\t<th>Numero de Credito</th>\n\t\t<th>Saldo del Capital Insoluto</th>\n\t</tr>\n\n\t{$tds}\n\n\t<tr>\n\t\t<td>Sumas</td>\n\t\t<th>" . getFMoney($nm) . "</th>\n\t\t<th>" . getFMoney($sm) . "</th>\n\t</tr>\n\t</td>\n\t</table>\n";
$x = new SAFEChart();
$x->setValues($val);
$x->setLabels($lbl);
$x->setTitle("REPORTE DE CONCENTRACION DE LA CARTERA POR DESTINO ECONOMICO(Miles)");
$mFile = $x->ChartPIE();
open_flash_chart_object(768, 512, $mFile, true, "../");
echo getRawFooter();
?>
</body>
</html>

$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&oacute;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>

             } else {
                 $td_inicial = "<td></td>\n\t\t\t\t\t\t\t\t\t<td class='mny'>" . getFMoney($mvtos["inicial"]) . "</td>";
                 $td_final = "<td></td>\n\t\t\t\t\t\t\t\t\t<td class='mny'>" . getFMoney($mvtos["final"]) . "</td>";
             }
             break;
         case 2:
             $mvtos["cargos_actual"] = $rm["movimiento"];
             break;
         case 3:
             $mvtos["abonos_actual"] = $rm["movimiento"];
             break;
     }
     //$MActuales++;
 }
 // END mysql Movimientos*/
 $exoCuenta = "\n\t\t<tr {$css}>\n\t\t\t<td>" . $xEsq->CUENTA_FORMATEADA . "</td>\n\t\t\t<td>{$nombre}</td>\n\t\t\t{$td_inicial}\n\t\t\t<td class='mny'>" . getFMoney($mvtos["cargos_actual"]) . "</td>\n\t\t\t<td class='mny'>" . getFMoney($mvtos["abonos_actual"]) . "</td>\n\t\t\t{$td_final}\n\t\t</tr>\n\t\t";
 /**
  * @see Re refiere a la decision de imprimir o no ciertas cuentas
  */
 switch ($incluir_cuentas) {
     case "con_movimientos":
         if ($MActuales == false) {
             $exoCuenta = "";
         }
         break;
     case "saldo_no_cero":
         if ($saldo == 0) {
             $exoCuenta = "";
         }
         break;
     case "saldo_no_cero_con_mvtos":

 */
$sqlM = "SELECT\n\n\t/* `operaciones_mvtos`.`socio_afectado`,\n\t`operaciones_mvtos`.`docto_afectado`, */\n\t`operaciones_mvtos`.`recibo_afectado`,\n\n\t`operaciones_mvtos`.`fecha_operacion` AS 'fecha_de_operacion',\n\t`operaciones_tipos`.`descripcion_operacion` AS 'tipo_de_operacion',\n\n\t(`operaciones_mvtos`.`afectacion_real` *\n\t`eacp_config_bases_de_integracion_miembros`.`afectacion`) AS 'monto'\n\n\n\tFROM\n\n\t`operaciones_mvtos` `operaciones_mvtos`\n\tINNER JOIN `eacp_config_bases_de_integracion_miembros`\n\t`eacp_config_bases_de_integracion_miembros`\n\tON `operaciones_mvtos`.`tipo_operacion` =\n\t`eacp_config_bases_de_integracion_miembros`.`miembro`\n\tINNER JOIN `operaciones_tipos` `operaciones_tipos`\n\tON `operaciones_mvtos`.`tipo_operacion` = `operaciones_tipos`.\n\t`idoperaciones_tipos`\n\n\tWHERE\n\t(`operaciones_mvtos`.`docto_afectado` ={$credito})\n\tAND\n\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` =2001)\n\t{$ByFecha}\n\tORDER BY\n\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\n\t`operaciones_mvtos`.`fecha_operacion` ";
$td = "";
$rs2 = $query->getDataRecord($sqlM);
$sumP = 0;
$sumD = 0;
foreach ($rs2 as $rw) {
    $montoD = 0;
    $montoP = 0;
    $recibo = $rw["recibo_afectado"];
    $operacion = $rw["tipo_de_operacion"];
    $fecha = $rw["fecha_de_operacion"];
    if ($rw["monto"] < 0) {
        $montoP = $rw["monto"];
        $sumP += $rw["monto"];
    } else {
        $montoD = $rw["monto"];
        $sumD += $rw["monto"];
    }
    $td .= "\n\t\t\t<tr>\n\t\t\t<td>{$recibo}</td>\n\t\t\t<td>{$fecha}</td>\n\t\t\t<td>{$operacion}</td>\n\t<td class='mny'>" . getFMoney($montoD) . "</td>\n\t<td class='mny'>" . getFMoney($montoP) . "</td>\n\t</tr>";
}
$xRPT->addContent("\t<table width=\"100%\" align=\"center\" >\n\t\t\t<thead>\n\t\t\t<tr>\n\t\t\t<th width=\"15%\">Recibo</th>\n\t\t\t<th width=\"15%\">Fecha</th>\n\t\t\t<th width=\"40%\">Tipo de Operacion</th>\n\t\t\t<th width=\"15%\">Devengado</th>\n\t\t\t<th width=\"15%\">Pagado</th>\n\t\t\t</tr>\n\t\t\t</thead>\n\t\t\t<tbody>\n\t\t\t{$td}\n\t\t\t</tbody>\n\t\t\t<tfoot>\n\t\t\t<tr>\n\t\t\t<td />\n\t\t\t<th>SUMA DE MORATORIOS </th>\n\t\t\t<td class='mny'>" . getFMoney($sumD + $sumP) . "</td>\n\t\t\t<th class='mny'>" . getFMoney($sumD) . "</th>\n\t\t\t<th class='mny'>" . getFMoney($sumP) . "</th>\n\t\t\t</tr>\n\t\t\t</tfoot>\n\t\t</table>\n\t");
//$xT->setEventKey("jsGoPanel");
//$xT->setKeyField("creditos_solicitud");
//$xRPT->addContent( $xT->Show( $xHP->getTitle() ) );
//============ Agregar HTML
//$xRPT->addContent( $xHP->init($jsEvent) );
//$xRPT->addContent( $xHP->end() );
$xRPT->setResponse();
$xRPT->setSenders($senders);
echo $xRPT->render(true);

$sql = "select convenio, count(solicitud) AS 'numero', SUM(monto_solicitado) AS 'total_colocado' FROM solicitudes {$si_es_por_fecha} AND monto_solicitado>=0.99 GROUP BY convenio";
$rs = mysql_query($sql);
//echo $sql;
$gvalues = "";
$gnames = "";
$i = 0;
$tds = "";
$mnt = 0;
$sm = 0;
$nm = 0;
while ($rw = mysql_fetch_array($rs)) {
    $val[] = round($rw[2] / 1000, 2);
    $lbl[] = $rw[0];
    $sm = $sm + $rw[2];
    $nm = $nm + $rw[1];
    $tds = $tds . "<tr>\n\t<td>{$rw['0']}</td>\n\t<td>{$rw['1']}</td>\n\t<td class='mny'>" . getFMoney($rw[2]) . "</td>\n\t</tr>";
    $i++;
}
//echo $gnames;
//echo $gvalues;
echo "<table  >\n\t<tr>\n\t\t<th>Tipo de Convenio</th>\n\t\t<th>Numero Solicitado</th>\n\t\t<th>Cantidad</th>\n\t</tr>\n\t\n\t{$tds}\n\t\n\t<tr>\n\t\t<td>Sumas</td>\n\t\t<th>{$nm}</th>\n\t\t<th class='mny'>" . getFMoney($sm) . "</th>\n\t</tr>\n\t</td>";
$x = new SAFEChart();
$x->setValues($val);
$x->setLabels($lbl);
$x->setTitle("REPORTE DE SOLICITUDES DE CREDITO EN FECHA DADA(Miles)");
$mFile = $x->Chart3DBAR(2500);
open_flash_chart_object(768, 512, $mFile, true, "../");
echo getRawFooter();
?>
</body>
</html>

    $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>&nbsp;</td>\n\t\t  <td>&nbsp;</td>\n\t\t  <td>&nbsp;</td>\n\t\t  <td>&nbsp;</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&oacute;n. Este PAGAR&Eacute; forma parte de una serie numerada del 01/01 y todos estan sujetos\n\t\t  a la condici&oacute;n de que, al no pagarse cualquiera de ellos a su vencimiento, seran exigibles\n\t\t  todos los que sigan en n&uacute;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'>&nbsp;</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&eacute;, como si del deudor Principal se tratar&aacute;<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);
?>
</body>