/** * Muestra el Plan de Pagos en Texto, o HTML, Simple o Completo * * @param string $InOut Tipo de Sal�ida, por Defecto HTML * @param boolean $simple Solo Imprime el Plan de Pagos sin detallarla Lista * @param boolen $NoExtend SI es a TRue solo muestra el Plan de pagos * @return string Plan de Pagos en Formto definido en OUT */ function getPlanDePago($InOut = "html", $simple = false, $NoExtend = false) { $PlanBody = ""; if ($this->mCreditoInicializado == false) { $this->init(); } $xF = new cFecha(); $xL = new cLang(); $xQ = new MQL(); $xF->init(FECHA_FORMATO_MX); $xF->setSeparador("/"); if ($this->mPagosAutorizados > 1) { if (setNoMenorQueCero($this->mNumeroDePlanDePago) <= 0) { $extras = $this->getDatosDelPlanDePagos(); } else { $sqlrs = "SELECT *\n\t\t\t\t\t\tFROM operaciones_recibos\n\t\t\t\t\t\tWHERE idoperaciones_recibos=" . $this->getNumeroDePlanDePagos(); $idrecibo = $this->getNumeroDePlanDePagos(); $extras = obten_filas($sqlrs); } //------------------------------------- DATOS DEL RECIBO //TODO: Validar IDRECIBO, si es Mayor a cero y si existe 2014-10-31 //XXX: Terminar valicacion de IDRECIBO 201/10/31 $idrecibo = $extras["idoperaciones_recibos"]; $idsocio = $extras["numero_socio"]; //"numero_socio" $idsolicitud = $extras["docto_afectado"]; // docto_afectado $sumrec = $extras["total_operacion"]; $nombre = getNombreSocio($idsocio); $SUMCap = 0; $SUMInt = 0; $SUMIva = 0; $SUMAh = 0; $SUMOtros = 0; $SumTotal = 0; // ------------------------------------ DATOS DE LA SOLICITUD. if ($this->mCreditoInicializado == false) { $sqlsol = "SELECT * FROM creditos_solicitud WHERE numero_solicitud={$idsolicitud}"; $dsol = obten_filas($sqlsol); $tasa_ahorro = $dsol["tasa_ahorro"] * 100; $tasa_interes = $dsol["tasa_interes"] * 100; $dias_totales = $dsol["dias_autorizados"]; $numero_pagos = $dsol["pagos_autorizados"]; $nombre_otro = ""; } else { $tasa_ahorro = $this->mTasaAhorro * 100; $tasa_interes = $this->mTasaInteres * 100; $dias_totales = $this->mDiasAutorizados; $numero_pagos = $this->mPagosAutorizados; $nombre_otro = ""; } $this->mLimitPlan = ceil($numero_pagos / 3); if ($NoExtend == false) { $PlanBody .= $this->getFichaDeSocio(); $PlanBody .= $this->getFicha(); } if ($simple == false) { $sql = "\n\t\t\t\t\tSELECT operaciones_mvtos.periodo_socio AS 'parcialidad', fecha_afectacion,\n\t\t\t\t\t\t\toperaciones_tipos.idoperaciones_tipos As 'tipo',\n\t\t\t\t\t\t\toperaciones_tipos.descripcion_operacion AS 'concepto' ,\n\t\t\t\t\t\t\toperaciones_mvtos.afectacion_real AS 'monto',\n\t\t\t\t\t\t\toperaciones_mvtos.saldo_actual AS 'saldo'\n\n\t\t\t\t\tFROM \t`operaciones_mvtos` `operaciones_mvtos`\n\t\t\t\t\t\t\tINNER JOIN `operaciones_tipos` `operaciones_tipos`\n\t\t\t\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` = `operaciones_tipos`.\n\t\t\t\t\t\t\t`idoperaciones_tipos`\n\n\t\t\t\t\tWHERE operaciones_mvtos.recibo_afectado={$idrecibo}\n\t\t\t\t\tORDER BY operaciones_mvtos.periodo_socio, operaciones_tipos.idoperaciones_tipos"; $rs = $xQ->getDataRecord($sql); $trs = ""; //Parcialidad, evaluador de inciio y final $PInit = 0; $PFin = 0; $capital = 0; $interes = 0; $iva = 0; $ahorro = 0; $otros = 0; $total = 0; $saldo = 0; $tds = ""; foreach ($rs as $rw) { $PInit = $rw["parcialidad"]; $tipo = $rw["tipo"]; switch ($tipo) { case 410: $capital = $rw["monto"]; $SUMCap += $capital; $saldo = $rw["saldo"]; if ($saldo < 0) { $saldo = 0; } break; case 411: $interes = $rw["monto"]; $SUMInt += $interes; break; case 412: $ahorro = $rw["monto"]; $SUMAh += $ahorro; break; case 413: $iva = $rw["monto"]; $SUMIva += $iva; break; default: $otros = $rw["monto"]; $SUMOtros += $otros; $top = getInfTOperacion($tipo); $nombre_otro = $top["descripcion_operacion"]; break; } if ($PInit != $PFin) { $trs .= $tds; } else { $total = $capital + $interes + $ahorro + $iva; $tdAhorro = "<td class='mny'>" . getFMoney($ahorro) . "</td>"; $tdOtros = "<td class='mny'>" . getFMoney($otros) . "</td>"; if ($ahorro == 0) { $tdAhorro = ""; } if ($otros == 0) { $tdOtros = ""; } $tds = "<tr>\n\t\t\t\t\t\t\t<td>" . $rw["parcialidad"] . "</td>\n\t\t\t\t\t\t\t<td class='ctr'>" . getDiaDeLaSemana($rw["fecha_afectacion"]) . "</td><td class='ctr'>" . $xF->getFechaCorta($rw["fecha_afectacion"]) . "</td>\n\t\t\t\t\t\t\t<td class='mny'>" . getFMoney($capital) . "</td>\n\t\t\t\t\t\t\t<td class='mny'>" . getFMoney($interes) . "</td>\n\t\t\t\t\t\t\t<td class='mny'>" . getFMoney($iva) . "</td>\n\t\t\t\t\t\t\t{$tdAhorro}\n\t\t\t\t\t\t\t{$tdOtros}\n\t\t\t\t\t\t\t<td class='mny'>" . getFMoney($total) . "</td>\n\t\t\t\t\t\t\t<td class='mny'>" . getFMoney($saldo) . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t"; } $PFin = $PInit; } $trs .= $tds; $SumTotal = $SUMCap + $SUMAh + $SUMInt + $SUMIva + $SUMOtros; $thAhorro = " <th>" . $xL->getT("TR.Ahorro") . "</th>"; $thOtros = "<th>{$nombre_otro}</th>"; $tfAhorro = "<th class='mny'>" . getFMoney($SUMAh) . "</th>"; $tfOtros = "<th class='mny'>" . getFMoney($SUMOtros) . "</th>"; if ($SUMAh == 0) { $thAhorro = ""; $tfAhorro = ""; } if ($SUMOtros == 0) { $thOtros = ""; $tfOtros = ""; } $PlanBody .= "<table >\n\t\t\t <tbody>\n\t\t\t <tr>\n\t\t\t <th>" . $xL->getT("TR.Pago") . "</th>\n\t\t\t <th colspan='2'>" . $xL->getT("TR.Fecha de Pago") . "</th>\n\t\t\t <th>" . $xL->getT("TR.Capital") . "</th>\n\t\t\t <th>" . $xL->getT("TR.Interes") . "</th>\n\t\t\t <th>" . $xL->getT("TR.IVA") . "</th>\n\t\t\t {$thAhorro}\n\t\t\t {$thOtros}\n\t\t\t <th>" . $xL->getT("TR.Total") . "</th>\n\t\t\t <th>" . $xL->getT("TR.saldo") . "</th>\n\t\t\t </tr>\n\t\t\t {$trs}\n\t\t\t <tr>\n\t\t\t <td colspan='3'>" . $xL->getT("TR.SUMAS") . "</td>\n\t\t\t <th class='mny'>" . getFMoney($SUMCap) . "</th>\n\t\t\t <th class='mny'>" . getFMoney($SUMInt) . "</th>\n\t\t\t <th class='mny'>" . getFMoney($SUMIva) . "</th>\n\t\t\t {$tfAhorro}\n\t\t\t {$tfOtros}\n\t\t\t <th class='mny'>" . getFMoney($SumTotal) . "</th>\n\t\t\t <td />\n\t\t\t </tr>\n\t\t\t </tbody>\n\t\t\t</table>"; } else { $sqlparc = "SELECT periodo_socio AS 'parcialidad', MAX(fecha_afectacion)\n\t\t\t\t\t\t\t\tAS 'fecha_de_pago', SUM(afectacion_real) AS 'total_parcialidad',\n\t\t\t\t\t\t\t\t MAX(saldo_anterior) AS 'saldo_anterior_', MIN(saldo_actual) AS 'saldo_actual_'\n\t\t\t\t\t\t\t\tFROM operaciones_mvtos\n\t\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t\trecibo_afectado={$idrecibo}\n\t\t\t\t\t\t\tGROUP BY periodo_socio ORDER BY periodo_socio"; $rs = $xQ->getDataRecord($sqlparc); $pi = 1; $tp = ""; $pt = 1; $lim = $xQ->getNumberOfRows(); //si el Limite es mayor a 100, restar 100 y poner if ($lim > $this->mLimitPlan * 4) { $this->mLimitPlan = ceil($lim / 4); } if ($lim < $this->mLimitPlan) { $this->mLimitPlan = ceil($lim / 2); } $items = 1; foreach ($rs as $rw) { $saldo = $rw["saldo_actual_"]; $saldo = $saldo < 0 ? 0 : $saldo; $SumTotal += $rw["total_parcialidad"]; if ($items == 1) { $this->mFechaPrimeraParc = $rw["fecha_de_pago"]; } if ($pi == $this->mLimitPlan or $pt == $lim) { $tp .= "\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td>" . $rw["parcialidad"] . "</td>\n\t\t\t\t\t\t<td>" . $xF->getFechaCorta($rw["fecha_de_pago"]) . "</td>\n\t\t\t\t\t\t<td class='mny'>" . getFMoney($rw["total_parcialidad"]) . "</td>\n\t\t\t\t\t\t<td class='mny'>" . getFMoney($saldo) . "</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t</tbody>\n\t\t\t\t\t</table>\n\t\t\t\t\t</td>"; $pi = 1; } elseif ($pi == 1) { $tp .= "\n\t\t\t\t\t\t<td>\n\n\t\t\t\t\t\t<table class='sector_plan_simplificado'>\n\t\t\t\t\t\t<tbody>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th>" . $xL->getT("TR.PAGO") . "</th>\n\t\t\t\t\t\t\t<th>" . $xL->getT("TR.Fecha") . "</th>\n\t\t\t\t\t\t\t<th>" . $xL->getT("TR.Monto") . "</th>\n\t\t\t\t\t\t\t<th>" . $xL->getT("TR.Saldo") . "</th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td>" . $rw["parcialidad"] . "</td>\n\t\t\t\t\t\t\t<td>" . $xF->getFechaCorta($rw["fecha_de_pago"]) . "</td>\n\t\t\t\t\t\t\t<td class='mny'>" . getFMoney($rw["total_parcialidad"]) . "</td>\n\t\t\t\t\t\t\t<td class='mny'>" . getFMoney($saldo) . "</td>\n\t\t\t\t\t\t</tr>"; $pi++; } else { $tp .= "\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td>" . $rw["parcialidad"] . "</td>\n\t\t\t\t\t\t\t<td>" . $xF->getFechaCorta($rw["fecha_de_pago"]) . "</td>\n\t\t\t\t\t\t\t<td class='mny'>" . getFMoney($rw["total_parcialidad"]) . "</td>\n\t\t\t\t\t\t\t<td class='mny'>" . getFMoney($saldo) . "</td>\n\t\t\t\t\t\t</tr>"; $pi++; } $pt++; $items++; $this->mFechaUltimaParc = $rw["fecha_de_pago"]; } $PlanBody .= "<table class='plan_de_pagos'>\n\t\t\t\t\t\t\t\t<tbody>\n\t\t\t\t\t\t\t\t{$tp}\n\t\t\t\t\t\t\t\t</tbody>\n\t\t\t\t\t\t\t\t<!-- SUMAS -->\n\t\t\t\t\t\t\t\t<tfoot>\n\t\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t\t<td colspan='2'><hr />TOTAL</th>\n\t\t\t\t\t\t\t\t\t\t\n\t\t\t\t\t\t\t\t\t\t<td class='mny'><hr />" . getFMoney($SumTotal) . "</th>\n\t\t\t\t\t\t\t\t\t\t\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t</tfoot>\n\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t\t"; } //END IF $PlanFoot = "<hr />\n\t\t\t<table>\n\t\t\t\t<tr>\n\t\t\t\t\t<td><center>" . $xL->getT("TR.Firma del Solicitante") . "</td>\n\t\t\t\t\t<td><center>" . $xL->getT("TR.Genera el Plan de Pagos") . "</center></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td><br /><br /><br /> </td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t\t<td><center>{$nombre}</center></td>\n\t\t\t\t\t\t<td><center>" . $this->mOficialQueGenera . "</center></td>\n\t\t\t\t</tr>\n\t\t\t\t</table>"; if ($NoExtend == false) { $PlanBody .= "<hr />\n\t\t\t\t\t\t<table>\n\t\t\t\t\t\t \t<tr>\n\t\t\t\t\t\t \t<td>" . $xL->getT("TR.Dias Totales") . ":</td>\n\t\t\t\t\t\t \t<th>{$dias_totales} Dias</th>\n\t\t\t\t\t\t \t<td>" . $xL->getT("TR.Tasa de Interes") . " :</td>\n\t\t\t\t\t\t \t<th>{$tasa_interes} %</th>\n\t\t\t\t\t\t \t<td>" . $xL->getT("TR.Tasa de Ahorro") . " :</td>\n\t\t\t\t\t\t \t<th>{$tasa_ahorro} %</th>\n\t\t\t\t\t\t </tr>\n\t\t\t\t\t </table>\n\t\t\t\t\t\t"; $PlanBody .= $PlanFoot; } } //End evaluate si es Mas Planes de pagos return $PlanBody; }
if (setNoMenorQueCero($tipo_operacion) > 0) { $es_por_operacion = " AND (`operaciones_no_estadisticas`.`tipo_de_operacion` ='{$tipo_operacion}')"; } $f3 = $_GET["f3"]; $out = parametro("out", SYS_DEFAULT); /* ******************************************************************************/ $TR_head = ""; $setSql = "SELECT socios.nombre, creditos_solicitud.numero_socio AS 'socio', \n\tcreditos_solicitud.numero_solicitud AS 'solicitud', \n\tcreditos_tipoconvenio.descripcion_tipoconvenio AS 'modalidad', \n\tcreditos_periocidadpagos.descripcion_periocidadpagos AS 'condiciones_de_pago', \n\tcreditos_solicitud.fecha_ministracion AS 'fecha_de_otorgamiento', \n\tcreditos_solicitud.monto_autorizado AS 'monto_original', \n\tcreditos_solicitud.fecha_vencimiento AS 'fecha_de_vencimiento', \n\tcreditos_solicitud.tasa_interes AS 'tasa_ordinaria_nominal_anual',\n\t creditos_solicitud.pagos_autorizados AS 'numero_de_pagos', \n\tcreditos_solicitud.periocidad_de_pago AS 'frecuencia', \n\tcreditos_solicitud.saldo_actual AS 'saldo_insoluto', \n\tcreditos_solicitud.fecha_ultimo_mvto, \n\tcreditos_estatus.descripcion_estatus AS 'estatus', \n\tsocios.genero, socios.tipo_ingreso, \n\tcreditos_solicitud.tipo_autorizacion AS 'modaut',\n\t`operaciones_no_estadisticas`.* \n\tFROM \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` \n\t\t\tINNER JOIN `socios` `socios` \n\t\t\tON `creditos_solicitud`.`numero_socio` = `socios`.`codigo` \n\t\t\t\tINNER JOIN `operaciones_no_estadisticas` \n\t\t\t\t`operaciones_no_estadisticas` \n\t\t\t\tON `creditos_solicitud`.`numero_solicitud` = \n\t\t\t\t`operaciones_no_estadisticas`.`documento` \n\t\t\t\t\tINNER JOIN `creditos_tipoconvenio` `creditos_tipoconvenio` \n\t\t\t\t\tON `creditos_solicitud`.`tipo_convenio` = \n\t\t\t\t\t`creditos_tipoconvenio`.`idcreditos_tipoconvenio` \n\t\t\t\t\t\tINNER JOIN `creditos_estatus` `creditos_estatus` \n\t\t\t\t\t\tON `creditos_solicitud`.`estatus_actual` = \n\t\t\t\t\t\t`creditos_estatus`.`idcreditos_estatus`\n\t\n\tWHERE creditos_solicitud.saldo_actual>=0.99\n\tAND\n\t(`creditos_solicitud`.`fecha_ultimo_mvto`>='{$fecha_inicial}')\n\t{$ByAutorizacion}\n\t{$es_por_estatus}\n\t{$es_por_frecuencia}\n\t{$es_por_convenio}\n\t{$es_por_operacion}\n\tAND\n\t(`operaciones_no_estadisticas`.`fecha` >='{$fecha_inicial}')\n\tAND\n\t(`operaciones_no_estadisticas`.`fecha` <='{$fecha_final}')\n\t\n\tORDER BY creditos_solicitud.tipo_autorizacion DESC,\n\t\t\t\tcreditos_solicitud.fecha_ministracion, \n\t\t\tcreditos_estatus.orden_clasificacion ASC, \n\t\t\tcreditos_solicitud.numero_socio, creditos_solicitud.numero_solicitud,\n\t\t\t`operaciones_no_estadisticas`.fecha"; exit($setSql); $credito_anterior = false; $TR_parent = ""; $TR_child = ""; //echo $setSql; $rs = $query->getDataRecord($setSql); // getRecordset($setSql); $rows = $query->getNumberOfRows(); // mysql_num_rows($rs); $counter = 0; //while($rw = mysql_fetch_array($rs)){ foreach ($rs as $rw) { //$TR_head = ""; if ($credito_anterior == false) { $credito_anterior = $rw["solicitud"]; } $credito = $rw["solicitud"]; if ($credito != $credito_anterior) { //resetear TR_child $TR_parent .= "\n\n \t\t\t\t{$TR_head}\n\n \t\t\t\t<tr>\n \t\t\t\t\t<td colspan='4'>\n \t\t\t\t\t\t<table>\n \t\t\t\t\t\t\t<thead>\n \t\t\t\t\t\t\t\t<th width='10%'>Recibo</th>\n \t\t\t\t\t\t\t\t<th width='15%'>Fecha</th>\n \t\t\t\t\t\t\t\t<th width='25%'>Operacion</th>\n \t\t\t\t\t\t\t\t<th width='20%'>Monto</th>\n \t\t\t\t\t\t\t\t<th width='30%'>Detalles</th>\n \t\t\t\t\t\t\t<thead>\n \t\t\t\t\t\t\t<tbody>\n \t\t\t\t\t\t\t{$TR_child}\n \t\t\t\t\t\t\t</tbody>\n \t\t\t\t\t\t</table>\n \t\t\t\t\t</td>\n \t\t\t\t\t<tr>\n \t\t\t\t\t\t<td colspan='4'></td>\n \t\t\t\t\t\t<td colspan='4'></td>\n \t\t\t\t\t</tr>\n \t\t\t\t</tr>\n \t\t\t\t"; $TR_child = ""; $TR_head = ""; }
function initArbolRelaciones() { $QL = new MQL(); $id = $this->mPersona; $msql = "SELECT `personas_relaciones_recursivas`.*, \n\t\tCONCAT(\tLEFT(`socios_relaciones`.`nombres`,5), ' ',\n\t`socios_relaciones`.`apellido_paterno`, ' ',\n\tLEFT(`socios_relaciones`.`apellido_materno`,5) ) AS `nombres`\n\t \n\t\tFROM \n\n\t\t`personas_relaciones_recursivas` `personas_relaciones_recursivas` \n\t\tLEFT OUTER JOIN `socios_relaciones` `socios_relaciones` \n\t\tON `personas_relaciones_recursivas`.`relacion` = `socios_relaciones`.\n\t\t`numero_socio` "; $sql = "{$msql} WHERE\t(`personas_relaciones_recursivas`.`persona` ={$id})\tORDER BY\t`personas_relaciones_recursivas`.`persona`,\t`personas_relaciones_recursivas`.`nivel`"; //setLog($sql); $rs = $QL->getDataRecord($sql); if ($QL->getNumberOfRows() <= 0) { $sql = "{$msql} WHERE\t(`personas_relaciones_recursivas`.`proxy` ={$id}) "; $rs = $QL->getDataRecord($sql); } if ($QL->getNumberOfRows() <= 0) { $sql = "{$msql} WHERE\t(`personas_relaciones_recursivas`.`relacion` ={$id}) "; $rs = $QL->getDataRecord($sql); } return $rs; }
$cuenta_anterior = "_INIT_"; $exoTR = ""; $exoTD = ""; $SCargos = 0; //Suma de Cargos $SAbonos = 0; //SUma de Abonos $SFinal = 0; $exoCuenta = ""; $MActuales = 0; $tcuenta = ""; //echo $sqlCta; //Imprime la Cuenta $xRPT->addContent("<table>\n<thead>\n\t<tr>\n\t\t<th width=\"10%\" >Fecha</th>\n\t\t<th width=\"10%\" >Poliza</th>\n\t\t<th width=\"10%\" >Numero</th>\n\t\t<th width=\"25%\" >Concepto</th>\n\t\t<th width=\"15%\" >Referencia</th>\n\t\t<th width=\"10%\" >Cargo</th>\n\t\t<th width=\"10%\" >Abono</th>\n\t\t<th width=\"10%\" >Saldo</th>\n\t</tr>\n\t</thead>\n\t<tbody>"); $rs = $ql->getDataRecord($sqlCta); $rows = $ql->getNumberOfRows(); $crows = 1; foreach ($rs as $rw) { //if(!isset($tcuenta)){$tcuenta = ""; } if ($crows == $rows) { $cuenta_anterior = "_FIN_"; //====================================================================== $MFecha = $rw["fecha"]; $MTPoliza = $rw["tipo"]; $MNumero = $rw["poliza"]; $MConcepto = $rw["concepto"]; $MReferencia = $rw["referencia"]; $MCargo = $rw["cargo"]; $MAbono = $rw["abono"]; if ($naturaleza == NC_DEUDORA) { //Deudor