function jsaGetIngresosMensualesPorDependencias($fecha)
{
$xD = new cFecha();
$fecha = $xD->getFechaISO($fecha);
$fi = $xD->getDiaInicial();
$ff = $xD->getDiaFinal();
$sql = new cSQLListas();
$xT = new cTabla($sql->getBasesPorFechasPorDependencia($fi, $ff, 2002));
$xT->setKeyField($sql->getClave());
$xT->setPrepareChart();
$xT->setFootSum(false);
return $xT->Show("Reporte de Ingresos Mensuales por Empresas", true, "tingresos");
}
function jsaGetLetras($idcredito, $idfecha)
{
$xCred = new cCredito($idcredito);
$xCred->init();
//$xPlas = $xCred->getPlanDePago();
$xF = new cFecha();
$idfecha = $xF->getFechaISO($idfecha);
$xQL = new MQL();
//$xQL->setRawQuery("SET @fecha_de_corte:='$idfecha';");
my_query("SET @fecha_de_corte:='{$idfecha}';");
$sql = "SELECT\r\n\t`letras`.`socio_afectado` AS `persona`,\r\n\t`letras`.`docto_afectado` AS `credito`,\r\n\t`letras`.`periodo_socio` AS `parcialidad`,\r\n\t`letras`.`fecha_de_pago`,\r\n\r\n\t`letras`.`capital`,\r\n\t`letras`.`interes`,\r\n\t`letras`.`iva`,\r\n\t`letras`.`ahorro`,\r\n\t`letras`.`otros`,\r\n\t`letras`.`letra`,\t\r\n\t\r\n\t(`creditos_solicitud`.`tasa_moratorio`*100) AS `tasa_de_mora`,\r\n\t(`creditos_solicitud`.`tasa_interes`*100) AS `tasa_de_interes` ,\r\n\tDATEDIFF(getFechaDeCorte(), fecha_de_pago) AS 'dias',\r\n\t ((letras.capital * DATEDIFF(getFechaDeCorte(), fecha_de_pago) * (`creditos_solicitud`.`tasa_moratorio` + `creditos_solicitud`.`tasa_interes`))/getDivisorDeInteres()) AS 'mora'\r\n\tFROM\r\n\t\t`creditos_solicitud` `creditos_solicitud` \r\n\t\t\tINNER JOIN `letras` `letras` \r\n\t\t\tON `creditos_solicitud`.`numero_solicitud` = `letras`.`docto_afectado`\r\n\t\r\n\t WHERE capital >0 AND docto_afectado={$idcredito} AND fecha_de_pago <= getFechaDeCorte()";
$xT = new cTabla($sql);
$xT->setFootSum(array(4 => "capital", 5 => "interes", 6 => "iva", 7 => "ahorro", 8 => "otros", 9 => "letra", 13 => "mora"));
return $xT->Show();
}
function jsaGetCobranza($empresa, $idperiodo)
{
$xL = new cSQLListas();
$xF = new cFecha();
$sql = $xL->getListadoDeCobranza($idperiodo, SYS_UNO);
//setLog($sql);
//fecha de ministracion anterior al
$xT = new cTabla($sql);
$xT->setKeyField("numero_solicitud");
$xT->setKey(2);
$xT->setWidthTool("180px");
$xT->setKeyTable("creditos_solicitud");
$xT->setEventKey("jsGetRecibosByCredito");
$xT->addEspTool("<div class='coolCheck'><input type='checkbox' id='chk_REPLACE_ID_' onclick='jsSetAlimentarCobros(this, _REPLACE_ID_)' /><label for='chk_REPLACE_ID_'></label></div>");
$xT->addEspTool("<img src='../images/order.png' class='x24' onclick='getEstadoDeCuenta(_REPLACE_ID_)' />");
$xT->addEspTool("<img src='../images/calendar.png' class='x24' onclick='getPlanDePagos(_REPLACE_ID_)' />");
$xT->addEspTool("<img src='../images/view.png' class='x24' onclick='setOcultar(_REPLACE_ID_)' />");
/*$subSQL = "SELECT CONCAT(`socios_memo`.`fecha_memo`, '|', `socios_memo`.`texto_memo`) AS 'memo' FROM `socios_memo` WHERE (`socios_memo`.`numero_solicitud` =" . HP_REPLACE_ID . ") AND (`socios_memo`.`tipo_memo` =11) ORDER BY `socios_memo`.`fecha_memo` ";
$xT->addSubQuery($subSQL);*/
$xT->setWithMetaData();
$xT->setFootSum(array(3 => "letra", 6 => "monto"));
return $xT->Show();
}
<td ><?php
echo $nombreBase;
?>
</td>
</tr>
</thead>
</table>
<?php
$xD = new cFecha();
$sql = new cSQLListas();
$xT = new cTabla($sql->getBasesPorFechasPorDependencia($fechaInicial, $fechaFinal, $base));
$xT->setKeyField($sql->getClave());
if ($out == "chart") {
$xT->setTdClassByType(false);
$xT->setPrepareChart();
$xT->setFootSum(false);
echo "<div id='treport'></div><span style='display:none'>" . $xT->Show($xHP->getTitle(), true, "tdatos") . "</span>";
}
$xT->setPrepareChart(false);
$xT->setTdClassByType();
$xT->setFootSum(array(1 => "monto"));
echo $xT->Show();
//"Reporte de Ingresos Mensuales por Empresas", true, "tingresos");
echo getRawFooter();
echo $xHP->setBodyEnd();
?>
<script>
<?php
if ($out == "chart") {
echo "\$(document).ready( function(){ jsGetChart(); });";
}
function getFicha($extendido = false, $operaciones = false)
{
/*
* <option value="3">Si</option>
<option value="4" selected>No</option>
<option value="1">Titulo</option>
<option value="2">SubTitulo</option>
*/
$arrTipos = array(3 => "MAYOR", 4 => "NINGUNO", 1 => "TITULO", 2 => "SUBTITULO");
$cuenta = $this->getCuentaCompleta();
$superior = $this->getParent(true);
$DCuenta = $this->getDatos();
$ql = new MQL();
$xLis = new cSQLListas();
$DSuperior = $this->mArraySuperior;
$superiorN = $DSuperior["nombre"];
$cuentaN = $DCuenta["nombre"];
$tipo = $DCuenta["nombre_del_tipo"];
$mayor = $arrTipos[$DCuenta["ctamayor"]];
$afectable = $DCuenta["afectable"] == 1 ? "AFECTABLE" : "NO_AFECTABLE";
$marco = true;
$tool = "";
$hsaldos = "";
$hoperaciones = "";
if ($extendido == true) {
$sql = $xLis->getListadoDeSaldosContablesConTitulos($cuenta);
$xTable = new cTabla($sql);
$hsaldos .= $xTable->Show("TR.Saldos");
}
if ($operaciones == true) {
$sql = "SELECT\n\t\t\t\t\t`contable_movimientos`.`ejercicio`,\n\t\t\t\t\t`contable_movimientos`.`periodo` AS `mes`,\n\t\t\t\t\t`contable_movimientos`.`fecha`,\n\t\t\t\t\t`contable_polizasdiarios`.`nombre_del_diario` AS `tipo`,\n\t\t\t\t\t`contable_movimientos`.`numeropoliza` AS `poliza`,\n\t\t\t\t\t`contable_movimientos`.`numeromovimiento` AS `operacion`,\n\t\t\t\t\t`contable_movimientos`.`numerocuenta` AS `cuenta`,\n\t\t\t\t\t\n\t\t\t\t\t/*/`contable_movimientos`.`importe`,*/\n\t\t\t\t\t\n\t\t\t\t\t\n\t\t\t\t\t`contable_movimientos`.`cargo`,\n\t\t\t\t\t`contable_movimientos`.`abono`,\n\t\t\t\t\t\n\t\t\t\t\t/*`contable_movimientos`.`moneda`,*/\n\t\t\t\t\t`contable_movimientos`.`referencia`,\n\t\t\t\t\t`contable_movimientos`.`concepto`\t\t\t\t\t \n\t\t\t\tFROM\n\t\t\t\t\t`contable_movimientos` `contable_movimientos` \n\t\t\t\t\t\tINNER JOIN `contable_polizasdiarios` `contable_polizasdiarios` \n\t\t\t\t\t\tON `contable_movimientos`.`tipopoliza` = `contable_polizasdiarios`.\n\t\t\t\t\t\t`idcontable_polizadiarios` \n\t\t\t\tWHERE\n\t\t\t\t\t(`contable_movimientos`.`numerocuenta` ={$cuenta})";
$xTable = new cTabla($sql);
$xTable->setFootSum(array(7 => "cargo", 8 => "abono"));
$hoperaciones .= $xTable->Show("TR.Operaciones");
}
//cuenta nombre
//tipo afectable
//cuenta superior
$exoFicha = "\n\t\t\t<table>\n\t\t\t<tbody>\n\t\t\t\t<tr>\n\t\t\t\t\t<td>Numero de Cuenta</td>\n\t\t\t\t\t<th>{$cuenta}</th>\n\t\t\t\t\t<td>Nombre</td>\n\t\t\t\t\t<th>{$cuentaN}</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td>Cuenta Superior</td>\n\t\t\t\t\t<th>{$superior}</th>\n\t\t\t\t\t<td>Nombre</td>\n\t\t\t\t\t<th>{$superiorN}</th>\t\t\t\t\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td>Tipo de Cuenta</td>\n\t\t\t\t\t<th>{$tipo}</th>\n\t\t\t\t\t<td>Caracteristicas</td>\n\t\t\t\t\t<th>{$mayor} / {$afectable}</th>\t\t\t\t\n\t\t\t\t</tr>\n\t\t\t\t{$tool}\n\t\t\t</tbody>\n\t\t\t</table>{$hsaldos} {$hoperaciones}";
//if ($marco == true){
$exoFicha = "<fieldset>\n\t\t\t\t\t\t<legend> INFORMACIÓN DE LA CUENTA </legend>\n\t\t\t\t\t\t\t{$exoFicha}\n\t\t\t\t\t</fieldset>";
//}
return $exoFicha;
}
$xTabs = new cHTabs();
/* ----------------- DATOS --------------- */
$cEdit = new cTabla($xSQL->getListadoDeOperaciones("", "", $idrecibo));
$cEdit->addTool(SYS_UNO);
$cEdit->addTool(SYS_DOS);
$cEdit->setEventKey("jsEditClick");
$cEdit->setTdClassByType();
$cEdit->setKeyField("idoperaciones_mvtos");
$xTabs->addTab("TR.OPERACIONES", $cEdit->Show());
$NumOpers = $cEdit->getRowCount();
$cBan = new cTabla($xSQL->getListadoDeOperacionesBancarias("", "", "", false, false, " AND `bancos_operaciones`.`recibo_relacionado` = {$idrecibo} "));
//$cBan->setEventKey("idcontrol");
$cBan->setKeyField("idcontrol");
$cBan->addTool(SYS_UNO);
$cBan->addTool(SYS_DOS);
$cBan->setFootSum(array(7 => "monto"));
$xTabs->addTab("TR.BANCOS", $cBan->Show());
//Operaciones de Tesorería
$cTes = new cTabla($xSQL->getListadoDeOperacionesDeTesoreria("", "", $idrecibo));
$cTes->addTool(SYS_UNO);
$cTes->addTool(SYS_DOS);
$xTabs->addTab("TR.TESORERIA", $cTes->Show());
//agregar contable
if (getEsModuloMostrado(USUARIO_TIPO_CONTABLE) == true) {
$xTbl = new cTabla("SELECT * FROM `contable_polizas_proforma` WHERE `numero_de_recibo`={$idrecibo}");
$xTabs->addTab("TR.Pre Poliza", $xTbl->Show());
//poliza relacionada
$xTbl = new cTabla($xSQL->getListadoDePolizasContables(false, false, false, false, false, " AND (`recibo_relacionado`={$idrecibo}) "));
$xTabs->addTab("TR.Poliza", $xTbl->Show());
//factura XML
//$xRec->getFactura(false, OUT_RXML);
$fecha_inicial = parametro("on", $fecha_inicial);
$fecha_final = parametro("idfecha-1", false);
$fecha_final = parametro("off", $fecha_final);
echo $xHP->getHeader();
echo $xHP->setBodyinit("initComponents();");
$ByFecha = ($fecha_final == false or $fecha_inicial == false) ? "" : " AND\t(`empresas_operaciones`.`fecha_de_operacion` >='" . $xF->getFechaISO($fecha_inicial) . "') AND\t(`empresas_operaciones`.`fecha_de_operacion` <='" . $xF->getFechaISO($fecha_final) . "') ";
$ByPeriodo = $periodo == SYS_TODAS ? "" : "AND ( `periodo_marcado` = {$periodo}) ";
$xRPT = new cReportes();
echo $xRPT->getHInicial("TR.Estado de cuenta de Empresas", $fecha_inicial, $fecha_final);
//TODO: Acabar
$lt = new cSQLListas();
$sql = $lt->getListadoDeOperacionesDeEmpresas($empresa, $periocidad, $ByFecha . $ByPeriodo);
$xT = new cTabla($sql);
$xEmp = new cEmpresas($empresa);
echo $xEmp->getFicha();
$xT->getFieldsSum("monto");
$xT->setTdClassByType();
$xT->setFootSum(array(6 => "envios", 7 => "cobros"));
echo $xT->Show();
echo getRawFooter();
echo $xHP->setBodyEnd();
?>
<script>
<?php
?>
function initComponents(){
window.print();
}
</script>
<?php
$xHP->end();
$jsEvent = $out != OUT_EXCEL ? "initComponents()" : "";
$senders = getEmails($_REQUEST);
$sql = "SELECT\r\n\t`operaciones_recibos`.`numero_socio` AS `persona`,\r\n\t`operaciones_recibos`.`fecha_operacion` AS `fecha`,\r\n\t`operaciones_recibostipo`.`descripcion_recibostipo` AS `tipo`,\r\n\t`operaciones_recibos`.`docto_afectado` AS `documento`,\r\n\t`personas_perfil_transaccional_tipos`.`nombre_del_perfil` AS `origen`,\r\n\t`operaciones_recibos`.`idoperaciones_recibos`\t AS `recibo`,\r\n\t`operaciones_recibos`.`total_operacion` AS `monto`,\r\n\t\r\n\t`operaciones_recibos`.`idusuario` AS `usuario`,\r\n\t`operaciones_recibos`.`observacion_recibo` AS `observaciones`,\r\n\t`operaciones_recibos`.`tipo_pago` AS `forma_de_pago`,\r\n\t`operaciones_recibos`.`clave_de_moneda` AS `moneda`,\r\n\t`operaciones_recibos`.`unidades_en_moneda` AS `unidades`,\r\n\tIF(UPPER(`operaciones_recibos`.`clave_de_moneda`) != getMonedaLocal(), getEquivalenciaDeMonedas(`operaciones_recibos`.`unidades_en_moneda`, `operaciones_recibos`.`clave_de_moneda`),\r\n\t`operaciones_recibos`.`total_operacion`)\r\n\t AS `equivalencia`\r\nFROM\r\n\t`operaciones_recibos` `operaciones_recibos` \r\n\t\tINNER JOIN `operaciones_recibostipo` `operaciones_recibostipo` \r\n\t\tON `operaciones_recibos`.`tipo_docto` = `operaciones_recibostipo`.\r\n\t\t`idoperaciones_recibostipo` \r\n\t\t\tINNER JOIN `personas_perfil_transaccional_tipos` \r\n\t\t\t`personas_perfil_transaccional_tipos` \r\n\t\t\tON `operaciones_recibos`.`origen_aml` = \r\n\t\t\t`personas_perfil_transaccional_tipos`.\r\n\t\t\t`idpersonas_perfil_transaccional_tipos` \r\nWHERE\r\n\t(`operaciones_recibos`.`numero_socio` ={$persona})";
$titulo = "";
$archivo = "";
$xRPT = new cReportes($titulo);
$xRPT->setFile($archivo);
$xRPT->setOut($out);
$xRPT->setSQL($sql);
$xRPT->setTitle($xHP->getTitle());
//============ Reporte
$xSoc = new cSocio($persona);
$xSoc->init();
$xT = new cTabla($sql, 2);
$xT->setTipoSalida($out);
$xT->setFootSum(array(4 => "monto", 9 => "unidades", 10 => "equivalencia"));
$body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal);
$xRPT->setBodyMail($body);
$xRPT->addContent($body);
$xRPT->addContent($xSoc->getFicha(true));
//$xT->setEventKey("jsGoPanel");
//$xT->setKeyField("creditos_solicitud");
$xRPT->addContent($xT->Show($xHP->getTitle()));
$xT = new cTabla($xL->getListadoDePerfil($persona));
$xRPT->addContent($xT->Show());
if (MODO_DEBUG == true) {
$periodo_inicial = date("Ym", $xF->getInt($FechaInicial));
$periodo_final = date("Ym", $xF->getInt($FechaFinal));
$xT2 = new cTabla($xL->getAMLAcumuladoDeEgresos($periodo_inicial, $periodo_final, $persona));
$xRPT->addContent($xT2->Show());
}
function getResumenDeCaja()
{
$xF = new cFecha();
$xSQL = new cSQLListas();
$xTxt = new cHText();
$xLn = new cLang();
$xTbl = new cHTabla();
$this->mSumaRecibos = 0;
$this->mSumaCobros = 0;
$resumen = "";
$fecha_inicial = $this->mFecha;
$fecha_final = $this->mFecha;
$cajero = $this->mCajero;
//==================================================================== TOTAL CORTE
$resumen .= "<h3>" . $xLn->getT("TR.Resumen de caja") . "</h3>";
$sqlTi = $xSQL->getListadoResumenTesoreria($cajero, $fecha_inicial, $fecha_final);
$xT = new cTabla($sqlTi);
$xT->setTdClassByType();
$xT->setFootSum(array(2 => "operacion", 3 => "recibido", 4 => "cambio"));
$resumen .= $xT->Show("TR.Resumen");
$resumen .= "<input type='hidden' id='idsumacaja' value='" . $xT->getFieldsSum("recibido") . "' />";
$resumen .= "<h3>" . $xLn->getT("TR.Efectivo") . "</h3>";
//==================================================================== EFECTIVO
$sqlTE = $xSQL->getListadoResumenOperaciones($fecha_inicial, $fecha_final, $cajero, TESORERIA_COBRO_EFECTIVO);
$xTE = new cTabla($sqlTE);
$xTE->setTdClassByType();
$xTE->setFootSum(array(5 => "total"));
$resumen .= $xTE->Show("TR.Cobros por Efectivo");
$this->mSumaRecibos += $xTE->getFieldsSum("total");
$resumen .= "<h3>" . $xLn->getT("TR.Documentos") . "</h3>";
$sqlArq = "SELECT\r\n\t\t\t\t`tesoreria_caja_arqueos`.`fecha_de_arqueo`,\r\n\t\t\t\t`tesoreria_caja_arqueos`.`documento`,\r\n\t\t\t\t`tesoreria_caja_arqueos`.`monto_total_arqueado`,\r\n\t\t\t\t`tesoreria_caja_arqueos`.`observaciones` \r\n\t\t\tFROM\r\n\t\t\t\t`tesoreria_caja_arqueos` `tesoreria_caja_arqueos` \r\n\t\t\tWHERE\r\n\t\t\t\t(`tesoreria_caja_arqueos`.`codigo_de_caja` ='" . $this->getKey() . "')";
$xTArq = new cTabla($sqlArq);
$xTArq->setTdClassByType();
$xTArq->setFootSum(array(2 => "monto_total_arqueado"));
$resumen .= $xTArq->Show("TR.Arqueo");
$this->mSumaCobros += $xTArq->getFieldsSum("monto_total_arqueado");
//==================================================================== CHEQUES Y DOCUMENTOS
$sqlLC = $xSQL->getListadoDeTesoreria($cajero, $fecha_inicial, $fecha_final, TESORERIA_COBRO_CHEQUE);
$xT2 = new cTabla($sqlLC);
$xT2->setTdClassByType();
$xT2->setFootSum(array(5 => "operacion"));
$resumen .= $xT2->Show("TR.Operaciones en Cheque");
$this->mSumaCobros += $xT2->getFieldsSum("operacion");
$sqlTD = $xSQL->getListadoResumenOperaciones($fecha_inicial, $fecha_final, $cajero, TESORERIA_COBRO_CHEQUE);
$xTD = new cTabla($sqlTD);
$xTD->setTdClassByType();
$xTD->setFootSum(array(5 => "total"));
$resumen .= $xTD->Show("TR.Cobros por Cheque");
$this->mSumaRecibos += $xTD->getFieldsSum("total");
$resumen .= "<h3>" . $xLn->getT("TR.Bancos") . "</h3>";
//==================================================================== TRANFERENCIAS
$sqlTO = $xSQL->getListadoDeCajaEnBanco(BANCOS_OPERACION_DEPOSITO, "", $cajero, $fecha_inicial, $fecha_final);
$xT = new cTabla($sqlTO);
$xT->setTdClassByType();
$xT->setFootSum(array(4 => "monto"));
$resumen .= $xT->Show("TR.Operaciones Bancarias");
$this->mSumaCobros += $xT->getFieldsSum("monto");
//-------------------------------------------
$sqlT = $xSQL->getListadoResumenOperaciones($fecha_inicial, $fecha_final, $cajero, TESORERIA_COBRO_TRANSFERENCIA);
$xT = new cTabla($sqlT);
$xT->setTdClassByType();
$xT->setFootSum(array(5 => "total"));
$resumen .= $xT->Show("TR.Cobros por Transferencia");
$this->mSumaRecibos += $xT->getFieldsSum("total");
//====================================================================
$xTbl->initRow();
$xTbl->addTH("TR.Suma de Recibos");
$xTbl->addTD(getFMoney($this->mSumaRecibos));
$xTbl->endRow();
$xTbl->initRow();
$xTbl->addTH("TR.Suma de Cobranza");
$xTbl->addTD(getFMoney($this->mSumaCobros));
$xTbl->endRow();
$resumen .= $xTbl->get();
$resumen .= "<input type='hidden' id='idsumaoperaciones' value='" . $this->mSumaRecibos . "' />";
$resumen .= "<input type='hidden' id='idsumacobros' value='" . $this->mSumaCobros . "' />";
$this->mArqueoInit = true;
return $resumen;
}
$tipo_operacion = parametro("f711", SYS_TODAS, MQL_INT);
$tipo_operacion = parametro("operacion", $tipo_operacion, MQL_INT);
$out = parametro("out", SYS_DEFAULT);
$def_type = 110;
$sql = "SELECT creditos.convenio AS 'tipo', \n\t\t\tCOUNT(operaciones_mvtos.idoperaciones_mvtos) AS 'numero',\n\n\t\t\t\n\t\t\tSUM(operaciones_mvtos.afectacion_real) AS 'monto',\n\n\t\t\t/*SUM(creditos.monto_autorizado) AS 'monto_original',*/\n\t\t\t(SUM(operaciones_mvtos.afectacion_real) - SUM(creditos.saldo_actual)) AS 'cobros',\n\t\t\tSUM(creditos.saldo_actual) AS 'saldo_de_credito'\n\t\t\t \nFROM\n\t`operaciones_mvtos` `operaciones_mvtos` \n\t\tINNER JOIN `operaciones_recibos` `operaciones_recibos` \n\t\tON `operaciones_mvtos`.`recibo_afectado` = `operaciones_recibos`.\n\t\t`idoperaciones_recibos` \n\t\t\tINNER JOIN `creditos` `creditos` \n\t\t\tON `operaciones_mvtos`.`docto_afectado` = `creditos`.`solicitud` \nWHERE\n\t(`operaciones_recibos`.`tipo_pago` !='" . TESORERIA_COBRO_NINGUNO . "')\n\tAND (operaciones_mvtos.tipo_operacion={$def_type})\n\t{$BySuc}\n\t{$si_es_por_fecha}\nGROUP BY creditos.convenio";
$xHP->setTitle("TR.Reporte de Colocacion");
$titulo = $xHP->getTitle();
$archivo = "{$titulo}.pdf";
$xRPT = new cReportes($titulo);
$xRPT->setFile($archivo);
$xRPT->setOut($out);
$xRPT->setSQL($sql);
$xRPT->setTitle($xHP->getTitle());
//============ Reporte
$xT = new cTabla($sql, 2);
$xT->setTipoSalida($out);
$xT->setFootSum(array(1 => "numero", 2 => "monto", 3 => "cobros", 4 => "saldo_de_credito"));
$body = $xRPT->getEncabezado($xHP->getTitle(), $fecha_inicial, $fecha_final);
$xRPT->setBodyMail($body);
$xRPT->addContent($body);
$xRPT->addContent("<h1>" . $sucursal . "</h1>");
//$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->addContent("<table>$TR_parent</table>");
$xRPT->setResponse();
$xRPT->setSenders($senders);
echo $xRPT->render(true);
/* ******************************************************************************/
$OperadorFecha = $out == OUT_EXCEL ? " " : "getFechaMX";
$setSql = "SELECT \n\tsocios.alias_dependencia AS 'empresa',\n\tcreditos_solicitud.numero_socio AS 'socio',\n\tsocios.nombre, \n\tcreditos_solicitud.numero_solicitud AS 'credito',\n\tcreditos_tipoconvenio.descripcion_tipoconvenio AS 'producto',\n\tcreditos_periocidadpagos.descripcion_periocidadpagos AS 'condiciones_de_pago',\n\t`creditos_tipo_de_autorizacion`.`descripcion_tipo_de_autorizacion` AS 'modalidad_de_autorizacion',\n\t`creditos_tipo_de_pago`.`descripcion` AS `tipo_de_pago`,\n\t\t \n\t{$OperadorFecha}(creditos_solicitud.fecha_ministracion) AS 'fecha_de_otorgamiento',\n\tcreditos_solicitud.monto_autorizado AS 'monto_original', \n\t{$OperadorFecha}(creditos_solicitud.fecha_vencimiento) AS 'fecha_de_vencimiento',\n\t(creditos_solicitud.tasa_interes * 100) AS 'tasa_anual',\n\tCONCAT(creditos_solicitud.ultimo_periodo_afectado, '/', creditos_solicitud.pagos_autorizados) AS 'numero_de_pagos',\n \n\tcreditos_solicitud.saldo_actual AS 'saldo_insoluto',\n\tcreditos_estatus.descripcion_estatus AS 'estatus',\n\n\t\n\t`creditos_letras_pendientes`.`interes_exigible`,\n\t`creditos_letras_pendientes`.`iva_exigible`,\n\t`creditos_letras_pendientes`.`interes_moratorio` \t\n\nFROM\n\t`creditos_letras_pendientes` `creditos_letras_pendientes` \n\t\tRIGHT OUTER JOIN `creditos_solicitud` `creditos_solicitud` \n\t\tON `creditos_letras_pendientes`.`docto_afectado` = `creditos_solicitud`.\n\t\t`numero_solicitud` \n\t\t\tINNER JOIN `creditos_estatus` `creditos_estatus` \n\t\t\tON `creditos_solicitud`.`estatus_actual` = `creditos_estatus`.\n\t\t\t`idcreditos_estatus` \n\t\t\t\tINNER JOIN `creditos_tipo_de_pago` `creditos_tipo_de_pago` \n\t\t\t\tON `creditos_solicitud`.`tipo_de_pago` = `creditos_tipo_de_pago`\n\t\t\t\t.`idcreditos_tipo_de_pago` \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_tipo_de_autorizacion` \n\t\t\t\t\t\t`creditos_tipo_de_autorizacion` \n\t\t\t\t\t\tON `creditos_solicitud`.`tipo_autorizacion` = \n\t\t\t\t\t\t`creditos_tipo_de_autorizacion`.\n\t\t\t\t\t\t`idcreditos_tipo_de_autorizacion` \n\t\t\t\t\t\t\tINNER JOIN `creditos_periocidadpagos` \n\t\t\t\t\t\t\t`creditos_periocidadpagos` \n\t\t\t\t\t\t\tON `creditos_solicitud`.`periocidad_de_pago` = \n\t\t\t\t\t\t\t`creditos_periocidadpagos`.\n\t\t\t\t\t\t\t`idcreditos_periocidadpagos` \n\t\t\t\t\t\t\t\tINNER JOIN `socios` `socios` \n\t\t\t\t\t\t\t\tON `creditos_solicitud`.`numero_socio` = \n\t\t\t\t\t\t\t\t`socios`.`codigo`\n\n\tWHERE (creditos_solicitud.numero_solicitud != 0)\n\t{$BySaldo}\n\t{$es_por_estatus}\n\t{$es_por_frecuencia}\n\t{$es_por_convenio}\n\t{$ByEmpresa}\n\t{$ByFecha}\n\tORDER BY `creditos_solicitud`.`tipo_convenio`, socios.nombre ";
$senders = getEmails($_REQUEST);
$sql = $setSql;
$titulo = "";
$archivo = "";
$xRPT = new cReportes($titulo);
$xRPT->setFile($archivo);
$xRPT->setOut($out);
$xRPT->setSQL($sql);
$xRPT->setTitle($xHP->getTitle());
//============ Reporte
$xT = new cTabla($sql, 2);
$xT->setTipoSalida($out);
$xT->setFootSum(array(9 => "monto_original", 13 => "saldo_insoluto", 15 => "interes_exigible", 16 => "iva_exigible", 17 => "interes_moratorio"));
$body = $xRPT->getEncabezado($xHP->getTitle(), $fechaInicial, $fechaFinal);
$xRPT->setBodyMail($body);
$xRPT->addContent($body);
//$xT->setEventKey("jsGoPanel");
//$xT->setKeyField("creditos_solicitud");
$xRPT->addContent($xT->Show());
//============ Agregar HTML
//$xRPT->addContent( $xHP->init($jsEvent) );
//$xRPT->addContent( $xHP->end() );
$xRPT->setResponse();
$xRPT->setSenders($senders);
echo $xRPT->render(true);
exit;
//echo $setSql; exit();
if ($out != OUT_EXCEL) {
$estatus = parametro("estado", SYS_TODAS);
$frecuencia = parametro("periocidad", SYS_TODAS);
$producto = parametro("convenio", SYS_TODAS);
$producto = parametro("producto", $producto);
$empresa = parametro("empresa", SYS_TODAS);
$out = parametro("out", SYS_DEFAULT);
$FechaInicial = parametro("on", false);
$FechaInicial = parametro("fecha-0", $FechaInicial);
$FechaInicial = $FechaInicial == false ? FECHA_INICIO_OPERACIONES_SISTEMA : $xF->getFechaISO($FechaInicial);
$FechaFinal = parametro("off", false);
$FechaFinal = parametro("fecha-1", $FechaFinal);
$FechaFinal = $FechaFinal == false ? fechasys() : $xF->getFechaISO($FechaFinal);
$jsEvent = $out != OUT_EXCEL ? "initComponents()" : "";
$senders = getEmails($_REQUEST);
$sucursal = parametro("s", SYS_TODAS);
$si_es_por_fecha = "";
$graficos = parametro("graficos", false, MQL_BOOL);
$BySuc = $sucursal == SYS_TODAS ? "" : " AND `creditos_solicitud`.`sucursal`= '{$sucursal}'";
$si_es_por_fecha = " AND fecha_ministracion>='{$FechaInicial}' AND fecha_ministracion<='{$FechaFinal}' ";
$sql = "\nSELECT\n\t`creditos_tipoconvenio`.`descripcion_tipoconvenio` AS 'convenio',\n\t\t\n\tCOUNT(`creditos_solicitud`.`numero_solicitud`) AS 'numero',\n\t(AVG(`creditos_solicitud`.`tasa_interes`) * 100) AS 'tasa_promedio',\n\tAVG(`creditos_solicitud`.`saldo_actual`) AS 'saldo_promedio',\n\t\t\n\tSUM(`creditos_solicitud`.`monto_autorizado`) AS 'ministrado',\n\t\n\tSUM(`creditos_solicitud`.`saldo_actual`) AS 'saldo'\n\t \nFROM\n\t`creditos_solicitud` `creditos_solicitud` \n\t\tINNER JOIN `creditos_tipoconvenio` `creditos_tipoconvenio` \n\t\tON `creditos_solicitud`.`tipo_convenio` = `creditos_tipoconvenio`.\n\t\t`idcreditos_tipoconvenio` \nWHERE\n\t`estatus_actual` != 50 \n\tAND\n\t(`creditos_solicitud`.`monto_autorizado` >=" . TOLERANCIA_SALDOS . ")\n\t\n\t{$si_es_por_fecha} \n\t{$BySuc}\nGROUP BY\n\t`creditos_solicitud`.`tipo_convenio` ";
$xT = new cTabla($sql);
$xT->setFootSum(array(1 => "numero", 5 => "saldo"));
$xRPT->setOut($out);
$xRPT->addContent($xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal));
if ($graficos == true) {
//$xT->setPrepareChart();
}
$xT->setTipoSalida($out);
$xRPT->addContent($xT->Show());
//$xRPT->addContent("<script>setTimeout('mychart',1500); function mychart() { $('#sqltable').visualize({type: 'bar', width: '450px'}).appendTo('body'); }</script>");
echo $xRPT->render(true);
$periocidad = parametro("periocidad", $periocidad);
$periocidad = parametro("frecuencia", $periocidad);
$estado = parametro("estado", SYS_TODAS);
$estado = parametro("estatus", $estado);
$producto = parametro("convenio", SYS_TODAS);
$producto = parametro("producto", $producto);
$fechaInicial = parametro("on", EACP_FECHA_DE_CONSTITUCION);
$fechaFinal = parametro("off", fechasys());
$fechaInicial = $xF->getFechaISO($fechaInicial);
$fechaFinal = $xF->getFechaISO($fechaFinal);
$formato = parametro("out", SYS_DEFAULT, MQL_RAW);
$sucursal = parametro("sucursal", SYS_TODAS, MQL_RAW);
$xRPT = new cReportes($xHP->getTitle());
$ByProducto = $xLi->OFiltro()->CreditosPorProducto($producto);
$BySucursal = $xLi->OFiltro()->CreditosPorSucursal($sucursal);
$sql = "\nSELECT\n\t`creditos_solicitud`.`sucursal`,\n\t`creditos_solicitud`.`numero_socio` AS `persona`,\n\t`socios`.`nombre`,\n\t\n\t`creditos_solicitud`.`numero_solicitud` AS `credito`,\n\t`creditos_solicitud`.`monto_autorizado` AS `monto`,\n\t`creditos_solicitud`.`fecha_ministracion` AS `fecha` ,\n\tCOUNT(`operaciones_mvtos`.`tipo_operacion`) AS `operaciones`,\n\tMAX(`operaciones_mvtos`.`fecha_afectacion`) AS `fecha`,\n\tSUM(\n\tIF(`operaciones_mvtos`.`tipo_operacion` = 120,\t`operaciones_mvtos`.`afectacion_real`, 0\t)\n\t) AS `abonos`,\n\t(`creditos_solicitud`.`monto_autorizado` - \tSUM(\n\tIF(`operaciones_mvtos`.`tipo_operacion` = 120,\t`operaciones_mvtos`.`afectacion_real`, 0\t)\n\t)) AS 'saldo'\nFROM\n\t`operaciones_mvtos` `operaciones_mvtos` \n\t\tRIGHT OUTER JOIN `creditos_solicitud` `creditos_solicitud` \n\t\tON `operaciones_mvtos`.`docto_afectado` = `creditos_solicitud`.\n\t\t`numero_solicitud` \n\t\t\tINNER JOIN `socios` `socios` \n\t\t\tON `creditos_solicitud`.`numero_socio` = `socios`.`codigo`\n\t\t\t\nWHERE\n\t(\n\t(`operaciones_mvtos`.`tipo_operacion` =120) \n\tOR\n\t(`operaciones_mvtos`.`tipo_operacion` =110))\n\tAND\n\t(`operaciones_mvtos`.`fecha_afectacion` <= '{$fechaFinal}') \n\t{$ByProducto} {$BySucursal}\nGROUP BY\n\t`operaciones_mvtos`.`docto_afectado`\n\t\nHAVING saldo > 0\n\nORDER BY `creditos_solicitud`.`fecha_ministracion` ";
//$sql = "CALL sp_saldos_al_cierre('$fechaFinal')";
//exit($sql);
$xTbl = new cTabla($sql);
$xTbl->setFootSum(array(4 => "monto", 8 => "abonos", 9 => "saldo"));
/*$xTbl->setFootSum(array(
3 => "monto_autorizado",
52 => "abonos",
53 => "saldo"
));*/
$xRPT->setSQL($xTbl->getSQL());
$xTbl->setTipoSalida($formato);
$xRPT->setOut($formato);
$xRPT->addContent($xTbl->Show());
//$xRPT->setResponse();
echo $xRPT->render(true);
$estado = parametro("estatus", $estado);
$producto = parametro("convenio", SYS_TODAS);
$producto = parametro("producto", $producto);
$fechaInicial = parametro("on", EACP_FECHA_DE_CONSTITUCION);
$fechaFinal = parametro("off", fechasys());
$fechaInicial = $xF->getFechaISO($fechaInicial);
$fechaFinal = $xF->getFechaISO($fechaFinal);
$formato = parametro("out", SYS_DEFAULT, MQL_RAW);
$sucursal = parametro("sucursal", SYS_TODAS, MQL_RAW);
$xRPT = new cReportes($xHP->getTitle());
$ByProducto = $xLi->OFiltro()->CreditosPorProducto($producto);
$BySucursal = $xLi->OFiltro()->CreditosPorSucursal($sucursal);
$xF->set($fechaFinal);
$ejercicio = $xF->anno();
my_query("SET @ejercicio:={$ejercicio};");
$sql = "\nSELECT\n\t`socios`.`iddependencia`,\n\t`socios`.`dependencia`,\n\tCOUNT(`creditos_saldos_por_ejercicio`.`numero_solicitud`) AS `creditos`,\n\tSUM(`creditos_saldos_por_ejercicio`.`diciembre`) AS `saldo` \nFROM\n\t`socios` `socios` \n\t\tINNER JOIN `creditos_saldos_por_ejercicio` \n\t\t`creditos_saldos_por_ejercicio` \n\t\tON `socios`.`codigo` = `creditos_saldos_por_ejercicio`.`numero_socio` \n\tGROUP BY\n\t\t`socios`.`iddependencia`\n";
//$sql = "CALL sp_saldos_al_cierre('$fechaFinal')";
//exit($sql);
$xTbl = new cTabla($sql);
$xTbl->setFootSum(array(2 => "creditos", 3 => "saldo"));
/*$xTbl->setFootSum(array(
3 => "monto_autorizado",
52 => "abonos",
53 => "saldo"
));*/
$xRPT->setSQL($xTbl->getSQL());
$xTbl->setTipoSalida($formato);
$xRPT->setOut($formato);
$xRPT->addContent($xTbl->Show());
//$xRPT->setResponse();
echo $xRPT->render(true);
$FechaFinal = parametro("off", false);
$FechaFinal = parametro("fecha-1", $FechaFinal);
$FechaFinal = $FechaFinal == false ? fechasys() : $xF->getFechaISO($FechaFinal);
$senders = getEmails($_REQUEST);
$xHP->init();
//XXX: Cambiar SQL por uno que facilite la ejecucion
$sql = $xL->getListadoDeCuentasDeCapt(false, false, $producto, $subproducto);
//exit($sql);
$titulo = "";
$archivo = "reporte-de-captacion-del-{$FechaInicial}-al-{$FechaFinal}";
$xRPT = new cReportes($titulo);
$xRPT->setFile($archivo);
$xRPT->setOut($out);
$xRPT->setSQL($sql);
$xRPT->setTitle($xHP->getTitle());
//============ Reporte
$xT = new cTabla($sql, 2);
$xT->setTipoSalida($out);
$body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal);
$xRPT->setBodyMail($body);
$xRPT->addContent($body);
$xT->setFootSum(array(5 => "saldo"));
//$xT->setEventKey("jsGoPanel");
//$xT->setKeyField("creditos_solicitud");
$xRPT->addContent($xT->Show());
//============ Agregar HTML
//$xRPT->addContent( $xHP->init($jsEvent) );
//$xRPT->addContent( $xHP->end() );
$xRPT->setResponse();
$xRPT->setSenders($senders);
echo $xRPT->render(true);
$xPer = $xEmp->getOPeriodo(false, false, $idnomina);
$xRPT->setTitle($title);
$xRPT->setOut($out);
$xRPT->setSenders($mails);
$xRPT->setResponse();
//if($out == OUT_EXCEL ){
//$xRPT->setOut($out);
//} else {
// $xLoc->DomicilioLocalidad() . "," . $xLoc->DomicilioEstado() . "," .
$xFMT = new cFormato($xEmp->getIDDeFormatoDeAviso());
$xFMT->setEmpresaPeriodo($empresa, $idnomina);
$xFMT->setProcesarVars();
$xRPT->addContent($xFMT->get());
$xRPT->addContent("<hr />");
//}
$xRPT->setBodyMail($bheader);
//filtrar domicilio -> socio -> credito -> letra
$sql = $xL->getListadoDeCobranza($idnomina);
$xRPT->setSQL($sql);
//exit($sql);
$xT = new cTabla($sql);
$xT->setTipoSalida($out);
$xT->setRowCSS("monto", "mnyres");
$xT->setColTitle("monto", "Monto de Retencion");
$xT->setKeyField("numero_solicitud");
$xT->setKeyTable("creditos_solicitud");
$xT->setTdClassByType();
$xT->setFootSum(array(3 => "letra", 6 => "monto"));
//$xT->getFieldsSum()
$xRPT->addContent($xT->Show());
echo $xRPT->render(true);
$FechaFinal = isset($_GET["off"]) ? $xF->getFechaISO($_GET["off"]) : fechasys();
} else {
$FechaInicial = isset($_GET["on"]) ? $_GET["on"] : FECHA_INICIO_OPERACIONES_SISTEMA;
$FechaFinal = isset($_GET["off"]) ? $_GET["off"] : fechasys();
}
$ByConvenio = $convenio == SYS_TODAS ? "" : " AND\t(`listado_de_ingresos`.`producto` ={$convenio}) ";
$ByEmpresa = $empresa == SYS_TODAS ? "" : " AND (`listado_de_ingresos`.`clave_empresa` = {$empresa}) ";
$ByFecha = "";
$xRPT = new cReportes($xHP->getTitle());
//$xRPT->setFile($archivo);
$xRPT->setOut($out);
//============ Reporte
$body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal);
$xRPT->setBodyMail($body);
//============ Agregar HTML
//$xRPT->addContent( $xHP->init($jsEvent) );
$xRPT->addContent($body);
//$xT->setEventKey("jsGoPanel");
//$xT->setKeyField("creditos_solicitud");
$xRPT->setTitle($xHP->getTitle());
$sql = "\r\nSELECT\r\n\t`listado_de_ingresos`.`clave_empresa`,\r\n\t`listado_de_ingresos`.`empresa`,\r\n\tSUM(`listado_de_ingresos`.`capital`) AS `capital`,\r\n\tSUM(`listado_de_ingresos`.`interes_normal`) AS `interes`,\r\n\tSUM(`listado_de_ingresos`.`interes_moratorio`) AS `moratorios`,\r\n\tSUM(`listado_de_ingresos`.`otros`) AS `otros` ,\r\n\tSUM(`listado_de_ingresos`.`iva`) AS `impuesto` ,\r\n\tSUM(`capital`+ `interes_normal`+`interes_moratorio`+`iva`+`otros`) AS 'total',\r\n\t\r\n\tSUM(CASE WHEN (`listado_de_ingresos`.`banco` = 892360369) THEN 0 ELSE (`capital`+ `interes_normal`+`interes_moratorio`+`iva`+`otros`) END) AS 'neto'\r\n\t\r\n\t\r\nFROM\r\n\t`listado_de_ingresos` `listado_de_ingresos`\r\nWHERE \r\n(`listado_de_ingresos`.`fecha` >='{$FechaInicial}') AND (`listado_de_ingresos`.`fecha` <='{$FechaFinal}') {$ByConvenio} {$ByEmpresa}\r\nAND (tipo_de_pago !='" . TESORERIA_COBRO_NINGUNO . "')\r\nAND (`listado_de_ingresos`.`clave_empresa` != '" . DEFAULT_EMPRESA . "')\r\n\t\t\r\nGROUP BY\r\n\t`listado_de_ingresos`.`clave_empresa` \r\n\tORDER BY `listado_de_ingresos`.`empresa`\r\n\t";
//echo $sql;
$xTBL = new cTabla($sql);
$xTBL->setTdClassByType();
$xTBL->setTipoSalida($out);
$xTBL->setFootSum(array(2 => "capital", 3 => "interes", 4 => "moratorios", 5 => "otros", 6 => "impuesto", 7 => "total", 8 => "neto"));
$xRPT->setSQL($sql);
$xRPT->addContent($xTBL->Show());
$xRPT->setResponse();
$xRPT->setSenders($senders);
echo $xRPT->render(true);
echo getRawHeader();
$xRpt = new cReportes();
echo $xRpt->getEncabezado($xHP->getTitle());
}
$sql = "SELECT\n\t`socios`.`codigo`,\n\t`socios`.`nombre`,\n\t`creditos_solicitud`.`numero_solicitud`,\n\tsaldo,\n\tdias_morosos,\n\tdias_vencidos,\n\t\t\n\t(CASE WHEN ( (dias_vencidos + dias_morosos) <=0) THEN ( saldo ) ELSE 0 END) AS 'sin_mora',\n\t \n\t(CASE WHEN ( (dias_morosos >=1 AND dias_morosos <=7)) THEN (saldo) ELSE 0 END) AS 'moroso_7_dias',\n\t(CASE WHEN ( (dias_morosos >=8 AND dias_morosos <=15)) THEN (saldo) ELSE 0 END) AS 'moroso_15_dias',\n\t(CASE WHEN ( (dias_morosos >=16 AND dias_morosos <=30)) THEN (saldo) ELSE 0 END) AS 'moroso_30_dias',\n\t(CASE WHEN ( (dias_morosos >=31 AND dias_morosos <=60)) THEN (saldo) ELSE 0 END) AS 'moroso_60_dias',\n\t(CASE WHEN ( (dias_morosos >=61 AND dias_morosos <=90)) THEN (saldo) ELSE 0 END) AS 'moroso_90_dias',\n\t(CASE WHEN ( (dias_morosos >=91 AND dias_morosos <=120)) THEN (saldo) ELSE 0 END) AS 'moroso_120_dias',\n\t(CASE WHEN ( (dias_morosos >=121 AND dias_morosos <=180)) THEN (saldo) ELSE 0 END) AS 'moroso_180_dias',\n\t(CASE WHEN ( (dias_morosos >=181)) THEN (saldo) ELSE 0 END) AS 'moroso_mayor',\n\t \n\t(CASE WHEN ( (dias_vencidos >=1 AND dias_vencidos <=7)) THEN (saldo) ELSE 0 END) AS 'vencido_7_dias',\n\t(CASE WHEN ( (dias_vencidos >=8 AND dias_vencidos <=15)) THEN (saldo) ELSE 0 END) AS 'vencido_15_dias',\n\t(CASE WHEN ( (dias_vencidos >=16 AND dias_vencidos <=30)) THEN (saldo) ELSE 0 END) AS 'vencido_30_dias',\n\t(CASE WHEN ( (dias_vencidos >=31 AND dias_vencidos <=60)) THEN (saldo) ELSE 0 END) AS 'vencido_60_dias',\n\t(CASE WHEN ( (dias_vencidos >=61 AND dias_vencidos <=90)) THEN (saldo) ELSE 0 END) AS 'vencido_90_dias',\n\t(CASE WHEN ( (dias_vencidos >=91 AND dias_vencidos <=120)) THEN (saldo) ELSE 0 END) AS 'vencido_120_dias',\n\t(CASE WHEN ( (dias_vencidos >=121 AND dias_vencidos <=180)) THEN (saldo) ELSE 0 END) AS 'vencido_180_dias',\n\t(CASE WHEN ( (dias_vencidos >=181)) THEN (saldo) ELSE 0 END) AS 'vencido_mayor'\n\t \n\t FROM\n\t`creditos_solicitud` `creditos_solicitud` \n\t\tINNER JOIN `dias_en_mora` `dias_en_mora` \n\t\tON `creditos_solicitud`.`numero_solicitud` = `dias_en_mora`.\n\t\t`numero_solicitud` \n\t\t\tINNER JOIN `socios` `socios` \n\t\t\tON `creditos_solicitud`.`numero_socio` = `socios`.`codigo`\n\t WHERE \n\t\tsaldo > " . TOLERANCIA_SALDOS . "\n\t\t\t\tAND dias_morosos >=1\n\t\t{$es_por_convenio}\n\t\t{$es_por_frecuencia}\n\t\t{$es_por_estatus}\n\t\t{$ByOficial}\n\t\t{$BySucursal}\n\t\t{$ByEmpresa}\n\t\t/*Disable castigados*/\n\t\tAND `creditos_solicitud`.`estatus_actual` != " . CREDITO_ESTADO_CASTIGADO . "\n\t ORDER BY dias_morosos DESC\n\t";
//exit( $sql );
if ($out == OUT_EXCEL) {
$xls = new cHExcel();
$xls->convertTable($sql, "REPORTE DE CREDITOS POR RANGO DE MORA");
} else {
$xTBL = new cTabla($sql);
//$xTBL->setEventKey("jsGoEstadoDeCuentaDeCreditosPorPersona");
$xTBL->setKeyField("numero_solicitud");
$xTBL->setTdClassByType();
$init = 6;
$arrCSumas = array(3 => "saldo", $init => "sin_mora", $init + 1 => "moroso_7_dias", $init + 2 => "moroso_15_dias", $init + 3 => "moroso_30_dias", $init + 4 => "moroso_60_dias", $init + 5 => "moroso_90_dias", $init + 6 => "moroso_120_dias", $init + 7 => "moroso_180_dias", $init + 8 => "moroso_mayor", $init + 9 => "vencido_7_dias", $init + 10 => "vencido_15_dias", $init + 11 => "vencido_30_dias", $init + 12 => "vencido_60_dias", $init + 13 => "vencido_90_dias", $init + 14 => "vencido_120_dias", $init + 15 => "vencido_180_dias", $init + 16 => "vencido_mayor");
$xTBL->setFootSum($arrCSumas);
echo $xTBL->Show();
echo getRawFooter();
echo $xHP->setBodyEnd();
?>
<script>
<?php
?>
function initComponents(){
window.print();
}
</script>
<?php
$xHP->end();
}
$senders = getEmails($_REQUEST);
$lista_por_gen = "SELECT\n\t`socios_genero`.`idsocios_genero` AS `genero`,\n\t`socios_genero`.`descripcion_genero` AS `descripcion`,\n\t`general_sucursales`.`nombre_sucursal` AS `sucursal`,\n\tCOUNT(`socios_general`.`codigo`) AS `personas` \nFROM\n\t`socios_general` `socios_general` \n\t\tINNER JOIN `socios_genero` `socios_genero` \n\t\tON `socios_general`.`genero` = `socios_genero`.`idsocios_genero` \n\t\t\tINNER JOIN `general_sucursales` `general_sucursales` \n\t\t\tON `general_sucursales`.`codigo_sucursal` = `socios_general`.\n\t\t\t`sucursal` \n\t\tGROUP BY\n\t\t\t`socios_genero`.`idsocios_genero`,\n\t\t\t`general_sucursales`.`codigo_sucursal` ";
if ($porcredito == true) {
$lista_por_gen = "SELECT\n\t\t`socios_genero`.`idsocios_genero` AS `genero`,\n\t\t`socios_genero`.`descripcion_genero` AS `descripcion`,\n\t\t`general_sucursales`.`nombre_sucursal` AS `sucursal`,\n\t\tCOUNT(`socios_general`.`codigo`) AS `personas`,\n\t\tSUM(`creditos_solicitud`.`monto_solicitado`) AS `solicitado`,\n\t\tSUM(`creditos_solicitud`.`monto_autorizado`) AS `ministrado`,\n\t\tSUM(`creditos_saldo_mensuales`.`septiembre`) AS `insoluto` \n\tFROM\n\t`creditos_solicitud` `creditos_solicitud` \n\t\tINNER JOIN `socios_general` `socios_general` \n\t\tON `creditos_solicitud`.`numero_socio` = `socios_general`.`codigo` \n\t\t\tINNER JOIN `creditos_saldo_mensuales` `creditos_saldo_mensuales` \n\t\t\tON `creditos_solicitud`.`numero_solicitud` = \n\t\t\t`creditos_saldo_mensuales`.`numero_solicitud` \n\t\t\t\tINNER JOIN `socios_genero` `socios_genero` \n\t\t\t\tON `socios_general`.`genero` = `socios_genero`.`idsocios_genero` \n\t\t\t\t\tINNER JOIN `general_sucursales` `general_sucursales` \n\t\t\t\t\tON `general_sucursales`.`codigo_sucursal` = `socios_general`\n\t\t\t\t\t.`sucursal` \n\t\t\t\tGROUP BY\n\t\t\t\t\t`socios_genero`.`idsocios_genero`,\n\t\t\t\t\t`general_sucursales`.`codigo_sucursal` ";
}
$sql = $lista_por_gen;
$titulo = "";
$archivo = "";
$xRPT = new cReportes($titulo);
$xRPT->setFile($archivo);
$xRPT->setOut($out);
$xRPT->setSQL($sql);
$xRPT->setTitle($xHP->getTitle());
//============ Reporte
$xT = new cTabla($sql, 2);
$xT->setFootSum(array(3 => "personas", 4 => "solicitado", 5 => "ministrado", 6 => "insoluto"));
$xT->setTipoSalida($out);
$body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal);
$xRPT->setBodyMail($body);
$xRPT->addContent($body);
//$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);
exit;
//=====================================================================================================
$xT2 = new cHTabs("idcomoempresa");
$idempresa = $xSoc->getOEmpresa()->getClaveDeEmpresa();
$oFrm->addEmpresaComandos($idempresa);
$xTCreds = new cTabla($xql->getListadoDeCreditos(false, false, false, false, " AND (`creditos_solicitud`.`persona_asociada` = {$idempresa}) ", false), 2);
$xTPers = new cTabla($xql->getListadoDeSocios(" (`socios_general`.`dependencia` = {$idempresa}) "));
$xTAhorro = new cTabla($xql->getListadoDeIncidenciasAhorro($idempresa));
$xTPeriodo = new cTabla($xql->getListadoDePeriodoPorEmpresa($idempresa));
$xTPeriodo->setTdClassByType();
$xTPeriodo->setEventKey("var xG = new EmpGen(); xG.getOrdenDeCobranza");
$xTCreds->setTdClassByType();
$xTPers->setTdClassByType();
$xTAhorro->setTdClassByType();
$xModAhorro = "<input type=\"number\" id=\"id" . HP_REPLACE_ID . "\" onblur=\"jsModificarAhorro(this," . HP_REPLACE_ID . ")\" />";
$xTPers->addEspTool($xModAhorro);
$xT2->addTab("TR.Trabajadores", $xTPers->Show());
$xTCreds->setFootSum(array(8 => "saldo"));
$xT2->addTab("TR.Creditos por empresa", $xTCreds->Show());
//Ahorro por Empresa
$xT2->addTab("TR.Ahorro por empresa", $xTAhorro->Show());
$xT2->addTab("TR.Periodos de Empresa", $xTPeriodo->Show());
$xHTabs->addTab("TR.empresa {$idempresa}", $xT2->get());
//tab4
$oFrm->OButton("TR.Cedula de Incidencias de Ahorro", "jsGetCedulaDeAhorro()", "deposito");
$oFrm->OButton("TR.Actualizar Empresa", "jsaActualizarEmpresa()", $oFrm->ic()->EJECUTAR);
$oFrm->OHidden("idempresa", $idempresa);
}
if ($xSoc->getEsSucursal() == true) {
$oFrm->OButton("TR.Actualizar Sucursal", "jsaActualizarSucursal()", $oFrm->ic()->EJECUTAR);
$oFrm->OHidden("idsucursal", $xSoc->getIDSucursalAsociada());
}
if ($xSoc->getEsUsuario(true)) {
</td>
</tr>
</thead>
</table>
<?php
$xT = new cTabla($ql);
$xT->setKeyField($sql->getClave());
if ($out == "chart") {
//$xT->setTdClassByType(false);
//$xT->setPrepareChart();
//$xT->setFootSum(false);
//echo "<div id='treport'></div><span style='display:none'>" . $xT->Show($xHP->getTitle(), true, "tdatos") . "</span>";
}
$xT->setPrepareChart(false);
$xT->setTdClassByType();
$xT->setFootSum(array(4 => "monto"));
echo $xT->Show();
//"Reporte de Ingresos Mensuales por Empresas", true, "tingresos");
echo getRawFooter();
echo $xHP->setBodyEnd();
?>
<script>
<?php
if ($out == "chart") {
echo "\$(document).ready( function(){ jsGetChart(); });";
}
?>
function initComponents(){
window.print();
}
function jsGetChart(mType){
$frecuencia = parametro("periocidad", SYS_TODAS);
$producto = parametro("convenio", SYS_TODAS);
$producto = parametro("producto", $producto);
$empresa = parametro("empresa", SYS_TODAS);
$out = parametro("out", SYS_DEFAULT);
$FechaInicial = parametro("on", false);
$FechaInicial = parametro("fecha-0", $FechaInicial);
$FechaInicial = $FechaInicial == false ? FECHA_INICIO_OPERACIONES_SISTEMA : $xF->getFechaISO($FechaInicial);
$FechaFinal = parametro("off", false);
$FechaFinal = parametro("fecha-1", $FechaFinal);
$FechaFinal = $FechaFinal == false ? fechasys() : $xF->getFechaISO($FechaFinal);
$jsEvent = $out != OUT_EXCEL ? "initComponents()" : "";
$senders = getEmails($_REQUEST);
$sucursal = parametro("s", SYS_TODAS);
$si_es_por_fecha = "";
$graficos = parametro("graficos", false, MQL_BOOL);
$BySuc = $sucursal == SYS_TODAS ? "" : " AND `creditos_solicitud`.`sucursal`= '{$sucursal}'";
$si_es_por_fecha = " AND fecha_ministracion>='{$FechaInicial}' AND fecha_ministracion<='{$FechaFinal}' ";
$xF->set($FechaFinal);
$ejercicio = $xF->anno();
my_query("SET @ejercicio:={$ejercicio};");
$sql = "\nSELECT\n\t`creditos_tipoconvenio`.`descripcion_tipoconvenio` AS `convenio`,\n\tCOUNT(`creditos_saldo_mensuales`.`numero_solicitud`) AS `creditos`,\n\tSUM(`creditos_saldo_mensuales`.`enero`) AS `enero`,\n\tSUM(`creditos_saldo_mensuales`.`febrero`) AS `febrero`,\n\tSUM(`creditos_saldo_mensuales`.`marzo`) AS `marzo`,\n\tSUM(`creditos_saldo_mensuales`.`abril`) AS `abril`,\n\tSUM(`creditos_saldo_mensuales`.`mayo`) AS `mayo`,\n\tSUM(`creditos_saldo_mensuales`.`junio`) AS `junio`,\n\tSUM(`creditos_saldo_mensuales`.`julio`) AS `julio`,\n\tSUM(`creditos_saldo_mensuales`.`agosto`) AS `agosto`,\n\tSUM(`creditos_saldo_mensuales`.`septiembre`) AS `septiembre`,\n\tSUM(`creditos_saldo_mensuales`.`octubre`) AS `octubre`,\n\tSUM(`creditos_saldo_mensuales`.`noviembre`) AS `noviembre`,\n\tSUM(`creditos_saldo_mensuales`.`diciembre`) AS `diciembre` \n\t\t\nFROM\n\t`creditos_saldo_mensuales` `creditos_saldo_mensuales` \n\t\tINNER JOIN `creditos_tipoconvenio` `creditos_tipoconvenio` \n\t\tON `creditos_saldo_mensuales`.`tipo_convenio` = `creditos_tipoconvenio`.\n\t\t`idcreditos_tipoconvenio`\n\tGROUP BY\n\t\t\n\t\t`creditos_saldo_mensuales`.`tipo_convenio`\n\t\t ";
$xT = new cTabla($sql);
$xT->setFootSum(array(1 => "creditos", 2 => "enero", 3 => "febrero", 4 => "marzo", 5 => "abril", 6 => "mayo", 7 => "junio", 8 => "julio", 9 => "agosto", 10 => "septiembre", 11 => "octubre", 12 => "noviembre", 13 => "diciembre"));
$xRPT->setOut($out);
$xRPT->addContent($xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal));
$xRPT->setSQL($sql);
$xT->setTipoSalida($out);
$xRPT->addContent($xT->Show());
//$xRPT->addContent("<script>setTimeout('mychart',1500); function mychart() { $('#sqltable').visualize({type: 'bar', width: '450px'}).appendTo('body'); }</script>");
echo $xRPT->render(true);
`creditos_solicitud`.`fuente_de_fondeo`,
`creditos_solicitud`.`fecha_de_primer_pago`,
COUNT(`operaciones_mvtos`.`tipo_operacion`) AS `operaciones`,
MAX(`operaciones_mvtos`.`fecha_afectacion`) AS `fecha`,
SUM(
IF(`operaciones_mvtos`.`tipo_operacion` = 120, `operaciones_mvtos`.`afectacion_real`, 0 )
) AS `abonos`
FROM
`operaciones_mvtos` `operaciones_mvtos`
RIGHT OUTER JOIN `creditos_solicitud` `creditos_solicitud`
ON `operaciones_mvtos`.`docto_afectado` = `creditos_solicitud`.
`numero_solicitud`
INNER JOIN `operaciones_recibos` `operaciones_recibos`
ON `operaciones_mvtos`.`recibo_afectado` = `operaciones_recibos`.
`idoperaciones_recibos` */
$sql = "\nSELECT\n\t`creditos_solicitud`.`numero_solicitud` AS `contrato`,\n\t`creditos_tipoconvenio`.`descripcion_tipoconvenio` AS `producto`,\n\t`socios`.`codigo` AS `persona`,\n\t`socios`.`nombre` AS `nombre`,\n\t`socios`.`alias_dependencia` AS `empresa`,\n\t`creditos_solicitud`.`monto_autorizado` AS `monto_original`\n\t,\n\t`creditos_solicitud`.`plazo_en_dias`,\n\t`creditos_solicitud`.`fecha_ministracion` AS \n\t`fecha_de_desembolso`,\n\t`creditos_solicitud`.`tasa_interes` AS \n\t`tasa_de_interes`,\n\t`creditos_solicitud`.`pagos_autorizados` AS \n\t`numero_de_pagos`,\n\tIF(`creditos_solicitud`.`periocidad_de_pago` = " . CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO . ", 0,`creditos_solicitud`.`monto_parcialidad`) AS \n\t`monto_de_amortizacion`,\n\t'?' AS `tipo`,\n\t`creditos_solicitud`.`fecha_de_primer_pago`,\n\t`creditos_periocidadpagos`.`descripcion_periocidadpagos` AS `frecuencia`,\n\t`creditos_solicitud`.`ultimo_periodo_afectado` AS \n\t`ultima_parcialidad` ,\n\tCOUNT(`operaciones_mvtos`.`tipo_operacion`) AS `operaciones`,\n\tMAX(`operaciones_mvtos`.`fecha_afectacion`) AS `fecha`,\n\tSUM(\n\tIF(`operaciones_mvtos`.`tipo_operacion` = 120,\t`operaciones_mvtos`.`afectacion_real`, 0\t)\n\t) AS `abonos`,\n\t(`creditos_solicitud`.`monto_autorizado` - \tSUM(\n\tIF(`operaciones_mvtos`.`tipo_operacion` = 120,\t`operaciones_mvtos`.`afectacion_real`, 0\t)\n\t)) AS 'saldo',\n\t`creditos_solicitud`.`saldo_actual` AS 'saldo_sistema' \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` \n\t\t\tINNER JOIN `creditos_tipoconvenio` `creditos_tipoconvenio` \n\t\t\tON `creditos_solicitud`.`tipo_convenio` = `creditos_tipoconvenio`.\n\t\t\t`idcreditos_tipoconvenio` \n\t\t\t\tINNER JOIN `socios` `socios` \n\t\t\t\tON `creditos_solicitud`.`numero_socio` = `socios`.`codigo` \n\t\t\t\t\tRIGHT OUTER JOIN `operaciones_mvtos` `operaciones_mvtos` \n\t\t\t\t\tON `operaciones_mvtos`.`docto_afectado` = \n\t\t\t\t\t`creditos_solicitud`.`numero_solicitud`\n\t\t\t\nWHERE\n\t(\n\t(`operaciones_mvtos`.`tipo_operacion` =120) \n\tOR\n\t(`operaciones_mvtos`.`tipo_operacion` =110))\n\tAND\n\t(`operaciones_mvtos`.`fecha_afectacion` <= '{$fechaFinal}') \n\t{$ByProducto} {$BySucursal}\nGROUP BY\n\t`operaciones_mvtos`.`docto_afectado`\n\t\nHAVING saldo > 0\n\nORDER BY `creditos_solicitud`.`fecha_ministracion`\n \n";
//$sql = "CALL sp_saldos_al_cierre('$fechaFinal')";
//exit($sql);
$xTbl = new cTabla($sql);
$xTbl->setFootSum(array(5 => "monto_original", 17 => "abonos", 18 => "saldo"));
/*$xTbl->setFootSum(array(
3 => "monto_autorizado",
52 => "abonos",
53 => "saldo"
));*/
$xRPT->setSQL($xTbl->getSQL());
$xTbl->setTipoSalida($formato);
$xRPT->setOut($formato);
$xRPT->addContent($xTbl->Show());
//$xRPT->setResponse();
echo $xRPT->render(true);
$fechaFinal = isset($_GET["off"]) ? $xF->getFechaISO($_GET["off"]) : fechasys();
} else {
$fechaInicial = isset($_GET["on"]) ? $_GET["on"] : FECHA_INICIO_OPERACIONES_SISTEMA;
$fechaFinal = isset($_GET["off"]) ? $_GET["off"] : fechasys();
}
$ByConvenio = $convenio == SYS_TODAS ? "" : " AND\t(`listado_de_ingresos`.`producto` ={$convenio}) ";
$ByEmpresa = $empresa == SYS_TODAS ? "" : " AND (`listado_de_ingresos`.`clave_empresa` = {$empresa}) ";
$ByFecha = "";
echo $xHP->getHeader();
echo $xHP->setBodyinit("initComponents();");
echo getRawHeader();
$xRpt = new cReportes();
echo $xRpt->getEncabezado($xHP->getTitle(), $fechaInicial, $fechaFinal, $oficial);
$sql = "SELECT * FROM listado_de_ingresos WHERE (`listado_de_ingresos`.`fecha` >='{$fechaInicial}')\r\nAND (`listado_de_ingresos`.`fecha` <='{$fechaFinal}') {$ByConvenio} {$ByEmpresa}\r\nAND tipo_de_pago !='" . TESORERIA_COBRO_NINGUNO . "'\r\n";
//echo $sql;
$xTBL = new cTabla($sql);
$xTBL->setTdClassByType();
$xTBL->setFootSum(array(9 => "capital", 10 => "interes_normal", 11 => "interes_moratorio", 12 => "iva", 13 => "otros"));
echo $xTBL->Show();
echo getRawFooter();
echo $xHP->setBodyEnd();
?>
<script language="javascript">
<?php
?>
function initComponents(){
window.print();
}
</script>
<?php
$xHP->end();
//$fechaFinal = (isset($_GET["off"])) ? $xF->getFechaISO( $_GET["off"]) : fechasys();
$fecha_inicial = isset($_GET["on"]) ? $_GET["on"] : "";
$fecha_final = isset($_GET["off"]) ? $_GET["off"] : "";
$cajero = isset($_GET["f3"]) ? $_GET["f3"] : SYS_TODAS;
$cajero = isset($_GET["cajero"]) ? $_GET["cajero"] : $cajero;
$ByCajero = ($cajero == "" or $cajero == SYS_TODAS) ? "" : " AND (`tesoreria_cajas_movimientos`.`idusuario` = {$cajero}) ";
echo $xHP->getHeader();
$sql = "\r\nSELECT\r\n\t`tesoreria_cajas_movimientos`.`fecha`,\r\n\t`tesoreria_cajas_movimientos`.`recibo`,\r\n\t`tesoreria_cajas_movimientos`.`tipo_de_exposicion` AS `tipo_de_pago` ,\r\n\t\r\n\t`tesoreria_cajas_movimientos`.`monto_del_movimiento` AS `monto`,\r\n\t`tesoreria_cajas_movimientos`.`monto_recibido` AS `recibido`,\r\n\t`tesoreria_cajas_movimientos`.`monto_en_cambio` AS `cambio`,\r\n\t/*(CASE WHEN ( `tipo_de_exposicion` = 'transferencia') THEN (`tesoreria_cajas_movimientos`.`cuenta_bancaria`) ELSE NULL END) AS 'banco2', */\r\n\r\n\t/*`tesoreria_cajas_movimientos`.`banco` AS `banco`,*/\r\n\t(CASE WHEN ( `tipo_de_exposicion` = 'foraneo' OR `tipo_de_exposicion` = '" . TESORERIA_PAGO_CHEQUE . "'\r\n\tOR `tipo_de_exposicion` = '" . TESORERIA_COBRO_TRANSFERENCIA . "'\r\n ) THEN CONCAT(`tesoreria_cajas_movimientos`.`numero_de_cheque`, '|', `tesoreria_cajas_movimientos`.`cuenta_bancaria`, '|',\r\n (SELECT `nombre_de_la_entidad` FROM `bancos_entidades`\tWHERE `idbancos_entidades` = `tesoreria_cajas_movimientos`.`banco` LIMIT 0,1)) \r\n\tELSE '' END) AS 'datos'\r\nFROM\r\n\t`tesoreria_cajas_movimientos` `tesoreria_cajas_movimientos`\r\nWHERE \r\n\t\t(`tesoreria_cajas_movimientos`.`fecha` >='{$fecha_inicial}'\r\n\t\tAND\r\n\t\t`tesoreria_cajas_movimientos`.`fecha` <='{$fecha_final}')\r\n\t\t{$ByCajero}\r\nORDER BY\r\n\t`tesoreria_cajas_movimientos`.`fecha`,\r\n\t`tesoreria_cajas_movimientos`.`tipo_de_exposicion`,\r\n\t`tesoreria_cajas_movimientos`.`recibo`,\r\n\t`tesoreria_cajas_movimientos`.`cuenta_bancaria`\r\n\t";
if ($out == OUT_EXCEL) {
echo $xHP->setBodyinit();
$xls = new cHExcel();
$xls->convertTable($sql, $xHP->getTitle());
} else {
echo $xHP->setBodyinit("initComponents();");
$xRPT = new cReportes();
$xTBL = new cTabla($sql);
$xTBL->setTdClassByType();
echo $xRPT->getHInicial($xHP->getTitle());
$xTBL->setFootSum(array(3 => "monto", 4 => "recibido", 5 => "cambio"));
echo $xTBL->Show();
echo $xRPT->getPie();
?>
<script>
<?php
?>
function initComponents(){ window.print(); }
</script>
<?php
}
echo $xHP->setBodyEnd();
$xHP->end();
