source: spip-zone/_plugins_/Association/Associaspip/exec/export_compteresultats_ctx.php @ 59668

<?php

/* * *************************************************************************\
 *  Associaspip, extension de SPIP pour gestion d'associations             *
 *                                                                         *
 *  Copyright (c) 2007 Bernard Blazin & François de Montlivault (V1)       *
 *  Copyright (c) 2010-2011 Emmanuel Saint-James & Jeannot Lapin (V2)      *
 *  Ecrit par Marcel BOLLA en 01/2012                                      *
 *                                                                         *
 *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
 *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
  \************************************************************************** */

if (!defined('_ECRIRE_INC_VERSION'))
        return;

// Export du Compte de Resultat en .ctx
function exec_export_compteresultats_ctx() {
        if (!autoriser('associer', 'export_compteresultats')) {
                include_spip('inc/minipres');
                echo minipres();
        } else {
                include_spip('inc/charsets');
                include_spip('inc/association_plan_comptable');
                $ctx = new CTX(_request('var'));
                $ctx->EnTete();
                foreach (array('charges', 'produits', 'contributions_volontaires') as $key) {
                        $ctx->LesEcritures($key);
                }
                $ctx->Enregistre();
        }
}

/**
 *  Utilisation d'une classe tres tres tres simple !!!
 */
class CTX {

        var $exercice;
        var $join;
        var $sel;
        var $where;
        var $having;
        var $order;
        var $out;

        function  __construct($var) {
                $tableau = unserialize(rawurldecode($var));
                $this->exercice = $tableau[0];
                $this->join = $tableau[1];
                $this->sel = $tableau[2];
                $this->where = $tableau[3];
                $this->having = $tableau[4];
                $this->order = $tableau[5];
                $this->out = '';
        }

        function EnTete() {
                $this->out .= str_replace(array("\r", "\n", "\\", '|'), array('\r', '\n', '\i', '\p'), html_entity_decode(_T('asso:entete_code'))) .'|';
                $this->out .= '"'. str_replace(array("\r", "\n", "\\", '|'), array('\r', '\n', '\i', '\p'), html_entity_decode(_T('asso:entete_intitule'))) .'|';
                $this->out .= str_replace(array("\r", "\n", "\\", '|'), array('\r', '\n', '\i', '\p'), html_entity_decode(_T('asso:entete_montant'))) ."\n";
        }

        function LesEcritures($key) {
                switch ($key) {
                        case 'charges' :
                                $quoi = "SUM(depense) AS valeurs";
                                break;
                        case 'produits' :
                                $quoi = "SUM(recette) AS valeurs";
                                break;
                        case 'contributions_volontaires' :
                                $quoi = "SUM(depense) AS charge_evaluee, SUM(recette) AS produit_evalue";
                                break;
                }
                $query = sql_select(
                        "imputation, $quoi, DATE_FORMAT(date, '%Y') AS annee".$this->sel, // select
                        'spip_asso_comptes '.$this->join, // from
                        $this->where, // where
                        $this->order, // group by
                        $this->order, // order by
                        '', // limit
                        $this->having .$GLOBALS['association_metas']['classe_'.$key] // having
                );
                $chapitre = '';
                $i = 0;
                while ($data = sql_fetch($query)) {
                        if ($key==='contributions_volontaires') {
                                if ($data['charge_evaluee']>0) {
                                        $valeurs = $data['charge_evaluee'];
                                } else {
                                        $valeurs = $data['produit_evalue'];
                                }
                        } else {
                                $valeurs = $data['valeurs'];
                        }
                        $new_chapitre = substr($data['code'], 0, 2);
                        if ($chapitre!=$new_chapitre) {
                                $this->out .= str_replace(array("\r", "\n", "\\", '|'), array('\r', '\n', '\i', '\p'), $new_chapitre) .'|';
                                $this->out .= '"'. str_replace(array("\r", "\n", "\\", '|'), array('\r', '\n', '\i', '\p'), ($GLOBALS['association_metas']['plan_comptable_prerenseigne']?association_plan_comptable_complet($new_chapitre):sql_getfetsel('intitule','spip_asso_plan',"code='$new_chapitre'"))) .'|';
                                $this->out .= " | \n";
                                $chapitre = $new_chapitre;
                        }
                        $this->out .= str_replace(array("\r", "\n", "\\", '|'), array('\r', '\n', '\i', '\p'), $data['code']) .'|';
                        $this->out .= str_replace(array("\r", "\n", "\\", '|'), array('\r', '\n', '\i', '\p'), $data['intitule']) .'|';
                        $this->out .= $valeurs ."\n";
                }
        }

        function Enregistre() {
                $fichier = _DIR_RACINE.'/'._NOM_TEMPORAIRES_ACCESSIBLES.'compte_resultats_'.$this->exercice.'.ctx';
                $f = fopen($fichier, 'w');
                fputs($f, $this->out);
                fclose($f);
                header('Content-type: application/ctx');
                header('Content-Disposition: attachment; filename="'.$fichier.'"');
                readfile($fichier);
        }

}

?>