manufacturing/includes/db/work_order_produce_items_db.inc

   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 function work_order_produce($woid, $ref, $quantity, $date_, $memo_, $close_wo)
  13 {
  14         global $Refs;
  15
  16         begin_transaction();
  17         $args = func_get_args();
  18         $args = (object)array_combine(array('woid', 'ref', 'quantity', 'date_', 'memo_','close_wo'),
  19                 $args);
  20         $args->trans_no = 0;
  21         hook_db_prewrite($args, ST_MANURECEIVE);
  22
  23         $details = get_work_order($woid);
  24
  25     if (strlen($details[0]) == 0)
  26     {
  27         echo _("The order number sent is not valid.");
  28         exit;
  29     }
  30
  31         if (work_order_is_closed($woid))
  32         {
  33                 display_error("UNEXPECTED : Producing Items for a closed Work Order");
  34                 cancel_transaction();
  35                 exit;
  36         }
  37
  38     $date = date2sql($date_);
  39
  40     $sql = "INSERT INTO ".TB_PREF."wo_manufacture (workorder_id, reference, quantity, date_)
  41                 VALUES (".db_escape($woid).", ".db_escape($ref).", ".db_escape($quantity)
  42                 .", '$date')";
  43
  44         db_query($sql,"A work order manufacture could not be added");
  45
  46         $id = db_insert_id();
  47
  48         // -------------------------------------------------------------------------
  49
  50         work_order_quick_costs($woid, $details["stock_id"], $quantity, $date_, $id);
  51         // -------------------------------------------------------------------------
  52
  53         // Stamp BOM cost to finished item
  54         $m_cost = 0;
  55     $result = get_bom($details["stock_id"]);
  56         while ($bom_item = db_fetch($result))
  57         {
  58                 $standard_cost = get_standard_cost($bom_item['component']);
  59                 $m_cost += ($bom_item['quantity'] * $standard_cost);
  60         }
  61
  62         // insert a +ve stock move for the item being manufactured
  63         // negative means "unproduce" or unassemble
  64         add_stock_move(ST_MANURECEIVE, $details["stock_id"], $id,
  65                 $details["loc_code"], $date_, $ref, $quantity, $m_cost);
  66         // update wo quantity and close wo if requested
  67         work_order_update_finished_quantity($woid, $quantity, $close_wo);
  68
  69         if ($memo_)
  70                 add_comments(ST_MANURECEIVE, $id, $date_, $memo_);
  71
  72         $Refs->save(ST_MANURECEIVE, $id, $ref);
  73         add_audit_trail(ST_MANURECEIVE, $id, $date_, _("Production."));
  74
  75         $args->trans_no = $id;
  76         hook_db_postwrite($args, ST_MANURECEIVE);
  77         commit_transaction();
  78 }
  79
  80 //--------------------------------------------------------------------------------------------
  81
  82 function get_work_order_produce($id)
  83 {
  84         $sql = "SELECT prod.*, wo.stock_id, item.description AS StockDescription
  85                         FROM ".TB_PREF."wo_manufacture prod,"
  86                                 .TB_PREF."workorders wo,"
  87                                 .TB_PREF."stock_master item
  88                 WHERE prod.workorder_id=wo.id
  89                 AND item.stock_id=wo.stock_id
  90                 AND prod.id=".db_escape($id);
  91     $result = db_query($sql, "The work order production could not be retrieved");
  92
  93     return db_fetch($result);
  94 }
  95
  96 //--------------------------------------------------------------------------------------
  97
  98 function get_work_order_productions($woid)
  99 {
 100         $sql = "SELECT * FROM ".TB_PREF."wo_manufacture WHERE workorder_id="
 101                 .db_escape($woid)." ORDER BY id";
 102     return db_query($sql, "The work order issues could not be retrieved");
 103 }
 104
 105 //--------------------------------------------------------------------------------------
 106
 107 function exists_work_order_produce($id)
 108 {
 109         $sql = "SELECT id FROM ".TB_PREF."wo_manufacture WHERE id=".db_escape($id);
 110         $result = db_query($sql, "Cannot retreive a wo production");
 111
 112     return (db_num_rows($result) > 0);
 113 }
 114
 115 //--------------------------------------------------------------------------------------------
 116
 117 function void_work_order_produce($type_no)
 118 {
 119         begin_transaction();
 120         hook_db_prevoid(ST_MANURECEIVE, $type_no);
 121
 122         // Skip processing already voided entry i.e. explicitly voided
 123         $void_entry = get_voided_entry(ST_MANURECEIVE, $type_no);
 124         if ($void_entry)
 125                 return;
 126
 127         $row = get_work_order_produce($type_no);
 128
 129         // deduct the quantity of this production from the parent work order
 130         work_order_update_finished_quantity($row["workorder_id"], -$row["quantity"]);
 131
 132         // void any related gl trans
 133
 134         $woid = $row["workorder_id"];
 135         $date_ = sql2date($row["date_"]);
 136
 137         $result = get_stock_moves(ST_MANURECEIVE, $type_no);
 138         while ($myrow = db_fetch($result))
 139         {
 140                 $issue_cost = $myrow["qty"]*$myrow["standard_cost"];
 141                 $issue = get_stock_gl_code($myrow["stock_id"]);
 142         $stockitem = get_item($myrow["stock_id"]);
 143
 144                 // Compatibility for Service Items
 145                 if (!is_service($issue["mb_flag"]))
 146                         $ivaccount = $issue["inventory_account"];
 147                 else
 148                         $ivaccount = $issue["cogs_account"];
 149
 150                 if ($issue_cost != 0)
 151                 {
 152                         add_gl_trans_std_cost(ST_WORKORDER, $woid, $date_, $ivaccount, 0, 0,
 153                                 $date_.": "._("Reversed the production ")." ".$stockitem["description"],
 154                                 -$issue_cost);
 155                 }
 156         }
 157         // clear the production record
 158         $sql = "UPDATE ".TB_PREF."wo_manufacture SET quantity=0 WHERE id=".db_escape($type_no);
 159         db_query($sql, "Cannot void a wo production");
 160
 161         // Shifted below
 162         // void all related stock moves
 163         void_stock_move(ST_MANURECEIVE, $type_no);
 164
 165         commit_transaction();
 166 }
 167
 168