32 require
'../../main.inc.php';
33 require_once DOL_DOCUMENT_ROOT .
'/product/class/product.class.php';
34 require_once DOL_DOCUMENT_ROOT .
'/core/class/html.formother.class.php';
35 require_once DOL_DOCUMENT_ROOT .
'/core/class/html.form.class.php';
36 require_once DOL_DOCUMENT_ROOT .
'/fourn/class/fournisseur.commande.class.php';
37 require_once DOL_DOCUMENT_ROOT .
'/product/class/html.formproduct.class.php';
38 require_once
'./lib/replenishment.lib.php';
41 $langs->loadLangs(array(
'products',
'stocks',
'orders'));
45 $socid = $user->socid;
50 $hookmanager->initHooks(array(
'stockreplenishlist'));
54 $action =
GETPOST(
'action',
'aZ09');
55 $search_ref =
GETPOST(
'search_ref',
'alpha');
56 $search_label =
GETPOST(
'search_label',
'alpha');
57 $sall = trim((
GETPOST(
'search_all',
'alphanohtml') !=
'') ?
GETPOST(
'search_all',
'alphanohtml') :
GETPOST(
'sall',
'alphanohtml'));
59 $tobuy =
GETPOST(
'tobuy',
'int');
60 $salert =
GETPOST(
'salert',
'alpha');
61 $includeproductswithoutdesiredqty =
GETPOST(
'includeproductswithoutdesiredqty',
'alpha');
62 $mode =
GETPOST(
'mode',
'alpha');
63 $draftorder =
GETPOST(
'draftorder',
'alpha');
66 $fourn_id =
GETPOST(
'fourn_id',
'int');
67 $fk_supplier =
GETPOST(
'fk_supplier',
'int');
68 $fk_entrepot =
GETPOST(
'fk_entrepot',
'int');
71 $resWar = $db->query(
"SELECT rowid FROM " . MAIN_DB_PREFIX .
"entrepot WHERE entity IN (" . $db->sanitize(
getEntity(
'stock')) .
")");
72 $listofqualifiedwarehousesid =
"";
74 while ($tmpobj = $db->fetch_object($resWar)) {
75 if (!empty($listofqualifiedwarehousesid)) {
76 $listofqualifiedwarehousesid .=
",";
78 $listofqualifiedwarehousesid .= $tmpobj->rowid;
79 $lastWarehouseID = $tmpobj->rowid;
84 if ($count == 1 && (empty($fk_entrepot) || $fk_entrepot <= 0) && !empty($conf->global->MULTICOMPANY_PRODUCT_SHARING_ENABLED)) {
85 $fk_entrepot = $lastWarehouseID;
90 $sortfield =
GETPOST(
'sortfield',
'aZ09comma');
91 $sortorder =
GETPOST(
'sortorder',
'aZ09comma');
93 if (empty($page) || $page == -1) {
96 $limit =
GETPOST(
'limit',
'int') ?
GETPOST(
'limit',
'int') : $conf->liste_limit;
97 $offset = $limit * $page;
100 $sortfield =
'p.ref';
108 $virtualdiffersfromphysical = 0;
109 if (!empty($conf->global->STOCK_CALCULATE_ON_SHIPMENT)
110 || !empty($conf->global->STOCK_CALCULATE_ON_SUPPLIER_DISPATCH_ORDER)
111 || !empty($conf->global->STOCK_CALCULATE_ON_SHIPMENT_CLOSE)
112 || !empty($conf->global->STOCK_CALCULATE_ON_RECEPTION)
113 || !empty($conf->global->STOCK_CALCULATE_ON_RECEPTION_CLOSE)
115 $virtualdiffersfromphysical = 1;
118 if ($virtualdiffersfromphysical) {
119 $usevirtualstock = empty($conf->global->STOCK_USE_REAL_STOCK_BY_DEFAULT_FOR_REPLENISHMENT) ? 1 : 0;
121 $usevirtualstock = 0;
123 if ($mode ==
'physical') {
124 $usevirtualstock = 0;
126 if ($mode ==
'virtual') {
127 $usevirtualstock = 1;
130 $parameters = array();
131 $reshook = $hookmanager->executeHooks(
'doActions', $parameters, $object, $action);
141 if (
GETPOST(
'button_removefilter_x',
'alpha') ||
GETPOST(
'button_removefilter.x',
'alpha') ||
GETPOST(
'button_removefilter',
'alpha')) {
146 $includeproductswithoutdesiredqty =
'';
150 if ($draftorder ==
'on') {
151 $draftchecked =
"checked";
155 if ($action ==
'order' &&
GETPOST(
'valid')) {
156 $linecount =
GETPOST(
'linecount',
'int');
159 unset($_POST[
'linecount']);
160 if ($linecount > 0) {
163 $suppliers = array();
164 require_once DOL_DOCUMENT_ROOT .
'/fourn/class/fournisseur.product.class.php';
166 for ($i = 0; $i < $linecount; $i++) {
167 if (
GETPOST(
'choose' . $i,
'alpha') ===
'on' &&
GETPOST(
'fourn' . $i,
'int') > 0) {
170 $supplierpriceid =
GETPOST(
'fourn' . $i,
'int');
172 $qty =
GETPOST(
'tobuy' . $i,
'int');
173 $idprod = $productsupplier->get_buyprice($supplierpriceid, $qty);
174 $res = $productsupplier->fetch($idprod);
175 if ($res && $idprod > 0) {
180 $line->fk_product = $idprod;
185 $productsupplier->getMultiLangs();
189 if (!empty($productsupplier->desc_supplier) && !empty($conf->global->PRODUIT_FOURN_TEXTS)) {
190 $desc = $productsupplier->desc_supplier;
192 $desc = $productsupplier->description;
199 $line->tva_tx = $productsupplier->vatrate_supplier;
200 $line->subprice = $productsupplier->fourn_pu;
201 $line->total_ht = $productsupplier->fourn_pu * $qty;
202 $tva = $line->tva_tx / 100;
203 $line->total_tva = $line->total_ht * $tva;
204 $line->total_ttc = $line->total_ht + $line->total_tva;
205 $line->remise_percent = $productsupplier->remise_percent;
206 $line->ref_fourn = $productsupplier->ref_supplier;
207 $line->type = $productsupplier->type;
208 $line->fk_unit = $productsupplier->fk_unit;
209 $suppliers[$productsupplier->fourn_socid][
'lines'][] = $line;
211 } elseif ($idprod == -1) {
214 $error = $db->lasterror();
218 unset($_POST[
'fourn' . $i]);
227 $suppliersid = array_keys($suppliers);
228 foreach ($suppliers as $supplier) {
232 $sql =
"SELECT rowid FROM " . MAIN_DB_PREFIX .
"commande_fournisseur";
233 $sql .=
" WHERE fk_soc = " . ((int) $suppliersid[$i]);
234 $sql .=
" AND source = " . ((int) $order::SOURCE_ID_REPLENISHMENT) .
" AND fk_statut = " . ((int) $order::STATUS_DRAFT);
235 $sql .=
" AND entity IN (" .
getEntity(
'commande_fournisseur') .
")";
236 $sql .=
" ORDER BY date_creation DESC";
237 $resql = $db->query(
$sql);
238 if ($resql && $db->num_rows($resql) > 0) {
239 $obj = $db->fetch_object($resql);
241 $order->fetch($obj->rowid);
242 $order->fetch_thirdparty();
244 foreach ($supplier[
'lines'] as $line) {
245 if (empty($line->remise_percent)) {
246 $line->remise_percent = $order->thirdparty->remise_supplier_percent;
248 $result = $order->addline(
258 $line->remise_percent,
272 $msg = $langs->trans(
'OrderFail') .
" : ";
273 $msg .= $order->error;
279 $order->socid = $suppliersid[$i];
280 $order->fetch_thirdparty();
283 $order->source = $order::SOURCE_ID_REPLENISHMENT;
285 foreach ($supplier[
'lines'] as $line) {
286 if (empty($line->remise_percent)) {
287 $line->remise_percent = $order->thirdparty->remise_supplier_percent;
289 $order->lines[] = $line;
291 $order->cond_reglement_id = $order->thirdparty->cond_reglement_supplier_id;
292 $order->mode_reglement_id = $order->thirdparty->mode_reglement_supplier_id;
294 $id = $order->create($user);
297 $msg = $langs->trans(
'OrderFail') .
" : ";
298 $msg .= $order->error;
306 setEventMessages($langs->trans(
'ErrorOrdersNotCreatedQtyTooLow'),
null,
'warnings');
313 header(
'Location: replenishorders.php');
320 setEventMessages($langs->trans(
'SelectProductWithNotNullQty'),
null,
'warnings');
333 $title = $langs->trans(
'MissingStocks');
335 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
336 $sqldesiredtock = $db->ifsql(
"pse.desiredstock IS NULL",
"p.desiredstock",
"pse.desiredstock");
337 $sqlalertstock = $db->ifsql(
"pse.seuil_stock_alerte IS NULL",
"p.seuil_stock_alerte",
"pse.seuil_stock_alerte");
339 $sqldesiredtock =
'p.desiredstock';
340 $sqlalertstock =
'p.seuil_stock_alerte';
343 $sql =
'SELECT p.rowid, p.ref, p.label, p.description, p.price,';
344 $sql .=
' p.price_ttc, p.price_base_type, p.fk_product_type,';
345 $sql .=
' p.tms as datem, p.duration, p.tobuy,';
346 $sql .=
' p.desiredstock, p.seuil_stock_alerte,';
347 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
348 $sql .=
' pse.desiredstock as desiredstockpse, pse.seuil_stock_alerte as seuil_stock_alertepse,';
350 $sql .=
" " . $sqldesiredtock .
" as desiredstockcombined, " . $sqlalertstock .
" as seuil_stock_alertecombined,";
351 $sql .=
' s.fk_product,';
352 $sql .=
" SUM(" . $db->ifsql(
"s.reel IS NULL",
"0",
"s.reel") .
') as stock_physique';
353 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
354 $sql .=
", SUM(" . $db->ifsql(
"s.reel IS NULL OR s.fk_entrepot <> " . $fk_entrepot,
"0",
"s.reel") .
') as stock_real_warehouse';
358 $parameters = array();
359 $reshook = $hookmanager->executeHooks(
'printFieldListSelect', $parameters);
360 $sql .= $hookmanager->resPrint;
362 $list_warehouse = (empty($listofqualifiedwarehousesid) ?
'0' : $listofqualifiedwarehousesid);
364 $sql .=
' FROM ' . MAIN_DB_PREFIX .
'product as p';
365 $sql .=
' LEFT JOIN ' . MAIN_DB_PREFIX .
'product_stock as s ON p.rowid = s.fk_product';
366 $sql .=
' AND s.fk_entrepot IN (' . $db->sanitize($list_warehouse) .
')';
368 $list_warehouse_selected = ($fk_entrepot < 0 || empty($fk_entrepot)) ?
'0' : $fk_entrepot;
369 $sql .=
' AND s.fk_entrepot IN (' . $db->sanitize($list_warehouse_selected) .
')';
373 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
374 $sql .=
' LEFT JOIN ' . MAIN_DB_PREFIX .
'product_warehouse_properties AS pse ON (p.rowid = pse.fk_product AND pse.fk_entrepot = ' . ((int) $fk_entrepot) .
')';
377 $parameters = array();
378 $reshook = $hookmanager->executeHooks(
'printFieldListJoin', $parameters);
379 $sql .= $hookmanager->resPrint;
388 $sql .=
' AND p.fk_product_type = 1';
390 $sql .=
' AND p.fk_product_type <> 1';
399 $sql .=
' AND p.tobuy = 1';
401 $sql .=
' AND p.rowid NOT IN (SELECT pac.fk_product_parent FROM ' . MAIN_DB_PREFIX .
'product_attribute_combination as pac WHERE pac.entity IN (' .
getEntity(
'product') .
'))';
403 if ($fk_supplier > 0) {
404 $sql .=
' AND EXISTS (SELECT pfp.rowid FROM ' . MAIN_DB_PREFIX .
'product_fournisseur_price as pfp WHERE pfp.fk_product = p.rowid AND pfp.fk_soc = ' . ((int) $fk_supplier) .
' AND pfp.entity IN (' .
getEntity(
'product_fournisseur_price') .
'))';
407 $parameters = array();
408 $reshook = $hookmanager->executeHooks(
'printFieldListWhere', $parameters);
409 $sql .= $hookmanager->resPrint;
411 $sql .=
' GROUP BY p.rowid, p.ref, p.label, p.description, p.price';
412 $sql .=
', p.price_ttc, p.price_base_type,p.fk_product_type, p.tms';
413 $sql .=
', p.duration, p.tobuy';
414 $sql .=
', p.desiredstock';
415 $sql .=
', p.seuil_stock_alerte';
416 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
417 $sql .=
', pse.desiredstock';
418 $sql .=
', pse.seuil_stock_alerte';
420 $sql .=
', s.fk_product';
422 if ($usevirtualstock) {
424 $sqlCommandesCli =
"(SELECT " . $db->ifsql(
"SUM(cd1.qty) IS NULL",
"0",
"SUM(cd1.qty)") .
" as qty";
425 $sqlCommandesCli .=
" FROM " . MAIN_DB_PREFIX .
"commandedet as cd1, " . MAIN_DB_PREFIX .
"commande as c1";
426 $sqlCommandesCli .=
" WHERE c1.rowid = cd1.fk_commande AND c1.entity IN (" .
getEntity(!empty($conf->global->STOCK_CALCULATE_VIRTUAL_STOCK_TRANSVERSE_MODE) ?
'stock' :
'commande') .
")";
427 $sqlCommandesCli .=
" AND cd1.fk_product = p.rowid";
428 $sqlCommandesCli .=
" AND c1.fk_statut IN (1,2))";
430 $sqlCommandesCli =
'0';
434 $sqlExpeditionsCli =
"(SELECT " . $db->ifsql(
"SUM(ed2.qty) IS NULL",
"0",
"SUM(ed2.qty)") .
" as qty";
435 $sqlExpeditionsCli .=
" FROM " . MAIN_DB_PREFIX .
"expedition as e2,";
436 $sqlExpeditionsCli .=
" " . MAIN_DB_PREFIX .
"expeditiondet as ed2,";
437 $sqlExpeditionsCli .=
" " . MAIN_DB_PREFIX .
"commande as c2,";
438 $sqlExpeditionsCli .=
" " . MAIN_DB_PREFIX .
"commandedet as cd2";
439 $sqlExpeditionsCli .=
" WHERE ed2.fk_expedition = e2.rowid AND cd2.rowid = ed2.fk_origin_line AND e2.entity IN (" .
getEntity(!empty($conf->global->STOCK_CALCULATE_VIRTUAL_STOCK_TRANSVERSE_MODE) ?
'stock' :
'expedition') .
")";
440 $sqlExpeditionsCli .=
" AND cd2.fk_commande = c2.rowid";
441 $sqlExpeditionsCli .=
" AND c2.fk_statut IN (1,2)";
442 $sqlExpeditionsCli .=
" AND cd2.fk_product = p.rowid";
443 $sqlExpeditionsCli .=
" AND e2.fk_statut IN (1,2))";
445 $sqlExpeditionsCli =
'0';
449 $sqlCommandesFourn =
"(SELECT " . $db->ifsql(
"SUM(cd3.qty) IS NULL",
"0",
"SUM(cd3.qty)") .
" as qty";
450 $sqlCommandesFourn .=
" FROM " . MAIN_DB_PREFIX .
"commande_fournisseurdet as cd3,";
451 $sqlCommandesFourn .=
" " . MAIN_DB_PREFIX .
"commande_fournisseur as c3";
452 $sqlCommandesFourn .=
" WHERE c3.rowid = cd3.fk_commande";
453 $sqlCommandesFourn .=
" AND c3.entity IN (" .
getEntity(!empty($conf->global->STOCK_CALCULATE_VIRTUAL_STOCK_TRANSVERSE_MODE) ?
'stock' :
'supplier_order') .
")";
454 $sqlCommandesFourn .=
" AND cd3.fk_product = p.rowid";
455 $sqlCommandesFourn .=
" AND c3.fk_statut IN (3,4))";
457 $sqlReceptionFourn =
"(SELECT " . $db->ifsql(
"SUM(fd4.qty) IS NULL",
"0",
"SUM(fd4.qty)") .
" as qty";
458 $sqlReceptionFourn .=
" FROM " . MAIN_DB_PREFIX .
"commande_fournisseur as cf4,";
459 $sqlReceptionFourn .=
" " . MAIN_DB_PREFIX .
"commande_fournisseur_dispatch as fd4";
460 $sqlReceptionFourn .=
" WHERE fd4.fk_commande = cf4.rowid AND cf4.entity IN (" .
getEntity(!empty($conf->global->STOCK_CALCULATE_VIRTUAL_STOCK_TRANSVERSE_MODE) ?
'stock' :
'supplier_order') .
")";
461 $sqlReceptionFourn .=
" AND fd4.fk_product = p.rowid";
462 $sqlReceptionFourn .=
" AND cf4.fk_statut IN (3,4))";
464 $sqlCommandesFourn =
'0';
465 $sqlReceptionFourn =
'0';
469 $sqlProductionToConsume =
"(SELECT GREATEST(0, " . $db->ifsql(
"SUM(" . $db->ifsql(
"mp5.role = 'toconsume'",
'mp5.qty',
'- mp5.qty') .
") IS NULL",
"0",
"SUM(" . $db->ifsql(
"mp5.role = 'toconsume'",
'mp5.qty',
'- mp5.qty') .
")") .
") as qty";
470 $sqlProductionToConsume .=
" FROM " . MAIN_DB_PREFIX .
"mrp_mo as mm5,";
471 $sqlProductionToConsume .=
" " . MAIN_DB_PREFIX .
"mrp_production as mp5";
472 $sqlProductionToConsume .=
" WHERE mm5.rowid = mp5.fk_mo AND mm5.entity IN (" .
getEntity(!empty($conf->global->STOCK_CALCULATE_VIRTUAL_STOCK_TRANSVERSE_MODE) ?
'stock' :
'mo') .
")";
473 $sqlProductionToConsume .=
" AND mp5.fk_product = p.rowid";
474 $sqlProductionToConsume .=
" AND mp5.role IN ('toconsume', 'consumed')";
475 $sqlProductionToConsume .=
" AND mm5.status IN (1,2))";
477 $sqlProductionToProduce =
"(SELECT GREATEST(0, " . $db->ifsql(
"SUM(" . $db->ifsql(
"mp5.role = 'toproduce'",
'mp5.qty',
'- mp5.qty') .
") IS NULL",
"0",
"SUM(" . $db->ifsql(
"mp5.role = 'toproduce'",
'mp5.qty',
'- mp5.qty') .
")") .
") as qty";
478 $sqlProductionToProduce .=
" FROM " . MAIN_DB_PREFIX .
"mrp_mo as mm5,";
479 $sqlProductionToProduce .=
" " . MAIN_DB_PREFIX .
"mrp_production as mp5";
480 $sqlProductionToProduce .=
" WHERE mm5.rowid = mp5.fk_mo AND mm5.entity IN (" .
getEntity(!empty($conf->global->STOCK_CALCULATE_VIRTUAL_STOCK_TRANSVERSE_MODE) ?
'stock' :
'mo') .
")";
481 $sqlProductionToProduce .=
" AND mp5.fk_product = p.rowid";
482 $sqlProductionToProduce .=
" AND mp5.role IN ('toproduce', 'produced')";
483 $sqlProductionToProduce .=
" AND mm5.status IN (1,2))";
485 $sqlProductionToConsume =
'0';
486 $sqlProductionToProduce =
'0';
490 $sql .=
" (" . $sqldesiredtock .
" >= 0 AND (" . $sqldesiredtock .
" > SUM(" . $db->ifsql(
"s.reel IS NULL",
"0",
"s.reel") .
')';
491 $sql .=
" - (" . $sqlCommandesCli .
" - " . $sqlExpeditionsCli .
") + (" . $sqlCommandesFourn .
" - " . $sqlReceptionFourn .
") + (" . $sqlProductionToProduce .
" - " . $sqlProductionToConsume .
")))";
493 if ($includeproductswithoutdesiredqty ==
'on') {
494 $sql .=
" ((" . $sqlalertstock .
" >= 0 OR " . $sqlalertstock .
" IS NULL) AND (" . $db->ifsql($sqlalertstock .
" IS NULL",
"0", $sqlalertstock) .
" > SUM(" . $db->ifsql(
"s.reel IS NULL",
"0",
"s.reel") .
")";
496 $sql .=
" (" . $sqlalertstock .
" >= 0 AND (" . $sqlalertstock .
" > SUM(" . $db->ifsql(
"s.reel IS NULL",
"0",
"s.reel") .
')';
498 $sql .=
" - (" . $sqlCommandesCli .
" - " . $sqlExpeditionsCli .
") + (" . $sqlCommandesFourn .
" - " . $sqlReceptionFourn .
") + (" . $sqlProductionToProduce .
" - " . $sqlProductionToConsume .
")))";
500 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
502 $sql .=
" pse.desiredstock > 0)";
505 if ($salert ==
'on') {
507 if ($includeproductswithoutdesiredqty ==
'on') {
508 $sql .=
"(" . $sqlalertstock .
" >= 0 OR " . $sqlalertstock .
" IS NULL) AND (" . $db->ifsql($sqlalertstock .
" IS NULL",
"0", $sqlalertstock) .
" > SUM(" . $db->ifsql(
"s.reel IS NULL",
"0",
"s.reel") .
")";
510 $sql .= $sqlalertstock .
" >= 0 AND (" . $sqlalertstock .
" > SUM(" . $db->ifsql(
"s.reel IS NULL",
"0",
"s.reel") .
")";
512 $sql .=
" - (" . $sqlCommandesCli .
" - " . $sqlExpeditionsCli .
") + (" . $sqlCommandesFourn .
" - " . $sqlReceptionFourn .
") + (" . $sqlProductionToProduce .
" - " . $sqlProductionToConsume .
"))";
514 $alertchecked =
'checked';
518 $sql .=
"(" . $sqldesiredtock .
" >= 0 AND (" . $sqldesiredtock .
" > SUM(" . $db->ifsql(
"s.reel IS NULL",
"0",
"s.reel") .
")))";
520 if ($includeproductswithoutdesiredqty ==
'on') {
521 $sql .=
" ((" . $sqlalertstock .
" >= 0 OR " . $sqlalertstock .
" IS NULL) AND (" . $db->ifsql($sqlalertstock .
" IS NULL",
"0", $sqlalertstock) .
" > SUM(" . $db->ifsql(
"s.reel IS NULL",
"0",
"s.reel") .
')))';
523 $sql .=
" (" . $sqlalertstock .
" >= 0 AND (" . $sqlalertstock .
" > SUM(" . $db->ifsql(
"s.reel IS NULL",
"0",
"s.reel") .
')))';
526 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
528 $sql .=
" pse.desiredstock > 0)";
531 if ($salert ==
'on') {
533 if ($includeproductswithoutdesiredqty ==
'on') {
534 $sql .=
" (" . $sqlalertstock .
" >= 0 OR " . $sqlalertstock .
" IS NULL) AND (" . $db->ifsql($sqlalertstock .
" IS NULL",
"0", $sqlalertstock) .
" > SUM(" . $db->ifsql(
"s.reel IS NULL",
"0",
"s.reel") .
"))";
536 $sql .=
" " . $sqlalertstock .
" >= 0 AND (" . $sqlalertstock .
" > SUM(" . $db->ifsql(
"s.reel IS NULL",
"0",
"s.reel") .
'))';
539 $alertchecked =
'checked';
543 $includeproductswithoutdesiredqtychecked =
'';
544 if ($includeproductswithoutdesiredqty ==
'on') {
545 $includeproductswithoutdesiredqtychecked =
'checked';
548 $nbtotalofrecords =
'';
550 $result = $db->query(
$sql);
551 $nbtotalofrecords = $db->num_rows($result);
552 if (($page * $limit) > $nbtotalofrecords) {
558 $sql .= $db->order($sortfield, $sortorder);
559 $sql .= $db->plimit($limit + 1, $offset);
562 $resql = $db->query(
$sql);
568 $num = $db->num_rows($resql);
571 $helpurl =
'EN:Module_Stocks_En|FR:Module_Stock|';
572 $helpurl .=
'ES:Módulo_Stocks';
578 $head[0][0] = DOL_URL_ROOT .
'/product/stock/replenish.php';
579 $head[0][1] = $title;
580 $head[0][2] =
'replenish';
582 $head[1][0] = DOL_URL_ROOT .
'/product/stock/replenishorders.php';
583 $head[1][1] = $langs->trans(
"ReplenishmentOrders");
584 $head[1][2] =
'replenishorders';
591 print
'<span class="opacitymedium">' . $langs->trans(
"ReplenishmentStatusDesc") .
'</span>' .
"\n";
595 if (empty($fk_entrepot) && !empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE)) {
596 print
'<span class="opacitymedium">' . $langs->trans(
"ReplenishmentStatusDescPerWarehouse") .
'</span>' .
"\n";
599 if ($usevirtualstock == 1) {
600 print $langs->trans(
"CurentSelectionMode") .
': ';
601 print
'<span class="a-mesure">' . $langs->trans(
"UseVirtualStock") .
'</span>';
602 print
' <a class="a-mesure-disabled" href="' . $_SERVER[
"PHP_SELF"] .
'?mode=physical' . ($fk_supplier > 0 ?
'&fk_supplier=' . $fk_supplier :
'') . ($fk_entrepot > 0 ?
'&fk_entrepot=' . $fk_entrepot :
'') .
'">' . $langs->trans(
"UsePhysicalStock") .
'</a>';
605 if ($usevirtualstock == 0) {
606 print $langs->trans(
"CurentSelectionMode") .
': ';
607 print
'<a class="a-mesure-disabled" href="' . $_SERVER[
"PHP_SELF"] .
'?mode=virtual' . ($fk_supplier > 0 ?
'&fk_supplier=' . $fk_supplier :
'') . ($fk_entrepot > 0 ?
'&fk_entrepot=' . $fk_entrepot :
'') .
'">' . $langs->trans(
"UseVirtualStock") .
'</a>';
608 print
' <span class="a-mesure">' . $langs->trans(
"UsePhysicalStock") .
'</span>';
613 print
'<form name="formFilterWarehouse" method="POST" action="' . $_SERVER[
"PHP_SELF"] .
'">';
614 print
'<input type="hidden" name="token" value="' .
newToken() .
'">';
615 print
'<input type="hidden" name="action" value="filter">';
616 print
'<input type="hidden" name="search_ref" value="' . $search_ref .
'">';
617 print
'<input type="hidden" name="search_label" value="' . $search_label .
'">';
618 print
'<input type="hidden" name="salert" value="' . $salert .
'">';
619 print
'<input type="hidden" name="includeproductswithoutdesiredqty" value="' . $includeproductswithoutdesiredqty .
'">';
620 print
'<input type="hidden" name="draftorder" value="' . $draftorder .
'">';
621 print
'<input type="hidden" name="mode" value="' . $mode .
'">';
622 if ($limit > 0 && $limit != $conf->liste_limit) {
623 print
'<input type="hidden" name="limit" value="' . $limit .
'">';
625 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE)) {
626 print
'<div class="inline-block valignmiddle" style="padding-right: 20px;">';
627 print $langs->trans(
'Warehouse') .
' ' . $formproduct->selectWarehouses($fk_entrepot,
'fk_entrepot',
'', 1);
630 print
'<div class="inline-block valignmiddle" style="padding-right: 20px;">';
631 $filter =
'(fournisseur:=:1)';
632 print $langs->trans(
'Supplier') .
' ' .
$form->select_company($fk_supplier,
'fk_supplier', $filter, 1);
635 $parameters = array();
636 $reshook = $hookmanager->executeHooks(
'printFieldPreListTitle', $parameters);
637 if (empty($reshook)) {
638 print $hookmanager->resPrint;
641 print
'<div class="inline-block valignmiddle">';
642 print
'<input type="submit" class="button smallpaddingimp" name="valid" value="' . $langs->trans(
'ToFilter') .
'">';
647 print
'<form action="' . $_SERVER[
"PHP_SELF"] .
'" method="POST" name="formulaire">';
648 print
'<input type="hidden" name="token" value="' .
newToken() .
'">';
649 print
'<input type="hidden" name="fk_supplier" value="' . $fk_supplier .
'">';
650 print
'<input type="hidden" name="fk_entrepot" value="' . $fk_entrepot .
'">';
651 print
'<input type="hidden" name="sortfield" value="' . $sortfield .
'">';
652 print
'<input type="hidden" name="sortorder" value="' . $sortorder .
'">';
653 print
'<input type="hidden" name="type" value="' . $type .
'">';
654 print
'<input type="hidden" name="linecount" value="' . $num .
'">';
655 print
'<input type="hidden" name="action" value="order">';
656 print
'<input type="hidden" name="mode" value="' . $mode .
'">';
659 if ($search_ref || $search_label || $sall || $salert || $draftorder ||
GETPOST(
'search',
'alpha')) {
660 $filters =
'&search_ref=' . urlencode($search_ref) .
'&search_label=' . urlencode($search_label);
661 $filters .=
'&sall=' . urlencode($sall);
662 $filters .=
'&salert=' . urlencode($salert);
663 $filters .=
'&draftorder=' . urlencode($draftorder);
664 $filters .=
'&mode=' . urlencode($mode);
665 if ($fk_supplier > 0) {
666 $filters .=
'&fk_supplier=' . urlencode($fk_supplier);
668 if ($fk_entrepot > 0) {
669 $filters .=
'&fk_entrepot=' . urlencode($fk_entrepot);
672 $filters =
'&search_ref=' . urlencode($search_ref) .
'&search_label=' . urlencode($search_label);
673 $filters .=
'&fourn_id=' . urlencode($fourn_id);
674 $filters .= (isset($type) ?
'&type=' . urlencode($type) :
'');
675 $filters .=
'&=' . urlencode($salert);
676 $filters .=
'&draftorder=' . urlencode($draftorder);
677 $filters .=
'&mode=' . urlencode($mode);
678 if ($fk_supplier > 0) {
679 $filters .=
'&fk_supplier=' . urlencode($fk_supplier);
681 if ($fk_entrepot > 0) {
682 $filters .=
'&fk_entrepot=' . urlencode($fk_entrepot);
685 if ($limit > 0 && $limit != $conf->liste_limit) {
686 $filters .=
'&limit=' . ((int) $limit);
688 if (!empty($includeproductswithoutdesiredqty)) $filters .=
'&includeproductswithoutdesiredqty=' . urlencode($includeproductswithoutdesiredqty);
689 if (!empty($salert)) $filters .=
'&salert=' . urlencode($salert);
691 $param = (isset($type) ?
'&type=' . urlencode($type) :
'');
692 $param .=
'&fourn_id=' . urlencode($fourn_id) .
'&search_label=' . urlencode($search_label) .
'&includeproductswithoutdesiredqty=' . urlencode($includeproductswithoutdesiredqty) .
'&salert=' . urlencode($salert) .
'&draftorder=' . urlencode($draftorder);
693 $param .=
'&search_ref=' . urlencode($search_ref);
694 $param .=
'&mode=' . urlencode($mode);
695 $param .=
'&fk_supplier=' . urlencode($fk_supplier);
696 $param .=
'&fk_entrepot=' . urlencode($fk_entrepot);
697 if (!empty($includeproductswithoutdesiredqty)) $param .=
'&includeproductswithoutdesiredqty=' . urlencode($includeproductswithoutdesiredqty);
698 if (!empty($salert)) $param .=
'&salert=' . urlencode($salert);
700 $stocklabel = $langs->trans(
'Stock');
701 $stocklabelbis = $langs->trans(
'Stock');
703 if ($usevirtualstock == 1) {
704 $stocklabel = $langs->trans(
'VirtualStock');
705 $stocktooltip = $langs->trans(
"VirtualStockDesc");
707 if ($usevirtualstock == 0) {
708 $stocklabel = $langs->trans(
'PhysicalStock');
710 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
711 $stocklabelbis = $stocklabel .
' (Selected warehouse)';
712 $stocklabel .=
' (' . $langs->trans(
"AllWarehouses") .
')';
714 $texte = $langs->trans(
'Replenishment');
719 if (!empty($conf->global->REPLENISH_ALLOW_VARIABLESIZELIST)) {
752 print
'<div class="div-table-responsive-no-min">';
753 print
'<table class="liste centpercent">';
756 print
'<tr class="liste_titre_filter">';
757 print
'<td class="liste_titre"> </td>';
758 print
'<td class="liste_titre"><input class="flat" type="text" name="search_ref" size="8" value="' .
dol_escape_htmltag($search_ref) .
'"></td>';
759 print
'<td class="liste_titre"><input class="flat" type="text" name="search_label" size="8" value="' .
dol_escape_htmltag($search_label) .
'"></td>';
761 print
'<td class="liste_titre"> </td>';
763 print
'<td class="liste_titre right">' .
$form->textwithpicto($langs->trans(
'IncludeEmptyDesiredStock'), $langs->trans(
'IncludeProductWithUndefinedAlerts')) .
' <input type="checkbox" id="includeproductswithoutdesiredqty" name="includeproductswithoutdesiredqty" ' . (!empty($includeproductswithoutdesiredqtychecked) ? $includeproductswithoutdesiredqtychecked :
'') .
'></td>';
764 print
'<td class="liste_titre right"></td>';
765 print
'<td class="liste_titre right">' . $langs->trans(
'AlertOnly') .
' <input type="checkbox" id="salert" name="salert" ' . (!empty($alertchecked) ? $alertchecked :
'') .
'></td>';
766 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
767 print
'<td class="liste_titre"> </td>';
769 print
'<td class="liste_titre right">';
770 if (!empty($conf->global->STOCK_REPLENISH_ADD_CHECKBOX_INCLUDE_DRAFT_ORDER)) {
771 print $langs->trans(
'IncludeAlsoDraftOrders') .
' <input type="checkbox" id="draftorder" name="draftorder" ' . (!empty($draftchecked) ? $draftchecked :
'') .
'>';
774 print
'<td class="liste_titre"> </td>';
776 $parameters = array(
'param' => $param,
'sortfield' => $sortfield,
'sortorder' => $sortorder);
777 $reshook = $hookmanager->executeHooks(
'printFieldListOption', $parameters);
778 print $hookmanager->resPrint;
780 print
'<td class="liste_titre maxwidthsearch right">';
781 $searchpicto =
$form->showFilterAndCheckAddButtons(0);
787 print
'<tr class="liste_titre">';
792 print_liste_field_titre(
'Duration', $_SERVER[
"PHP_SELF"],
'p.duration', $param,
'',
'', $sortfield, $sortorder,
'center ');
794 print_liste_field_titre(
'DesiredStock', $_SERVER[
"PHP_SELF"],
'p.desiredstock', $param,
'',
'', $sortfield, $sortorder,
'right ');
795 print_liste_field_titre(
'StockLimitShort', $_SERVER[
"PHP_SELF"],
'p.seuil_stock_alerte', $param,
'',
'', $sortfield, $sortorder,
'right ');
796 print_liste_field_titre($stocklabel, $_SERVER[
"PHP_SELF"],
'stock_physique', $param,
'',
'', $sortfield, $sortorder,
'right ', $stocktooltip);
797 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
798 print_liste_field_titre($stocklabelbis, $_SERVER[
"PHP_SELF"],
'stock_real_warehouse', $param,
'',
'', $sortfield, $sortorder,
'right ');
800 print_liste_field_titre(
'Ordered', $_SERVER[
"PHP_SELF"],
'', $param,
'',
'', $sortfield, $sortorder,
'right ');
801 print_liste_field_titre(
'StockToBuy', $_SERVER[
"PHP_SELF"],
'', $param,
'',
'', $sortfield, $sortorder,
'right ');
802 print_liste_field_titre(
'SupplierRef', $_SERVER[
"PHP_SELF"],
'', $param,
'',
'', $sortfield, $sortorder,
'right ');
805 $parameters = array(
'param' => $param,
'sortfield' => $sortfield,
'sortorder' => $sortorder);
806 $reshook = $hookmanager->executeHooks(
'printFieldListTitle', $parameters);
807 print $hookmanager->resPrint;
811 while ($i < ($limit ? min($num, $limit) : $num)) {
812 $objp = $db->fetch_object($resql);
814 if (!empty($conf->global->STOCK_SUPPORTS_SERVICES) || $objp->fk_product_type == 0) {
815 $result = $prod->fetch($objp->rowid);
821 $prod->load_stock(
'warehouseopen, warehouseinternal' . (!$usevirtualstock ?
', novirtual' :
''), $draftchecked);
825 $sql =
'SELECT label,description';
826 $sql .=
' FROM ' . MAIN_DB_PREFIX .
'product_lang';
827 $sql .=
' WHERE fk_product = ' . ((int) $objp->rowid);
828 $sql .=
" AND lang = '" . $db->escape($langs->getDefaultLang()) .
"'";
831 $resqlm = $db->query(
$sql);
833 $objtp = $db->fetch_object($resqlm);
834 if (!empty($objtp->description)) {
835 $objp->description = $objtp->description;
837 if (!empty($objtp->label)) {
838 $objp->label = $objtp->label;
844 if ($usevirtualstock) {
846 $stock = $prod->stock_theorique;
849 $stock = $prod->stock_reel;
850 if (!empty($prod->stock_warehouse[$fk_entrepot])) {
851 $stockwarehouse = $prod->stock_warehouse[$fk_entrepot]->real;
856 if (isset($draftchecked)) {
857 $result = $prod->load_stats_commande_fournisseur(0,
'0,1,2,3,4');
858 } elseif (!$usevirtualstock) {
859 $result = $prod->load_stats_commande_fournisseur(0,
'1,2,3,4');
862 if (!$usevirtualstock) {
863 $result = $prod->load_stats_reception(0,
'4');
868 $ordered = $prod->stats_commande_fournisseur[
'qty'] - $prod->stats_reception[
'qty'];
870 $desiredstock = $objp->desiredstock;
871 $alertstock = $objp->seuil_stock_alerte;
872 $desiredstockwarehouse = (!empty($objp->desiredstockpse) ? $objp->desiredstockpse : 0);
873 $alertstockwarehouse = (!empty($objp->seuil_stock_alertepse) ? $objp->seuil_stock_alertepse : 0);
876 if ($alertstock && ($stock < $alertstock)) {
877 $warning =
img_warning($langs->trans(
'StockTooLow')) .
' ';
879 $warningwarehouse =
'';
880 if ($alertstockwarehouse && ($stockwarehouse < $alertstockwarehouse)) {
881 $warningwarehouse =
img_warning($langs->trans(
'StockTooLow')) .
' ';
887 if (empty($usevirtualstock)) {
888 $stocktobuy = max(max($desiredstock, $alertstock) - $stock - $ordered, 0);
890 $stocktobuy = max(max($desiredstock, $alertstock) - $stock, 0);
892 if (empty($usevirtualstock)) {
893 $stocktobuywarehouse = max(max($desiredstockwarehouse, $alertstockwarehouse) - $stockwarehouse - $ordered, 0);
895 $stocktobuywarehouse = max(max($desiredstockwarehouse, $alertstockwarehouse) - $stockwarehouse, 0);
900 $stockforcompare = ($usevirtualstock ? $stock : $stock + $ordered);
908 $picto =
img_picto($langs->trans(
"NoPendingReceptionOnSupplierOrder"),
'help');
911 print
'<tr class="oddeven">';
914 print
'<td><input type="checkbox" class="check" name="choose' . $i .
'"></td>';
916 print
'<td class="nowrap">' . $prod->getNomUrl(1,
'stock') .
'</td>';
918 print
'<td class="tdoverflowmax200" title="' .
dol_escape_htmltag($objp->label) .
'">';
920 print
'<input type="hidden" name="desc' . $i .
'" value="' .
dol_escape_htmltag($objp->description) .
'">';
925 if (preg_match(
'/([0-9]+)y/i', $objp->duration, $regs)) {
926 $duration = $regs[1] .
' ' . $langs->trans(
'DurationYear');
927 } elseif (preg_match(
'/([0-9]+)m/i', $objp->duration, $regs)) {
928 $duration = $regs[1] .
' ' . $langs->trans(
'DurationMonth');
929 } elseif (preg_match(
'/([0-9]+)d/i', $objp->duration, $regs)) {
930 $duration = $regs[1] .
' ' . $langs->trans(
'DurationDay');
932 $duration = $objp->duration;
934 print
'<td class="center">' . $duration .
'</td>';
938 print
'<td class="right">' . ((!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) > 0 ? $desiredstockwarehouse : $desiredstock) .
'</td>';
941 print
'<td class="right">' . ((!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) > 0 ? $alertstockwarehouse : $alertstock) .
'</td>';
944 print
'<td class="right">' . $warning . $stock;
945 print
'<!-- stock returned by main sql is ' . $objp->stock_physique .
' -->';
949 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
950 print
'<td class="right">' . $warningwarehouse . $stockwarehouse .
'</td>';
954 print
'<td class="right"><a href="replenishorders.php?search_product=' . $prod->id .
'">' . $ordered .
'</a> ' . $picto .
'</td>';
957 $tobuy = (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) > 0 ? $stocktobuywarehouse : $stocktobuy;
958 print
'<td class="right"><input type="text" size="4" name="tobuy' . $i .
'" value="' . $tobuy .
'"></td>';
961 print
'<td class="right">';
962 print
$form->select_product_fourn_price($prod->id,
'fourn' . $i, $fk_supplier);
966 $parameters = array(
'objp' => $objp,
'i' => $i,
'tobuy' => $tobuy);
967 $reshook = $hookmanager->executeHooks(
'printFieldListValue', $parameters);
968 print $hookmanager->resPrint;
980 if (!empty($conf->global->STOCK_ALLOW_ADD_LIMIT_STOCK_BY_WAREHOUSE) && $fk_entrepot > 0) {
983 print
'<tr><td colspan="' . $colspan .
'">';
984 print
'<span class="opacitymedium">';
985 print $langs->trans(
"None");
990 $parameters = array(
'sql' =>
$sql);
991 $reshook = $hookmanager->executeHooks(
'printFieldListFooter', $parameters);
992 print $hookmanager->resPrint;
1002 $value = $langs->trans(
"CreateOrders");
1003 print
'<div class="center"><input type="submit" class="button" name="valid" value="' . $value .
'"></div>';
1011 <script type="text/javascript">
1012 function toggle(source)
1014 checkboxes = document.getElementsByClassName("check");
1015 for (var i=0; i < checkboxes.length;i++) {
1016 if (!checkboxes[i].disabled) {
1017 checkboxes[i].checked = source.checked;
if(!defined('NOREQUIRESOC')) if(!defined('NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined('NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined('NOREQUIREAJAX')) llxHeader()
Empty header.
Class to manage predefined suppliers products.
Class to manage line orders.
Class to manage predefined suppliers products.
Class to manage products or services.
if(isModEnabled('facture') && $user->hasRight('facture', 'lire')) if((isModEnabled('fournisseur') &&empty($conf->global->MAIN_USE_NEW_SUPPLIERMOD) && $user->hasRight("fournisseur", "facture", "lire"))||(isModEnabled('supplier_invoice') && $user->hasRight("supplier_invoice", "lire"))) if(isModEnabled('don') && $user->hasRight('don', 'lire')) if(isModEnabled('tax') &&!empty($user->rights->tax->charges->lire)) if(isModEnabled('facture') &&isModEnabled('commande') && $user->hasRight("commande", "lire") &&empty($conf->global->WORKFLOW_DISABLE_CREATE_INVOICE_FROM_ORDER)) $sql
Social contributions to pay.
if($cancel &&! $id) if($action=='add' &&! $cancel) if($action=='delete') if($id) $form
Actions.
load_fiche_titre($titre, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
img_warning($titlealt='default', $moreatt='', $morecss='pictowarning')
Show warning logo.
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_print_error($db='', $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
dol_get_fiche_end($notab=0)
Return tab footer of a card.
natural_search($fields, $value, $mode=0, $nofirstand=0)
Generate natural SQL search string for a criteria (this criteria can be tested on one or several fiel...
dol_strlen($string, $stringencoding='UTF-8')
Make a strlen call.
getDolGlobalInt($key, $default=0)
Return dolibarr global constant int value.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=false, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
newToken()
Return the value of token currently saved into session with name 'newtoken'.
print_liste_field_titre($name, $file="", $field="", $begin="", $moreparam="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $tooltip="", $forcenowrapcolumntitle=0)
Show title line of an array.
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.
print_barre_liste($titre, $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.
GETPOSTISSET($paramname)
Return true if we are in a context of submitting the parameter $paramname from a POST of a form.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
isModEnabled($module)
Is Dolibarr module enabled.
getEntity($element, $shared=1, $currentobject=null)
Get list of entity id to use.
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...
restrictedArea(User $user, $features, $object=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0, $mode=0)
Check permissions of a user to show a page and an object.