header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//<=====	FIN_H
$iduser = $_SESSION["log_id"];
//=====================================================================================================
//$xH			= new cHObject(HP_SERVICE);
$xInit = new cHPage(HP_SERVICE);
//header("Content-type: text/xml");
header('Content-type: application/json');
$txt = "";
$action = "";
$DDATA = $_REQUEST;
$action = isset($DDATA["action"]) ? $DDATA["action"] : SVC_LIST;
$arg = parametro("arg1", 0, MQL_FLOAT);
$arg2 = parametro("arg2", AML_CLAVE_MONEDA_LOCAL);
$rs = array();
$money = new cTesoreria_monedas();
$money->setData($money->query()->initByID($arg2));
$valor_local = $money->quivalencia_en_moneda_local()->v();
$valor = $arg * $valor_local;
$letras = convertirletras($valor, $arg2);
$rs["equivalencia"] = $valor;
$rs["letras"] = $letras;
$rs["cotizacion"] = $valor_local;
echo json_encode($rs);
//echo "{ \"valor\" : $valor, \"letras\" : \"$letras\" }";
//$xLog       = new cSystemLog();
//$xLog->setRotate();
//$xLog->setSave($sql);
//$xT->clave_de_actividad()
$iddocto = parametro("idcuenta", DEFAULT_CUENTA_CORRIENTE);
$recibo = parametro("idrecibo");
$reciboIDE = 0;
//
$actload = "";
$Fecha = parametro("idfecha-0", false);
$Fecha = $Fecha == false ? fechasys() : $xF->getFechaISO($Fecha);
$idsocio = parametro("idsocio", false, MQL_INT);
//$xT->cInt($_POST["idsocio"]);
$detalles = parametro("idobservaciones", "");
$monto = parametro("idmonto", 0, MQL_FLOAT);
$cheque = parametro("cheque", DEFAULT_CHEQUE);
$comopago = parametro("ctipo_pago", DEFAULT_TIPO_PAGO, MQL_RAW);
$folio_fiscal = parametro("foliofiscal", DEFAULT_RECIBO_FISCAL);
$msg = parametro(SYS_MSG);
$action = parametro("action", SYS_NINGUNO);
$xCaja = new cCaja();
if ($xCaja->getEstatus() == TESORERIA_CAJA_CERRADA) {
    header("location:../404.php?i=200");
}
if (isset($iddocto)) {
    $actload = " onload='jsImprimirRecibo();' ";
}
$jxc = new TinyAjax();
function jsaGetIDE($socio, $monto, $tipo_de_pago)
{
    $xSoc = new cSocio($socio);
    $xSoc->init();
    $x = $xSoc->getIDExPagarByPeriodo(false, $monto, $tipo_de_pago);
    $tab = new TinyAjaxBehavior();
    $tab->add(TabSetValue::getBehavior("idide", $x));
$xHP = new cHPage("TR.REPORTE DE PERSONAS CLASIFICADAS COMO PEPS", HP_REPORT);
$xL = new cSQLListas();
$xF = new cFecha();
$query = new MQL();
$estatus = parametro("estado", SYS_TODAS);
$frecuencia = parametro("periocidad", SYS_TODAS);
$producto = parametro("convenio", SYS_TODAS);
$producto = parametro("producto", $producto);
$empresa = parametro("empresa", SYS_TODAS);
$sucursal = parametro("sucursal", SYS_TODAS, MQL_RAW);
$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);
$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);
//header("Content-type: text/plain");
//=====================================================================================================
//=====>	INICIO_H
include_once "../core/go.login.inc.php";
include_once "../core/core.error.inc.php";
include_once "../core/core.html.inc.php";
include_once "../core/core.init.inc.php";
$theFile = __FILE__;
$permiso = getSIPAKALPermissions($theFile);
if ($permiso === false) {
    header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//<=====	FIN_H
$iduser = $_SESSION["log_id"];
//=====================================================================================================
$xHP = new cHPage("PAGARE", HP_REPORT);
$oficial = elusuario($iduser);
$idsolicitud = parametro("i", DEFAULT_CREDITO, MQL_INT);
$idsolicitud = parametro("credito", $idsolicitud, MQL_INT);
$idsolicitud = parametro("solicitud", $idsolicitud, MQL_INT);
$formato = parametro("forma", 21, MQL_INT);
$xHP->init();
$xForma = new cFormato($formato);
$xForma->setCredito($idsolicitud);
$xForma->setProcesarVars();
echo $xForma->get();
?>
</body>
</html>
$_SESSION["current_file"] = addslashes($theFile);
//<=====	FIN_H
$iduser = $_SESSION["log_id"];
//=====================================================================================================
$xHP = new cHPage("TR.Estado de Cuenta de Depositos a la Vista", HP_RPTXML);
$xQL = new MQL();
$xF = new cFecha();
$oficial = elusuario($iduser);
//=====================================================================================================
$idcuenta = parametro("f100", false, MQL_INT);
$idcuenta = parametro("cuenta", $idcuenta, MQL_INT);
$AppByFechas = parametro("f73");
//Boolean por fechas
$fecha_inicial = parametro("on", EACP_FECHA_DE_CONSTITUCION, MQL_DATE);
$fecha_final = parametro("off", $xF->getFechaMaximaOperativa(), MQL_DATE);
$output = parametro("out", SYS_DEFAULT);
$setSql = "SELECT\n\t`socios`.`codigo`,\n\t`socios`.`nombre`,\n\t`captacion_cuentas`.`numero_cuenta`                 AS `numero_de_cuenta`,\n\t`captacion_cuentastipos`.`descripcion_cuentastipos` AS `tipo`,\n\t`captacion_subproductos`.`descripcion_subproductos` AS `producto`,\n\t`captacion_cuentas`.`tasa_otorgada`,\n\t`captacion_cuentas`.`dias_invertidos`,\n\t`captacion_cuentas`.`saldo_cuenta`,\n\t`captacion_cuentas`.`sucursal`,\n\t`captacion_sdpm_historico`.`ejercicio`,\n\t`captacion_sdpm_historico`.`periodo`,\n\t`captacion_sdpm_historico`.`fecha`,\n\t`captacion_sdpm_historico`.`recibo`,\n\t`captacion_sdpm_historico`.`dias`,\n\t`captacion_sdpm_historico`.`tasa`,\n\t`captacion_sdpm_historico`.`monto`\nFROM\n\t`captacion_cuentas` `captacion_cuentas`\n\t\tINNER JOIN `captacion_sdpm_historico` `captacion_sdpm_historico`\n\t\tON `captacion_cuentas`.`numero_cuenta` = `captacion_sdpm_historico`.\n\t\t`cuenta`\n\t\t\tINNER JOIN `captacion_cuentastipos` `captacion_cuentastipos`\n\t\t\tON `captacion_cuentas`.`tipo_cuenta` = `captacion_cuentastipos`.\n\t\t\t`idcaptacion_cuentastipos`\n\t\t\t\tINNER JOIN `socios` `socios`\n\t\t\t\tON `socios`.`codigo` = `captacion_cuentas`.`numero_socio`\n\t\t\t\t\tINNER JOIN `captacion_subproductos` `captacion_subproductos`\n\t\t\t\t\tON `captacion_cuentas`.`tipo_subproducto` =\n\t\t\t\t\t`captacion_subproductos`.`idcaptacion_subproductos`\nWHERE\n\t(`captacion_cuentas`.`numero_cuenta` ={$idcuenta})\n\tAND\n\t(`captacion_sdpm_historico`.`fecha`>='{$fecha_inicial}')\n\tAND\n\t(`captacion_sdpm_historico`.`fecha`<='{$fecha_final}')\nORDER BY\n\t`socios`.`codigo`,\n\t`captacion_cuentas`.`numero_cuenta`,\n\t`captacion_sdpm_historico`.`ejercicio` ASC,\n\t`captacion_sdpm_historico`.`periodo` ASC,\t\n\t`captacion_sdpm_historico`.`fecha` ASC";
//exit($setSql);
if ($output != OUT_EXCEL) {
    $oRpt = new PHPReportMaker();
    $oRpt->setDatabase(MY_DB_IN);
    $oRpt->setUser(RPT_USR_DB);
    $oRpt->setPassword(RPT_PWD_DB);
    $oRpt->setSQL($setSql);
    $oRpt->setXML("../repository/report70.xml");
    $oOut = $oRpt->createOutputPlugin($output);
    $oRpt->setOutputPlugin($oOut);
    $oRpt->run();
    //	*/
} else {
    $filename = $_SERVER['SCRIPT_NAME'];
//Si la Operacion es Configurar los Datos
if ($action == false) {
    $xFRM->addHElem($xFil->getBasic("idarchivo", ""));
    $xFRM->addHElem($xChk->get("TR.Afectar Base de Datos", "idaplicar"));
    $xFRM->addSubmit();
    $xFRM->addFootElement('<input type="hidden" name="MAX_FILE_SIZE" value="1024000">');
} elseif ($action == "u") {
    //cargar datos alfanumericos del estados
    $sqlEstados = " SELECT\t`general_estados`.`clave_alfanumerica`,\t`general_estados`.`nombre` FROM\t`general_estados` `general_estados` ";
    $arrEstados = $ql->getArrayRecord($sqlEstados);
    $sqlEmpresas = "SELECT\t`socios_aeconomica_dependencias`.`idsocios_aeconomica_dependencias`, `socios_aeconomica_dependencias`.`descripcion_dependencia` FROM\t`socios_aeconomica_dependencias` `socios_aeconomica_dependencias`";
    $arrEmpresas = $ql->getArrayRecord($sqlEmpresas);
    $usrFiles = array();
    $usrFiles[0] = $_FILES["idarchivo"];
    $msg = "";
    $afectable = parametro("idaplicar", false, MQL_BOOL);
    $prePath = PATH_BACKUPS;
    $lim = 1;
    //sizeof($usrFiles) -1;
    $xF = new cFecha();
    ////Arrays de Control
    $arrTipoIdent = array(1 => 1, 4 => 9);
    $arrEmpresas = array("PARTICULAR" => DEFAULT_EMPRESA, "" => DEFAULT_EMPRESA, "#N/D" => DEFAULT_EMPRESA, "#N/A" => DEFAULT_EMPRESA, "COLOMER" => 120, "LAB. DENTAL R Y E" => 101, "LAB. DENTAL GML" => 102, "REPSSA" => 103, "RATTMI" => 104, "DELTA" => 105, "POLIESSA" => 107, "ORCA" => 108, "SILCER" => 111, "MESSINAS" => 112, "FERVAB" => 113, "DIVACUN" => 115, "CADENITA" => 116, "HECCSA" => 117, "SAGSA" => 118, "MAGRA" => 119, "COLOMER" => 120, "BORDEX" => 121, "SERVICLIMAS" => 123, "CORECO" => 124, "CMV" => 125, "MAYCO" => 126, "TABLAROCA" => 127, "KAUA" => 129, "GONELA" => 130, "SVM" => 109, "ABIMERHI" => 106, "PREVE" => 110, "SEY" => 110, "CASTALDI" => 132, "HINO" => 114, "LAMOL" => 99, "BICIMAYA" => 131, "COUNTRY" => 132, "KOHLBERG" => 128, "POLIOBRAS" => 134, "TZUNCACAB" => 135, "GML" => 102, "RYE" => 101, "OH" => 136, "GRUPO NICXA" => 137, "SAXON" => 138, "EXHIBIT" => 122);
    $arrGeneroInv = array(1 => 2, 2 => 1, 99 => 99);
    $arrGenero = array("HOMBRE" => 1, "MUJER" => 2, "NINGUNO" => 99, "" => 99, "MASCULINO" => 1, "MASCULINA" => 1, "FEMENINO" => 2, "FEMENINA" => 2);
    $arrFJuridica = array("PERSONA FISICA" => 1, "PERSONA MORAL" => 2, "FISICA" => 1, "MORAL" => 2, "NATURAL" => 1, "JURIDICA" => 2, "" => 1, "NINGUNO" => 99);
    $arrEcivil = array("CASADO" => 1, "CASADA" => 1, "SOLTERO" => 2, "SOLTERA" => 2, "NINGUNO" => 99, "" => 99, "DIVORCIADO" => 3, "DIVORCIADA" => 3, "UNION LIBRE" => 4, "VIUDO" => 6);
    $arr2RegMat = array("" => "NINGUNO", "MANCOMUNADO" => "SOCIEDAD_CONYUGAL", "SEPARADOS" => "BIENES_SEPARADOS");
    $arrVivienda = array("PROPIA" => 1, "RENTADA" => 2, "NA" => 99, "NINGUNO" => 99);
    $doc1 = isset($_FILES["idarchivo"]) ? $_FILES["idarchivo"] : false;
    $xFi = new cFileImporter();
     $step = MQL_ADD;
     $clave = $xTabla->query()->getLastID() + 1;
     $xTabla->idseguimiento_llamadas($clave);
 } else {
     $step = MQL_MOD;
     if ($clave != null) {
         $xTabla->setData($xTabla->query()->initByID($clave));
     }
 }
 $xFRM->setAction("llamadas.frm.php?action={$step}");
 if ($step == MQL_MOD) {
     $xFRM->addGuardar();
 } else {
     $xFRM->addSubmit();
 }
 $clave = parametro($xTabla->getKey(), null, MQL_INT);
 if (($action == MQL_ADD or $action == MQL_MOD) and $clave != null) {
     $xTabla->setData($xTabla->query()->initByID($clave));
     $xTabla->setData($_REQUEST);
     if ($action == MQL_ADD) {
         $xTabla->query()->insert()->save();
     } else {
         $xTabla->query()->update()->save($clave);
     }
     $xFRM->addAvisoRegistroOK();
 }
 $xFRM->OMoneda("deuda_total", $xTabla->deuda_total()->v(), "TR.total");
 $xFRM->OText("telefono_uno", $xTabla->telefono_uno()->v(), "TR.telefono 1");
 $xFRM->OText("telefono_dos", $xTabla->telefono_dos()->v(), "TR.telefono 2");
 $xFRM->OText("fecha_llamada", $xTabla->fecha_llamada()->v(), "TR.fecha");
 $xFRM->OText("hora_llamada", $xTabla->hora_llamada()->v(), "TR.hora");
$tipoconvenio = parametro("idproducto", 0, MQL_INT);
$numeropagos = parametro("idnumerodepagos", 0, MQL_INT);
$rubro_destino = parametro("iddestinodecredito", 0, MQL_INT);
$amp_destino = parametro("iddescripciondestino");
$observaciones = parametro("idobservaciones");
$monto_solicitado = parametro("idmonto", 0, MQL_FLOAT);
$contrato_corriente = $cuenta;
$tipo_de_pago = parametro("idtipodepago", 0, MQL_INT);
$vencido = parametro("idFechaVencimiento", false);
$ministrado = parametro("idFechaMinistracion", false);
$solicitado = parametro("idFechaSolicitud", false);
$TipoDeAutorizacion = false;
$esrenovado = parametro("idrenovado", false, MQL_BOOL);
$tieneprops = parametro("idpropietario", false, MQL_BOOL);
//propietarios reales
$tieneprovs = parametro("idproveedor", false, MQL_BOOL);
//proveedores de recursos
$fecha_solicitud = $xFecha->getFechaISO($solicitado);
$fecha_ministracion = $xFecha->getFechaISO($ministrado);
$fecha_vencimiento = $xFecha->getFechaISO($vencido);
$oficial_de_credito = getUsuarioActual();
$xBtn = new cHButton();
$xFRM = new cHForm("frmcreditoautorizado");
$xFRM->setTitle($xHP->getTitle());
$xHP->init();
//Correccciones
$contrato_corriente = setNoMenorQueCero($contrato_corriente) <= 0 ? DEFAULT_CUENTA_CORRIENTE : $contrato_corriente;
$xSoc = new cSocio($persona);
$arrDatos = array("periocidad_de_pago" => $periocidad, "tipo_de_producto" => $tipoconvenio, "numero_de_pagos" => $numeropagos, "contrato_corriente_relacionado" => $contrato_corriente, "fecha_de_ministracion" => $ministrado, "fecha_de_vencimiento" => $vencido, "monto_solicitado" => $monto_solicitado);
$sucess = true;
if ($xSoc->isOperable() == true) {
function getListRecibos($tipo, $socio)
{
    $sql = new cSQLListas();
    $cTbl = new cTabla($sql->getListadoDeRecibos($tipo, $socio));
    $xImg = new cHImg();
    $cTbl->setKeyField("idoperaciones_recibos");
    $cTbl->setTdClassByType();
    $cTbl->OButton("TR.Reporte", "jsGetReporteRecibo(" . HP_REPLACE_ID . ")", $cTbl->ODicIcons()->REPORTE);
    $cTbl->OButton("TR.Panel", "var xRec = new RecGen(); xRec.panel(" . HP_REPLACE_ID . ")", $cTbl->ODicIcons()->EJECUTAR);
    $cTbl->setEventKey("setRecibo");
    return $cTbl->Show();
}
$jxc->exportFunction('getListRecibos', array('idTipoRecibo', 'idsocio'), "#lst-resultados");
$jxc->process();
$c = parametro("c", false, MQL_RAW);
$f = parametro("f", false, MQL_RAW);
$xHP->init();
$xFRM = new cHForm("frmsearchrecs", "./");
$xSel = new cHSelect();
$xFRM->addPersonaBasico();
$sqlsel = "SELECT\n\t\t\t\t\t\t\t`operaciones_recibostipo`.`idoperaciones_recibostipo` AS `tipo`,\n\t\t\t\t\t\t\t`operaciones_recibostipo`.`descripcion_recibostipo`   AS `descripcion`\n\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t`operaciones_recibostipo` `operaciones_recibostipo`";
$mSel = $xSel->getListadoGenerico($sqlsel, "idTipoRecibo");
$mSel->addEspOption(SYS_TODAS);
$mSel->addEvent("onchange", "getListRecibos()");
$xFRM->addHElem($mSel->get("TR.Tipo de Recibo", true));
$xFRM->addCerrar();
$xFRM->OButton("TR.Buscar", "getListRecibos()", "buscar");
//$xFRM->addSubmit();
$xFRM->addJsBasico(iDE_SOCIO);
$xFRM->addHTML('<fieldset><legend>Resultados de la Busqueda</legend><div id="lst-resultados"></div></fieldset>');
echo $xFRM->get();
$lis = new cSQLListas();
$xF = new cFecha();
//$persona	= parametro("persona", DEFAULT_SOCIO, MQL_INT);
$credito = parametro("credito", DEFAULT_CREDITO, MQL_INT);
$letra = parametro("letra", 0, MQL_INT);
$monto = parametro("monto", 0, MQL_FLOAT);
$fechaI = parametro("on", fechasys());
$fechaF = parametro("off", fechasys());
$fechaEnv = parametro("to", fechasys());
$observaciones = parametro("observaciones", "");
$empresa = parametro("empresa", false);
$periodo = parametro("periodo", false);
$periocidad = parametro("periocidad", false);
$notas = parametro("notas", false);
$rs = array();
$idnomina = parametro("nomina", false);
$xEmp = new cEmpresas($empresa);
$xEmp->init();
$msg = "";
if (setNoMenorQueCero($idnomina) <= 0) {
    $rs["error"] = true;
    $rs["message"] = "Nomina Invalida {$idnomina} ";
} else {
    if (setNoMenorQueCero($credito) > 1) {
        //sucess
        //eliminar anteriores
        $sqlNS = "SELECT getSaldoPendienteDesdeLetra({$credito}, ({$letra}-1)) AS 'saldo_anterior' ";
        $sdo_anterior = mifila($sqlNS, "saldo_anterior");
        $xO = new cEmpresas_cobranza();
        $idoriginal = $xO->query()->getLastID();
        $xO->idempresas_cobranza($idoriginal);
include_once "../core/core.init.inc.php";
$theFile = __FILE__;
$permiso = getSIPAKALPermissions($theFile);
if ($permiso === false) {
    header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//<=====	FIN_H
//=====================================================================================================
$xInit = new cHPage("", HP_SERVICE);
$txt = "";
$ql = new MQL();
$lis = new cSQLListas();
$xF = new cFecha();
$tabla = parametro("tabla", false, MQL_RAW);
$clave = parametro("id", false, MQL_RAW);
$rs = array();
//AND MODO_DEBUG == true
if ($tabla != false and $clave != false) {
    $xObj = new cSAFETabla($tabla);
    if ($xObj->obj() == null) {
        $rs["message"] = "ERROR\tAl eliminar el Registro con ID {$clave} en la Tabla {$tabla}\r\n";
        $rs["error"] = true;
    } else {
        $obj = $xObj->obj();
        $key = $obj->getKey();
        $obj = new cSocios_aeconomica();
        $obj->setData($obj->query()->initByID($clave));
        $data = base64_encode(json_encode($obj->query()->getCampos()));
        $ql->setRawQuery("DELETE FROM {$tabla} WHERE {$key}='{$clave}'");
        $rs["message"] = "OK\tSe elimina el Registro con ID {$clave} en la Tabla {$tabla}\r\n";
$_SESSION["current_file"] = addslashes($theFile);
//=====================================================================================================
$xHP = new cHPage("TR.Movimientos Bancarios", HP_GRID);
$xF = new cFecha();
$out = isset($_GET["out"]) ? $_GET["out"] : SYS_DEFAULT;
$mx = isset($_GET["mx"]) ? true : false;
if ($mx == true) {
    $fechaInicial = isset($_GET["on"]) ? $xF->getFechaISO($_GET["on"]) : FECHA_INICIO_OPERACIONES_SISTEMA;
    $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();
}
$cuenta = isset($_GET["cuenta"]) ? $_GET["cuenta"] : SYS_TODAS;
$operacion = isset($_GET["operacion"]) ? $_GET["operacion"] : SYS_TODAS;
$busqueda = parametro("busqueda", "", MQL_STRING);
$ByCuenta = ($cuenta != SYS_TODAS and $cuenta != "") ? " AND `bancos_operaciones`.`cuenta_bancaria`={$cuenta} " : "";
$ByOperaciones = ($operacion != SYS_TODAS and $operacion != "") ? " AND `bancos_operaciones`.`tipo_operacion`='{$operacion}' " : "";
$ByBusqueda = $busqueda == "" ? "" : " AND (`bancos_operaciones`.`beneficiario`  LIKE '%{$busqueda}%' ) ";
$filtro1 = "";
$filtro2 = "";
$xHP->setNoDefaultCSS();
echo $xHP->getHeader(true);
//HTML Object END
echo '<body onmouseup="SetMouseDown(false);" ><div id="onGrid">';
// Define your grid
$_SESSION["grid"]->SetDatabaseConnection(MY_DB_IN, USR_DB, PWD_DB);
//Propiedades del GRID
$mGridTitulo = $xHP->getTitle();
$mGridKeyField = "idcontrol";
//Nombre del Campo Unico
             $iddomicilio = $xSoc->getIDDeVivienda();
         }
     }
 }
 if (setNoMenorQueCero($ingresos) > 0 and setNoMenorQueCero($persona) > 0) {
     $addAct = $xSoc->addActividadEconomica($nombreempresa, $ingresos, "", DEFAULT_TIEMPO, FALLBACK_CLAVE_EMPRESA, $calle . "/" . $nexterior, $nombrelocalidad, $nombremunicipio, $nombre_estado, $tmovil, 0, 0, "", $idactividad, FALLBACK_SECTOR_ECONOMICO, $sucursal, "0", $cpostal, $idlocalidad);
     if ($addAct == false) {
         $msg .= "ERROR\tError al agregar la Actividad Economica \r\n";
     }
 }
 if (setNoMenorQueCero($origen_relacion) > 0 and setNoMenorQueCero($persona) > 0) {
     $documentorelacionado = parametro("iddocumentorelacionado", 0, MQL_INT);
     $personarelacionado = parametro("idpersonarelacionado", 0, MQL_INT);
     $idtipoderelacion = parametro("idtipoderelacion", 0, MQL_INT);
     $dependiente = parametro("dependiente", false, MQL_BOOL);
     $idtipodeparentesco = parametro("idtipodeparentesco", DEFAULT_TIPO_CONSANGUINIDAD, MQL_INT);
     if ($origen_relacion == iDE_CREDITO) {
         $xCred = new cCredito($documentorelacionado);
         $xCred->init();
         $MontoAvalado = $xCred->getMontoAutorizado();
         $addAval = $xCred->addAval($persona, $MontoAvalado, $idtipoderelacion, $idtipodeparentesco, $dependiente, $idobservaciones);
         $msg .= $xCred->getMessages();
     }
     //captacion
     //persona
     if ($origen_relacion == iDE_SOCIO) {
         if ($personarelacionado > 0) {
             $xPer = new cSocio($personarelacionado);
             if ($xPer->init() == true) {
                 $addRel = $xPer->addRelacion($persona, $idtipoderelacion, $idtipodeparentesco, $dependiente, $idobservaciones);
             }
if ($permiso === false) {
    header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//<=====	FIN_H
$iduser = $_SESSION["log_id"];
//=====================================================================================================
$xHP = new cHPage("TR.Plan_de_Pagos", HP_REPORT);
$xF = new cFecha();
$ql = new MQL();
$oficial = elusuario($iduser);
$idrecibo = parametro("idrecibo", false, MQL_INT);
$idrecibo = parametro("recibo", $idrecibo, MQL_INT);
$idsolicitud = parametro("is", false, MQL_INT);
$idsolicitud = parametro("credito", $idsolicitud, MQL_INT);
$ShowAvales = parametro("p", false, MQL_BOOL);
if ($idrecibo == false) {
    if ($idsolicitud != false) {
        $xCred = new cCredito($idsolicitud);
        $xCred->init();
        $idrecibo = $xCred->getNumeroDePlanDePagos();
        if (setNoMenorQueCero($idrecibo) > 0) {
        } else {
            exit(JS_CLOSE);
        }
    } else {
        exit(JS_CLOSE);
    }
}
$xHP->setTitle($xHP->getTitle() . " # {$idrecibo}");
echo $xHP->getHeader(true);
    $xFRM->addSubmit();
} elseif ($action == SYS_UNO) {
    //editar
    $xFMT->init($idcontrato);
    $titulo = $xFMT->getTitulo();
    $xFRM->setTitle($titulo);
    $xFRM->addHElem($xFMT->getSelectVariables("", "onchange=\"jsAddText()\" "));
    $xFRM->addSubmit("", "", "");
    $text_default = $xFMT->get();
    $xFRM->addHTML("<textarea class=\"ckeditor\" name=\"ckeditor\" id=\"ckeditor\" rows=\"20\" cols=\"15\">{$text_default}</textarea>");
    $xFRM->addFootElement("<input type='hidden' value='{$idcontrato}' name='idcontrato' />");
    $xFRM->setAction("frmeditor_contratos.php?action=2");
} elseif ($action == SYS_DOS) {
    //guardar
    $s = isset($_REQUEST["ckeditor"]) ? $_REQUEST["ckeditor"] : "";
    $i = parametro("idcontrato");
    $text_default = stripslashes($s);
    if ($s != "" && $i != "") {
        $sqluc = "UPDATE general_contratos SET texto_del_contrato='{$s}' WHERE idgeneral_contratos={$i}";
        $x = my_query($sqluc);
        if ($x[SYS_ESTADO] != false) {
            //$xFRM->addSubmit("", "", "");echo $text_default;
            $xFRM->addSubmit("", "getForma({$i})");
        } else {
            $xFRM->addAviso("SURGIO UN PROBLEMA AL GUARDAR");
        }
    } else {
        $xFRM->addAviso("FALTAN PARAMETROS");
    }
}
echo $xFRM->get();
$_SESSION["current_file"] = addslashes($theFile);
//<=====	FIN_H
$iduser = $_SESSION["log_id"];
//=====================================================================================================
$xHP = new cHPage("TR.Panel de Control de personas", HP_FORM);
$jxc = new TinyAjax();
$xql = new cSQLListas();
$ql = new MQL();
$xImg = new cHImg();
$xF = new cFecha();
$jsTabs = "";
$idempresa = 0;
$oficial = elusuario($iduser);
$idsocio = parametro("idsocio", false, MQL_INT);
$idsocio = parametro("persona", $idsocio, MQL_INT);
$idsocio = parametro("socio", $idsocio, MQL_INT);
$xJsB = new jsBasicForm("extrasocios");
function jsaReVivienda($idsocio)
{
    $ql = new cSQLListas();
    $sqlvv = "SELECT socios_vivienda.idsocios_vivienda AS 'num',\n\t\t\n\t\t\t\t\tCONCAT('Calle ', socios_vivienda.calle, ' Num. ',\n\t\t\t\t\tsocios_vivienda.numero_exterior, '-', socios_vivienda.numero_interior, ' Col. ',\n\t\t\t\t  \tsocios_vivienda.colonia, ', ', socios_vivienda.localidad, ', ', estado)\n\t\t\t\t\tAS 'domicilio_completo',\n\t\t\t\t\tgetBooleanMX(socios_vivienda.principal) AS 'es_principal'\n\t\t\t\t    FROM socios_vivienda WHERE socio_numero={$idsocio}  LIMIT 0,10";
    $cTbl = new cTabla($sqlvv);
    $cTbl->setWidth();
    //$cTbl->addTool(1);
    $cTbl->addTool(2);
    $cTbl->OButton("TR.Verificar", "jsVerificar(_REPLACE_ID_)", $cTbl->ODicIcons()->SALUD);
    $cTbl->setKeyField("idsocios_vivienda");
    return $cTbl->Show();
}
function jsaReActividadE($idsocio)
{
$permiso = getSIPAKALPermissions($theFile);
if ($permiso === false) {
    header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//<=====	FIN_H
$iduser = $_SESSION["log_id"];
//=====================================================================================================
$xHP = new cHPage("Recibo de Cobros", HP_RECIBO);
$xHP->addCSS("../css/tinybox.css");
$xHP->addJsFile("../js/tinybox.js");
$oficial = elusuario($iduser);
$xT = new cTipos();
$xFRM = new cHForm("frmrecibo");
$xF = new cFecha();
$recibo = parametro("recibo", false);
$xQl = new MQL();
echo $xHP->getHeader();
if ($recibo == false) {
    header("location:../404.php?i=" . DEFAULT_CODIGO_DE_ERROR);
}
$arrQ = array("aumento" => 1, "disminucion" => -1, "ninguna" => 0);
//capturar datos del recibo
$xRec = new cReciboDeOperacion(false, false, $recibo);
$xRec->init();
$DRec = $xRec->getDatosInArray();
$idsocio = $xRec->getCodigoDeSocio();
// $DRec["numero_socio"];
$numero_de_socio = $xRec->getCodigoDeSocio();
//$DRec["numero_socio"];
$afectaCaja = $arrQ[$DRec["afectacion_en_flujo_efvo"]];
$xF = new cFecha();
$empresa = isset($_GET["r"]) ? $_GET["r"] : 0;
$periocidad = isset($_GET["p"]) ? $_GET["p"] : "todos";
$variacion = isset($_GET["v"]) ? $_GET["v"] : 0;
$ByPeriodo = $periocidad == "todos" ? "" : " AND creditos_solicitud.periocidad_de_pago = {$periocidad} ";
$periodo = isset($_GET["periodo"]) ? $_GET["periodo"] : 0;
$out = parametro("out", OUT_HTML);
$xRPT = new cReportes($xHP->getTitle());
$fecha_filtro = fechasys();
$ByMinistracion = "";
//$periodo		= $periodo + $variacion;
$fechaInicial = parametro("on", false);
$fechaFinal = parametro("off", false);
$fechaFinal = $xF->getFechaISO($fechaFinal);
$fechaInicial = $xF->getFechaISO($fechaInicial);
$idnomina = parametro("nomina", 0, MQL_INT);
//$xHP->addJsFile("../js/jquery/jquery.js");
//$xHP->addJsFile("../js/general.js");
//$xHP->addJsFile("../js/jquery/jquery.qtip.min.js");
$xEmp = new cEmpresas($empresa);
$xEmp->init();
$xTPer = new cPeriocidadDePago($periocidad);
$xTPer->init();
//if($xEmp->getEsPeriodoCerrado($periocidad, $periodo) == false){	$xHP->goToPageError(20101); }
//$xHP->addStyle("");
$style = " body { margin-top:0; margin-bottom:0.5in; margin-left:0.5in; margin-right:0.5in; \n\t\tfont: 8pt \"Trebuchet MS\", Arial, Helvetica, sans-serif !important; font-stretch: extra-condensed;\ttext-transform: uppercase; }\n#ticket { height: 3.8in; } .npage { page-break-after: always;} .divisormedio { margin-bottom: 1.25in; border-style: dotted;  border-color: transparent; }   ";
$xRPT->setToPrint();
$xRPT->addHeaderCNT("<style>{$style}</style>");
if ($out == OUT_DOC) {
    $xRPT->addHeaderCNT("<style>h1,h2,h3,h4 {text-align:center; font-size: 12pt; } body{ line-height: 10pt; }</style>");
}
$permiso = getSIPAKALPermissions($theFile);
if ($permiso === false) {
    header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//=====================================================================================================
$xHP = new cHPage("TR.Operaciones de Empresa ", HP_REPORT);
$xF = new cFecha();
$periodo = isset($_GET["periodo"]) ? $_GET["periodo"] : SYS_TODAS;
$empresa = isset($_GET["empresa"]) ? $_GET["empresa"] : SYS_TODAS;
$periocidad = isset($_GET["periocidad"]) ? $_GET["periocidad"] : SYS_TODAS;
//$estado		= (isset($_GET["estado"])) ? $_GET["estado"]: "todas";
$fecha_inicial = parametro("idfecha-0", false);
$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"));
$xChk = new cHCheckBox();
$msg = "";
$xFRM->setTitle("TR.purgar de entidadades federativas");
$xFRM->addJsBasico();
//$xFRM->addCreditBasico();
$mql = new MQL();
//Obtener lista de estados
$sql = "SELECT * FROM `general_estados` ";
$data = $mql->getDataRecord($sql);
$cEs = new cGeneral_estados();
foreach ($data as $rows) {
    $cEs->setData($rows);
    if ($action == SYS_NINGUNO) {
        $xFRM->addHTML($xChk->get($cEs->nombre()->v(), "estado" . $cEs->clave_numerica()->v()));
    } else {
        $eliminar = parametro("estado" . $cEs->clave_numerica()->v(), false, MQL_BOOL);
        $estado = $cEs->clave_numerica()->v();
        if ($eliminar == true) {
            my_query("DELETE FROM `general_colonias` WHERE `codigo_de_estado` = {$estado} ");
            my_query("DELETE FROM `general_municipios` WHERE `clave_de_entidad` = {$estado} ");
            //my_query("DELETE FROM `catalogos_localidades` WHERE `clave_de_estado` = $estado ");
        }
    }
}
$xFRM->addSubmit();
echo $xFRM->get();
echo $xHP->setBodyEnd();
//$jxc ->drawJavaScript(false, true);
?>
<!-- HTML content -->
<script>
/*if (!$i){
	echo "<script languaje=\"javascript\"> window.close(); </script>";
}*/
$persona = parametro("persona", DEFAULT_SOCIO, MQL_INT);
$persona = parametro("socio", $persona, MQL_INT);
$persona = parametro("idsocio", $persona, MQL_INT);
$credito = parametro("credito", DEFAULT_CREDITO, MQL_INT);
$credito = parametro("idsolicitud", $credito, MQL_INT);
$credito = parametro("solicitud", $credito, MQL_INT);
$cuenta = parametro("cuenta", DEFAULT_CUENTA_CORRIENTE, MQL_INT);
$cuenta = parametro("idcuenta", $cuenta, MQL_INT);
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$persona = parametro("i", $persona, MQL_INT);
$xHP->init();
$xFRM = new cHForm("frm", "./");
$msg = "";
$ssql = $xL->getListadoDeCuentasDeCapt($persona, false, $tipo, $subtipo);
$tb = new cTabla($ssql);
$tb->setEventKey("setCuenta");
//$tb->
$xFRM->addHTML($tb->Show());
$xFRM->addCerrar();
echo $xFRM->get();
//$jxc ->drawJavaScript(false, true);
?>
<script  >
function setCuenta(id){
	msrc	= null;
$ClaveOtorgante = $xCR->getClaveDeOtorgante();
$NombreOtorgante = $xCR->getNombreOtorgante();
$ByPersona1 = "";
$ByPersona2 = "";
$ByPersona3 = "";
$FechaInicial = isset($_GET["on"]) ? $_GET["on"] : FECHA_INICIO_OPERACIONES_SISTEMA;
$FechaFinal = isset($_GET["off"]) ? $_GET["off"] : fechasys();
$toJson = false;
//parametro("beauty", false, MQL_BOOL);
$lineaJson = array();
$itemJson = array();
$FechaExtraccion = date("Ymd", strtotime($FechaFinal));
$estatus_actual = parametro("f2", false, MQL_INT);
$persona = parametro("persona", DEFAULT_SOCIO, MQL_INT);
$persona = parametro("socio", $persona, MQL_INT);
$persona = parametro("idsocio", $persona, MQL_INT);
if ($persona != DEFAULT_SOCIO) {
    $ByPersona2 = " AND\t(`creditos_solicitud`.`numero_socio` = {$persona}) ";
    $ByPersona1 = " AND (`creditos_abonos_parciales`.`socio_afectado` = {$persona} ) ";
    $ByPersona3 = " AND (`socio_afectado` = {$persona} ) ";
    $toJson = true;
}
$xDB = new cSAFEData();
$xT = new cTipos();
$xF = new cFecha();
//header("Content-type: text/plain");
//header("Content-type: application/csv");
if ($toJson == true) {
    header("Content-type: text/plain");
} else {
    header("Content-type: text/x-csv");
$theFile = __FILE__;
$permiso = getSIPAKALPermissions($theFile);
if ($permiso === false) {
    header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//<=====	FIN_H
$iduser = $_SESSION["log_id"];
//=====================================================================================================
$xHP = new cHPage("", HP_FORM);
$jxc = new TinyAjax();
//Mvtos
$poliza = parametro("n", false, MQL_INT);
$periodo = parametro("p", false, MQL_INT);
$tipo = parametro("t", false, MQL_INT);
$ejercicio = parametro("e", false, MQL_INT);
$keypoliza = "";
$str_action = "frm_poliza_movimientos.php?n={$poliza}&p={$periodo}&e={$ejercicio}&t={$tipo}";
$m_mvto = 1;
$me_mvto = 2;
$d_concepto = "";
$k_mvto = "";
$fecha = fechasys();
function save_mvto($keymvto, $cuenta, $cargo, $abono, $referencia, $concepto, $mfecha, $form)
{
    if (isset($cuenta) and ($cargo > 0 or $abono > 0)) {
        $dkeys = explode("@", $keymvto);
        $nejercicio = $dkeys[1];
        $nperiodo = $dkeys[2];
        $npoliza = $dkeys[3];
        $ntipo = $dkeys[4];
    saveError(999, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Acceso no permitido a :" . addslashes(__FILE__));
    header("location:404.php?i=999");
} else {
    $_SESSION["current_file"] = addslashes(__FILE__);
}
$iduser = $_SESSION["log_id"];
//=====================================================================================================
$xHP = new cHPage("TR.Cobro de Multas");
$idrecibo = 0;
$xCaja = new cCaja();
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$fecha = parametro("idfecha-0", false, MQL_DATE);
$fecha = parametro("idfechaactual", $fecha, MQL_DATE);
//remote values
$msgs = isset($_GET[SYS_MSG]) ? isset($_GET[SYS_MSG]) : "RELLENE LOS DATOS SOLICITADO Y GUARDELO";
$dMonto = isset($_GET["mn"]) ? isset($_GET["mn"]) : 0;
$dSocio = isset($_GET["s"]) ? isset($_GET["s"]) : DEFAULT_SOCIO;
$dCon = isset($_GET["c"]) ? isset($_GET["c"]) : "";
if ($xCaja->getEstatus() == TESORERIA_CAJA_CERRADA) {
    $xHP->goToPageError(200);
}
$xHP->init();
$xFRM = new cHForm("frmmultas", "frmcobrodemultas.php?action=" . MQL_ADD);
if ($action == SYS_NINGUNO) {
    $xFRM->addPersonaBasico();
    $xFRM->ODate("idfechaactual", false, "TR.Fecha de cobro");
    $xFRM->addCobroBasico();
    $xFRM->OText("idconceptomulta", "", "TR.Concepto de Multa");
include_once "../core/core.init.inc.php";
$theFile = __FILE__;
//$permiso					= getSIPAKALPermissions($theFile);
//if($permiso === false){		header ("location:../404.php?i=999");	}
$_SESSION["current_file"] = addslashes($theFile);
//<=====	FIN_H
//=====================================================================================================
$xP = new cHPage("Pruebas de Fechas", HP_FORM);
$xP->setIncludes();
echo $xP->getHeader();
echo $xP->setBodyinit();
//Crear formularios
$xHFrm = new cHForm("frmTest", "./test.php");
$xHTxt = new cHText("");
//$txt 	= $xHTxt->getDeMoneda("id", "Moneda de Prueba",  100);
$miFecha = parametro("fecha", fechasys());
$xF = new cFecha(0, $miFecha);
//$xHFrm->addHElem( $txt );
$xHFrm->addHElem($xF->show(true));
$xHFrm->addHElem("<p class='aviso'>La {$miFecha}, Inicio se semana==" . $xF->getFechaDeInicioDeSemana() . "</p>");
$xHFrm->addHElem("<p class='aviso'>La {$miFecha}, Inicio se nombre semana==" . $xF->getDayName($xF->getFechaDeInicioDeSemana()) . "</p>");
$xHFrm->addHElem("<p class='aviso'>La {$miFecha}, Dias del Mes==" . $xF->getDiasDelMes() . "</p>");
$xHFrm->addHElem("<p class='aviso'>La {$miFecha}, En Fecha Corta==" . $xF->getFechaCorta() . "</p>");
$xHFrm->addHElem("<p class='aviso'>La {$miFecha}, Fecha Larga==" . $xF->getFechaLarga() . "</p>");
$xHFrm->addHElem("<p class='aviso'>La {$miFecha}, En Fecha Mediana==" . $xF->getFechaMediana() . "</p>");
//$xHFrm->addHElem(  );
$xHFrm->addHElem("<p class='aviso'>La {$miFecha}, Fecha Operativa Maxima==" . $xF->getFechaMaximaOperativa() . "</p>");
$xHFrm->addHElem("<p class='aviso'>La {$miFecha}, El Mes Anterior==" . $xF->getFechaMesAnterior() . "</p>");
$xHFrm->addHElem("<p class='aviso'>La {$miFecha}, dos meses atras==" . $xF->getFechaMesAnterior(false, 2) . "</p>");
$xHFrm->addHElem("<p class='aviso'>La {$miFecha}  - 30 Dias==" . $xF->setRestarDias(30) . "</p>");
$xHFrm->addHElem("<p class='aviso'>La {$miFecha}  + 30 Dias==" . $xF->setSumarDias(30) . "</p>");
include_once "../core/go.login.inc.php";
include_once "../core/core.error.inc.php";
include_once "../core/core.html.inc.php";
include_once "../core/core.init.inc.php";
$theFile = __FILE__;
$permiso = getSIPAKALPermissions($theFile);
if ($permiso === false) {
    header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//=====================================================================================================
$xHP = new cHPage("TR.Tipos de Operacion", HP_FORM);
$xT = new cTipos();
$xIcs = new cFIcons();
$xHP->init();
$clave = parametro("idoperaciones_tipos", null, MQL_INT);
$xFRM = new cHForm("frmoperaciones_tipos", "operaciones_tipos");
$xFRM->OButton("TR.General", "jsGetGrid('general')", $xIcs->REPORTE);
$xFRM->OButton("TR.Contabilidad", "jsGetGrid('contable')", $xIcs->CONTABLE);
$xFRM->OButton("TR.Clase", "jsGetGrid('clase')", $xIcs->TIPO);
$xFRM->OButton("TR.Formulas", "jsGetGrid('formulas')", $xIcs->TIPO);
$xFRM->addHTML("<iframe src='../principal.php' id='ifoperaciones' height='800'></iframe>");
echo $xFRM->get();
?>
<script>
	function jsGetGrid(ctipo) {
		var xG	= new Gen();
		//xG.w({ url : "operaciones_tipos.grid.php?tipo=" + ctipo });
		$("#ifoperaciones").attr("src", "operaciones_tipos.grid.php?tipo=" + ctipo );
	}
	/* <iframe src="http://webdesign.about.com/od/iframes/a/aaiframe.htm" width="300" height="600">A page about learning iFrames</iframe> */
    $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();
}
$jxc->exportFunction('jsaGetListadoDeAvisos', array('idtipoderiesgoaml', 'idfecha-1', 'idfecha-2', 'idactivas'), "#lstalertas");
$jxc->process();
$clave = parametro("id", SYS_TODAS);
$xHP->init("jsGetListadoAvisos()");
$jsb = new jsBasicForm("");
$xFRM = new cHForm("frm_alertas", "./");
$xBtn = new cHButton();
$xTxt = new cHText();
$xDate = new cHDate();
$xSel = new cHSelect();
$jsb->setNameForm($xFRM->getName());
$selcat = $xSel->getListaDeTipoDeRiesgoEnAML();
$selcat->addEvent("onblur", "jsGetListadoAvisos()");
$selcat->addEvent("onchange", "jsGetListadoAvisos()");
$selcat->addEspOption(SYS_TODAS);
$selcat->setOptionSelect(SYS_TODAS);
$xFRM->OHidden("idfecha-1", "", "");
$xFRM->OHidden("idfecha-2", "", "");
$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);
include_once "../core/core.captacion.inc.php";
include_once "../core/core.riesgo.inc.php";
include_once "../core/core.seguimiento.inc.php";
include_once "../core/core.creditos.inc.php";
include_once "../core/core.creditos.utils.inc.php";
include_once "../core/core.operaciones.inc.php";
include_once "../core/core.common.inc.php";
include_once "../core/core.html.inc.php";
ini_set("display_errors", "off");
ini_set("max_execution_time", 1600);
$key = isset($_GET["k"]) ? true : false;
$parser = !isset($_GET["s"]) ? false : $_GET["s"];
//Obtiene la llave del
//if ($key == MY_KEY) {
$messages = "";
$fechaop = parametro("f", fechasys());
$xF = new cFecha(0, $fechaop);
/**
 * Generar el Archivo HTMl del LOG
 * eventos-del-cierre + fecha_de_cierre + .html
 *
 */
$aliasFil = getSucursal() . "-eventos-al-cierre-de-colocacion-del-dia-{$fechaop}";
$xLog = new cFileLog($aliasFil);
$ql = new MQL();
$xRec = new cReciboDeOperacion(12);
$xRec->setGenerarPoliza();
$xRec->setForceUpdateSaldos();
$idrecibo = $xRec->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, $fechaop, 1, 12, "CIERRE_DE_COLOCACION_{$fechaop}", DEFAULT_CHEQUE, DEFAULT_TIPO_PAGO, DEFAULT_RECIBO_FISCAL, DEFAULT_GRUPO);
$xRec->setNumeroDeRecibo($idrecibo);
$messages .= "=======================================================================================\r\n";
$estatus = isset($_GET["f2"]) ? $_GET["f2"] : SYS_TODAS;
$frecuencia = isset($_GET["f1"]) ? $_GET["f1"] : SYS_TODAS;
$convenio = isset($_GET["f3"]) ? $_GET["f3"] : SYS_TODAS;
$estatus = isset($_GET["estado"]) ? $_GET["estado"] : $estatus;
$frecuencia = isset($_GET["periocidad"]) ? $_GET["periocidad"] : $frecuencia;
$frecuencia = isset($_GET["frecuencia"]) ? $_GET["frecuencia"] : $frecuencia;
$convenio = isset($_GET["convenio"]) ? $_GET["convenio"] : $convenio;
$empresa = isset($_GET["empresa"]) ? $_GET["empresa"] : SYS_TODAS;
$out = isset($_GET["out"]) ? $_GET["out"] : SYS_DEFAULT;
$es_por_estatus = "";
$BySaldo = " AND (creditos_solicitud.saldo_actual>=0.99) ";
if ($estatus == CREDITO_ESTADO_AUTORIZADO or $estatus == CREDITO_ESTADO_SOLICITADO) {
    $BySaldo = "";
}
$ByOficial = $xLi->OFiltro()->CreditosPorOficial(parametro("oficial", SYS_TODAS, MQL_INT));
$BySucursal = $xLi->OFiltro()->CreditosPorSucursal(parametro("sucursal", ""));
$ByEmpresa = $xLi->OFiltro()->CreditosPorEmpresa($empresa);
$es_por_frecuencia = $xLi->OFiltro()->CreditosPorFrecuencia($frecuencia);
$es_por_convenio = $xLi->OFiltro()->CreditosPorProducto($convenio);
$es_por_estatus = $xLi->OFiltro()->CreditosPorEstado($estatus);
/* ***************************************************************************** */
if ($out == OUT_EXCEL) {
} else {
    echo $xHP->getHeader();
    echo $xHP->setBodyinit("initComponents();");
    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 );