* Copyright (C) 2004-2009 Laurent Destailleur * Copyright (C) 2005 Eric Seigne * Copyright (C) 2005-2009 Regis Houssin * * 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. */ /** * \file htdocs/fourn/commande/fiche.php * \ingroup commande * \brief Fiche de ventilation des commandes fournisseurs * \version $Id$ */ require('./pre.inc.php'); require_once(DOL_DOCUMENT_ROOT.'/includes/modules/supplier_order/modules_commandefournisseur.php'); require_once(DOL_DOCUMENT_ROOT."/product/stock/entrepot.class.php"); require_once(DOL_DOCUMENT_ROOT."/lib/fourn.lib.php"); if ($conf->projet->enabled) require_once(DOL_DOCUMENT_ROOT.'/projet/project.class.php'); $langs->load('orders'); $langs->load('sendings'); $langs->load('companies'); $langs->load('bills'); $langs->load('deliveries'); $langs->load('products'); $langs->load('stocks'); // Security check $id = isset($_GET["id"])?$_GET["id"]:''; if ($user->societe_id) $socid=$user->societe_id; $result = restrictedArea($user, 'commande_fournisseur', $id,''); // R�cup�ration de l'id de projet $projetid = 0; if ($_GET["projetid"]) $projetid = $_GET["projetid"]; $mesg=''; /* * Actions */ if ($_POST["action"] == 'dispatch' && $user->rights->fournisseur->commande->receptionner) { $commande = new CommandeFournisseur($db); $commande->fetch($_GET["id"]); foreach($_POST as $key => $value) { if ( preg_match('/^product_([0-9]+)$/i', $key, $reg) ) { $prod = "product_".$reg[1]; $qty = "qty_".$reg[1]; $ent = "entrepot_".$reg[1]; $pu = "pu_".$reg[1]; $result = $commande->DispatchProduct($user, $_POST[$prod], $_POST[$qty], $_POST[$ent], $_POST[$pu]); } } Header("Location: dispatch.php?id=".$_GET["id"]); exit; } /* * View */ llxHeader('',$langs->trans("OrderCard"),"CommandeFournisseur"); $html = new Form($db); $now=gmmktime(); $id = $_GET['id']; $ref= $_GET['ref']; if ($id > 0 || ! empty($ref)) { //if ($mesg) print $mesg.'
'; $commande = new CommandeFournisseur($db); $result=$commande->fetch($_GET['id'],$_GET['ref']); if ($result >= 0) { $soc = new Societe($db); $soc->fetch($commande->socid); $author = new User($db); $author->id = $commande->user_author_id; $author->fetch(); $head = ordersupplier_prepare_head($commande); $title=$langs->trans("SupplierOrder"); dol_fiche_head($head, 'dispatch', $title, 0, 'order'); /* * Commande */ print ''; // Ref print ''; print ''; print ''; // Fournisseur print '"; print ''; print ''; // Statut print ''; print ''; print '"; // Date if ($commande->methode_commande_id > 0) { print '"; if ($commande->methode_commande) { print ''; } } // Auteur print ''; print ''; print ''; print "

'.$langs->trans("Ref").'	'; print $html->showrefnav($commande,'ref','',1,'ref','ref'); print '
'.$langs->trans("Supplier")."	'.$soc->getNomUrl(1,'supplier').'
'.$langs->trans("Status").'	'; print $commande->getLibStatut(4); print "
'.$langs->trans("Date").'	'; if ($commande->date_commande) { print dol_print_date($commande->date_commande,"dayhourtext")."\n"; } print "
'.$langs->trans("Method").'	'.$commande->methode_commande.'
'.$langs->trans("AuthorRequest").'	'.$author->getNomUrl(1).'

"; if ($mesg) print $mesg; else print '
'; /* * Lignes de commandes */ if ($commande->statut == 3 || $commande->statut == 4 || $commande->statut == 5) { print '

'; print ''; print ''; print ''; $sql = "SELECT cfd.fk_product, sum(cfd.qty) as qty"; $sql.= " FROM ".MAIN_DB_PREFIX."commande_fournisseur_dispatch as cfd"; $sql.= " WHERE cfd.fk_commande = ".$commande->id; $sql.= " GROUP BY cfd.fk_product"; $resql = $db->query($sql); if ($resql) { while ( $row = $db->fetch_row($resql) ) { $products_dispatched[$row[0]] = $row[1]; } $db->free($resql); } $sql = "SELECT l.ref,l.fk_product,l.description, l.subprice, sum(l.qty) as qty"; $sql.= ", l.rowid"; $sql.= ", p.label"; $sql.= " FROM ".MAIN_DB_PREFIX."commande_fournisseurdet as l"; $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."product as p ON l.fk_product=p.rowid"; $sql.= " WHERE l.fk_commande = ".$commande->id; $sql.= " GROUP BY l.fk_product"; $sql.= " ORDER BY l.rowid"; $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); $i = 0; if ($num) { print ''; print ''; print ''; print ''; print ''; print ''; print "\n"; } $entrepot = new Entrepot($db); $var=true; while ($i < $num) { $objp = $db->fetch_object($resql); // On n'affiche pas les produits personnalises if ($objp->fk_product) { $var=!$var; print ""; print '\n"; print ''; print ''; print '\n"; print ''; print "\n"; } $i++; } $db->free($resql); } else { dol_print_error($db); } print "

'.$langs->trans("Description").'	'.$langs->trans("QtyOrdered").'	'.$langs->trans("QtyDispatched").'	'.$langs->trans("Warehouse").'	'.$langs->trans("QtyDelivered").'
'; print ''.img_object($langs->trans("ShowProduct"),'product').' '.$objp->ref.''; print ' - '.$objp->label; if ($objp->description) print ' '.nl2br($objp->description); print ''; print ''; print "	'.$objp->qty.'	'.$products_dispatched[$objp->fk_product].'	'; if (sizeof($user->entrepots) === 1) { $uentrepot = array(); $uentrepot[$user->entrepots[0]['id']] = $user->entrepots[0]['label']; $html->select_array("entrepot_".$i, $uentrepot); } else { $html->select_array("entrepot_".$i, $entrepot->list_array()); } print "

\n"; print "
\n"; print '

'; } print "
\n"; print ''; $sql = "SELECT p.ref,cfd.fk_product, cfd.qty"; $sql.= ", cfd.rowid"; $sql.= ", p.label, e.label as entrepot"; $sql.= " FROM ".MAIN_DB_PREFIX."commande_fournisseur_dispatch as cfd"; $sql.= " , ".MAIN_DB_PREFIX."product as p "; $sql.= " , ".MAIN_DB_PREFIX."entrepot as e "; $sql.= " WHERE cfd.fk_commande = ".$commande->id; $sql.= " AND cfd.fk_product = p.rowid"; $sql.= " AND cfd.fk_entrepot = e.rowid"; $sql.= " ORDER BY cfd.rowid ASC"; $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); $i = 0; if ($num) { print ''; print ''; print ''; print ''; print "\n"; } $var=false; while ($i < $num) { $objp = $db->fetch_object($resql); print ""; print '\n"; print ''; print ''; print "\n"; $i++; $var=!$var; } $db->free($resql); } else { dol_print_error($db); } print "

'.$langs->trans("Description").'	'.$langs->trans("QtyDispatched").'	'.$langs->trans("Warehouse").'
'; print ''.img_object($langs->trans("ShowProduct"),'product').' '.$objp->ref.''; print ' - '.$objp->label; print "	'.$objp->qty.'	'.stripslashes($objp->entrepot).'

\n"; print ''; /** * Boutons actions */ if ($user->societe_id == 0 && $commande->statut < 3 && ($_GET["action"] <> 'valid' || $_GET['action'] == 'builddoc')) { print '

'; if ($commande->statut == 0 && $num > 0) { if ($user->rights->fournisseur->commande->valider) { print ''.$langs->trans("Valid").''; } } if ($commande->statut == 1) { if ($user->rights->fournisseur->commande->approuver) { print ''.$langs->trans("ApproveOrder").''; print ''.$langs->trans("RefuseOrder").''; } if ($user->rights->fournisseur->commande->annuler) { print ''.$langs->trans("CancelOrder").''; } } if ($commande->statut == 2) { if ($user->rights->fournisseur->commande->annuler) { print ''.$langs->trans("CancelOrder").''; } } if ($commande->statut == 0) { if ($user->rights->fournisseur->commande->creer) { print ''.$langs->trans("Delete").''; } } print "

"; } /* * * */ } else { // Commande non trouvee dol_print_error($db); } } $db->close(); llxFooter('$Date$ - $Revision$'); ?>