* Copyright (C) 2003 Jean-Louis Bergamo * Copyright (C) 2004-2019 Laurent Destailleur * Copyright (C) 2005-2012 Regis Houssin * Copyright (C) 2019 Nicolas ZABOURI * Copyright (C) 2019 Frédéric France * Copyright (C) 2024 Alexandre Spangaro * * 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 3 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/mrp/index.php * \ingroup bom, mrp * \brief Home page for BOM and MRP modules */ // Load Dolibarr environment require '../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/bom/class/bom.class.php'; require_once DOL_DOCUMENT_ROOT.'/mrp/class/mo.class.php'; $hookmanager = new HookManager($db); // Initialize a technical object to manage hooks. Note that conf->hooks_modules contains array $hookmanager->initHooks(array('mrpindex')); // Load translation files required by the page $langs->loadLangs(array("companies", "mrp")); // Security check $result = restrictedArea($user, 'bom|mrp'); $max = getDolGlobalInt('MAIN_SIZE_SHORTLIST_LIMIT', 5); /* * View */ $staticbom = new BOM($db); $staticmo = new Mo($db); $title = $langs->trans('MRP'); $help_url = 'EN:Module_Manufacturing_Orders|FR:Module_Ordres_de_Fabrication|DE:Modul_Fertigungsauftrag'; llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-mrp page-index'); print load_fiche_titre($langs->trans("MRPArea"), '', 'mrp'); print '
'; print '
'; print '
'; /* * Statistics */ if ($conf->use_javascript_ajax) { $sql = "SELECT COUNT(t.rowid) as nb, status"; $sql .= " FROM ".MAIN_DB_PREFIX."mrp_mo as t"; $sql .= " GROUP BY t.status"; $sql .= " ORDER BY t.status ASC"; $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); $i = 0; $totalnb = 0; $dataseries = array(); $colorseries = array(); $vals = array(); include DOL_DOCUMENT_ROOT.'/theme/'.$conf->theme.'/theme_vars.inc.php'; while ($i < $num) { $obj = $db->fetch_object($resql); if ($obj) { $vals[$obj->status] = $obj->nb; $totalnb += $obj->nb; } $i++; } $db->free($resql); print '
'; print ''; print ''; print ''."\n"; $listofstatus = array(0, 1, 2, 3, 9); foreach ($listofstatus as $status) { $dataseries[] = array($staticmo->LibStatut($status, 1), (isset($vals[$status]) ? (int) $vals[$status] : 0)); if ($status == Mo::STATUS_DRAFT) { $colorseries[$status] = '-'.$badgeStatus0; } if ($status == Mo::STATUS_VALIDATED) { $colorseries[$status] = $badgeStatus1; } if ($status == Mo::STATUS_INPROGRESS) { $colorseries[$status] = $badgeStatus4; } if ($status == Mo::STATUS_PRODUCED) { $colorseries[$status] = $badgeStatus6; } if ($status == Mo::STATUS_CANCELED) { $colorseries[$status] = $badgeStatus9; } if (empty($conf->use_javascript_ajax)) { print ''; print ''; print ''; print "\n"; } } if ($conf->use_javascript_ajax) { print ''; } print "
'.$langs->trans("Statistics").' - '.$langs->trans("ManufacturingOrder").'
'.$staticmo->LibStatut($status, 0).''.(isset($vals[$status]) ? $vals[$status] : 0).'
'; include_once DOL_DOCUMENT_ROOT.'/core/class/dolgraph.class.php'; $dolgraph = new DolGraph(); $dolgraph->SetData($dataseries); $dolgraph->SetDataColor(array_values($colorseries)); $dolgraph->setShowLegend(2); $dolgraph->setShowPercent(1); $dolgraph->SetType(array('pie')); $dolgraph->SetHeight('200'); $dolgraph->draw('idgraphstatus'); print $dolgraph->show($totalnb ? 0 : 1); print '
"; print "
"; print "
"; } else { dol_print_error($db); } } print '
'; print '
'; /* * Last modified BOM */ $sql = "SELECT a.rowid, a.status, a.ref, a.tms as datem, a.status, a.fk_product"; $sql .= " FROM ".MAIN_DB_PREFIX."bom_bom as a"; $sql .= " WHERE a.entity IN (".getEntity('bom').")"; $sql .= $db->order("a.tms", "DESC"); $sql .= $db->plimit($max, 0); $resql = $db->query($sql); if ($resql) { print '
'; print ''; print ''; print ''; print ''; print ''; $num = $db->num_rows($resql); if ($num) { $i = 0; while ($i < $num) { $obj = $db->fetch_object($resql); $staticbom->id = $obj->rowid; $staticbom->ref = $obj->ref; $staticbom->fk_product = $obj->fk_product; $staticbom->date_modification = $obj->datem; $staticbom->status = $obj->status; print ''; print ''; print ''; print ''; print ''; $i++; } } else { print ''; print ''; print ''; } print "
'.$langs->trans("LatestBOMModified", $max); $lastmodified = ''; $lastmodified .= '...'; $lastmodified .= ''; print $lastmodified; print ''; //print ''.img_picto($langs->trans("FullList"), 'bom'); print '
'.$staticbom->getNomUrl(1, 32).''.dol_print_date($db->jdate($obj->datem), 'dayhour').''.$staticbom->getLibStatut(3).'
'.$langs->trans("None").'
"; print "
"; } else { dol_print_error($db); } /* * Last modified MOs */ $sql = "SELECT a.rowid, a.status, a.ref, a.tms as datem, a.status"; $sql .= " FROM ".MAIN_DB_PREFIX."mrp_mo as a"; $sql .= " WHERE a.entity IN (".getEntity('mo').")"; $sql .= $db->order("a.tms", "DESC"); $sql .= $db->plimit($max, 0); $resql = $db->query($sql); if ($resql) { print '
'; print ''; print ''; print ''; print ''; print ''; $num = $db->num_rows($resql); if ($num) { $i = 0; while ($i < $num) { $obj = $db->fetch_object($resql); $staticmo->id = $obj->rowid; $staticmo->ref = $obj->ref; $staticmo->date_modification = $obj->datem; $staticmo->status = $obj->status; print ''; print ''; print ''; print ''; print ''; $i++; } } else { print ''; print ''; print ''; } print "
'.$langs->trans("LatestMOModified", $max); $lastmodified = ''; $lastmodified .= '...'; $lastmodified .= ''; print $lastmodified; print ''; //print ''.img_picto($langs->trans("FullList"), 'mrp'); print '
'.$staticmo->getNomUrl(1, 32).''.dol_print_date($db->jdate($obj->datem), 'dayhour').''.$staticmo->getLibStatut(3).'
'.$langs->trans("None").'
"; print "
"; } else { dol_print_error($db); } print '
'; $object = new stdClass(); $parameters = array( //'type' => $type, 'user' => $user, ); $reshook = $hookmanager->executeHooks('dashboardMRP', $parameters, $object); // End of page llxFooter(); $db->close();