From ca7e228f24aa2d93099162454d773fdb03160a16 Mon Sep 17 00:00:00 2001 From: Rodolphe Quiedeville Date: Tue, 30 Nov 2004 13:35:44 +0000 Subject: [PATCH] Nouveau fichier --- htdocs/fourn/commande/history.php | 180 ++++++++++++++++++++++++++++++ 1 file changed, 180 insertions(+) create mode 100644 htdocs/fourn/commande/history.php diff --git a/htdocs/fourn/commande/history.php b/htdocs/fourn/commande/history.php new file mode 100644 index 00000000000..77e20b2730d --- /dev/null +++ b/htdocs/fourn/commande/history.php @@ -0,0 +1,180 @@ + + * 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/commande/fiche.php + \ingroup commande + \brief Fiche commande + \version $Revision$ +*/ + +require("./pre.inc.php"); + +$langs->load("orders"); +$langs->load("suppliers"); +$langs->load("companies"); + + +$user->getrights('fournisseur'); + +if (!$user->rights->fournisseur->commande->lire) + accessforbidden(); + +require_once "../../project.class.php"; +require_once "../../propal.class.php"; +require_once DOL_DOCUMENT_ROOT."/fournisseur.class.php"; +require_once DOL_DOCUMENT_ROOT."/fournisseur.commande.class.php"; + +/* + * Sécurité accés client + */ +if ($user->societe_id > 0) +{ + $action = ''; + $socidp = $user->societe_id; +} +/* + * + */ + +llxHeader('',$langs->trans("History"),"Commande"); + +$html = new Form($db); + +/* *************************************************************************** */ +/* */ +/* Mode vue et edition */ +/* */ +/* *************************************************************************** */ + +$id = $_GET["id"]; +if ($id > 0) +{ + $commande = new CommandeFournisseur($db); + if ( $commande->fetch($id) == 0) + { + $soc = new Societe($db); + $soc->fetch($commande->soc_id); + $author = new User($db); + $author->id = $commande->user_author_id; + $author->fetch(); + + $h = 0; + $head[$h][0] = DOL_URL_ROOT.'/fourn/commande/fiche.php?id='.$commande->id; + $head[$h][1] = $langs->trans("Order").": $commande->ref"; + $h++; + + $head[$h][0] = DOL_URL_ROOT.'/fourn/commande/history.php?id='.$commande->id; + $head[$h][1] = $langs->trans("History"); + $a = $h; + + $h++; + + dolibarr_fiche_head($head, $a, $soc->nom); + + /* + * Commande + */ + + print ''; + print ""; + print ''; + + print '"; + + print ''; + print "\n"; + + print '"; + + print ''; + + print '"; + + print "
".$langs->trans("Supplier")."'; + print ''.$soc->nom.''; + print ' '; + print $commande->statuts[$commande->statut]; + print "
'.$langs->trans("Date").'".strftime("%A %d %B %Y",$commande->date)." '; + print "
'.$langs->trans("Author").''.$author->fullname.''; + print " 
"; + + /* + * Historique + * + */ + echo '
'; + + $sql = "SELECT l.fk_statut, ".$db->pdate("l.datelog") ."as dl, u.firstname, u.name"; + $sql .= " FROM ".MAIN_DB_PREFIX."commande_fournisseur_log as l "; + $sql .= " , ".MAIN_DB_PREFIX."user as u "; + $sql .= " WHERE l.fk_commande = ".$commande->id." AND u.rowid = l.fk_user"; + $sql .= " ORDER BY l.rowid DESC"; + + $result = $db->query($sql); + if ($result) + { + $num = $db->num_rows(); + $i = 0; + + $var=True; + while ($i < $num) + { + $obj = $db->fetch_object(); + print ""; + + print '\n"; + + print '\n"; + + print ''; + + print ""; + + + $i++; + $var=!$var; + } + $db->free(); + } + else + { + print $db->error(); + } + + print "
'.strftime("%a %d %B %Y %H:%M:%S",$obj->dl)." '; + + print $commande->statuts[$obj->fk_statut]."'.$obj->firstname. " " . $obj->name.'
"; + print '
'; + + } + else + { + /* Commande non trouvée */ + print "Commande inexistante ou accés refusé"; + } +} + +$db->close(); + +llxFooter("Dernière modification $Date$ révision $Revision$"); +?>