function jsaGetListadoDeAvisos($tipo, $fecha_inicial, $fecha_final, $todas)
{
$tipo = $tipo == SYS_TODAS ? false : $tipo;
$xT = new cTipos();
$xF = new cFecha();
$xAl = new cAml_alerts();
$xlistas = new cSQLListas();
$xBtn = new cHButton();
$xImg = new cHImg();
//
$ByEstado = $xT->cBool($todas) == true ? "" : " AND `estado_en_sistema`= " . SYS_UNO;
$ByEstado .= setNoMenorQueCero($tipo) <= 0 ? "" : " AND (`aml_risk_catalog`.`tipo_de_riesgo` ={$tipo}) ";
$fecha_inicial = $xF->getFechaISO($fecha_inicial);
$fecha_final = $xF->getFechaISO($fecha_final);
$sql = $xlistas->getListadoDeAlertas(false, false, false, false, $ByEstado);
$xT = new cTabla($sql);
$xT->setWithMetaData();
$xT->OButton("TR.Dictaminar", "jsModificarEstatus(_REPLACE_ID_)", $xT->ODicIcons()->REPORTE);
$xT->OButton("TR.Panel", "jsToPanel(_REPLACE_ID_)", $xT->ODicIcons()->EJECUTAR);
$xT->setKeyField($xAl->getKey());
$xT->setKeyTable($xAl->get());
return $xT->Show();
}
$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"));
$sql = $xlistas->getListadoDeRiesgosConfirmados(false, false, false, false, $persona, " AND `estado_de_envio`= " . SYS_UNO);
$xT = new cTabla($sql);
$xRPT->addContent($xT->Show("TR.Alertas reportadas"));
$xRPT->setResponse();
$xRPT->setSenders($senders);
$empresa = parametro("empresa", SYS_TODAS);
$out = parametro("out", SYS_DEFAULT);
$persona = parametro("persona", DEFAULT_SOCIO, MQL_INT);
$persona = parametro("socio", $persona, MQL_INT);
$persona = parametro("idsocio", $persona, MQL_INT);
$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);
$titulo = "";
$archivo = "";
$xRPT = new cReportes($titulo);
$xRPT->setFile($archivo);
$xRPT->setOut($out);
//$xRPT->setSQL($sql);
$xRPT->setTitle($xHP->getTitle());
//============ Reporte
$body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal);
$xRPT->setBodyMail($body);
$xRPT->addContent($body);
//Descartados
$sql = $xlistas->getListadoDeAlertas(false, $FechaInicial, $FechaFinal, false, " AND resultado_de_checking=1 AND `estado_en_sistema` =" . SYS_CERO);
$xT = new cTabla($sql);
$xRPT->addContent($xT->Show());
$xRPT->setResponse();
$xRPT->setSenders($senders);
echo $xRPT->render(true);
function jsaCumplimiento($idsocio)
{
$xAl = new cAml_alerts();
$xlistas = new cSQLListas();
$sql = $xlistas->getListadoDeAlertas(false, false, false, $idsocio);
$xT = new cTabla($sql);
$xT->setKeyField($xAl->getKey());
$xT->setKeyTable($xAl->get());
return $xT->Show();
}
$persona = parametro("idsocio", $persona, MQL_INT);
$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);
$titulo = "";
$archivo = "";
$xRPT = new cReportes($titulo);
$xRPT->setFile($archivo);
$xRPT->setOut($out);
//
$xRPT->setTitle($xHP->getTitle());
//============ Reporte
$body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal);
$xRPT->setBodyMail($body);
$xRPT->addContent($body);
//Bajo revision
$sql = $xlistas->getListadoDeAlertas(false, $FechaInicial, $FechaFinal, false, " AND `estado_en_sistema` =" . SYS_UNO);
$xT = new cTabla($sql);
$xT->setTipoSalida($out);
$xRPT->setSQL($sql);
$xRPT->addContent($xT->Show());
//Descartados
//Riesgos para reportar
$xRPT->setResponse();
$xRPT->setSenders($senders);
echo $xRPT->render(true);
if ($xUsr->getNivel() >= USUARIO_TIPO_GERENTE or OPERACION_LIBERAR_ACCIONES == true) {
$xFRM->addToolbar($xBtn->getBasic("TR.Ingresos del Dia", "jsGetChart()", "grafico", "idcharts", false));
$xFRM->addToolbar($xBtn->getBasic("TR.Ingresos del Mes", "jsGetIngresosMensuales()", "grafico", "idimes", false));
$xFRM->addToolbar($xBtn->getBasic("TR.Ingresos por Empresa", "jsGetIngresosMensualesEmpresas()", "grafico", "idimesemp", false));
}
} else {
$xF = new cFecha();
$xAl = new cAml_alerts();
$xlistas = new cSQLListas();
$xBtn = new cHButton();
$xImg = new cHImg();
//
$ByEstado = " AND `estado_en_sistema`= " . SYS_UNO;
$fecha_inicial = $xF->getDiaInicial();
$fecha_final = $xF->getDiaFinal();
$sql = $xlistas->getListadoDeAlertas(false, $fecha_inicial, $fecha_final, false, $ByEstado);
$xT = new cTabla($sql);
$xT->setWithMetaData();
$xT->setKeyField($xAl->getKey());
$xT->setKeyTable($xAl->get());
$alerts .= $xT->Show("TR.Alertas");
}
if (MODO_DEBUG == true) {
$xFRM->addToolbar($xBtn->getBasic("ELiminar LOG", "jsaEliminarLog()", "grafico", "idlog", false));
$xFRM->addToolbar($xBtn->getBasic("Obtener LOG", "jsaGetLog()", "grafico", "idglog", false));
$xFRM->addToolbar($xBtn->getBasic("TR.Respaldo", "jsaRespaldarDB()", "ejecutar", "idrespdb", false));
$xFRM->OButton("TR.Actualizar", "jsaActualizarIdioma()", $xFRM->ic()->EJECUTAR);
}
$cTbl = new cTabla($xLi->getListadoDeTareas(getUsuarioActual()));
$cTbl->setKeyField("idusuarios_web_notas");
$cTbl->setKeyTable("usuarios_web_notas");
