1
0
Fork 0
mirror of https://github.com/YunoHost-Apps/noalyss_ynh.git synced 2024-09-03 19:46:20 +02:00
noalyss_ynh/sources/include/export/export_fiche_csv.php
dudjima 3a905a4a87 Update sources 7.01
Update files from sources with last update on noalyss.eu
2018-04-13 18:58:28 +02:00

78 lines
2.1 KiB
PHP

<?php
/*
* This file is part of NOALYSS.
*
* NOALYSS is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* NOALYSS is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with NOALYSS; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
// Copyright Author Dany De Bontridder danydb@aevalys.eu
/*! \file
* \brief Send a CSV file with card
*/
if ( ! defined ('ALLOWED') ) die('Appel direct ne sont pas permis');
include_once NOALYSS_INCLUDE."/lib/ac_common.php";
include_once NOALYSS_INCLUDE.'/class/fiche.class.php';
require_once NOALYSS_INCLUDE.'/lib/database.class.php';
require_once NOALYSS_INCLUDE.'/class/dossier.class.php';
require_once NOALYSS_INCLUDE.'/lib/noalyss_csv.class.php';
$gDossier=dossier::id();
$cn=Dossier::connect();
require_once NOALYSS_INCLUDE.'/class/user.class.php';
$export=new Noalyss_Csv(_('fiche'));
$export->send_header();
if ( isset ($_GET['fd_id']))
{
$fiche_def=new Fiche_Def($cn,$_GET ['fd_id']);
$fiche=new Fiche($cn);
$e=$fiche_def->get_by_type();
$o=0;
// Heading
$fiche_def->GetAttribut();
$title=array();
foreach ($fiche_def->attribut as $attribut)
{
$title[]=$attribut->ad_text;
}
$export->write_header($title);
// Details
foreach ($e as $fiche)
{
$detail=new Fiche($cn,$fiche['f_id']);
$detail->getAttribut();
foreach ( $detail->attribut as $dattribut )
{
if ( $dattribut->ad_type=="numeric")
$export->add($dattribut->av_text,"number");
else
$export->add($dattribut->av_text);
}
$export->write();
}
}
exit;
?>