dolibarr 21.0.0-alpha
bom_card.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2017-2023 Laurent Destailleur <eldy@users.sourceforge.net>
3 * Copyright (C) 2019-2024 Frédéric France <frederic.france@free.fr>
4 * Copyright (C) 2023 Charlene Benke <charlene@patas-monkey.com>
5 * Copyright (C) 2024 MDW <mdeweerd@users.noreply.github.com>
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 3 of the License, or
10 * (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program. If not, see <https://www.gnu.org/licenses/>.
19 */
20
27// Load Dolibarr environment
28require '../main.inc.php';
29require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
30require_once DOL_DOCUMENT_ROOT.'/core/class/html.formfile.class.php';
31require_once DOL_DOCUMENT_ROOT.'/bom/class/bom.class.php';
32require_once DOL_DOCUMENT_ROOT.'/bom/lib/bom.lib.php';
33require_once DOL_DOCUMENT_ROOT.'/mrp/lib/mrp.lib.php';
34
35
36// Load translation files required by the page
37$langs->loadLangs(array('mrp', 'other'));
38
39// Get parameters
40$id = GETPOSTINT('id');
41$lineid = GETPOSTINT('lineid');
42$ref = GETPOST('ref', 'alpha');
43$action = GETPOST('action', 'aZ09');
44$confirm = GETPOST('confirm', 'alpha');
45$cancel = GETPOST('cancel', 'aZ09');
46$contextpage = GETPOST('contextpage', 'aZ') ? GETPOST('contextpage', 'aZ') : 'bomcard'; // To manage different context of search
47$backtopage = GETPOST('backtopage', 'alpha');
48
49
50// PDF
51$hidedetails = (GETPOSTINT('hidedetails') ? GETPOSTINT('hidedetails') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_DETAILS') ? 1 : 0));
52$hidedesc = (GETPOSTINT('hidedesc') ? GETPOSTINT('hidedesc') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_DESC') ? 1 : 0));
53$hideref = (GETPOSTINT('hideref') ? GETPOSTINT('hideref') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_REF') ? 1 : 0));
54
55// Initialize a technical objects
56$object = new BOM($db);
57$extrafields = new ExtraFields($db);
58$diroutputmassaction = $conf->bom->dir_output.'/temp/massgeneration/'.$user->id;
59$hookmanager->initHooks(array('bomcard', 'globalcard')); // Note that conf->hooks_modules contains array
60
61// Fetch optionals attributes and labels
62$extrafields->fetch_name_optionals_label($object->table_element);
63$search_array_options = $extrafields->getOptionalsFromPost($object->table_element, '', 'search_');
64
65// Initialize array of search criteria
66$search_all = GETPOST("search_all", 'alpha');
67$search = array();
68foreach ($object->fields as $key => $val) {
69 if (GETPOST('search_'.$key, 'alpha')) {
70 $search[$key] = GETPOST('search_'.$key, 'alpha');
71 }
72}
73
74if (empty($action) && empty($id) && empty($ref)) {
75 $action = 'view';
76}
77
78// Load object
79include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be 'include', not 'include_once'.
80if ($object->id > 0) {
81 $object->calculateCosts();
82}
83
84
85// Security check - Protection if external user
86//if ($user->socid > 0) accessforbidden();
87//if ($user->socid > 0) $socid = $user->socid;
88$isdraft = (($object->status == $object::STATUS_DRAFT) ? 1 : 0);
89$result = restrictedArea($user, 'bom', $object->id, $object->table_element, '', '', 'rowid', $isdraft);
90
91// Permissions
92$permissionnote = $user->hasRight('bom', 'write'); // Used by the include of actions_setnotes.inc.php
93$permissiondellink = $user->hasRight('bom', 'write'); // Used by the include of actions_dellink.inc.php
94$permissiontoadd = $user->hasRight('bom', 'write'); // Used by the include of actions_addupdatedelete.inc.php and actions_lineupdown.inc.php
95$permissiontodelete = $user->hasRight('bom', 'delete') || ($permissiontoadd && isset($object->status) && $object->status == $object::STATUS_DRAFT);
96$upload_dir = $conf->bom->multidir_output[isset($object->entity) ? $object->entity : 1];
97
98
99/*
100 * Actions
101 */
102
103$parameters = array();
104$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
105if ($reshook < 0) {
106 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
107}
108
109if (empty($reshook)) {
110 $error = 0;
111
112 $backurlforlist = DOL_URL_ROOT.'/bom/bom_list.php';
113
114 if (empty($backtopage) || ($cancel && empty($id))) {
115 if (empty($backtopage) || ($cancel && strpos($backtopage, '__ID__'))) {
116 if (empty($id) && (($action != 'add' && $action != 'create') || $cancel)) {
117 $backtopage = $backurlforlist;
118 } else {
119 $backtopage = DOL_URL_ROOT.'/bom/bom_card.php?id='.($id > 0 ? $id : '__ID__');
120 }
121 }
122 }
123
124 $triggermodname = 'BOM_MODIFY'; // Name of trigger action code to execute when we modify record
125
126
127 // Actions cancel, add, update, delete or clone
128 include DOL_DOCUMENT_ROOT.'/core/actions_addupdatedelete.inc.php';
129 // The fetch/fetch_lines was redone into the inc.php so we must recall the calculateCosts()
130 if ($action == 'confirm_validate' && $object->id > 0) {
131 $object->calculateCosts();
132 }
133
134 // Actions when linking object each other
135 include DOL_DOCUMENT_ROOT.'/core/actions_dellink.inc.php';
136
137 // Actions when printing a doc from card
138 include DOL_DOCUMENT_ROOT.'/core/actions_printing.inc.php';
139
140 // Action to move up and down lines of object
141 //include DOL_DOCUMENT_ROOT.'/core/actions_lineupdown.inc.php';
142
143 // Action to build doc
144 include DOL_DOCUMENT_ROOT.'/core/actions_builddoc.inc.php';
145
146 // Actions to send emails
147 $triggersendname = 'BOM_SENTBYMAIL';
148 $autocopy = 'MAIN_MAIL_AUTOCOPY_BOM_TO';
149 $trackid = 'bom'.$object->id;
150 include DOL_DOCUMENT_ROOT.'/core/actions_sendmails.inc.php';
151
152 // Add line
153 if ($action == 'addline' && $user->hasRight('bom', 'write')) {
154 $langs->load('errors');
155 $error = 0;
156 $predef = '';
157
158 // Set if we used free entry or predefined product
159 $bom_child_id = GETPOSTINT('bom_id');
160 if ($bom_child_id > 0) {
161 $bom_child = new BOM($db);
162 $res = $bom_child->fetch($bom_child_id);
163 if ($res) {
164 $idprod = $bom_child->fk_product;
165 }
166 } else {
167 $idprod = (GETPOSTINT('idprodservice') ? GETPOSTINT('idprodservice') : GETPOSTINT('idprod'));
168 }
169
170 $qty = price2num(GETPOST('qty', 'alpha'), 'MS');
171 $qty_frozen = price2num(GETPOST('qty_frozen', 'alpha'), 'MS');
172 $disable_stock_change = GETPOSTINT('disable_stock_change');
173 $fk_workstation = GETPOSTINT('idworkstations');
174 $efficiency = price2num(GETPOST('efficiency', 'alpha'));
175 $fk_unit = GETPOST('fk_unit', 'alphanohtml');
176
177 $fk_default_workstation = 0;
178 if (!empty($idprod) && isModEnabled('workstation')) {
179 $product = new Product($db);
180 $res = $product->fetch($idprod);
181 if ($res > 0 && $product->type == Product::TYPE_SERVICE) {
182 if ($fk_workstation > 0) {
183 $fk_default_workstation = $fk_workstation;
184 } else {
185 $fk_default_workstation = $product->fk_default_workstation;
186 }
187 }
188 if (empty($fk_unit)) {
189 $fk_unit = $product->fk_unit;
190 }
191 }
192
193 if ($qty == '') {
194 setEventMessages($langs->trans('ErrorFieldRequired', $langs->transnoentitiesnoconv('Qty')), null, 'errors');
195 $error++;
196 }
197 if (!($idprod > 0)) {
198 setEventMessages($langs->trans('ErrorFieldRequired', $langs->transnoentitiesnoconv('Product')), null, 'errors');
199 $error++;
200 }
201
202 if ($object->fk_product == $idprod) {
203 setEventMessages($langs->trans('TheProductXIsAlreadyTheProductToProduce'), null, 'errors');
204 $error++;
205 }
206
207 // We check if we're allowed to add this bom
208 $TParentBom = array();
209 $object->getParentBomTreeRecursive($TParentBom);
210 if ($bom_child_id > 0 && !empty($TParentBom) && in_array($bom_child_id, $TParentBom)) {
211 $n_child = new BOM($db);
212 $n_child->fetch($bom_child_id);
213 setEventMessages($langs->transnoentities('BomCantAddChildBom', $n_child->getNomUrl(1), $object->getNomUrl(1)), null, 'errors');
214 $error++;
215 }
216
217 if (!$error) {
218 // Extrafields
219 $extralabelsline = $extrafields->fetch_name_optionals_label($object->table_element_line);
220 $array_options = $extrafields->getOptionalsFromPost($object->table_element_line, $predef);
221 // Unset extrafield
222 if (is_array($extralabelsline)) {
223 // Get extra fields
224 foreach ($extralabelsline as $key => $value) {
225 unset($_POST["options_".$key]);
226 }
227 }
228
229 $result = $object->addLine($idprod, $qty, $qty_frozen, $disable_stock_change, $efficiency, -1, $bom_child_id, null, $fk_unit, $array_options, $fk_default_workstation);
230
231 if ($result <= 0) {
232 setEventMessages($object->error, $object->errors, 'errors');
233 $action = '';
234 } else {
235 unset($_POST['idprod']);
236 unset($_POST['idprodservice']);
237 unset($_POST['qty']);
238 unset($_POST['qty_frozen']);
239 unset($_POST['disable_stock_change']);
240 }
241
242 $object->fetchLines();
243
244 $object->calculateCosts();
245 }
246 }
247
248 // Update line
249 if ($action == 'updateline' && $user->hasRight('bom', 'write')) {
250 $langs->load('errors');
251 $error = 0;
252
253 // Set if we used free entry or predefined product
254 $qty = price2num(GETPOST('qty', 'alpha'), 'MS');
255 $qty_frozen = price2num(GETPOST('qty_frozen', 'alpha'), 'MS');
256 $disable_stock_change = GETPOSTINT('disable_stock_change');
257 $efficiency = price2num(GETPOST('efficiency', 'alpha'));
258 $fk_unit = GETPOST('fk_unit', 'alphanohtml');
259
260 if ($qty == '') {
261 setEventMessages($langs->trans('ErrorFieldRequired', $langs->transnoentitiesnoconv('Qty')), null, 'errors');
262 $error++;
263 }
264
265 if (!$error) {
266 // Extrafields
267 $extralabelsline = $extrafields->fetch_name_optionals_label($object->table_element_line);
268 $array_options = $extrafields->getOptionalsFromPost($object->table_element_line);
269 // Unset extrafield
270 if (is_array($extralabelsline)) {
271 // Get extra fields
272 foreach ($extralabelsline as $key => $value) {
273 unset($_POST["options_".$key]);
274 }
275 }
276
277 $bomline = new BOMLine($db);
278 $bomline->fetch($lineid);
279
280 $fk_default_workstation = $bomline->fk_default_workstation;
281 if (isModEnabled('workstation') && GETPOSTISSET('idworkstations')) {
282 $fk_default_workstation = GETPOSTINT('idworkstations');
283 }
284
285 $result = $object->updateLine($lineid, $qty, (int) $qty_frozen, (int) $disable_stock_change, $efficiency, $bomline->position, $bomline->import_key, $fk_unit, $array_options, $fk_default_workstation);
286
287 if ($result <= 0) {
288 setEventMessages($object->error, $object->errors, 'errors');
289 $action = '';
290 } else {
291 unset($_POST['idprod']);
292 unset($_POST['idprodservice']);
293 unset($_POST['qty']);
294 unset($_POST['qty_frozen']);
295 unset($_POST['disable_stock_change']);
296 }
297
298 $object->fetchLines();
299
300 $object->calculateCosts();
301 }
302 }
303}
304
305
306/*
307 * View
308 */
309
310$form = new Form($db);
311$formfile = new FormFile($db);
312
313if ($object->id > 0) {
314 $title = $object->ref;
315} else {
316 $title = $langs->trans('BOM');
317}
318$help_url = 'EN:Module_BOM';
319llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-bom page-card');
320
321// Part to create
322if ($action == 'create') {
323 print load_fiche_titre($langs->trans("NewBOM"), '', 'bom');
324
325 print '<form method="POST" action="'.$_SERVER["PHP_SELF"].'">';
326 print '<input type="hidden" name="token" value="'.newToken().'">';
327 print '<input type="hidden" name="action" value="add">';
328 print '<input type="hidden" name="backtopage" value="'.$backtopage.'">';
329
330 print dol_get_fiche_head(array(), '');
331
332 print '<table class="border centpercent tableforfieldcreate">'."\n";
333
334 // Common attributes
335 include DOL_DOCUMENT_ROOT.'/core/tpl/commonfields_add.tpl.php';
336
337 // Other attributes
338 include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_add.tpl.php';
339
340 print '</table>'."\n";
341
342 print dol_get_fiche_end();
343
344 print $form->buttonsSaveCancel("Create");
345
346 print '</form>';
347}
348
349// Part to edit record
350if (($id || $ref) && $action == 'edit') {
351 print load_fiche_titre($langs->trans("BillOfMaterials"), '', 'cubes');
352
353 print '<form method="POST" action="'.$_SERVER["PHP_SELF"].'">';
354 print '<input type="hidden" name="token" value="'.newToken().'">';
355 print '<input type="hidden" name="action" value="update">';
356 print '<input type="hidden" name="backtopage" value="'.$backtopage.'">';
357 print '<input type="hidden" name="id" value="'.$object->id.'">';
358
359 print dol_get_fiche_head();
360
361 //$object->fields['keyfield']['disabled'] = 1;
362
363 print '<table class="border centpercent tableforfieldedit">'."\n";
364
365 // Common attributes
366 include DOL_DOCUMENT_ROOT.'/core/tpl/commonfields_edit.tpl.php';
367
368 // Other attributes
369 include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_edit.tpl.php';
370
371 print '</table>';
372
373 print dol_get_fiche_end();
374
375 print $form->buttonsSaveCancel("Update");
376
377 print '</form>';
378}
379
380// Part to show record
381if ($object->id > 0 && (empty($action) || ($action != 'edit' && $action != 'create'))) {
382 $head = bomPrepareHead($object);
383 print dol_get_fiche_head($head, 'card', $langs->trans("BillOfMaterials"), -1, 'bom');
384
385 $formconfirm = '';
386
387 // Confirmation to delete
388 if ($action == 'delete') {
389 $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('DeleteBillOfMaterials'), $langs->trans('ConfirmDeleteBillOfMaterials'), 'confirm_delete', '', 0, 1);
390 }
391 // Confirmation to delete line
392 if ($action == 'deleteline') {
393 $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id.'&lineid='.$lineid, $langs->trans('DeleteLine'), $langs->trans('ConfirmDeleteLine'), 'confirm_deleteline', '', 0, 1);
394 }
395
396 // Confirmation of validation
397 if ($action == 'validate') {
398 // We check that object has a temporary ref
399 $ref = substr($object->ref, 1, 4);
400 if ($ref == 'PROV') {
401 $object->fetch_product();
402 $numref = $object->getNextNumRef($object->product);
403 } else {
404 $numref = $object->ref;
405 }
406
407 $text = $langs->trans('ConfirmValidateBom', $numref);
408 /*if (isModEnabled('notification'))
409 {
410 require_once DOL_DOCUMENT_ROOT . '/core/class/notify.class.php';
411 $notify = new Notify($db);
412 $text .= '<br>';
413 $text .= $notify->confirmMessage('BOM_VALIDATE', $object->socid, $object);
414 }*/
415
416 $formquestion = array();
417 if (isModEnabled('bom')) {
418 $langs->load("mrp");
419 $forcecombo = 0;
420 if ($conf->browser->name == 'ie') {
421 $forcecombo = 1; // There is a bug in IE10 that make combo inside popup crazy
422 }
423 $formquestion = array(
424 // 'text' => $langs->trans("ConfirmClone"),
425 // array('type' => 'checkbox', 'name' => 'clone_content', 'label' => $langs->trans("CloneMainAttributes"), 'value' => 1),
426 // array('type' => 'checkbox', 'name' => 'update_prices', 'label' => $langs->trans("PuttingPricesUpToDate"), 'value' => 1),
427 );
428 }
429
430 $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('Validate'), $text, 'confirm_validate', $formquestion, 0, 1, 220);
431 }
432
433 // Confirmation of closing
434 if ($action == 'close') {
435 $text = $langs->trans('ConfirmCloseBom', $object->ref);
436 /*if (isModEnabled('notification'))
437 {
438 require_once DOL_DOCUMENT_ROOT . '/core/class/notify.class.php';
439 $notify = new Notify($db);
440 $text .= '<br>';
441 $text .= $notify->confirmMessage('BOM_CLOSE', $object->socid, $object);
442 }*/
443
444 $formquestion = array();
445 if (isModEnabled('bom')) {
446 $langs->load("mrp");
447 $forcecombo = 0;
448 if ($conf->browser->name == 'ie') {
449 $forcecombo = 1; // There is a bug in IE10 that make combo inside popup crazy
450 }
451 $formquestion = array(
452 // 'text' => $langs->trans("ConfirmClone"),
453 // array('type' => 'checkbox', 'name' => 'clone_content', 'label' => $langs->trans("CloneMainAttributes"), 'value' => 1),
454 // array('type' => 'checkbox', 'name' => 'update_prices', 'label' => $langs->trans("PuttingPricesUpToDate"), 'value' => 1),
455 );
456 }
457
458 $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('Close'), $text, 'confirm_close', $formquestion, 0, 1, 220);
459 }
460
461 // Confirmation of reopen
462 if ($action == 'reopen') {
463 $text = $langs->trans('ConfirmReopenBom', $object->ref);
464 /*if (isModEnabled('notification'))
465 {
466 require_once DOL_DOCUMENT_ROOT . '/core/class/notify.class.php';
467 $notify = new Notify($db);
468 $text .= '<br>';
469 $text .= $notify->confirmMessage('BOM_CLOSE', $object->socid, $object);
470 }*/
471
472 $formquestion = array();
473 if (isModEnabled('bom')) {
474 $langs->load("mrp");
475 require_once DOL_DOCUMENT_ROOT.'/product/class/html.formproduct.class.php';
476 $forcecombo = 0;
477 if ($conf->browser->name == 'ie') {
478 $forcecombo = 1; // There is a bug in IE10 that make combo inside popup crazy
479 }
480 $formquestion = array(
481 // 'text' => $langs->trans("ConfirmClone"),
482 // array('type' => 'checkbox', 'name' => 'clone_content', 'label' => $langs->trans("CloneMainAttributes"), 'value' => 1),
483 // array('type' => 'checkbox', 'name' => 'update_prices', 'label' => $langs->trans("PuttingPricesUpToDate"), 'value' => 1),
484 );
485 }
486
487 $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ReOpen'), $text, 'confirm_reopen', $formquestion, 0, 1, 220);
488 }
489
490 // Clone confirmation
491 if ($action == 'clone') {
492 // Create an array for form
493 $formquestion = array();
494 $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ToClone'), $langs->trans('ConfirmCloneBillOfMaterials', $object->ref), 'confirm_clone', $formquestion, 'yes', 1);
495 }
496
497 // Confirmation of action xxxx
498 if ($action == 'setdraft') {
499 $text = $langs->trans('ConfirmSetToDraft', $object->ref);
500
501 $formquestion = array();
502 $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('SetToDraft'), $text, 'confirm_setdraft', $formquestion, 0, 1, 220);
503 }
504
505 // Call Hook formConfirm
506 $parameters = array('formConfirm' => $formconfirm, 'lineid' => $lineid);
507 $reshook = $hookmanager->executeHooks('formConfirm', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
508 if (empty($reshook)) {
509 $formconfirm .= $hookmanager->resPrint;
510 } elseif ($reshook > 0) {
511 $formconfirm = $hookmanager->resPrint;
512 }
513
514 // Print form confirm
515 print $formconfirm;
516
517
518 // Object card
519 // ------------------------------------------------------------
520 $linkback = '<a href="'.DOL_URL_ROOT.'/bom/bom_list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
521
522 $morehtmlref = '<div class="refidno">';
523 /*
524 // Ref bis
525 $morehtmlref.=$form->editfieldkey("RefBis", 'ref_client', $object->ref_client, $object, $user->hasRight('bom', 'creer'), 'string', '', 0, 1);
526 $morehtmlref.=$form->editfieldval("RefBis", 'ref_client', $object->ref_client, $object, $user->hasRight('bom', 'creer'), 'string', '', null, null, '', 1);
527 // Thirdparty
528 $morehtmlref.='<br>'.$langs->trans('ThirdParty') . ' : ' . $soc->getNomUrl(1);
529 // Project
530 if (isModEnabled('project'))
531 {
532 $langs->load("projects");
533 $morehtmlref.='<br>'.$langs->trans('Project') . ' ';
534 if ($permissiontoadd)
535 {
536 if ($action != 'classify')
537 $morehtmlref.='<a class="editfielda" href="' . $_SERVER['PHP_SELF'] . '?action=classify&token='.newToken().'&id=' . $object->id . '">' . img_edit($langs->transnoentitiesnoconv('SetProject')) . '</a> : ';
538 if ($action == 'classify') {
539 //$morehtmlref.=$form->form_project($_SERVER['PHP_SELF'] . '?id=' . $object->id, $object->socid, $object->fk_project, 'projectid', 0, 0, 1, 1);
540 $morehtmlref.='<form method="post" action="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'">';
541 $morehtmlref.='<input type="hidden" name="action" value="classin">';
542 $morehtmlref.='<input type="hidden" name="token" value="'.newToken().'">';
543 $morehtmlref.=$formproject->select_projects($object->socid, $object->fk_project, 'projectid', 0, 0, 1, 0, 1, 0, 0, '', 1);
544 $morehtmlref.='<input type="submit" class="button valignmiddle" value="'.$langs->trans("Modify").'">';
545 $morehtmlref.='</form>';
546 } else {
547 $morehtmlref.=$form->form_project($_SERVER['PHP_SELF'] . '?id=' . $object->id, $object->socid, $object->fk_project, 'none', 0, 0, 0, 1);
548 }
549 } else {
550 if (! empty($object->fk_project)) {
551 $proj = new Project($db);
552 $proj->fetch($object->fk_project);
553 $morehtmlref.=$proj->getNomUrl();
554 } else {
555 $morehtmlref.='';
556 }
557 }
558 }
559 */
560 $morehtmlref .= '</div>';
561
562
563 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref);
564
565
566 print '<div class="fichecenter">';
567 print '<div class="fichehalfleft">';
568 print '<div class="underbanner clearboth"></div>';
569 print '<table class="border centpercent tableforfield">'."\n";
570
571 // Common attributes
572 $keyforbreak = 'duration';
573 include DOL_DOCUMENT_ROOT.'/core/tpl/commonfields_view.tpl.php';
574 $object->calculateCosts();
575 print '<tr><td>'.$form->textwithpicto($langs->trans("TotalCost"), $langs->trans("BOMTotalCost")).'</td><td><span class="amount">'.price($object->total_cost).'</span></td></tr>';
576 print '<tr><td>'.$langs->trans("UnitCost").'</td><td>'.price($object->unit_cost).'</td></tr>';
577
578 // Other attributes
579 include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_view.tpl.php';
580
581 print '</table>';
582 print '</div>';
583 print '</div>';
584
585 print '<div class="clearboth"></div>';
586
587 print dol_get_fiche_end();
588
589
590
591 /*
592 * Lines
593 */
594
595 if (!empty($object->table_element_line)) {
596 // Products
597
598 $res = $object->fetchLinesbytypeproduct(0); // Load all lines products into ->lines
599 $object->calculateCosts();
600
601 print ($res == 0 && $object->status >= $object::STATUS_VALIDATED) ? '' : load_fiche_titre($langs->trans('BOMProductsList'), '', 'product');
602
603 print ' <form name="addproduct" id="listbomproducts" action="' . $_SERVER["PHP_SELF"] . '?id=' . $object->id . '" method="POST">
604 <input type="hidden" name="token" value="' . newToken() . '">
605 <input type="hidden" name="action" value="' . (($action != 'editline') ? 'addline' : 'updateline') . '">
606 <input type="hidden" name="mode" value="">
607 <input type="hidden" name="page_y" value="">
608 <input type="hidden" name="id" value="' . $object->id . '">
609 ';
610
611 if (!empty($conf->use_javascript_ajax) && $object->status == 0) {
612 include DOL_DOCUMENT_ROOT.'/core/tpl/ajaxrow.tpl.php';
613 }
614
615 print '<div class="div-table-responsive-no-min">';
616 if (!empty($object->lines) || ($object->status == $object::STATUS_DRAFT && $permissiontoadd && $action != 'selectlines' && $action != 'editline')) {
617 print '<table id="tablelines" class="noborder noshadow centpercent">';
618 }
619
620 if (!empty($object->lines)) {
621 $object->printObjectLines($action, $mysoc, null, GETPOSTINT('lineid'), 1, '/bom/tpl');
622 }
623
624 // Form to add new line
625 if ($object->status == 0 && $permissiontoadd && $action != 'selectlines') {
626 if ($action != 'editline') {
627 // Add products/services form
628
629
630 $parameters = array();
631 $reshook = $hookmanager->executeHooks('formAddObjectLine', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
632 if ($reshook < 0) {
633 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
634 }
635 if (empty($reshook)) {
636 $object->formAddObjectLine(1, $mysoc, null, '/bom/tpl');
637 }
638 }
639 }
640
641 if (!empty($object->lines) || ($object->status == $object::STATUS_DRAFT && $permissiontoadd && $action != 'selectlines' && $action != 'editline')) {
642 print '</table>';
643 }
644 print '</div>';
645
646 print "</form>\n";
647
648
649 // Services
650
651 $filtertype = 1;
652 $res = $object->fetchLinesbytypeproduct(1); // Load all lines services into ->lines
653 $object->calculateCosts();
654
655 print ($res == 0 && $object->status >= $object::STATUS_VALIDATED) ? '' : load_fiche_titre($langs->trans('BOMServicesList'), '', 'service');
656
657 print ' <form name="addservice" id="listbomservices" action="' . $_SERVER["PHP_SELF"] . '?id=' . $object->id . '" method="POST">
658 <input type="hidden" name="token" value="' . newToken() . '">
659 <input type="hidden" name="action" value="' . (($action != 'editline') ? 'addline' : 'updateline') . '">
660 <input type="hidden" name="mode" value="">
661 <input type="hidden" name="page_y" value=""> <input type="hidden" name="id" value="' . $object->id . '">
662 ';
663
664 if (!empty($conf->use_javascript_ajax) && $object->status == 0) {
665 $tagidfortablednd = 'tablelinesservice';
666 include DOL_DOCUMENT_ROOT . '/core/tpl/ajaxrow.tpl.php';
667 }
668
669 print '<div class="div-table-responsive-no-min">';
670 if (!empty($object->lines) || ($object->status == $object::STATUS_DRAFT && $permissiontoadd && $action != 'selectlines' && $action != 'editline')) {
671 print '<table id="tablelinesservice" class="noborder noshadow centpercent">';
672 }
673
674 if (!empty($object->lines)) {
675 $object->printObjectLines($action, $mysoc, null, GETPOSTINT('lineid'), 1, '/bom/tpl');
676 }
677
678 // Form to add new line
679 if ($object->status == 0 && $permissiontoadd && $action != 'selectlines') {
680 if ($action != 'editline') {
681 // Add services form
682 $parameters = array();
683 $reshook = $hookmanager->executeHooks('formAddObjectServiceLine', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
684 if ($reshook < 0) {
685 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
686 }
687 if (empty($reshook)) {
688 $object->formAddObjectLine(1, $mysoc, null, '/bom/tpl');
689 }
690 }
691 }
692 }
693
694 if (!empty($object->lines) || ($object->status == $object::STATUS_DRAFT && $permissiontoadd && $action != 'selectlines' && $action != 'editline')) {
695 print '</table>';
696 }
697 print '</div>';
698
699 print "</form>\n";
700
701
703
704
705 $res = $object->fetchLines();
706
707 // Buttons for actions
708
709 if ($action != 'presend' && $action != 'editline') {
710 print '<div class="tabsAction">'."\n";
711 $parameters = array();
712 $reshook = $hookmanager->executeHooks('addMoreActionsButtons', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
713 if ($reshook < 0) {
714 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
715 }
716
717 if (empty($reshook)) {
718 // Send
719 //if (empty($user->socid)) {
720 // print '<a class="butAction" href="' . $_SERVER["PHP_SELF"] . '?id=' . $object->id . '&action=presend&mode=init#formmailbeforetitle">' . $langs->trans('SendMail') . '</a>'."\n";
721 //}
722
723 // Back to draft
724 if ($object->status == $object::STATUS_VALIDATED) {
725 if ($permissiontoadd) {
726 print '<a class="butAction" href="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'&action=setdraft&token='.newToken().'">'.$langs->trans("SetToDraft").'</a>'."\n";
727 }
728 }
729
730 // Modify
731 if ($object->status == $object::STATUS_DRAFT) {
732 if ($permissiontoadd) {
733 print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=edit&token='.newToken().'">'.$langs->trans("Modify").'</a>'."\n";
734 } else {
735 print '<a class="butActionRefused classfortooltip" href="#" title="'.dol_escape_htmltag($langs->trans("NotEnoughPermissions")).'">'.$langs->trans('Modify').'</a>'."\n";
736 }
737 }
738
739 // Validate
740 if ($object->status == $object::STATUS_DRAFT) {
741 if ($permissiontoadd) {
742 if (is_array($object->lines) && count($object->lines) > 0) {
743 print '<a class="butAction" href="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'&amp;action=validate&amp;token='.newToken().'">'.$langs->trans("Validate").'</a>'."\n";
744 } else {
745 $langs->load("errors");
746 print '<a class="butActionRefused classfortooltip" href="" title="'.$langs->trans("ErrorAddAtLeastOneLineFirst").'">'.$langs->trans("Validate").'</a>'."\n";
747 }
748 }
749 }
750
751 // Re-open
752 if ($permissiontoadd && $object->status == $object::STATUS_CANCELED) {
753 print '<a class="butAction" href="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'&action=reopen&token='.newToken().'">'.$langs->trans("ReOpen").'</a>'."\n";
754 }
755
756 // Create MO
757 if (isModEnabled('mrp')) {
758 if ($object->status == $object::STATUS_VALIDATED && $user->hasRight('mrp', 'write')) {
759 print '<a class="butAction" href="'.DOL_URL_ROOT.'/mrp/mo_card.php?action=create&fk_bom='.$object->id.'&token='.newToken().'&backtopageforcancel='.urlencode($_SERVER["PHP_SELF"].'?id='.$object->id).'">'.$langs->trans("CreateMO").'</a>'."\n";
760 }
761 }
762
763 // Clone
764 if ($permissiontoadd) {
765 print dolGetButtonAction($langs->trans("ToClone"), '', 'default', $_SERVER['PHP_SELF'].'?id='.$object->id.(!empty($object->socid) ? '&socid='.$object->socid : "").'&action=clone&object=bom', 'clone', $permissiontoadd);
766 }
767
768 // Close / Cancel
769 if ($permissiontoadd && $object->status == $object::STATUS_VALIDATED) {
770 print '<a class="butActionDelete" href="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'&action=close&token='.newToken().'">'.$langs->trans("Disable").'</a>'."\n";
771 }
772
773 /*
774 if ($user->hasRight('bom', 'write')) {
775 if ($object->status == 1) {
776 print '<a class="butActionDelete" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=disable&token='.newToken().'">'.$langs->trans("Disable").'</a>'."\n";
777 } else {
778 print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=enable&token='.newToken().'">'.$langs->trans("Enable").'</a>'."\n";
779 }
780 }
781 */
782
783 // Delete
784 print dolGetButtonAction($langs->trans("Delete"), '', 'delete', $_SERVER["PHP_SELF"].'?id='.$object->id.'&action=delete&token='.newToken(), 'delete', $permissiontodelete);
785 }
786 print '</div>'."\n";
787 }
788
789
790 // Select mail models is same action as presend
791 if (GETPOST('modelselected')) {
792 $action = 'presend';
793 }
794
795 if ($action != 'presend') {
796 print '<div class="fichecenter"><div class="fichehalfleft">';
797 print '<a name="builddoc"></a>'; // ancre
798
799 // Documents
800 $objref = dol_sanitizeFileName($object->ref);
801 $relativepath = $objref.'/'.$objref.'.pdf';
802 $filedir = $conf->bom->dir_output.'/'.$objref;
803 $urlsource = $_SERVER["PHP_SELF"]."?id=".$object->id;
804 $genallowed = $user->hasRight('bom', 'read'); // If you can read, you can build the PDF to read content
805 $delallowed = $user->hasRight('bom', 'write'); // If you can create/edit, you can remove a file on card
806 print $formfile->showdocuments('bom', $objref, $filedir, $urlsource, $genallowed, $delallowed, $object->model_pdf, 1, 0, 0, 28, 0, '', '', '', $langs->defaultlang);
807
808 // Show links to link elements
809 $tmparray = $form->showLinkToObjectBlock($object, array(), array('bom'), 1);
810 $linktoelem = $tmparray['linktoelem'];
811 $htmltoenteralink = $tmparray['htmltoenteralink'];
812 print $htmltoenteralink;
813
814 $somethingshown = $form->showLinkedObjectBlock($object, $linktoelem);
815
816
817 print '</div><div class="fichehalfright">';
818
819 $MAXEVENT = 10;
820
821 $morehtmlcenter = dolGetButtonTitle($langs->trans('SeeAll'), '', 'fa fa-bars imgforviewmode', DOL_URL_ROOT.'/bom/bom_agenda.php?id='.$object->id);
822
823 // List of actions on element
824 include_once DOL_DOCUMENT_ROOT.'/core/class/html.formactions.class.php';
825 $formactions = new FormActions($db);
826 $somethingshown = $formactions->showactions($object, $object->element, 0, 1, '', $MAXEVENT, '', $morehtmlcenter);
827
828 print '</div></div>';
829 }
830
831 //Select mail models is same action as presend
832 if (GETPOST('modelselected')) {
833 $action = 'presend';
834 }
835
836 // Presend form
837 $modelmail = 'bom';
838 $defaulttopic = 'InformationMessage';
839 $diroutput = $conf->bom->dir_output;
840 $trackid = 'bom'.$object->id;
841
842 include DOL_DOCUMENT_ROOT.'/core/tpl/card_presend.tpl.php';
843}
844
845
846// End of page
847llxFooter();
848$db->close();
$id
Definition account.php:39
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:58
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.
Definition wrapper.php:70
mrpCollapseBomManagement()
Manage collapse bom display.
Definition bom.lib.php:153
bomPrepareHead($object)
Prepare array of tabs for BillOfMaterials.
Definition bom.lib.php:79
Class for BOM.
Definition bom.class.php:45
Class for BOMLine.
Class to manage standard extra fields.
Class to manage building of HTML components.
Class to offer components to list and upload files.
Class to manage generation of HTML components Only common components must be here.
Class to manage products or services.
const TYPE_SERVICE
Service.
llxFooter()
Footer empty.
Definition document.php:107
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
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.
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
dolGetButtonTitle($label, $helpText='', $iconClass='fa fa-file', $url='', $id='', $status=1, $params=array())
Function dolGetButtonTitle : this kind of buttons are used in title in list.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
price($amount, $form=0, $outlangs='', $trunc=1, $rounding=-1, $forcerounding=-1, $currency_code='')
Function to format a value into an amount for visual output Function used into PDF and HTML pages.
newToken()
Return the value of token currently saved into session with name 'newtoken'.
dolGetButtonAction($label, $text='', $actionType='default', $url='', $id='', $userRight=1, $params=array())
Function dolGetButtonAction.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
dol_sanitizeFileName($str, $newstr='_', $unaccent=1)
Clean a string to use it as a file name.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
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.