From 0f410996f74d4f0e1f1a57f723df5bcdb6ce212f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Rapha=C3=ABl=20Doursenaud?= Date: Mon, 4 Jun 2012 16:54:20 +0200 Subject: [PATCH] New box showing the latest supplier orders. --- htdocs/core/boxes/box_supplier_orders.php | 153 +++++++++++++++++++ htdocs/core/modules/modFournisseur.class.php | 3 + htdocs/langs/en_US/boxes.lang | 4 + htdocs/langs/fr_FR/boxes.lang | 4 + 4 files changed, 164 insertions(+) create mode 100644 htdocs/core/boxes/box_supplier_orders.php diff --git a/htdocs/core/boxes/box_supplier_orders.php b/htdocs/core/boxes/box_supplier_orders.php new file mode 100644 index 00000000000..d0d661bc43d --- /dev/null +++ b/htdocs/core/boxes/box_supplier_orders.php @@ -0,0 +1,153 @@ + + * Copyright (C) 2005-2009 Regis Houssin + * Copyright (C) 2012 Raphaël Doursenaud + * + * 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, see . + */ + +/** + * \file htdocs/core/boxes/box_supplier_orders.php + * \ingroup fournisseurs + * \brief Module that generates the latest supplier orders box + */ +include_once(DOL_DOCUMENT_ROOT."/core/boxes/modules_boxes.php"); + +/** + * Class that manages the box showing latest supplier orders + */ +class box_supplier_orders extends ModeleBoxes +{ + + var $boxcode = "latestsupplierorders"; + var $boximg = "object_order"; + var $boxlabel; + var $depends = array("fournisseur"); + var $db; + var $param; + var $info_box_head = array(); + var $info_box_contents = array(); + + /** + * Constructor + */ + function box_supplier_orders() + { + global $langs; + $langs->load("boxes"); + + $this->boxlabel = $langs->transnoentitiesnoconv("BoxLatestSupplierOrders"); + } + + /** + * Load data into info_box_contents array to show array later. + * + * @param int $max Maximum number of records to load + * @return void + */ + function loadBox($max = 5) + { + global $conf, $user, $langs, $db; + $langs->load("boxes"); + + $this->max = $max; + + include_once(DOL_DOCUMENT_ROOT."/fourn/class/fournisseur.commande.class.php"); + $supplierorderstatic=new CommandeFournisseur($db); + + $this->info_box_head = array('text' => $langs->trans("BoxTitleLatestSupplierOrders", $max)); + + if ($user->rights->fournisseur->commande->lire) + { + $sql = "SELECT s.nom, s.rowid as socid,"; + $sql.= " c.ref, c.tms, c.rowid,"; + $sql.= " c.fk_statut"; + $sql.= " FROM ".MAIN_DB_PREFIX."societe as s"; + $sql.= ", ".MAIN_DB_PREFIX."commande_fournisseur as c"; + if (!$user->rights->societe->client->voir && !$user->societe_id) $sql.= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; + $sql.= " WHERE c.fk_soc = s.rowid"; + $sql.= " AND c.entity = ".$conf->entity; + if (!$user->rights->societe->client->voir && !$user->societe_id) $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; + if ($user->societe_id) $sql.= " AND s.rowid = ".$user->societe_id; + $sql.= " ORDER BY c.date_commande DESC, c.ref DESC "; + $sql.= $db->plimit($max, 0); + + $result = $db->query($sql); + if ($result) + { + $num = $db->num_rows($result); + + $i = 0; + while ($i < $num) + { + $objp = $db->fetch_object($result); + $datem=$db->jdate($objp->tms); + + $this->info_box_contents[$i][0] = array('td' => 'align="left" width="16"', + 'logo' => $this->boximg, + 'url' => DOL_URL_ROOT."/fourn/commande/fiche.php?id=".$objp->rowid); + + $this->info_box_contents[$i][1] = array('td' => 'align="left"', + 'text' => $objp->ref, + 'url' => DOL_URL_ROOT."/fourn/commande/fiche.php?id=".$objp->rowid); + + $this->info_box_contents[$i][2] = array('td' => 'align="left" width="16"', + 'logo' => 'company', + 'url' => DOL_URL_ROOT."/comm/fiche.php?socid=".$objp->socid); + + $this->info_box_contents[$i][3] = array('td' => 'align="left"', + 'text' => $objp->nom, + 'url' => DOL_URL_ROOT."/comm/fiche.php?socid=".$objp->socid); + + $this->info_box_contents[$i][4] = array('td' => 'align="right"', + 'text' => dol_print_date($datem,'day'), + ); + + $this->info_box_contents[$i][5] = array('td' => 'align="right" width="18"', + 'text' => $supplierorderstatic->LibStatut($objp->fk_statut,3)); + + $i++; + } + + if ($num == 0) + $this->info_box_contents[$i][0] = array('td' => 'align="center"', 'text' => $langs->trans("NoSupplierOrder")); + } + else + { + dol_print_error($db); + } + } + else + { + $this->info_box_contents[0][0] = array('td' => 'align="left"', + 'text' => $langs->trans("ReadPermissionNotAllowed")); + } + } + + /** + * Method to show box + * + * @param array $head Array with properties of box title + * @param array $contents Array with properties of box lines + * @return void + */ + function showBox($head = null, $contents = null) + { + parent::showBox($this->info_box_head, $this->info_box_contents); + } + +} + +?> diff --git a/htdocs/core/modules/modFournisseur.class.php b/htdocs/core/modules/modFournisseur.class.php index 7a7d7fe2323..e7a759cf1c2 100644 --- a/htdocs/core/modules/modFournisseur.class.php +++ b/htdocs/core/modules/modFournisseur.class.php @@ -105,6 +105,9 @@ class modFournisseur extends DolibarrModules $this->boxes[$r][1] = "box_factures_fourn.php"; $r++; + $this->boxes[$r][1] = "box_supplier_orders.php"; + $r++; + // Permissions $this->rights = array(); $this->rights_class = 'fournisseur'; diff --git a/htdocs/langs/en_US/boxes.lang b/htdocs/langs/en_US/boxes.lang index 6644af2ece3..d7cbbf3dd2b 100644 --- a/htdocs/langs/en_US/boxes.lang +++ b/htdocs/langs/en_US/boxes.lang @@ -70,3 +70,7 @@ NoRecordedProducts=No recorded products/services NoRecordedProspects=No recorded prospects NoContractedProducts=No products/services contracted NoRecordedContracts=No recorded contracts +# Latest supplier orders +BoxLatestSupplierOrders=Latest supplier orders +BoxTitleLatestSupplierOrders=%s latest supplier orders +NoSupplierOrder=No recorded supplier order diff --git a/htdocs/langs/fr_FR/boxes.lang b/htdocs/langs/fr_FR/boxes.lang index b70f098fc02..9a91af3cdb3 100644 --- a/htdocs/langs/fr_FR/boxes.lang +++ b/htdocs/langs/fr_FR/boxes.lang @@ -70,3 +70,7 @@ NoRecordedProducts=Pas de produit/service enregistré NoRecordedProspects=Pas de prospect enregistré NoContractedProducts=Pas de produit/service contracté NoRecordedContracts=Pas de contrat enregistré +# Dernières commandes fournisseur +BoxLatestSupplierOrders=Dernières commandes fournisseur +BoxTitleLatestSupplierOrders=Les %s dernières commandes fournisseur enregistrées +NoSupplierOrder=Pas de commandes fournisseur enregistrées