28require
'../../../main.inc.php';
29require_once DOL_DOCUMENT_ROOT.
'/core/lib/product.lib.php';
30require_once DOL_DOCUMENT_ROOT.
'/mrp/class/mo.class.php';
31require_once DOL_DOCUMENT_ROOT.
'/product/class/product.class.php';
32require_once DOL_DOCUMENT_ROOT.
'/product/stock/class/productlot.class.php';
33require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formother.class.php';
36$langs->loadLangs(array(
'mrp',
'products',
'companies',
'productbatch'));
42$fieldvalue = (!empty($id) ? $id : (!empty($ref) ? $ref :
''));
43$fieldtype = (!empty($ref) ?
'ref' :
'rowid');
45 $socid = $user->socid;
49$hookmanager->initHooks(array(
'batchproductstatsmo'));
53$sortfield =
GETPOST(
'sortfield',
'aZ09comma');
54$sortorder =
GETPOST(
'sortorder',
'aZ09comma');
56if (empty($page) || $page == -1) {
59$offset = $limit * $page;
66 $sortfield =
"c.date_valid";
72if (
GETPOST(
'button_removefilter_x',
'alpha') ||
GETPOST(
'button_removefilter',
'alpha')) {
77if (!$user->hasRight(
'produit',
'lire')) {
86$staticmo =
new Mo($db);
87$staticmoligne =
new MoLine($db);
92if ($id > 0 || !empty($ref)) {
95 $tmp = explode(
'_', $ref);
99 $result =
$object->fetch($id, $objectid, $batch);
101 $parameters = array(
'id' => $id);
102 $reshook = $hookmanager->executeHooks(
'doActions', $parameters, $product, $action);
109 $title = $langs->trans(
'Batch').
" ".$shortlabel.
" - ".$langs->trans(
'Referers');
110 $helpurl =
'EN:Module_Products|FR:Module_Produits|ES:Módulo_Productos';
112 llxHeader(
'', $title, $helpurl,
'', 0, 0,
'',
'',
'',
'mod-product page-stock-stats_mo');
116 $titre = $langs->trans(
"CardProduct".
$object->type);
120 $reshook = $hookmanager->executeHooks(
'formObjectOptions', $parameters, $product, $action);
121 print $hookmanager->resPrint;
126 $linkback =
'<a href="'.DOL_URL_ROOT.
'/product/stock/productlot_list.php?restore_lastsearch_values=1">'.$langs->trans(
"BackToList").
'</a>';
129 if ($user->socid && !in_array(
'product', explode(
',',
getDolGlobalString(
'MAIN_MODULES_FOR_EXTERNAL')))) {
133 dol_banner_tab(
$object,
'id', $linkback, $shownav,
'rowid',
'batch', $morehtmlref);
135 print
'<div class="fichecenter">';
137 print
'<div class="underbanner clearboth"></div>';
138 print
'<table class="border tableforfield" width="100%">';
141 print
'<tr><td class="titlefield">'.$langs->trans(
"Product").
'</td><td>';
142 $producttmp =
new Product($db);
143 $producttmp->fetch(
$object->fk_product);
144 print $producttmp->getNomUrl(1,
'stock').
" - ".$producttmp->label;
150 print
'<table class="border centpercent tableforfield" width="100%">';
157 print
'<div class="clearboth"></div>';
166 $sql .=
" sum(".$db->ifsql(
"cd.role='consumed'",
"cd.qty", 0).
') as nb_consumed,';
168 $sql .=
" sum(".$db->ifsql(
"cd.role='produced'",
"cd.qty", 0).
') as nb_produced,';
169 $sql .=
" c.rowid as rowid, c.ref, c.date_valid, c.status";
171 $sql .=
" FROM ".MAIN_DB_PREFIX.
"mrp_mo as c";
172 $sql .=
", ".MAIN_DB_PREFIX.
"mrp_production as cd";
173 $sql .=
" WHERE c.rowid = cd.fk_mo";
174 $sql .=
" AND c.entity IN (".getEntity(
'mo').
")";
175 $sql .=
" AND cd.batch = '".($db->escape(
$object->batch)).
"'";
176 if (!empty($search_month)) {
177 $sql .=
' AND MONTH(c.date_valid) IN ('.$db->sanitize($search_month).
')';
179 if (!empty($search_year)) {
180 $sql .=
' AND YEAR(c.date_valid) IN ('.$db->sanitize($search_year).
')';
183 $sql .=
" AND s.rowid = ".((int) $socid);
185 $sql .=
" GROUP BY c.rowid, c.ref, c.date_valid, c.status";
187 $sql .= $db->order($sortfield, $sortorder);
194 $totalofrecords =
'';
196 $result = $db->query($sql);
197 $totalofrecords = $db->num_rows($result);
200 $sql .= $db->plimit($limit + 1, $offset);
202 $result = $db->query($sql);
204 $num = $db->num_rows($result);
206 $option =
'&id='.$object->id;
208 if ($limit > 0 && $limit != $conf->liste_limit) {
209 $option .=
'&limit='.((int) $limit);
211 if (!empty($search_month)) {
212 $option .=
'&search_month='.urlencode((
string) ($search_month));
214 if (!empty($search_year)) {
215 $option .=
'&search_year='.urlencode((
string) ($search_year));
218 print
'<form method="post" action="'.$_SERVER[
'PHP_SELF'].
'?id='.
$object->id.
'" name="search_form">'.
"\n";
219 print
'<input type="hidden" name="token" value="'.newToken().
'">';
220 if (!empty($sortfield)) {
221 print
'<input type="hidden" name="sortfield" value="'.$sortfield.
'"/>';
223 if (!empty($sortorder)) {
224 print
'<input type="hidden" name="sortorder" value="'.$sortorder.
'"/>';
228 print_barre_liste($langs->trans(
"MOs"), $page, $_SERVER[
"PHP_SELF"], $option, $sortfield, $sortorder,
'', $num, $totalofrecords,
'', 0,
'',
'', $limit, 0, 0, 1);
231 $option .=
'&page='.urlencode((
string) ($page));
234 print
'<div class="liste_titre liste_titre_bydiv centpercent">';
235 print
'<div class="divsearchfield">';
236 print $langs->trans(
'Period').
' ('.$langs->trans(
"DateCreation").
') - ';
237 print $langs->trans(
'Month').
':<input class="flat" type="text" size="4" name="search_month" value="'.$search_month.
'"> ';
238 print $langs->trans(
'Year').
':'.$formother->selectyear($search_year ? $search_year : - 1,
'search_year', 1, 20, 5);
239 print
'<div style="vertical-align: middle; display: inline-block">';
240 print
'<input type="image" class="liste_titre" name="button_search" src="'.img_picto($langs->trans(
"Search"),
'search.png',
'',
'', 1).
'" value="'.
dol_escape_htmltag($langs->trans(
"Search")).
'" title="'.
dol_escape_htmltag($langs->trans(
"Search")).
'">';
241 print
'<input type="image" class="liste_titre" name="button_removefilter" src="'.img_picto($langs->trans(
"Search"),
'searchclear.png',
'',
'', 1).
'" value="'.
dol_escape_htmltag($langs->trans(
"RemoveFilter")).
'" title="'.
dol_escape_htmltag($langs->trans(
"RemoveFilter")).
'">';
247 print
'<div class="div-table-responsive">';
248 print
'<table class="tagtable liste listwithfilterbefore" width="100%">';
250 print
'<tr class="liste_titre">';
254 print_liste_field_titre(
"Date", $_SERVER[
"PHP_SELF"],
"c.date_valid",
"", $option.
"&id=".
$object->id,
'align="center"', $sortfield, $sortorder);
257 print_liste_field_titre(
"QtyAlreadyConsumed", $_SERVER[
"PHP_SELF"],
"",
"", $option.
"&id=".
$object->id,
'', $sortfield, $sortorder,
'center ');
259 print_liste_field_titre(
"QtyAlreadyProduced", $_SERVER[
"PHP_SELF"],
"",
"", $option.
"&id=".
$object->id,
'', $sortfield, $sortorder,
'center ');
263 $motmp =
new Mo($db);
265 $total_consumed = $total_produced = 0;
268 while ($i < min($num, $limit)) {
269 $objp = $db->fetch_object($result);
271 $motmp->id = $objp->rowid;
272 $motmp->ref = $objp->ref;
273 $motmp->status = $objp->status;
275 $total_consumed += $objp->nb_consumed;
276 $total_produced += $objp->nb_produced;
278 print
'<tr class="oddeven">';
280 print $motmp->getNomUrl(1,
'production');
282 print
"<td align=\"center\">";
283 print
dol_print_date($db->jdate($objp->date_valid),
'dayhour').
"</td>";
287 print
'<td class="center">'.($objp->nb_consumed > 0 ? $objp->nb_consumed :
'').
'</td>';
289 print
'<td class="center">'.($objp->nb_produced > 0 ? $objp->nb_produced :
'').
'</td>';
291 print
'<td class="right">'.$motmp->getLibStatut(2).
'</td>';
296 print
'<tr class="liste_total">';
298 print
'<td class="left">'.$langs->trans(
"Total").
'</td>';
300 print
'<td class="left">'.$langs->trans(
"Totalforthispage").
'</td>';
303 print
'<td class="center">'.$total_consumed.
'</td>';
304 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()
Empty header.
Class to manage products or services.
Class with list of lots and properties.
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.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
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 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.