* Copyright (C) 2004 Laurent Destailleur * * This program 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. * * This program 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 this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. * * $Id$ * $Source$ * */ /*! \file htdocs/compta/export/index.php \ingroup compta \brief Page accueil zone export compta \version $Revision$ */ require("./pre.inc.php"); require("./ComptaJournalPaiement.class.php"); require("./ComptaJournalVente.class.php"); if ($_GET["action"] == 'export') { include_once DOL_DOCUMENT_ROOT.'/compta/export/modules/compta.export.class.php'; $exc = new ComptaExport($db, $user, 'Poivre'); if($_GET["id"] > 0) { $exc->Export($_GET["id"]); } else { $exc->Export(); } print $exc->error_message; /* Génération du journal des Paiements */ $jp= new ComptaJournalPaiement($db); $jp->GeneratePdf($user, $exc->id, $exc->ref); /* Génération du journal des Ventes */ $jp= new ComptaJournalVente($db); $jp->GeneratePdf($user, $exc->id, $exc->ref); } llxHeader('','Compta - Export'); print_titre("Export Comptable"); print ''; print '

'; $sql = "SELECT count(*) FROM ".MAIN_DB_PREFIX."facturedet"; $sql .= " WHERE fk_export_compta = 0"; $resql = $db->query($sql); if ($resql) { $row = $db->fetch_row($resql); $nbfac = $row[0]; $db->free($resql); } $sql = "SELECT count(*) FROM ".MAIN_DB_PREFIX."paiement"; $sql .= " WHERE fk_export_compta = 0"; $resql = $db->query($sql); if ($resql) { $row = $db->fetch_row($resql); $nbp = $row[0]; $db->free($resql); } print ''; print ''; print ''; print ''; print " Type Nb Factures à exporter '.$nbfac.' Paiements à exporter '.$nbp.' \n"; print '

'; $dir = DOL_DATA_ROOT."/compta/export/"; print ''; print ''; print ''; print ''; print "\n"; $handle=opendir($dir); while (($file = readdir($handle))!==false) { if (is_readable($dir.$file) && is_file($dir.$file)) { print ''; } } print " '.$langs->trans("Name").'   '.$file.' '; print ' "; print '

'; llxFooter("Dernière modification $Date$ révision $Revision$"); ?>