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_MANUFRECEIVE';
14 include_once($path_to_root . "/includes/session.inc");
16 include_once($path_to_root . "/includes/date_functions.inc");
17 include_once($path_to_root . "/gl/includes/db/gl_db_bank_trans.inc");
18 include_once($path_to_root . "/includes/db/inventory_db.inc");
19 include_once($path_to_root . "/includes/manufacturing.inc");
21 include_once($path_to_root . "/manufacturing/includes/manufacturing_db.inc");
22 include_once($path_to_root . "/manufacturing/includes/manufacturing_ui.inc");
25 if ($use_popup_windows)
26 $js .= get_js_open_window(900, 500);
28 $js .= get_js_date_picker();
29 page(_("Produce or Unassemble Finished Items From Work Order"), false, false, "", $js);
31 if (isset($_GET['trans_no']) && $_GET['trans_no'] != "")
33 $_POST['selected_id'] = $_GET['trans_no'];
36 //--------------------------------------------------------------------------------------------------
38 if (isset($_GET['AddedID']))
40 include_once($path_to_root . "/reporting/includes/reporting.inc");
41 $id = $_GET['AddedID'];
42 $stype = systypes::work_order();
44 display_notification(_("The manufacturing process has been entered."));
46 display_note(get_trans_view_str($stype, $id, _("View this Work Order")));
48 display_note(get_gl_view_str($stype, $id, _("View the GL Journal Entries for this Work Order")), 1);
49 $ar = array('PARAM_0' => $_GET['date'], 'PARAM_1' => $_GET['date'], 'PARAM_2' => $stype);
50 display_note(print_link(_("Print the GL Journal Entries for this Work Order"), 702, $ar), 1);
52 hyperlink_no_params("search_work_orders.php", _("Select another &Work Order to Process"));
58 //--------------------------------------------------------------------------------------------------
60 $wo_details = get_work_order($_POST['selected_id']);
62 if (strlen($wo_details[0]) == 0)
64 display_error(_("The order number sent is not valid."));
68 //--------------------------------------------------------------------------------------------------
70 function can_process()
74 if (!references::is_valid($_POST['ref']))
76 display_error(_("You must enter a reference."));
81 if (!is_new_reference($_POST['ref'], 29))
83 display_error(_("The entered reference is already in use."));
88 if (!check_num('quantity', 0))
90 display_error(_("The quantity entered is not a valid number or less then zero."));
91 set_focus('quantity');
95 if (!is_date($_POST['date_']))
97 display_error(_("The entered date is invalid."));
101 elseif (!is_date_in_fiscalyear($_POST['date_']))
103 display_error(_("The entered date is not in fiscal year."));
107 if (date_diff2(sql2date($wo_details["released_date"]), $_POST['date_'], "d") > 0)
109 display_error(_("The production date cannot be before the release date of the work order."));
114 // if unassembling we need to check the qoh
115 if (($_POST['ProductionType'] == 0) && !sys_prefs::allow_negative_stock())
117 $wo_details = get_work_order($_POST['selected_id']);
119 $qoh = get_qoh_on_date($wo_details["stock_id"], $wo_details["loc_code"], $_POST['date_']);
120 if (-$_POST['quantity'] + $qoh < 0)
122 display_error(_("The unassembling cannot be processed because there is insufficient stock."));
123 set_focus('quantity');
128 // if production we need to check the qoh of the wo requirements
129 if (($_POST['ProductionType'] == 1) && !sys_prefs::allow_negative_stock())
132 $result = get_wo_requirements($_POST['selected_id']);
133 while ($row = db_fetch($result))
135 if ($row['mb_flag'] == 'D') // service, non stock
137 $qoh = get_qoh_on_date($row["stock_id"], $row["loc_code"], $_POST['date_']);
138 if ($qoh - $row['units_req'] * $_POST['quantity'] < 0)
140 display_error( _("The production cannot be processed because a required item would cause a negative inventory balance :") .
141 " " . $row['stock_id'] . " - " . $row['description']);
147 set_focus('quantity');
154 //--------------------------------------------------------------------------------------------------
156 if ((isset($_POST['Process']) || isset($_POST['ProcessAndClose'])) && can_process() == true)
160 if (isset($_POST['ProcessAndClose']) && ($_POST['ProcessAndClose']!=""))
163 // if unassembling, negate quantity
164 if ($_POST['ProductionType'] == 0)
165 $_POST['quantity'] = -$_POST['quantity'];
167 $id = work_order_produce($_POST['selected_id'], $_POST['ref'], $_POST['quantity'],
168 $_POST['date_'], $_POST['memo_'], $close_wo);
170 meta_forward($_SERVER['PHP_SELF'], "AddedID=".$_POST['selected_id']."&date=".$_POST['date_']);
173 //-------------------------------------------------------------------------------------
175 display_wo_details($_POST['selected_id']);
177 //-------------------------------------------------------------------------------------
181 hidden('selected_id', $_POST['selected_id']);
182 //hidden('WOReqQuantity', $_POST['WOReqQuantity']);
184 if (!isset($_POST['quantity']) || $_POST['quantity'] == '')
186 $_POST['quantity'] = max($wo_details["units_reqd"] - $wo_details["units_issued"], 0);
189 start_table($table_style2);
192 ref_row(_("Reference:"), 'ref', '', references::get_next(29));
194 if (!isset($_POST['ProductionType']))
195 $_POST['ProductionType'] = 1;
197 yesno_list_row(_("Type:"), 'ProductionType', $_POST['ProductionType'],
198 _("Produce Finished Items"), _("Return Items to Work Order"));
200 small_qty_row(_("Quantity:"), 'quantity', null, null, null, get_qty_dec($wo_details["stock_id"]));
202 date_row(_("Date:"), 'date_');
204 textarea_row(_("Memo:"), 'memo_', null, 40, 3);
208 submit_center_first('Process', _("Process"), '', 'default');
209 submit_center_last('ProcessAndClose', _("Process And Close Order"), '', true);