29require
'../../../main.inc.php';
30require_once DOL_DOCUMENT_ROOT.
'/core/lib/product.lib.php';
31require_once DOL_DOCUMENT_ROOT.
'/mrp/class/mo.class.php';
32require_once DOL_DOCUMENT_ROOT.
'/product/class/product.class.php';
33require_once DOL_DOCUMENT_ROOT.
'/product/stock/class/productlot.class.php';
34require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formother.class.php';
37$langs->loadLangs(array(
'mrp',
'products',
'companies',
'productbatch'));
43$fieldvalue = (!empty($id) ?
$id : (!empty($ref) ? $ref :
''));
44$fieldtype = (!empty($ref) ?
'ref' :
'rowid');
46 $socid = $user->socid;
50$hookmanager->initHooks(array(
'batchproductstatsmo'));
54$sortfield =
GETPOST(
'sortfield',
'aZ09comma');
55$sortorder =
GETPOST(
'sortorder',
'aZ09comma');
57if (empty($page) || $page == -1) {
60$offset = $limit * $page;
67 $sortfield =
"c.date_valid";
73if (
GETPOST(
'button_removefilter_x',
'alpha') ||
GETPOST(
'button_removefilter',
'alpha')) {
78if (!$user->hasRight(
'produit',
'lire')) {
87$staticmo =
new Mo($db);
88$staticmoligne =
new MoLine($db);
93if ($id > 0 || !empty($ref)) {
96 $tmp = explode(
'_', $ref);
100 $result =
$object->fetch($id, $objectid, $batch);
102 $parameters = array(
'id' => $id);
103 $reshook = $hookmanager->executeHooks(
'doActions', $parameters, $product, $action);
110 $title = $langs->trans(
'Batch').
" ".$shortlabel.
" - ".$langs->trans(
'Referers');
111 $helpurl =
'EN:Module_Products|FR:Module_Produits|ES:Módulo_Productos';
113 llxHeader(
'', $title, $helpurl,
'', 0, 0,
'',
'',
'',
'mod-product page-stock-stats_mo');
117 $titre = $langs->trans(
"CardProduct".
$object->type);
121 $reshook = $hookmanager->executeHooks(
'formObjectOptions', $parameters, $product, $action);
122 print $hookmanager->resPrint;
127 $linkback =
'<a href="'.DOL_URL_ROOT.
'/product/stock/productlot_list.php?restore_lastsearch_values=1">'.$langs->trans(
"BackToList").
'</a>';
130 if ($user->socid && !in_array(
'product', explode(
',',
getDolGlobalString(
'MAIN_MODULES_FOR_EXTERNAL')))) {
134 dol_banner_tab(
$object,
'id', $linkback, $shownav,
'rowid',
'batch', $morehtmlref);
136 print
'<div class="fichecenter">';
138 print
'<div class="underbanner clearboth"></div>';
139 print
'<table class="border tableforfield" width="100%">';
142 print
'<tr><td class="titlefield">'.$langs->trans(
"Product").
'</td><td>';
143 $producttmp =
new Product($db);
144 $producttmp->fetch(
$object->fk_product);
145 print $producttmp->getNomUrl(1,
'stock').
" - ".$producttmp->label;
151 print
'<table class="border centpercent tableforfield" width="100%">';
158 print
'<div class="clearboth"></div>';
167 $sql .=
" sum(".$db->ifsql(
"cd.role='consumed'",
"cd.qty", 0).
') as nb_consumed,';
169 $sql .=
" sum(".$db->ifsql(
"cd.role='produced'",
"cd.qty", 0).
') as nb_produced,';
170 $sql .=
" c.rowid as rowid, c.ref, c.date_valid, c.status";
172 $sql .=
" FROM ".MAIN_DB_PREFIX.
"mrp_mo as c";
173 $sql .=
", ".MAIN_DB_PREFIX.
"mrp_production as cd";
174 $sql .=
" WHERE c.rowid = cd.fk_mo";
175 $sql .=
" AND c.entity IN (".getEntity(
'mo').
")";
176 $sql .=
" AND cd.batch = '".($db->escape(
$object->batch)).
"'";
177 if (!empty($search_month)) {
178 $sql .=
' AND MONTH(c.date_valid) IN ('.$db->sanitize($search_month).
')';
180 if (!empty($search_year)) {
181 $sql .=
' AND YEAR(c.date_valid) IN ('.$db->sanitize($search_year).
')';
184 $sql .=
" AND s.rowid = ".((int) $socid);
186 $sql .=
" GROUP BY c.rowid, c.ref, c.date_valid, c.status";
188 $sql .= $db->order($sortfield, $sortorder);
195 $totalofrecords =
'';
197 $result = $db->query($sql);
198 $totalofrecords = $db->num_rows($result);
201 $sql .= $db->plimit($limit + 1, $offset);
203 $result = $db->query($sql);
205 $num = $db->num_rows($result);
207 $option =
'&id='.$object->id;
209 if ($limit > 0 && $limit != $conf->liste_limit) {
210 $option .=
'&limit='.((int) $limit);
212 if (!empty($search_month)) {
213 $option .=
'&search_month='.urlencode((
string) ($search_month));
215 if (!empty($search_year)) {
216 $option .=
'&search_year='.urlencode((
string) ($search_year));
219 print
'<form method="post" action="'.$_SERVER[
'PHP_SELF'].
'?id='.
$object->id.
'" name="search_form">'.
"\n";
220 print
'<input type="hidden" name="token" value="'.newToken().
'">';
221 if (!empty($sortfield)) {
222 print
'<input type="hidden" name="sortfield" value="'.$sortfield.
'"/>';
224 if (!empty($sortorder)) {
225 print
'<input type="hidden" name="sortorder" value="'.$sortorder.
'"/>';
229 print_barre_liste($langs->trans(
"MOs"), $page, $_SERVER[
"PHP_SELF"], $option, $sortfield, $sortorder,
'', $num, $totalofrecords,
'', 0,
'',
'', $limit, 0, 0, 1);
232 $option .=
'&page='.urlencode((
string) ($page));
235 print
'<div class="liste_titre liste_titre_bydiv centpercent">';
236 print
'<div class="divsearchfield">';
237 print $langs->trans(
'Period').
' ('.$langs->trans(
"DateCreation").
') - ';
238 print $langs->trans(
'Month').
':<input class="flat" type="text" size="4" name="search_month" value="'.$search_month.
'"> ';
239 print $langs->trans(
'Year').
':'.$formother->selectyear($search_year ? $search_year : - 1,
'search_year', 1, 20, 5);
240 print
'<div style="vertical-align: middle; display: inline-block">';
241 print
'<input type="image" class="liste_titre" name="button_search" src="'.img_picto($langs->trans(
"Search"),
'search.png',
'', 0, 1).
'" value="'.
dol_escape_htmltag($langs->trans(
"Search")).
'" title="'.
dol_escape_htmltag($langs->trans(
"Search")).
'">';
242 print
'<input type="image" class="liste_titre" name="button_removefilter" src="'.img_picto($langs->trans(
"Search"),
'searchclear.png',
'', 0, 1).
'" value="'.
dol_escape_htmltag($langs->trans(
"RemoveFilter")).
'" title="'.
dol_escape_htmltag($langs->trans(
"RemoveFilter")).
'">';
248 print
'<div class="div-table-responsive">';
249 print
'<table class="tagtable liste listwithfilterbefore" width="100%">';
251 print
'<tr class="liste_titre">';
255 print_liste_field_titre(
"Date", $_SERVER[
"PHP_SELF"],
"c.date_valid",
"", $option.
"&id=".
$object->id,
'align="center"', $sortfield, $sortorder);
258 print_liste_field_titre(
"QtyAlreadyConsumed", $_SERVER[
"PHP_SELF"],
"",
"", $option.
"&id=".
$object->id,
'', $sortfield, $sortorder,
'center ');
260 print_liste_field_titre(
"QtyAlreadyProduced", $_SERVER[
"PHP_SELF"],
"",
"", $option.
"&id=".
$object->id,
'', $sortfield, $sortorder,
'center ');
264 $motmp =
new Mo($db);
266 $total_consumed = $total_produced = 0;
269 while ($i < min($num, $limit)) {
270 $objp = $db->fetch_object($result);
272 $motmp->id = $objp->rowid;
273 $motmp->ref = $objp->ref;
274 $motmp->status = $objp->status;
276 $total_consumed += $objp->nb_consumed;
277 $total_produced += $objp->nb_produced;
279 print
'<tr class="oddeven">';
281 print $motmp->getNomUrl(1,
'production');
283 print
"<td align=\"center\">";
284 print
dol_print_date($db->jdate($objp->date_valid),
'dayhour').
"</td>";
288 print
'<td class="center">'.($objp->nb_consumed > 0 ? $objp->nb_consumed :
'').
'</td>';
290 print
'<td class="center">'.($objp->nb_produced > 0 ? $objp->nb_produced :
'').
'</td>';
292 print
'<td class="right">'.$motmp->getLibStatut(2).
'</td>';
297 print
'<tr class="liste_total">';
299 print
'<td class="left">'.$langs->trans(
"Total").
'</td>';
301 print
'<td class="left">'.$langs->trans(
"Totalforthispage").
'</td>';
304 print
'<td class="center">'.$total_consumed.
'</td>';
305 print
'<td class="center">'.$total_produced.
'</td>';
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader($head='', $title='', $help_url='', $target='', $disablejs=0, $disablehead=0, $arrayofjs='', $arrayofcss='', $morequerystring='', $morecssonbody='', $replacemainareaby='', $disablenofollow=0, $disablenoindex=0)
Empty header.
Class to manage products or services.
Class with list of lots and properties.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dol_get_fiche_head($links=array(), $active='', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limittoshow=0, $moretabssuffix='', $dragdropfile=0)
Show tabs of a record.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
dol_now($mode='auto')
Return date for now.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
print_liste_field_titre($name, $file="", $field="", $begin="", $moreparam="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $tooltip="", $forcenowrapcolumntitle=0)
Show title line of an array.
print_barre_liste($title, $page, $file, $options='', $sortfield='', $sortorder='', $morehtmlcenter='', $num=-1, $totalnboflines='', $picto='generic', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limit=-1, $hideselectlimit=0, $hidenavigation=0, $pagenavastextinput=0, $morehtmlrightbeforearrow='')
Print a title with navigation controls for pagination.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
dol_trunc($string, $size=40, $trunc='right', $stringencoding='UTF-8', $nodot=0, $display=0)
Truncate a string to a particular length adding '…' if string larger than length.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
dol_escape_htmltag($stringtoescape, $keepb=0, $keepn=0, $noescapetags='', $escapeonlyhtmltags=0, $cleanalsojavascript=0)
Returns text escaped for inclusion in HTML alt or title or value tags, or into values of HTML input f...
show_stats_for_batch($batch, $socid)
Show stats for product batch.
productlot_prepare_head($object)
Prepare array with list of tabs.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.