Print Links uses def_print_orientation value.
[fa-stable.git] / manufacturing / work_order_entry.php
1 <?php
2 /**********************************************************************
3     Copyright (C) FrontAccounting, LLC.
4         Released under the terms of the GNU General Public License, GPL, 
5         as published by the Free Software Foundation, either version 3 
6         of the License, or (at your option) any later version.
7     This program is distributed in the hope that it will be useful,
8     but WITHOUT ANY WARRANTY; without even the implied warranty of
9     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
10     See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
11 ***********************************************************************/
12 $page_security = 'SA_WORKORDERENTRY';
13 $path_to_root = "..";
14
15 include_once($path_to_root . "/includes/session.inc");
16
17 include_once($path_to_root . "/includes/date_functions.inc");
18 include_once($path_to_root . "/includes/manufacturing.inc");
19 include_once($path_to_root . "/includes/data_checks.inc");
20
21 include_once($path_to_root . "/manufacturing/includes/manufacturing_db.inc");
22 include_once($path_to_root . "/manufacturing/includes/manufacturing_ui.inc");
23
24 $js = "";
25 if ($use_popup_windows)
26         $js .= get_js_open_window(900, 500);
27 if ($use_date_picker)
28         $js .= get_js_date_picker();
29 page(_($help_context = "Work Order Entry"), false, false, "", $js);
30
31
32 check_db_has_manufacturable_items(_("There are no manufacturable items defined in the system."));
33
34 check_db_has_locations(("There are no inventory locations defined in the system."));
35
36 //---------------------------------------------------------------------------------------
37
38 if (isset($_GET['trans_no']))
39 {
40         $selected_id = $_GET['trans_no'];
41 }
42 elseif(isset($_POST['selected_id']))
43 {
44         $selected_id = $_POST['selected_id'];
45 }
46
47 //---------------------------------------------------------------------------------------
48
49 if (isset($_GET['AddedID']))
50 {
51         $id = $_GET['AddedID'];
52         $stype = ST_WORKORDER;
53
54         display_notification_centered(_("The work order been added."));
55
56     display_note(get_trans_view_str($stype, $id, _("View this Work Order")), 0, 1);
57
58         if ($_GET['type'] != WO_ADVANCED)
59         {
60                 include_once($path_to_root . "/reporting/includes/reporting.inc");
61                 
62                 submenu_print(_("&Print This Work Order"), ST_WORKORDER, $id, 'prtopt');
63                 submenu_print(_("&Email This Work Order"), ST_WORKORDER, $id, null, 1);
64         display_note(get_gl_view_str($stype, $id, _("View the GL Journal Entries for this Work Order")));
65         $ar = array('PARAM_0' => $_GET['date'], 'PARAM_1' => $_GET['date'], 'PARAM_2' => $stype); 
66         display_note(print_link(_("Print the GL Journal Entries for this Work Order"), 702, $ar), 1);
67                 hyperlink_params("$path_to_root/admin/attachments.php", _("Add an Attachment"), "filterType=$stype&trans_no=$id");
68         }
69         
70         safe_exit();
71 }
72
73 //---------------------------------------------------------------------------------------
74
75 if (isset($_GET['UpdatedID']))
76 {
77         $id = $_GET['UpdatedID'];
78
79         display_notification_centered(_("The work order been updated."));
80         safe_exit();
81 }
82
83 //---------------------------------------------------------------------------------------
84
85 if (isset($_GET['DeletedID']))
86 {
87         $id = $_GET['DeletedID'];
88
89         display_notification_centered(_("Work order has been deleted."));
90         safe_exit();
91 }
92
93 //---------------------------------------------------------------------------------------
94
95 if (isset($_GET['ClosedID']))
96 {
97         $id = $_GET['ClosedID'];
98
99         display_notification_centered(_("This work order has been closed. There can be no more issues against it.") . " #$id");
100         safe_exit();
101 }
102
103 //---------------------------------------------------------------------------------------
104
105 function safe_exit()
106 {
107         global $path_to_root;
108
109         hyperlink_no_params("", _("Enter a new work order"));
110         hyperlink_no_params("search_work_orders.php", _("Select an existing work order"));
111         
112         display_footer_exit();
113 }
114
115 //-------------------------------------------------------------------------------------
116 if (!isset($_POST['date_']))
117 {
118         $_POST['date_'] = new_doc_date();
119         if (!is_date_in_fiscalyear($_POST['date_']))
120                 $_POST['date_'] = end_fiscalyear();
121 }
122
123 function can_process()
124 {
125         global $selected_id, $SysPrefs, $Refs;
126
127         if (!isset($selected_id))
128         {
129         if (!$Refs->is_valid($_POST['wo_ref']))
130         {
131                 display_error(_("You must enter a reference."));
132                         set_focus('wo_ref');
133                 return false;
134         }
135
136         if (!is_new_reference($_POST['wo_ref'], ST_WORKORDER))
137         {
138                 display_error(_("The entered reference is already in use."));
139                         set_focus('wo_ref');
140                 return false;
141         }
142         }
143
144         if (!check_num('quantity', 0))
145         {
146                 display_error( _("The quantity entered is invalid or less than zero."));
147                 set_focus('quantity');
148                 return false;
149         }
150
151         if (!is_date($_POST['date_']))
152         {
153                 display_error( _("The date entered is in an invalid format."));
154                 set_focus('date_');
155                 return false;
156         }
157         elseif (!is_date_in_fiscalyear($_POST['date_']))
158         {
159                 display_error(_("The entered date is out of fiscal year or is closed for further data entry."));
160                 set_focus('date_');
161                 return false;
162         }
163         // only check bom and quantites if quick assembly
164         if (!($_POST['type'] == WO_ADVANCED))
165         {
166         if (!has_bom($_POST['stock_id']))
167         {
168                 display_error(_("The selected item to manufacture does not have a bom."));
169                         set_focus('stock_id');
170                 return false;
171         }
172
173                 if ($_POST['Labour'] == "")
174                         $_POST['Labour'] = price_format(0);
175         if (!check_num('Labour', 0))
176         {
177                 display_error( _("The labour cost entered is invalid or less than zero."));
178                         set_focus('Labour');
179                 return false;
180         }
181                 if ($_POST['Costs'] == "")
182                         $_POST['Costs'] = price_format(0);
183         if (!check_num('Costs', 0))
184         {
185                 display_error( _("The cost entered is invalid or less than zero."));
186                         set_focus('Costs');
187                 return false;
188         }
189
190         if (!$SysPrefs->allow_negative_stock())
191         {
192                 if ($_POST['type'] == WO_ASSEMBLY)
193                 {
194                         // check bom if assembling
195                 $result = get_bom($_POST['stock_id']);
196
197                 while ($bom_item = db_fetch($result))
198                 {
199
200                         if (has_stock_holding($bom_item["ResourceType"]))
201                         {
202
203                                 $quantity = $bom_item["quantity"] * input_num('quantity');
204
205                         $qoh = get_qoh_on_date($bom_item["component"], $bom_item["loc_code"], $_POST['date_']);
206                                 if (-$quantity + $qoh < 0)
207                                 {
208                                         display_error(_("The work order cannot be processed because there is an insufficient quantity for component:") .
209                                                 " " . $bom_item["component"] . " - " .  $bom_item["description"] . ".  " . _("Location:") . " " . $bom_item["location_name"]);
210                                                         set_focus('quantity');
211                                                 return false;
212                                 }
213                         }
214                 }
215                 }
216                 elseif ($_POST['type'] == WO_UNASSEMBLY)
217                 {
218                         // if unassembling, check item to unassemble
219                                 $qoh = get_qoh_on_date($_POST['stock_id'], $_POST['StockLocation'], $_POST['date_']);
220                         if (-input_num('quantity') + $qoh < 0)
221                         {
222                                 display_error(_("The selected item cannot be unassembled because there is insufficient stock."));
223                                         return false;
224                         }
225                 }
226         }
227      }
228      else
229      {
230         if (!is_date($_POST['RequDate']))
231         {
232                         set_focus('RequDate');
233                 display_error( _("The date entered is in an invalid format."));
234                 return false;
235                 }
236                 //elseif (!is_date_in_fiscalyear($_POST['RequDate']))
237                 //{
238                 //  display_error(_("The entered date is out of fiscal year or is closed for further data entry."));
239                 //      return false;
240                 //}
241         if (isset($selected_id))
242         {
243                 $myrow = get_work_order($selected_id, true);
244
245                 if ($_POST['units_issued'] > input_num('quantity'))
246                 {
247                                 set_focus('quantity');
248                         display_error(_("The quantity cannot be changed to be less than the quantity already manufactured for this order."));
249                         return false;
250                 }
251         }
252         }
253
254         return true;
255 }
256
257 //-------------------------------------------------------------------------------------
258
259 if (isset($_POST['ADD_ITEM']) && can_process())
260 {
261         if (!isset($_POST['cr_acc']))
262                 $_POST['cr_acc'] = "";
263         if (!isset($_POST['cr_lab_acc']))
264                 $_POST['cr_lab_acc'] = "";
265         $id = add_work_order($_POST['wo_ref'], $_POST['StockLocation'], input_num('quantity'),
266                 $_POST['stock_id'],  $_POST['type'], $_POST['date_'],
267                 $_POST['RequDate'], $_POST['memo_'], input_num('Costs'), $_POST['cr_acc'], input_num('Labour'), $_POST['cr_lab_acc']);
268
269         new_doc_date($_POST['date_']);
270         meta_forward($_SERVER['PHP_SELF'], "AddedID=$id&type=".$_POST['type']."&date=".$_POST['date_']);
271 }
272
273 //-------------------------------------------------------------------------------------
274
275 if (isset($_POST['UPDATE_ITEM']) && can_process())
276 {
277
278         update_work_order($selected_id, $_POST['StockLocation'], input_num('quantity'),
279                 $_POST['stock_id'],  $_POST['date_'], $_POST['RequDate'], $_POST['memo_']);
280         new_doc_date($_POST['date_']);
281         meta_forward($_SERVER['PHP_SELF'], "UpdatedID=$selected_id");
282 }
283
284 //--------------------------------------------------------------------------------------
285
286 if (isset($_POST['delete']))
287 {
288         //the link to delete a selected record was clicked instead of the submit button
289
290         $cancel_delete = false;
291
292         // can't delete it there are productions or issues
293         if (work_order_has_productions($selected_id) ||
294                 work_order_has_issues($selected_id)     ||
295                 work_order_has_payments($selected_id))
296         {
297                 display_error(_("This work order cannot be deleted because it has already been processed."));
298                 $cancel_delete = true;
299         }
300
301         if ($cancel_delete == false)
302         { //ie not cancelled the delete as a result of above tests
303
304                 // delete the actual work order
305                 delete_work_order($selected_id);
306                 meta_forward($_SERVER['PHP_SELF'], "DeletedID=$selected_id");
307         }
308 }
309
310 //-------------------------------------------------------------------------------------
311
312 if (isset($_POST['close']))
313 {
314
315         // update the closed flag in the work order
316         close_work_order($selected_id);
317         meta_forward($_SERVER['PHP_SELF'], "ClosedID=$selected_id");
318 }
319
320 //-------------------------------------------------------------------------------------
321 if (get_post('_type_update')) 
322 {
323   $Ajax->activate('_page_body');
324 }
325 //-------------------------------------------------------------------------------------
326
327 start_form();
328
329 start_table(TABLESTYLE2);
330
331 $existing_comments = "";
332
333 $dec = 0;
334 if (isset($selected_id))
335 {
336         $myrow = get_work_order($selected_id);
337
338         if (strlen($myrow[0]) == 0)
339         {
340                 echo _("The order number sent is not valid.");
341                 safe_exit();
342         }
343
344         // if it's a closed work order can't edit it
345         if ($myrow["closed"] == 1)
346         {
347                 echo "<center>";
348                 display_error(_("This work order is closed and cannot be edited."));
349                 safe_exit();
350         }
351
352         $_POST['wo_ref'] = $myrow["wo_ref"];
353         $_POST['stock_id'] = $myrow["stock_id"];
354         //$_POST['quantity'] = qty_format($myrow["units_reqd"], $_POST['stock_id'], $dec);
355         $_POST['quantity'] = $myrow["units_reqd"];
356         $_POST['StockLocation'] = $myrow["loc_code"];
357         $_POST['released'] = $myrow["released"];
358         $_POST['closed'] = $myrow["closed"];
359         $_POST['type'] = $myrow["type"];
360         $_POST['date_'] = sql2date($myrow["date_"]);
361         $_POST['RequDate'] = sql2date($myrow["required_by"]);
362         $_POST['released_date'] = sql2date($myrow["released_date"]);
363         $_POST['memo_'] = "";
364         $_POST['units_issued'] = $myrow["units_issued"];
365         $_POST['Costs'] = price_format($myrow["additional_costs"]);
366
367         $_POST['memo_'] = get_comments_string(ST_WORKORDER, $selected_id);
368
369         hidden('wo_ref', $_POST['wo_ref']);
370         hidden('units_issued', $_POST['units_issued']);
371         hidden('released', $_POST['released']);
372         hidden('released_date', $_POST['released_date']);
373         hidden('selected_id',  $selected_id);
374         hidden('old_qty', $myrow["units_reqd"]);
375         hidden('old_stk_id', $myrow["stock_id"]);
376
377         label_row(_("Reference:"), $_POST['wo_ref']);
378         label_row(_("Type:"), $wo_types_array[$_POST['type']]);
379         hidden('type', $myrow["type"]);
380 }
381 else
382 {
383         $_POST['units_issued'] = $_POST['released'] = 0;
384         ref_row(_("Reference:"), 'wo_ref', '', $Refs->get_next(ST_WORKORDER));
385
386         wo_types_list_row(_("Type:"), 'type', null);
387 }
388
389 if (get_post('released'))
390 {
391         hidden('stock_id', $_POST['stock_id']);
392         hidden('StockLocation', $_POST['StockLocation']);
393         hidden('type', $_POST['type']);
394
395         label_row(_("Item:"), $myrow["StockItemName"]);
396         label_row(_("Destination Location:"), $myrow["location_name"]);
397 }
398 else
399 {
400         stock_manufactured_items_list_row(_("Item:"), 'stock_id', null, false, true);
401         if (list_updated('stock_id'))
402                 $Ajax->activate('quantity');
403
404         locations_list_row(_("Destination Location:"), 'StockLocation', null);
405 }
406
407 if (!isset($_POST['quantity']))
408         $_POST['quantity'] = qty_format(1, $_POST['stock_id'], $dec);
409 else
410         $_POST['quantity'] = qty_format($_POST['quantity'], $_POST['stock_id'], $dec);
411         
412
413 if (get_post('type') == WO_ADVANCED)
414 {
415     qty_row(_("Quantity Required:"), 'quantity', null, null, null, $dec);
416     if ($_POST['released'])
417         label_row(_("Quantity Manufactured:"), number_format($_POST['units_issued'], get_qty_dec($_POST['stock_id'])));
418     date_row(_("Date") . ":", 'date_', '', true);
419         date_row(_("Date Required By") . ":", 'RequDate', '', null, $SysPrefs->default_wo_required_by());
420 }
421 else
422 {
423     qty_row(_("Quantity:"), 'quantity', null, null, null, $dec);
424     date_row(_("Date") . ":", 'date_', '', true);
425         hidden('RequDate', '');
426
427         $sql = "SELECT DISTINCT account_code FROM ".TB_PREF."bank_accounts";
428         $rs = db_query($sql,"could not get bank accounts");
429         $r = db_fetch_row($rs);
430         if (!isset($_POST['Labour']))
431         {
432                 $_POST['Labour'] = price_format(0);
433                 $_POST['cr_lab_acc'] = $r[0];
434         }
435         amount_row($wo_cost_types[WO_LABOUR], 'Labour');
436         gl_all_accounts_list_row(_("Credit Labour Account"), 'cr_lab_acc', null);
437         if (!isset($_POST['Costs']))
438         {
439                 $_POST['Costs'] = price_format(0);
440                 $_POST['cr_acc'] = $r[0];
441         }
442         amount_row($wo_cost_types[WO_OVERHEAD], 'Costs');
443         gl_all_accounts_list_row(_("Credit Overhead Account"), 'cr_acc', null);
444         
445 }
446
447 if (get_post('released'))
448         label_row(_("Released On:"),$_POST['released_date']);
449
450 textarea_row(_("Memo:"), 'memo_', null, 40, 5);
451
452 end_table(1);
453
454 if (isset($selected_id))
455 {
456         echo "<table align=center><tr>";
457
458         submit_cells('UPDATE_ITEM', _("Update"), '', _('Save changes to work order'), 'default');
459         if (get_post('released'))
460         {
461                 submit_cells('close', _("Close This Work Order"),'','',true);
462         }
463         submit_cells('delete', _("Delete This Work Order"),'','',true);
464
465         echo "</tr></table>";
466 }
467 else
468 {
469         submit_center('ADD_ITEM', _("Add Workorder"), true, '', 'default');
470 }
471
472 end_form();
473 end_page();
474
475 ?>