Huge sales module changes toward delivery and invoicing separation. Includes some...
[fa-stable.git] / sales / includes / db / sales_delivery_db.inc
1 <?php
2
3 // $bo_policy = 0, cancel remaining quantities on order
4 // = 1, backorder remaining quantities 
5
6 function add_sales_delivery(&$delivery, $date_, $due_date, $sales_order, $tax_group_id, 
7         $charge_shipping, $location, $ship_via, $sales_type, $reference, $memo_, $bo_policy)
8 {
9         begin_transaction();
10         
11         $company_data = get_company_prefs();
12         
13         $branch_data = get_branch_accounts($delivery->Branch);  
14         
15         $delivery_items_total = $delivery->get_items_total_dispatch($tax_group_id);
16         
17     $tax_total = 0;
18     $taxes = $delivery->get_taxes($tax_group_id, $charge_shipping);
19     foreach ($taxes as $taxitem)
20         $tax_total +=  $taxitem['Value'];
21
22         /*Now insert the debtor_trans */
23     $delivery_no = add_customer_trans(13, $delivery->customer_id, $delivery->Branch, $date_, 
24                 $reference, $delivery_items_total, 0, $tax_total, $charge_shipping, 
25     $sales_type, $sales_order, 0, $ship_via, $due_date);
26         
27     // If balance of this delivery cancelled update sales order details quantity. 
28     foreach ($delivery->line_items as $delivery_line) 
29     {
30                         $line_taxfree_price = $delivery_line->taxfree_price($tax_group_id);
31                         /* add delivery details for _all_ lines */
32                         add_customer_trans_detail_item(13, $delivery_no, $delivery_line->stock_id,
33                                 $delivery_line->item_description, $location, $date_, 
34                                 -$delivery_line->qty_dispatched, $line_taxfree_price, 0,
35                                 $delivery_line->discount_percent, $reference, $delivery_line->standard_cost);
36
37                 if ($delivery_line->qty_dispatched != 0) 
38                 {
39                         // Now update sales_order_details for the quantity delivered 
40                         dispatch_sales_order_item($sales_order, $delivery_line->stock_id, 
41                                 $delivery_line->qty_dispatched, $delivery_line->id);
42                         
43                         $stock_gl_code = get_stock_gl_code($delivery_line->stock_id);
44
45                         /* insert gl_trans to credit stock and debit cost of sales at standard cost*/
46                         if ($delivery_line->standard_cost != 0)
47                         {
48
49                                 /*first the cost of sales entry*/
50                 add_gl_trans_std_cost(13, $delivery_no, $date_, $stock_gl_code["cogs_account"], 
51                         $stock_gl_code["dimension_id"], $stock_gl_code["dimension2_id"], "", 
52                         $delivery_line->standard_cost * $delivery_line->qty_dispatched, 
53                         payment_person_types::customer(), $delivery->customer_id, 
54                                         "The cost of sales GL posting could not be inserted");
55                                                                                 
56                                 /*now the stock entry*/
57                                 //$stock_gl_code = get_stock_gl_code($order_line->stock_id);
58                                 
59                 add_gl_trans_std_cost(13, $delivery_no, $date_, $stock_gl_code["inventory_account"], 0, 0, "", 
60                         (-$delivery_line->standard_cost * $delivery_line->qty_dispatched), 
61                         payment_person_types::customer(), $delivery->customer_id, 
62                                         "The stock side of the cost of sales GL posting could not be inserted");                                
63
64                         } /* end of if GL and stock integrated and standard cost !=0 */
65
66                 } /*quantity dispatched is more than 0 */
67         } /*end of order_line loop */
68
69         if ($bo_policy == 0)
70         {
71                 // if cancelling any remaining quantities
72                 close_sales_order($sales_order);
73         }
74     
75         add_comments(13, $delivery_no, $date_, $memo_);    
76         
77         add_forms_for_sys_type(13, $delivery_no, $location);
78         
79         references::save_last($reference, 13);  
80         
81         commit_transaction();   
82
83         return $delivery_no;
84 }
85
86 //--------------------------------------------------------------------------------------------------
87
88 function void_sales_delivery($type, $type_no)
89 {
90         begin_transaction();
91         
92         void_gl_trans($type, $type_no, true);
93         
94         // for invoices and credits related to invoices, 
95         // reverse all the changes in the sales order
96         $items_result = get_customer_trans_details($type, $type_no);
97         
98         $order = get_customer_trans_order($type, $type_no);
99         
100         if ($order) 
101         {
102                 while ($row = db_fetch($items_result))
103                 {
104                         dispatch_sales_order_item($order, $row["stock_id"], $row["quantity"]);
105                 }
106         }
107         
108         // clear details after they've been reversed in the sales order
109         void_customer_trans_details($type, $type_no);
110         
111         void_customer_trans_tax_details($type, $type_no);       
112         
113         void_cust_allocations($type, $type_no);
114         
115         // do this last because other voidings can depend on it
116         // DO NOT MOVE THIS ABOVE VOIDING or we can end up with trans with alloc < 0
117         void_customer_trans($type, $type_no);   
118         
119         commit_transaction();                   
120 }
121
122 //----------------------------------------------------------------------------------------
123
124 function get_sales_delivery($trans_no)
125 {
126         $sql = "SELECT ".TB_PREF."debtor_trans.*, cust_branch.*,
127         ".TB_PREF."debtors_master.name, 
128         ".TB_PREF."debtors_master.curr_code, 
129         ".TB_PREF."debtors_master.payment_terms, 
130         ".TB_PREF."debtors_master.discount, 
131         ".TB_PREF."sales_types.sales_type, 
132         ".TB_PREF."shippers.shipper_name,
133         ".TB_PREF."tax_groups.name AS tax_group_name , 
134         ".TB_PREF."tax_groups.id AS tax_group_id
135                 FROM ".TB_PREF."debtor_trans, 
136                         ".TB_PREF."debtors_master, 
137                         ".TB_PREF."sales_types, 
138                         ".TB_PREF."tax_groups, 
139                         ".TB_PREF."cust_branch, 
140                         ".TB_PREF."shippers
141                 WHERE   ".TB_PREF."debtor_trans.type=13
142                           AND ".TB_PREF."debtor_trans.tpe=".TB_PREF."sales_types.id
143                                 AND ".TB_PREF."cust_branch.branch_code = ".TB_PREF."debtor_trans.branch_code
144                                 AND ".TB_PREF."cust_branch.tax_group_id = ".TB_PREF."tax_groups.id
145                                 AND ".TB_PREF."debtor_trans.debtor_no = ".TB_PREF."debtors_master.debtor_no
146                           AND ".TB_PREF."shippers.shipper_id = ".TB_PREF."debtor_trans.ship_via
147                                 AND ".TB_PREF."debtor_trans.trans_no = ";
148                                 
149         if(is_array($trans_no)) { //assume all transactions are for the same customer/branch
150             $sql .= $trans_no[0];
151         } else {
152             $sql .= $trans_no;
153         }
154
155         $result = db_query($sql, "delivery Retreival");
156
157         $num = db_num_rows($result);
158         if ($num > 1)
159         {
160                 display_db_error("FATAL : delivery note query returned a duplicate - " . db_num_rows($result), $sql, true);
161         }
162         else if ($num == 1)
163         {
164                 return db_fetch($result);
165         }
166         else
167                 display_db_error("FATAL : delivery note search return nothing - " . db_num_rows($result), $sql, true);
168
169 }
170
171 //function get_sales_delivery_details($delivery) {
172 //    if(!is_array($delivery)) {
173 //
174 //    }
175 //}
176 //--------------------------------------------------------------------------------------------------
177
178 function read_sales_delivery($trans_no, &$cart)
179 {
180         $myrow = get_sales_delivery($trans_no);
181
182         if(!is_array($trans_no)) $trans_no = array($trans_no);
183
184         $cart->customer_id = $myrow["debtor_no"];
185         $cart->Branch = $myrow["branch_code"];
186         $cart->customer_name = $myrow["name"];
187         $cart->cust_ref = $myrow["reference"];
188         $cart->default_sales_type =$myrow["tpe"];
189         $cart->sales_type_name =$myrow["sales_type"];
190         $cart->customer_currency = $myrow["curr_code"];
191         $cart->default_discount = $myrow["discount"];
192         $cart->order_no = $myrow["order_"];
193
194 //      $cart->Comments = get_comments(13,$trans_no);
195
196         $cart->ship_via = $myrow["ship_via"];
197         $cart->deliver_to = $myrow["br_name"];
198         $cart->delivery_date = sql2date($myrow["due_date"]);
199         $cart->freight_cost = $myrow["ov_freight"];
200         $cart->delivery_address = $myrow["br_address"];
201         $cart->phone = $myrow["phone"];
202         $cart->email = $myrow["email"];
203
204 //      $cart->Location = $myrow["location"]; 
205 //      $cart->location_name = $myrow["location_name"];
206
207         $cart->orig_order_date = sql2date($myrow["tran_date"]);
208
209         $cart->tax_group_name = $myrow["tax_group_name"];
210         $cart->tax_group_id = $myrow["tax_group_id"];
211
212         $sql = "SELECT ".TB_PREF."debtor_trans_details.stock_id, unit_price, 
213                 debtor_trans_no,
214                 ".TB_PREF."debtor_trans_details.description,
215                 ".TB_PREF."debtor_trans_details.id,
216                 ".TB_PREF."debtor_trans_details.quantity, discount_percent,
217                 qty_done, ".TB_PREF."stock_master.units,
218                 ".TB_PREF."stock_master.material_cost + ".TB_PREF."stock_master.labour_cost + ".TB_PREF."stock_master.overhead_cost AS standard_cost
219                 FROM ".TB_PREF."debtor_trans_details, ".TB_PREF."stock_master
220                         WHERE ".TB_PREF."debtor_trans_details.debtor_trans_type=13 AND
221                         " .TB_PREF."debtor_trans_details.stock_id = ".TB_PREF."stock_master.stock_id";
222
223             $sql .= ' AND (';
224             foreach($trans_no as $key=>$num) {
225                 if($key!=0) $sql .= ' OR ';
226                 $sql .= 'debtor_trans_no =' . $num;
227             }
228             $sql .= ') ORDER BY id';
229
230         $result = db_query($sql, "Retreive Delivery Note Items");
231
232         if (db_num_rows($result) > 0)
233         {
234
235                 while ($myrow = db_fetch($result))
236                 {
237                         $cart->add_to_cart($myrow["stock_id"],-$myrow["quantity"],
238                                 $myrow["unit_price"], $myrow["discount_percent"],
239                                  -$myrow["qty_done"], $myrow["standard_cost"], $myrow["description"],$myrow["id"]);
240                 }
241         }
242
243         foreach($cart->line_items as $key=>$line) 
244           $cart->line_items[$key]->qty_dispatched = 
245           $cart->line_items[$key]->quantity - $cart->line_items[$key]->qty_done; 
246
247         return true;
248 }
249
250 ?>