* Copyright (C) 2004-2005 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/index.php \ingroup compta \brief Page acceuil zone comptabilité \version $Revision$ */ require("./pre.inc.php"); $langs->load("orders"); llxHeader("",$langs->trans("Orders"),"Commande"); print_titre($langs->trans("OrdersArea")); print ''; print '

'; /* * Zone recherche */ $var=false; print ''; print ''; print ''; print ''; print " '.$langs->trans("SearchOrder").' '; print $langs->trans("Ref").' : \n"; /* * Commandes ŕ valider */ $sql = "SELECT c.rowid, c.ref, s.nom, s.idp FROM ".MAIN_DB_PREFIX."commande as c, ".MAIN_DB_PREFIX."societe as s"; $sql .= " WHERE c.fk_soc = s.idp AND c.fk_statut = 0"; if ($socidp) { $sql .= " AND c.fk_soc = $socidp"; } if ( $db->query($sql) ) { $langs->load("orders"); $num = $db->num_rows(); if ($num) { $i = 0; print ''; print ''; print ''; $var = True; while ($i < $num) { $var=!$var; $obj = $db->fetch_object(); print ""; print ''; $i++; } print " '.$langs->trans("DraftOrders").' rowid\">".img_object($langs->trans("ShowOrder"),"order").' '.$obj->ref." '.img_object($langs->trans("ShowCompany"),"company").' '.dolibarr_trunc($obj->nom,24).' "; } } /* * Commandes ŕ traiter */ $sql = "SELECT c.rowid, c.ref, s.nom, s.idp FROM ".MAIN_DB_PREFIX."commande as c, ".MAIN_DB_PREFIX."societe as s"; $sql .= " WHERE c.fk_soc = s.idp AND c.fk_statut = 1"; $sql .= " ORDER BY c.rowid ASC"; if ( $db->query($sql) ) { $num = $db->num_rows(); if ($num) { $i = 0; print ''; print ''; print ''; $var = True; while ($i < $num) { $var=!$var; $obj = $db->fetch_object(); print ""; print ''; $i++; } print " '.$langs->trans("OrdersToProcess").' rowid\">".img_object($langs->trans("ShowOrder"),"order")." ".$obj->ref." '.img_object($langs->trans("ShowCompany"),"company").' '.$obj->nom.' "; } } print '

'; /* * Commandes en cours */ $sql = "SELECT c.rowid, c.ref, s.nom, s.idp FROM ".MAIN_DB_PREFIX."commande as c, ".MAIN_DB_PREFIX."societe as s"; $sql .= " WHERE c.fk_soc = s.idp AND c.fk_statut = 2 "; if ($socidp) { $sql .= " AND c.fk_soc = $socidp"; } $sql .= " ORDER BY c.rowid DESC"; if ( $db->query($sql) ) { $num = $db->num_rows(); if ($num) { $i = 0; print ''; print ''; print ''; $var = True; while ($i < $num) { $var=!$var; $obj = $db->fetch_object(); print "'; print ''; $i++; } print " '.$langs->trans("OnProcessOrders").' ('.$num.') rowid\">".img_object($langs->trans("ShowOrder"),"order").' '; print $obj->ref.' '.$obj->nom.' "; } } /* * Commandes ŕ traiter */ $max=5; $sql = "SELECT c.rowid, c.ref, s.nom, s.idp"; $sql.= " FROM ".MAIN_DB_PREFIX."commande as c, ".MAIN_DB_PREFIX."societe as s"; $sql.= " WHERE c.fk_soc = s.idp AND c.fk_statut > 2"; if ($socidp) $sql .= " AND c.fk_soc = $socidp"; $sql.= " ORDER BY c.rowid DESC"; $sql.= $db->plimit($max, 0); $resql=$db->query($sql); if ($resql) { $num = $db->num_rows($resql); if ($num) { $i = 0; print ''; print ''; print ''; $var = True; while ($i < $num) { $var=!$var; $obj = $db->fetch_object($resql); print "'; print ''; $i++; } print " '.$langs->trans("LastOrders",$max).' rowid\">".img_object($langs->trans("ShowOrders"),"order").' '; print $obj->ref.' '.img_object($langs->trans("ShowCompany"),"company").' '.$obj->nom.' "; } } print '

'; $db->close(); llxFooter('$Date$ - $Revision$'); ?>