$xLog->setClose();
if (ENVIAR_MAIL_LOGS == true) {
    $xLog->setSendToMail("TR.Eventos del Cierre del Sistema");
}
//Stored procedures
$ql->setRawQuery("CALL `proc_listado_de_ingresos` ");
//$ql->setRawQuery("CALL `proc_historial_de_pagos` ");
$ql->setRawQuery("CALL `sp_clonar_actividades` ");
$ql->setRawQuery("CALL `proc_perfil_egresos_por_persona` ");
$ql->setRawQuery("CALL `proc_creditos_letras_pendientes` ");
//
//Limpiar el Cache
//$xSys->setPowerOff();
//apagar el sistema
$xCache = new cCache();
$xCache->clean();
if ($parser != false) {
    $log = $aliasFil;
    $xPage = new cHPage("TR.Cierre del Dia", HP_FORM);
    $xBtn = new cHButton("iact");
    $oFRM = new cHForm("frmSubmit", "");
    $oFRM->setElementByLine(2);
    $oFRM->setTitle($xPage->getTitle() . " " . $xF->getFechaCorta());
    echo $xPage->getHeader();
    echo $xPage->setBodyinit();
    $oFRM->addHTML("<a href=\"../utils/download.php?type=txt&download={$log}&file={$log}\" target=\"_blank\" class='button'>Descargar Archivo de EVENTOS DEL SISTEMA</a><br /><br />");
    $log = getSucursal() . "-eventos-al-cierre-de-colocacion-del-dia-{$fechaop}";
    $oFRM->addHTML("<a href=\"../utils/download.php?type=txt&download={$log}&file={$log}\" target=\"_blank\" class='button'>Descargar Archivo de EVENTOS de CIERRE DE COLOCACION</a><br /><br />");
    if (MODULO_SEGUIMIENTO_ACTIVADO == true) {
        $log = getSucursal() . "-eventos-al-cierre-de-seguimiento-del-dia-{$fechaop}";
        $oFRM->addHTML("<a href=\"../utils/download.php?type=txt&download={$log}&file={$log}\" target=\"_blank\" class='button'>Descargar Archivo de EVENTOS de CIERRE DE SEGUIMIENTO</a><br /><br />");
 /**
  * Funcion que Actualiza los Datos del Socio segun un array tipo Campo=>valor
  * @param	array	$aParam
  */
 function setUpdate($aParam)
 {
     $idpersona = $this->getCodigo();
     $sqlBody = "";
     $BodyUpdate = "";
     if (is_array($aParam) and count($aParam) >= 1) {
         foreach ($aParam as $key => $value) {
             //Buscar en el Valor el Nombre del Field
             //$pos	= stripos($value, $key);
             //Si el Valor es una Cadena y no existe el Nombre del field
             if (is_string($value)) {
                 $value = "\"" . $value . "\"";
             }
             if ($BodyUpdate == "") {
                 $BodyUpdate .= "{$key} = {$value} ";
             } else {
                 $BodyUpdate .= ", {$key} = {$value} ";
             }
         }
         //END FOREACH
         $sqlBody = "UPDATE socios_general\n\t\t\t\t\t\t\t    SET {$BodyUpdate}\n\t\t\t\t\t\t\t    WHERE\n\t\t\t\t\t\t(codigo =" . $this->mCodigo . ")";
         $x = my_query($sqlBody);
         //eliminar ID en cache
         $xCache = new cCache();
         $xCache->clean(EACP_CLAVE . ".ficha.{$idpersona}");
         $xCache->clean(EACP_CLAVE . ".ficha.{$idpersona}.ext");
         $this->init();
         $this->setCuandoSeActualiza();
         return $x["stat"];
     } else {
         return false;
     }
 }
function jsaActualizarIdioma($fecha)
{
    $xSys = new cSystemPatch();
    $msgs = $xSys->patch(true, false, true);
    $xCache = new cCache();
    $xCache->clean();
    return $msgs;
}