$incluir_cuentas = parametro("estado", SYS_TODAS, MQL_RAW); $ByCuentas = ""; $ByCuentasSaldos = ""; if ($cuenta_inicial > 0 and $cuenta_final > 0) { $xCtaInit = new cCuentaContableEsquema($cuenta_inicial); $cuenta_inicial = $xCtaInit->CUENTA; $ByCuentas .= " AND (`contable_catalogo`.`numero`>={$cuenta_inicial}) "; $xCtaFin = new cCuentaContableEsquema($cuenta_final); $cuenta_final = $xCtaFin->CUENTA; $ByCuentas .= " AND (`contable_catalogo`.`numero`<={$cuenta_final}) "; $ByCuentasSaldos = " AND (`contable_movimientos`.`numerocuenta` >= {$cuenta_inicial}) AND (`contable_movimientos`.`numerocuenta` <= {$cuenta_final}) "; } $FechaInicial = $xF->getDiaInicial("{$ejercicio}-{$periodo}-01"); $FechaFinal = $xF->getDiaFinal("{$ejercicio}-{$periodo}-01"); $xRPT = new cReportes($xHP->getTitle()); $xRPT->addContent($xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal)); $InitRecords = parametro("init", 0, MQL_INT); $xRPT->addCSSFiles("../css/flags.css"); $xRPT->setOut($out); //================================================================================================================= //$xRPT->setToPagination($InitRecords); /** * Paginacion * I.- Parte */ $rowLimit = 1500; //4Paginas aprox //marca el Final de los Registros $EndRecords = $InitRecords + $rowLimit; //captura el URI para manipularlo //$mURI = $_SERVER['REQUEST_URI'];
//$xTbl->endRow() $xFld = new cHFieldset($flTitle); $xFld->addHElem($xTbl->get()); $txtLst .= $xFld->get(); } } if ($getPDF == true) { //base64_encode($sql) $xFMT = new cFormato(8801); $xFMT->setProcesarVars(array("variable_listado_de_cedulas" => $txtLst, "variable_item_buscado" => "{$nombre} / {$apaterno} / {$amaterno}", "variable_cadena_consulta" => "")); $xRPT = new cReportes($xHP->getTitle()); $xRPT->getEncabezado($xHP->getTitle()); if ($ret == true) { $xRPT->setOut(OUT_HTML); $xRPT->setFile("ofacs_list_"); $xRPT->addContent($xFMT->get()); $xRPT->render(true); $dompdf = new DOMPDF(); $dompdf->load_html($xRPT->render(true)); $dompdf->set_paper("letter", "portrait"); $dompdf->render(); $json["pdf"] = base64_encode($dompdf->output()); } else { $xRPT->setSenders($mails); $xRPT->setOut(OUT_PDF); $xRPT->setFile("ofacs_list_"); $xRPT->addContent($xFMT->get()); $xRPT->render(true); } } } else {
$xF = new cFecha(); $ql = new MQL(); $fecha_inicial = parametro("on", $xF->getDiaInicial(), MQL_DATE); $fecha_final = parametro("off", $xF->getDiaFinal(), MQL_DATE); $cuenta_inicial = parametro("for", 0, MQL_INT); $cuenta_final = parametro("to", 0, MQL_INT); $out = parametro("out", SYS_DEFAULT, MQL_RAW); //---------------- Valuar Tipo de Cuenta ---------------- $tipo_cuentas = parametro("tipo", SYS_TODAS, MQL_RAW); $nivel_cuentas = parametro("nivel", SYS_TODAS, MQL_RAW); $incluir_cuentas = parametro("estado", SYS_TODAS, MQL_RAW); $netoCargoRpt = 0; $netoAbonoRpt = 0; $ByCuentas = ""; $xRPT = new cReportes($xHP->getTitle()); $xRPT->addContent($xRPT->getEncabezado($xHP->getTitle(), $fecha_inicial, $fecha_final)); $InitRecords = parametro("init", 0, MQL_INT); $xRPT->setOut($out); //================================================================================================================= //$xRPT->setToPagination($InitRecords); /** * Paginacion * I.- Parte */ $rowLimit = 900; //4Paginas aprox //marca el Final de los Registros $EndRecords = $InitRecords + $rowLimit; //================================================================================================================= /** * Obtiene Parametros a traves de un GET
//header("Content-type: text/x-csv"); header("Content-type: text/plain"); //header("Content-type: application/csv"); header("Content-Disposition: attachment; filename={$archivo}"); echo $rpt; if ($definitivo == true) { //Guardar $sqlUpdate = " UPDATE `aml_risk_register` SET `estado_de_envio` = 1, `fecha_de_envio`= " . $xF->getInt() . "\n\t\t\tWHERE (SELECT `tipo_de_riesgo` FROM `aml_risk_catalog` WHERE\n\t\t\t(`clave_de_control`= `aml_risk_register`.`tipo_de_riesgo`= " . AML_CLAVE_OPERACIONES_INTERNAS . "\n\t\t\t\tOR\n\t\t\t`clave_de_control`= `aml_risk_register`.`tipo_de_riesgo`= " . AML_CLAVE_OPERACIONES_INUSUALES . ")\n\t\t\tAND (getFechaByInt(`aml_risk_register`.`fecha_de_reporte`) <='{$FechaFinal}')\n\t\t\tAND (`aml_risk_register`.`estado_de_envio` =0)\n\t\t\tAND (`aml_risk_register`.`reporte_inmediato` =1)\t\t\t\n\t\t\t"; $query->setRawQuery($sqlUpdate); //enviar por mail al administrador $xMail = new cNotificaciones(); $xMail->sendMail($archivo, $rpt, ADMIN_MAIL); } } else { $xRPT = new cReportes(); $xRPT->setOut(OUT_HTML); $xRPT->addContent($xRPT->getHInicial($xHP->getTitle(), $FechaInicial, $FechaFinal)); $arrTitulos = array(); foreach ($Estructura as $indice => $propiedades) { $xCampo = new cReportes_LayoutTipos($propiedades); $arrTitulos[] = $xCampo->getNombre(); } $xHTable->addTitles($arrTitulos); if ($msg != "") { $xRPT->addFooterBar("<h3>El reporte contiene los siguientes errores</h3>" . $msg); } $xRPT->addContent($xHTable->get()); $xRPT->setToPrint(); echo $xRPT->render(true); } }
$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);
$jsEvent = $out != OUT_EXCEL ? "initComponents()" : ""; $senders = getEmails($_REQUEST); $sql = "SELECT * FROM socios LIMIT 0,100"; $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); $body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal); $xRPT->setBodyMail($body); $xRPT->addContent($body); $xCats = new cCatalogoDeDatos(""); $DActividades = $xCats->get("clave_interna", "nombre_de_la_actividad", "personas_actividad_economica_tipos"); $DGenero = $xCats->get("idsocios_genero", "descripcion_genero", "socios_genero"); $DPaises = $xCats->initPorTabla(TCATALOGOS_PAISES); $DRiesgo = $xCats->initPorTabla(TCATALOGOS_GRADO_RIESGO); //$xT->setEventKey("jsGoPanel"); //$xT->setKeyField("creditos_solicitud"); $sql = $xL->getInicialDePersonas() . " WHERE (`personalidad_juridica` = 2 OR `personalidad_juridica` = 5)"; $rs = $query->getDataRecord($sql); $xTa = new cHTabla(); $xDSoc = new cSocios_general(); $xF = new cFecha(); $xTa->initRow(); $xTa->addTH("Sucursal"); $xTa->addTH("Nombre");
`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);
$fecha_de_vencimiento = ""; $tasa_interes_mensual_ordinario = ""; $tasa_garantia_liquida = ""; $tasa_interes_mensual_moratorio = 0; $fecha_de_ministracion = ""; //cargar Datos de la Empresa $vars = array("variable_nombre_del_socio" => $cSoc->getNombreCompleto(), "variable_nombre_de_la_sociedad" => EACP_NAME, "variable_nombre_de_la_entidad" => EACP_NAME, "variable_domicilio_del_socio" => trim(substr($cSoc->getDomicilio(), 0, 60)), "variable_documento_de_constitucion_de_la_sociedad" => EACP_DOCTO_CONSTITUCION, "variable_rfc_de_la_entidad" => EACP_RFC, "variable_rfc_del_socio" => $DSoc["rfc"], "variable_curp_del_socio" => $DSoc["curp"], "variable_nombre_del_representante_legal_de_la_sociedad" => EACP_REP_LEGAL, "variable_informacion_del_credito" => $svar_info_cred, "variable_domicilio_de_la_entidad" => EACP_DOMICILIO_CORTO, "variable_acta_notarial_de_poder_al_representante" => EACP_DOCTO_REP_LEGAL, "variable_numero_de_socio" => $numero_de_socio, "variable_tipo_de_credito" => $tipo_de_credito, "variable_monto_ministrado" => getFMoney($monto_ministrado), "variable_tasa_mensual_de_interes_ordinario" => $tasa_interes_mensual_ordinario, "variable_credito_fecha_de_vencimiento" => getFechaLarga($fecha_de_vencimiento), "variable_tasa_mensual_de_interes_moratorio" => $tasa_interes_mensual_moratorio . " %", "variable_tasa_de_garantia_liquida" => $tasa_garantia_liquida . " %", "variable_horario_de_trabajo_de_la_entidad" => EACP_HORARIO_DE_TRABAJO, "variable_testigo_del_acto" => $oficial, "variable_fecha_larga_actual" => fecha_larga(), "variable_nombre_de_presidente_de_vigilancia_de_la_entidad" => EACP_PDTE_VIGILANCIA, "variable_en_letras_monto_ministrado" => convertirletras($monto_ministrado), "variable_credito_fecha_de_ministracion" => getFechaLarga($fecha_de_ministracion), "variable_informacion_del_socio" => $ficha_socio, "variable_oficial" => $variable_oficial, "variable_lugar" => $variable_lugar, "variable_lugar_actual" => $variable_lugar, "variable_monto_inicial_en_numero" => $monto_inicial, "variable_monto_inicial_en_letras" => $monto_inicial_letras, "variable_numero_de_dias" => $numero_dias, "variable_fecha_de_vencimiento" => $variable_fecha_vencimiento, "variable_tasa_otorgada" => $variable_tasa_otorgada, "variable_nombre_empresa" => $nempresa, "variable_numero_de_pagos" => $numero_de_pagos, "variable_numero_parcialidad_actual" => $numero_parcialidad, "variable_monto_parcialidad" => getFMoney($monto_parcialidad), "variable_monto_letras_parcialidad" => convertirletras($monto_parcialidad), "variable_encabezado_de_reporte" => getRawHeader(false, $out), "variable_pie_de_reporte" => getRawFooter(false, $out), "variable_paginas" => $contar); if ($out == OUT_DOC) { $vars["<hr />"] = ""; } $texto_contrato = $base_contrato; foreach ($vars as $key => $value) { $texto_contrato = str_replace($key, $value, $texto_contrato); } if ($monto_parcialidad > 0) { $xRPT->addContent($texto_contrato); $ppn++; if ($ppn == 2) { if ($out == OUT_DOC) { } else { $xRPT->addContent("<hr class='divisormedio' />\n"); } } if ($ppn > 2) { if ($out == OUT_DOC) { $xRPT->addContent("<br clear=all style='mso-special-character:line-break;page-break-before:always'>"); } else { $xRPT->addContent("\n\n<br class='npage' />\n\n"); } $ppn = 1; }
//Boolean por fechas $fecha_inicial = $_GET["on"]; $fecha_final = $_GET["off"]; $out = parametro("out", SYS_DEFAULT); $es_por_fechas = ""; $xHT = new cHTabla(); //ini_set("display_errors", "on"); $xCuenta = new cCuentaInversionPlazoFijo($cuenta); $xCuenta->init(); $saldo = $xCuenta->getSaldoActual(); $xRPT = new cReportes(); $persona = $xCuenta->getClaveDePersona(); $xSoc = new cSocio($persona); $xSoc->init(); $xRPT->setTitle($xHP->getTitle(), true); $xRPT->addContent($xSoc->getFicha()); $xRPT->addContent($xCuenta->getFicha(true, "", true)); //Datos de la Cuenta $sqlMvtos = "SELECT\n\t\t\t`operaciones_mvtos`.*,\n\t\t\t\t(`operaciones_mvtos`.`afectacion_real` *\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`afectacion`) AS 'monto',\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`afectacion`\n\t\t\tFROM\n\t\t\t`operaciones_mvtos` `operaciones_mvtos`\n\t\t\t\tINNER JOIN `eacp_config_bases_de_integracion_miembros`\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` =\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`miembro`\n\t\t\tWHERE\n\t\t\t(`operaciones_mvtos`.`docto_afectado` =" . $cuenta . ") AND\n\t\t\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` = 3200)\n\n\t\t\tORDER BY\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\n\t\t\t\t`operaciones_mvtos`.`fecha_afectacion`,\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`afectacion` DESC\n\t\t\t"; $xHT->initRow(); $xHT->addTH("TR.Fecha"); $xHT->addTH("TR.Recibo"); $xHT->addTH("TR.Operacion"); $xHT->addTH("TR.Deposito"); $xHT->addTH("TR.Retiro"); $xHT->addTH("TR.Inversion"); $xHT->addTH("TR.Saldo"); $xHT->addTH("TR.Notas"); $xHT->endRow(); $rsmvto = $xQl->getDataRecord($sqlMvtos); $sdo_al_corte = 0;
<th class='izq'>[$counter]Monto Ministrado</th> <td class='mny'>" . getFMoney($sumCAP) . "</td> <th class='izq'>Saldo Actual</th> <td class='mny'>" . getFMoney($sumSDO) . "</td> </tr> </tr> --> </tr>*/ $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); $body = $xRPT->getEncabezado($xHP->getTitle(), $fecha_inicial, $fecha_final); $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->addContent("<table>{$TR_parent}</table>"); $xRPT->setResponse(); $xRPT->setSenders($senders); echo $xRPT->render(true);
//Boolean por fechas $fecha_inicial = parametro("on", EACP_FECHA_DE_CONSTITUCION); $fecha_final = parametro("off", $xF->getFechaMaximaOperativa()); $output = parametro("out", SYS_DEFAULT); $es_por_fechas = ""; $xCuenta = new cCuentaALaVista($idcuenta); $xCuenta->init(); //Datos de la Cuenta $rwc = $xCuenta->getDatosInArray(); // datos generales del socio $idsocio = $rwc["numero_socio"]; // Numero de Socio $CSocio = new cSocio($idsocio); $CSocio->init(); $mynom = $CSocio->getNombreCompleto(); $xRPT->addContent($CSocio->getFicha()); //Verifica el FORZADO de el Cuadre de Saldos // datos de la cuenta $tipocuenta = eltipo("captacion_cuentastipos", $rwc[4]); $tasa = $rwc[14] * 100; $saldo = $rwc["saldo_cuenta"]; $sdoact = number_format($rwc[9], 2, '.', ','); $depositos = 0; $retiros = 0; $sdo_i = 0; $sdo_f = 0; /* echo "<hr /> <table width='100%'> <tr> <td class='ths'>Numero de cuenta</td><td>$idcuenta</td> <td class='ths'>Modalidad de la Cuenta</td><td>$tipocuenta</td>
if (MODULO_CAJA_ACTIVADO == true) { if ($xF->getInt($fecha_final) > $xF->getInt(fechasys())) { if ($xCaja->getEstatus() == TESORERIA_CAJA_ABIERTA) { $xHP->goToPageError(70102); } } } } $xUsr = new cSystemUser($cajero); $xUsr->init(); $nombre = $xUsr->getNombreCompleto(); $ByDependencia = (isset($_GET["dependencia"]) and $_GET["dependencia"] != SYS_TODAS) ? " AND `socios`.`iddependencia`=" . $_GET["dependencia"] : ""; $xRPT = new cReportes(); $title = $xHP->getTitle(); $xRPT->setTitle($title); $xRPT->setOut($out); $xRPT->setSenders($mails); $bheader = $xRPT->getHInicial($xHP->getTitle(), $fecha_inicial, $fecha_final, $nombre); $xRPT->addContent($bheader); $xRPT->setBodyMail($bheader); $xRPT->setResponse(); $xRPT->addContent($xCaja->getResumenDeCaja()); //setlog( $xCaja->getMessages() ); if (count($mails) > 0) { if ($xCaja->getSumaDeRecibos() <= 0) { $xRPT->setSenders(array()); //no enviar } } echo $xRPT->render(true); //Render Normal
$incluir_cuentas = parametro("estado", SYS_TODAS, MQL_RAW); $ByCuentas = ""; $ByCuentasSaldos = ""; if ($cuenta_inicial > 0 and $cuenta_final > 0) { $xCtaInit = new cCuentaContableEsquema($cuenta_inicial); $cuenta_inicial = $xCtaInit->CUENTA; $ByCuentas .= " AND (`contable_catalogo`.`numero`>={$cuenta_inicial}) "; $xCtaFin = new cCuentaContableEsquema($cuenta_final); $cuenta_final = $xCtaFin->CUENTA; $ByCuentas .= " AND (`contable_catalogo`.`numero`<={$cuenta_final}) "; $ByCuentasSaldos = " AND (`contable_saldos`.`cuenta` >= {$cuenta_inicial}) AND (`contable_saldos`.`cuenta` <= {$cuenta_final}) "; } $FechaInicial = $xF->getDiaInicial("{$ejercicio}-{$periodo}-01"); $FechaFinal = $xF->getDiaFinal("{$ejercicio}-{$periodo}-01"); $xRPT = new cReportes($xHP->getTitle()); $xRPT->addContent($xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal)); $InitRecords = parametro("init", 0, MQL_INT); $xRPT->addCSSFiles("../css/flags.css"); $xRPT->setOut($out); //================================================================================================================= //$xRPT->setToPagination($InitRecords); /** * Paginacion * I.- Parte */ $rowLimit = 1500; //4Paginas aprox //marca el Final de los Registros $EndRecords = $InitRecords + $rowLimit; //captura el URI para manipularlo //$mURI = $_SERVER['REQUEST_URI'];
$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);
$credito = parametro("x", $credito, MQL_INT); $credito = parametro("pb", $credito, MQL_INT); //compatible $ByFecha = ""; $sql = "SELECT\n\t\t\t\n\t\t\t\t/* `operaciones_mvtos`.`socio_afectado`,\n\t\t\t\t`operaciones_mvtos`.`docto_afectado`, */\n\t\t\t\t`operaciones_mvtos`.`recibo_afectado`,\n\t\t\t\n\t\t\t\t`operaciones_mvtos`.`fecha_operacion` AS 'fecha_de_operacion',\n\t\t\t\t`operaciones_tipos`.`descripcion_operacion` AS 'tipo_de_operacion',\n\t\t\t\n\t\t\t\t(`operaciones_mvtos`.`afectacion_real` *\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`afectacion`) AS 'monto'\n\t\t\t\n\t\t\t\n\t\t\tFROM\n\t\t\t\n\t\t\t\n\t\t\t\t`operaciones_mvtos` `operaciones_mvtos`\n\t\t\t\t\tINNER JOIN `eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` =\n\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`miembro`\n\t\t\t\t\t\tINNER JOIN `operaciones_tipos` `operaciones_tipos`\n\t\t\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` = `operaciones_tipos`.\n\t\t\t\t\t\t`idoperaciones_tipos`\n\t\t\tWHERE\n\t\t\t\t(`operaciones_mvtos`.`docto_afectado` = {$credito})\n\t\t\t\tAND\n\t\t\t\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` =2000)\n\t\t\t\t{$ByFecha}\n\t\t\tORDER BY\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\n\t\t\t\t`operaciones_mvtos`.`fecha_operacion`"; $titulo = ""; $archivo = ""; $xRPT = new cReportes($titulo); $xRPT->setFile($archivo); $xRPT->setOut($out); $xRPT->setSQL($sql); $xRPT->setTitle($xHP->getTitle()); //Ficha $xCred = new cCredito($credito); $xCred->init(); $xRPT->addContent($xCred->getFicha(true, "", true, true)); //============ Reporte //$xT = new cTabla($sql, 2); //$xT->setTipoSalida($out); $body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal); $xRPT->setBodyMail($body); $xRPT->addContent($body); $rs = $query->getDataRecord($sql); $sumP = 0; $sumD = 0; $td = ""; foreach ($rs as $rw) { $montoD = 0; $montoP = 0; $recibo = $rw["recibo_afectado"]; $operacion = $rw["tipo_de_operacion"];
$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); $sql = "SELECT\r\n\t`tesoreria_tipos_de_pago`.`tipo_de_pago`,\r\n\t`tesoreria_tipos_de_pago`.`descripcion` \r\nFROM\r\n\t`tesoreria_tipos_de_pago` `tesoreria_tipos_de_pago`"; $titulo = ""; $archivo = ""; $xRPT = new cReportes($titulo); $xRPT->setFile($archivo); $xRPT->setOut($out); $xRPT->setSQL($sql); $xRPT->setTitle($xHP->getTitle()); //============ Reporte $xT = new cTabla($sql, 0); $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);
$titulo = ""; $archivo = ""; $xRPT = new cReportes($titulo); $xRPT->setFile($archivo); $xRPT->setOut($out); $xRPT->setSQL($sql); $xRPT->setTitle($xHP->getTitle()); //============ Reporte $xSoc2 = new cSocio($idnucleo); $xSoc2->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); //$xT->setEventKey("jsGoPanel"); //$xT->setKeyField("creditos_solicitud"); $xRPT->addContent($xSoc->getFicha(true)); $xRPT->addContent($xSoc2->getFicha(true)); $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()); } //============ Agregar HTML //$xRPT->addContent( $xHP->init($jsEvent) );
$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()); } $xRPT->addContent("<h3>" . $xHP->lang("Mensaje") . "</h3>"); //============ Agregar HTML //$xRPT->addContent( $xHP->init($jsEvent) );
//encapsula el patrom $patron = "/init=\\d*/"; if ($InitRecords > 0) { $mURI = preg_replace($patron, "init={$EndRecords}", $mURI); } else { $mURI .= "&init={$EndRecords}"; } //================================================================================== /*if($unica_cuenta == 1){ $dcta = getInfoCatalogo($esa_cuenta); $nivel = $dcta["digitoagrupador"]; $dicat = explode("@", CAT_LEN); $largo = $dicat[$nivel]; $pcta = getCuentaCompleta($esa_cuenta); $pcta = substr($pcta, 0, $largo); $sqlWHERE .= " AND `contable_catalogo`.`numero` LIKE '$pcta%' "; }*/ $setSql = $xLi->getListadoDeCuentasContables($Cuenta, $niveles, $tipo_cuentas, $afectables, 0, $InitRecords, $EndRecords); //setLog($setSql); $xRPT = new cReportes(); $xRPT->setTitle($xHP->getTitle()); $xRPT->addCSSFiles("../css/catalogo.flags.css"); $xRPT->setOut($out); $cTbl = new cTabla($setSql); //$xRPT->addContent($xHP->init()); $xRPT->addContent($cTbl->Show("", true, "idcatalogocontable")); $xRPT->addContent($xHP->fin()); if ($mostrarTodo == false) { $xRPT->setToPagination($EndRecords); } echo $xRPT->render(true);
$FechaFinal = $FechaFinal == false ? fechasys() : $xF->getFechaISO($FechaFinal); $jsEvent = $out != OUT_EXCEL ? "initComponents()" : ""; $senders = getEmails($_REQUEST); $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(); $body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal); $xRPT->setBodyMail($body); $xRPT->addContent($body); $xRPT->addContent($xSoc->getFicha(true)); //Bajo revision $xAl = new cAml_alerts(); $xlistas = new cSQLListas(); $sql = $xlistas->getListadoDeAlertas(false, false, false, $persona, " AND `estado_en_sistema` =" . SYS_UNO); $xT = new cTabla($sql); $xRPT->addContent($xT->Show("TR.Alertas pendientes de verificar")); //Descartados $sql = $xlistas->getListadoDeAlertas(false, false, false, $persona, " AND `estado_en_sistema` =" . SYS_CERO); $xT = new cTabla($sql); $xRPT->addContent($xT->Show("TR.Alertas ignoradas")); //Riesgos para reportar $sql = $xlistas->getListadoDeRiesgosConfirmados(false, false, false, false, $persona, " AND `estado_de_envio`= " . SYS_CERO); $xT = new cTabla($sql); $xRPT->addContent($xT->Show("TR.Alertas pendientes de reportar"));
$periodo = $xF->semana(); $bheader = ""; $title = $xHP->getTitle() . "_" . $xEmp->getNombre() . "_" . $xTPer->getNombre() . "_{$periodo}"; $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"));
$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); $xODat = new cPersonasCatalogoOtrosDatos(); $sql = "SELECT\r\n\t`socios`.`codigo`,\r\n\t`socios`.`nombre`,\r\n\t`socios_otros_parametros`.`clave_del_parametro` \r\nFROM\r\n\t`socios_otros_parametros` `socios_otros_parametros` \r\n\t\tINNER JOIN `socios` `socios` \r\n\t\tON `socios_otros_parametros`.`clave_de_persona` = `socios`.`codigo` \r\nWHERE\r\n\t(`socios_otros_parametros`.`clave_del_parametro` ='" . $xODat->AML_PEP_PRINCIPAL . "')\r\n\t\t\tOR\r\n\t(`socios_otros_parametros`.`clave_del_parametro` ='" . $xODat->AML_PEP_AFINIDAD . "')\t\t\t\r\n\tOR\r\n(`socios_otros_parametros`.`clave_del_parametro` ='" . $xODat->AML_PEP_CONSANGUINIDAD . "')\t\t\t\r\n\t\tOR\r\n(`socios_otros_parametros`.`clave_del_parametro` ='" . $xODat->AML_PEP_VINCULO_ECONOM . "')\t"; $titulo = ""; $archivo = ""; $xRPT = new cReportes($titulo); $xRPT->setFile($archivo); $xRPT->setOut($out); $xRPT->setSQL($sql); $xRPT->setTitle($xHP->getTitle()); //============ Reporte $xT = new cTabla($sql, 1); $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()); //============ Agregar HTML //$xRPT->addContent( $xHP->init($jsEvent) ); //$xRPT->addContent( $xHP->end() ); $xRPT->setResponse(); $xRPT->setSenders($senders); echo $xRPT->render(true);
$jsEvent = $out != OUT_EXCEL ? "initComponents()" : ""; $senders = getEmails($_REQUEST); $sql = "SELECT numero_socio, numero_solicitud FROM creditos_solicitud WHERE grupo_asociado={$grupo} LIMIT 1,10"; $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); $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() ) ); $xG = new cGrupo($grupo); $xRPT->addContent($xG->getFicha()); $rs = $query->getDataRecord($sql); foreach ($rs as $rows) { $credito = $rows["numero_solicitud"]; $xCred = new cCredito($credito); $xRPT->addContent($xCred->getFicha(false, "", false, true)); } //============ Agregar HTML //$xRPT->addContent( $xHP->init($jsEvent) ); //$xRPT->addContent( $xHP->end() ); $xRPT->setResponse();