* Copyright (C) 2004-2016 Laurent Destailleur * 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 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/product/stock/index.php * \ingroup stock * \brief Home page of stock area */ require '../../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/product/stock/class/entrepot.class.php'; require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php'; // Load translation files required by the page $langs->loadLangs(array('stocks', 'productbatch')); // Security check $result=restrictedArea($user,'stock'); /* * View */ $producttmp=new Product($db); $help_url='EN:Module_Stocks_En|FR:Module_Stock|ES:Módulo_Stocks'; llxHeader("",$langs->trans("Stocks"),$help_url); print load_fiche_titre($langs->trans("StocksArea")); //print ''; //print '
'; print '
'; if (! empty($conf->global->MAIN_SEARCH_FORM_ON_HOME_AREAS)) // This is useless due to the global search combo { print '
'; print ''; print ''; print ""; print ''; print "'; print "
'.$langs->trans("Search").'
"; print $langs->trans("Warehouse").':

"; } $sql = "SELECT e.ref as label, e.rowid, e.statut"; $sql.= " FROM ".MAIN_DB_PREFIX."entrepot as e"; $sql.= " WHERE e.statut in (0,1)"; $sql.= " AND e.entity IN (".getEntity('stock').")"; $sql.= $db->order('e.statut','DESC'); $sql.= $db->plimit(15, 0); $result = $db->query($sql); if ($result) { $num = $db->num_rows($result); $i = 0; print ''; print ''; if ($num) { $entrepot=new Entrepot($db); while ($i < $num) { $objp = $db->fetch_object($result); print ''; print "\n"; print ''; print "\n"; $i++; } $db->free($result); } print "
'.$langs->trans("Warehouses").'
rowid\">".img_object($langs->trans("ShowStock"),"stock")." ".$objp->label."'.$entrepot->LibStatut($objp->statut,5).'
"; } else { dol_print_error($db); } //print '
'; print '
'; // Last movements $max=10; $sql = "SELECT p.rowid, p.label as produit, p.tobatch, p.tosell, p.tobuy,"; $sql.= " e.ref as stock, e.rowid as entrepot_id,"; $sql.= " m.value as qty, m.datem, m.batch, m.eatby, m.sellby"; $sql.= " FROM ".MAIN_DB_PREFIX."entrepot as e"; $sql.= ", ".MAIN_DB_PREFIX."stock_mouvement as m"; $sql.= ", ".MAIN_DB_PREFIX."product as p"; $sql.= " WHERE m.fk_product = p.rowid"; $sql.= " AND m.fk_entrepot = e.rowid"; $sql.= " AND e.entity IN (".getEntity('stock').")"; if (empty($conf->global->STOCK_SUPPORTS_SERVICES)) $sql.= " AND p.fk_product_type = 0"; $sql.= $db->order("datem","DESC"); $sql.= $db->plimit($max,0); dol_syslog("Index:list stock movements", LOG_DEBUG); $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); print ''; print ""; print ''; print ''; if (! empty($conf->productbatch->enabled)) { print ''; print ''; print ''; } print ''; print ''; print "\n"; $i=0; while ($i < min($num,$max)) { $objp = $db->fetch_object($resql); $producttmp->id = $objp->rowid; $producttmp->ref = $objp->produit; $producttmp->status_batch = $objp->tobatch; $producttmp->status_sell = $objp->tosell; $producttmp->status_buy = $objp->tobuy; print ''; print ''; print '\n"; if (! empty($conf->productbatch->enabled)) { print ''; print ''; print ''; } print '\n"; print ''; print "\n"; $i++; } $db->free($resql); print "
'.$langs->trans("LastMovements",min($num,$max)).''.$langs->trans("Product").''.$langs->trans("Batch").''.$langs->trans("SellByDate").''.$langs->trans("EatByDate").''.$langs->trans("Warehouse").''.$langs->trans("FullList").'
'.dol_print_date($db->jdate($objp->datem),'dayhour').''; print $producttmp->getNomUrl(1); print "'.$objp->batch.''.dol_print_date($db->jdate($objp->sellby),'day').''.dol_print_date($db->jdate($objp->eatby),'day').''; print img_object($langs->trans("ShowWarehouse"),"stock").' '.$objp->stock; print "'; if ($objp->qty > 0) print '+'; print $objp->qty.'
"; } //print '
'; print ''; // End of page llxFooter(); $db->close();