Merged changes up to 2.3.16 into unstable
[fa-stable.git] / sales / includes / db / sales_order_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 //----------------------------------------------------------------------------------------
13 function add_sales_order(&$order)
14 {
15         global $loc_notification, $path_to_root, $Refs;
16
17         begin_transaction();
18         hook_db_prewrite($order, $order->trans_type);
19         $order_no = get_next_trans_no($order->trans_type);
20         $del_date = date2sql($order->due_date);
21         $order_type = 0; // this is default on new order
22         $total = $order->get_trans_total();
23         $sql = "INSERT INTO ".TB_PREF."sales_orders (order_no, type, debtor_no, trans_type, branch_code, customer_ref, reference, comments, ord_date,
24                 order_type, ship_via, deliver_to, delivery_address, contact_phone,
25                 freight_cost, from_stk_loc, delivery_date, payment_terms, total, prep_amount)
26                 VALUES (" .db_escape($order_no) . "," .db_escape($order_type) . "," . db_escape($order->customer_id) .
27                  ", " .db_escape($order->trans_type) . "," .db_escape($order->Branch) . ", ".
28                         db_escape($order->cust_ref) .",". 
29                         db_escape($order->reference) .",". 
30                         db_escape($order->Comments) .",'" . 
31                         date2sql($order->document_date) . "', " .
32                         db_escape($order->sales_type) . ", " .
33                         db_escape($order->ship_via)."," . 
34                         db_escape($order->deliver_to) . "," .
35                         db_escape($order->delivery_address) . ", " .
36                         db_escape($order->phone) . ", " . 
37                         db_escape($order->freight_cost) .", " . 
38                         db_escape($order->Location) .", " .
39                         db_escape($del_date) . "," .
40                         db_escape($order->payment) . "," .
41                         db_escape($total) . "," .
42                         db_escape($order->prep_amount).")";
43
44         db_query($sql, "order Cannot be Added");
45
46         $order->trans_no = array($order_no=>0);
47
48         if ($loc_notification == 1)
49         {
50                 include_once($path_to_root . "/inventory/includes/inventory_db.inc");
51                 $st_ids = array();
52                 $st_names = array();
53                 $st_num = array();
54                 $st_reorder = array();
55         }
56         foreach ($order->line_items as $line)
57         {
58                 if ($loc_notification == 1 && is_inventory_item($line->stock_id))
59                 {
60                         $sql = "SELECT ".TB_PREF."loc_stock.*, ".TB_PREF."locations.location_name, ".TB_PREF."locations.email
61                                 FROM ".TB_PREF."loc_stock, ".TB_PREF."locations
62                                 WHERE ".TB_PREF."loc_stock.loc_code=".TB_PREF."locations.loc_code
63                                 AND ".TB_PREF."loc_stock.stock_id = '" . $line->stock_id . "'
64                                 AND ".TB_PREF."loc_stock.loc_code = '" . $order->Location . "'";
65                         $res = db_query($sql,"a location could not be retreived");
66                         $loc = db_fetch($res);
67                         if ($loc['email'] != "")
68                         {
69                                 $qoh = get_qoh_on_date($line->stock_id, $order->Location);
70                                 $qoh -= get_demand_qty($line->stock_id, $order->Location);
71                                 $qoh -= get_demand_asm_qty($line->stock_id, $order->Location);
72                                 $qoh -= $line->quantity;
73                                 if ($qoh < $loc['reorder_level'])
74                                 {
75                                         $st_ids[] = $line->stock_id;
76                                         $st_names[] = $line->item_description;
77                                         $st_num[] = $qoh - $loc['reorder_level'];
78                                         $st_reorder[] = $loc['reorder_level'];
79                                 }
80                         }
81                 }
82
83                 $sql = "INSERT INTO ".TB_PREF."sales_order_details (order_no, trans_type, stk_code, description, unit_price, quantity, discount_percent) VALUES (";
84                 $sql .= $order_no . ",".$order->trans_type .
85                                 ",".db_escape($line->stock_id).", "
86                                 .db_escape($line->item_description).", $line->price,
87                                 $line->quantity,
88                                 $line->discount_percent)";
89                 db_query($sql, "order Details Cannot be Added");
90
91         // Now mark quotation line as processed
92                 if ($order->trans_type == ST_SALESORDER && $line->src_id)
93                         update_parent_line(ST_SALESORDER, $line->src_id, $line->qty_dispatched); // clear all the quote despite all or the part was ordered
94         } /* inserted line items into sales order details */
95
96         add_audit_trail($order->trans_type, $order_no, $order->document_date);
97         $Refs->save($order->trans_type, $order_no, $order->reference);
98
99         hook_db_postwrite($order, $order->trans_type);
100         commit_transaction();
101
102         if ($loc_notification == 1 && count($st_ids) > 0)
103         {
104                 require_once($path_to_root . "/reporting/includes/class.mail.inc");
105                 $company = get_company_prefs();
106                 $mail = new email($company['coy_name'], $company['email']);
107                 $from = $company['coy_name'] . " <" . $company['email'] . ">";
108                 $to = $loc['location_name'] . " <" . $loc['email'] . ">";
109                 $subject = _("Stocks below Re-Order Level at " . $loc['location_name']);
110                 $msg = "\n";
111                 for ($i = 0; $i < count($st_ids); $i++)
112                         $msg .= $st_ids[$i] . " " . $st_names[$i] . ", " . _("Re-Order Level") . ": " . $st_reorder[$i] . ", " . _("Below") . ": " . $st_num[$i] . "\n";
113                 $msg .= "\n" . _("Please reorder") . "\n\n";
114                 $msg .= $company['coy_name'];
115                 $mail->to($to);
116                 $mail->subject($subject);
117                 $mail->text($msg);
118                 $ret = $mail->send();
119         }
120         return $order_no;
121 }
122
123 //----------------------------------------------------------------------------------------
124
125 function delete_sales_order($order_no, $trans_type)
126 {
127         begin_transaction();
128         hook_db_prevoid($trans_type, $order_no);
129
130         $sql = "DELETE FROM ".TB_PREF."sales_orders WHERE order_no=" . db_escape($order_no) 
131                 . " AND trans_type=".db_escape($trans_type);
132
133         db_query($sql, "order Header Delete");
134
135         $sql = "DELETE FROM ".TB_PREF."sales_order_details WHERE order_no =" 
136                 .db_escape($order_no) . " AND trans_type=".db_escape($trans_type);
137         db_query($sql, "order Detail Delete");
138
139         delete_reference($trans_type, $order_no);
140
141         add_audit_trail($trans_type, $order_no, Today(), _("Deleted."));
142         commit_transaction();
143 }
144
145 //----------------------------------------------------------------------------------------
146 // Mark changes in sales_order_details
147 //
148 function update_sales_order_version($order)
149 {
150   foreach ($order as $so_num => $so_ver) {
151   $sql= 'UPDATE '.TB_PREF.'sales_orders SET version=version+1 WHERE order_no='. db_escape($so_num).
152         ' AND version='.$so_ver . " AND trans_type=30";
153   db_query($sql, 'Concurrent editing conflict while sales order update');
154   }
155 }
156
157 //----------------------------------------------------------------------------------------
158
159 function update_sales_order($order)
160 {
161         global $loc_notification, $path_to_root, $Refs;
162
163         $del_date = date2sql($order->due_date);
164         $ord_date = date2sql($order->document_date);
165         $order_no =  key($order->trans_no);
166         $version= current($order->trans_no);
167         $total = $order->get_trans_total();
168
169         begin_transaction();
170         if ($order->trans_type == ST_SALESORDER)
171                 $allocs = get_payments_for($order_no, ST_SALESORDER);
172         $sql = "UPDATE ".TB_PREF."sales_orders SET type =".db_escape($order->so_type)." ,
173                 debtor_no = " . db_escape($order->customer_id) . ",
174                 branch_code = " . db_escape($order->Branch) . ",
175                 customer_ref = ". db_escape($order->cust_ref) .",
176                 reference = ". db_escape($order->reference) .",
177                 comments = ". db_escape($order->Comments) .",
178                 ord_date = " . db_escape($ord_date) . ",
179                 order_type = " .db_escape($order->sales_type) . ",
180                 ship_via = " . db_escape($order->ship_via) .",
181                 deliver_to = " . db_escape($order->deliver_to) . ",
182                 delivery_address = " . db_escape($order->delivery_address) . ",
183                 contact_phone = " .db_escape($order->phone) . ",
184                 freight_cost = " .db_escape($order->freight_cost) .",
185                 from_stk_loc = " .db_escape($order->Location) .",
186                 delivery_date = " .db_escape($del_date). ",
187                 version = ".($version+1).",
188                 payment_terms = " .db_escape($order->payment). ",
189                 total = ". db_escape($total). ",
190                 prep_amount = ". db_escape($order->prep_amount) ."
191          WHERE order_no=" . db_escape($order_no) ."
192          AND trans_type=".$order->trans_type." AND version=".$version;
193         db_query($sql, "order Cannot be Updated, this can be concurrent edition conflict");
194
195         if ($loc_notification == 1)
196         {
197                 include_once($path_to_root . "/inventory/includes/inventory_db.inc");
198                 $st_ids = array();
199                 $st_names = array();
200                 $st_num = array();
201                 $st_reorder = array();
202         }
203         foreach ($order->line_items as $line)
204         {
205                 if ($loc_notification == 1 && is_inventory_item($line->stock_id))
206                 {
207                         $sql = "SELECT ".TB_PREF."loc_stock.*, "
208                                   .TB_PREF."locations.location_name, "
209                                   .TB_PREF."locations.email
210                                 FROM ".TB_PREF."loc_stock, "
211                                   .TB_PREF."locations
212                                 WHERE ".TB_PREF."loc_stock.loc_code=".TB_PREF."locations.loc_code
213                                  AND ".TB_PREF."loc_stock.stock_id = ".db_escape($line->stock_id)."
214                                  AND ".TB_PREF."loc_stock.loc_code = ".db_escape($order->Location);
215                         $res = db_query($sql,"a location could not be retreived");
216                         $loc = db_fetch($res);
217                         if ($loc['email'] != "")
218                         {
219                                 $qoh = get_qoh_on_date($line->stock_id, $order->Location);
220                                 $qoh -= get_demand_qty($line->stock_id, $order->Location);
221                                 $qoh -= get_demand_asm_qty($line->stock_id, $order->Location);
222                                 $qoh -= $line->quantity;
223                                 if ($qoh < $loc['reorder_level'])
224                                 {
225                                         $st_ids[] = $line->stock_id;
226                                         $st_names[] = $line->item_description;
227                                         $st_num[] = $qoh - $loc['reorder_level'];
228                                         $st_reorder[] = $loc['reorder_level'];
229                                 }
230                         }
231                 }
232                 if (!$line->id) //new line
233                         $sql = "INSERT INTO ".TB_PREF."sales_order_details
234                          (order_no, trans_type, stk_code,  description, unit_price, quantity,
235                           discount_percent, qty_sent)
236                          VALUES (".$order_no . ",".$order->trans_type.","
237                                   .db_escape($line->stock_id) . ","
238                                   .db_escape($line->item_description) . ", "
239                                   .db_escape($line->price) . ", "
240                                   .db_escape($line->quantity) . ", "
241                                   .db_escape($line->discount_percent) . ", "
242                                   .db_escape($line->qty_done) ." )";
243                 else
244                 $sql = "UPDATE ".TB_PREF."sales_order_details
245                         SET id=".db_escape($line->id).",
246                                 order_no=$order_no,
247                                 trans_type=".$order->trans_type.",
248                                 stk_code=".db_escape($line->stock_id).",
249                                 description=".db_escape($line->item_description).",
250                                 unit_price=".db_escape($line->price).",
251                                 quantity=".db_escape($line->quantity).",
252                         discount_percent=".db_escape($line->discount_percent).",
253                             qty_sent=".db_escape($line->qty_done)."
254                          WHERE id = ".db_escape($line->id);
255
256                 db_query($sql, "Old order Cannot be updated");
257         } /* inserted line items into sales order details */
258
259         if ($order->trans_type == ST_SALESORDER)
260                 reallocate_payments($order_no, ST_SALESORDER, $ord_date, $total, $allocs);
261         add_audit_trail($order->trans_type, $order_no, $order->document_date, _("Updated."));
262         $Refs->save($order->trans_type, $order_no, $order->reference);
263         commit_transaction();
264         if ($loc_notification == 1 && count($st_ids) > 0)
265         {
266                 require_once($path_to_root . "/reporting/includes/class.mail.inc");
267                 $company = get_company_prefs();
268                 $mail = new email($company['coy_name'], $company['email']);
269                 $from = $company['coy_name'] . " <" . $company['email'] . ">";
270                 $to = $loc['location_name'] . " <" . $loc['email'] . ">";
271                 $subject = _("Stocks below Re-Order Level at " . $loc['location_name']);
272                 $msg = "\n";
273                 for ($i = 0; $i < count($st_ids); $i++)
274                         $msg .= $st_ids[$i] . " " . $st_names[$i] . ", "
275                           . _("Re-Order Level") . ": " . $st_reorder[$i] . ", "
276                           . _("Below") . ": " . $st_num[$i] . "\n";
277                 $msg .= "\n" . _("Please reorder") . "\n\n";
278                 $msg .= $company['coy_name'];
279                 $mail->to($to);
280                 $mail->subject($subject);
281                 $mail->text($msg);
282                 $ret = $mail->send();
283         }
284 }
285
286 //----------------------------------------------------------------------------------------
287
288 function get_sales_order_header($order_no, $trans_type)
289 {
290         $sql = "SELECT sorder.*, "
291           ."cust.name, "
292           ."cust.curr_code, "
293           ."cust.address, "
294           ."loc.location_name, "
295           ."cust.discount, "
296           ."stype.sales_type, "
297           ."stype.id AS sales_type_id, "
298           ."stype.tax_included, "
299           ."stype.factor, "
300           ."ship.shipper_name, "
301           ."tax_group.name AS tax_group_name , "
302           ."tax_group.id AS tax_group_id, "
303           ."cust.tax_id,"
304           ."sorder.alloc,"
305           ."IFNULL(allocs.ord_allocs, 0)+IFNULL(inv.inv_allocs ,0) AS sum_paid,"
306           ."sorder.prep_amount>0 as prepaid"
307         ." FROM ".TB_PREF."sales_orders sorder
308                         LEFT JOIN (SELECT trans_no_to, sum(amt) ord_allocs FROM ".TB_PREF."cust_allocations
309                                 WHERE trans_type_to=".ST_SALESORDER." AND trans_no_to=".db_escape($order_no)." GROUP BY trans_no_to)
310                                  allocs ON sorder.trans_type=".ST_SALESORDER." AND allocs.trans_no_to=sorder.order_no
311                         LEFT JOIN (SELECT order_, sum(alloc) inv_allocs FROM ".TB_PREF."debtor_trans 
312                                 WHERE type=".ST_SALESINVOICE." AND order_=".db_escape($order_no)."  GROUP BY order_)
313                                  inv ON sorder.trans_type=".ST_SALESORDER." AND inv.order_=sorder.order_no
314                         LEFT JOIN ".TB_PREF."shippers ship ON  ship.shipper_id = sorder.ship_via,"
315           .TB_PREF."debtors_master cust,"
316           .TB_PREF."sales_types stype, "
317           .TB_PREF."tax_groups tax_group, "
318           .TB_PREF."cust_branch branch,"
319           .TB_PREF."locations loc
320         WHERE sorder.order_type=stype.id
321                 AND branch.branch_code = sorder.branch_code
322                 AND branch.tax_group_id = tax_group.id
323                 AND sorder.debtor_no = cust.debtor_no
324                 AND loc.loc_code = sorder.from_stk_loc
325                 AND sorder.trans_type = " . db_escape($trans_type) ."
326                 AND sorder.order_no = " . db_escape($order_no );
327
328         $result = db_query($sql, "order Retreival");
329
330         $num = db_num_rows($result);
331         if ($num > 1)
332         {
333                 display_warning("You have duplicate document in database: (type:$trans_type, number:$order_no).");
334         }
335         else if ($num == 1)
336         {
337                 return db_fetch($result);
338         }
339         else
340                 display_warning("You have missing or invalid sales document in database (type:$trans_type, number:$order_no).");
341
342 }
343
344 //----------------------------------------------------------------------------------------
345
346 function get_sales_order_details($order_no, $trans_type) {
347         $sql = "SELECT id, stk_code, unit_price, "
348                 .TB_PREF."sales_order_details.description,"
349                 .TB_PREF."sales_order_details.quantity,
350                   discount_percent,
351                   qty_sent as qty_done, "
352                 .TB_PREF."stock_master.units,"
353                 .TB_PREF."stock_master.mb_flag,"
354                 .TB_PREF."stock_master.material_cost + "
355                         .TB_PREF."stock_master.labour_cost + "
356                         .TB_PREF."stock_master.overhead_cost AS standard_cost
357         FROM ".TB_PREF."sales_order_details, ".TB_PREF."stock_master
358         WHERE ".TB_PREF."sales_order_details.stk_code = ".TB_PREF."stock_master.stock_id
359         AND order_no =" . db_escape($order_no) 
360                 ." AND trans_type = " . db_escape($trans_type) . " ORDER BY id";
361
362         return db_query($sql, "Retreive order Line Items");
363 }
364 //----------------------------------------------------------------------------------------
365
366 function read_sales_order($order_no, &$order, $trans_type)
367 {
368
369         $myrow = get_sales_order_header($order_no, $trans_type);
370
371         $order->trans_type = $myrow['trans_type'];
372         $order->so_type =  $myrow["type"];
373         $order->trans_no = array($order_no=> $myrow["version"]);
374
375         $order->set_customer($myrow["debtor_no"], $myrow["name"],
376           $myrow["curr_code"], $myrow["discount"], $myrow["payment_terms"]);
377
378         $order->set_branch($myrow["branch_code"], $myrow["tax_group_id"],
379           $myrow["tax_group_name"], $myrow["contact_phone"]);
380
381         $order->set_sales_type($myrow["sales_type_id"], $myrow["sales_type"], 
382             $myrow["tax_included"], $myrow["factor"]); // no default price calculations on edit
383
384         $order->set_location($myrow["from_stk_loc"], $myrow["location_name"]);
385
386         $order->set_delivery($myrow["ship_via"], $myrow["deliver_to"],
387           $myrow["delivery_address"], $myrow["freight_cost"]);
388
389         $order->cust_ref = $myrow["customer_ref"];
390         $order->sales_type =$myrow["order_type"];
391         $order->reference = $myrow["reference"];
392         $order->Comments = $myrow["comments"];
393         $order->due_date = sql2date($myrow["delivery_date"]);
394         $order->document_date = sql2date($myrow["ord_date"]);
395
396         $order->prepaid = $myrow["prepaid"];
397         $order->alloc = $myrow['alloc'];
398         $order->sum_paid = $myrow["sum_paid"]; // sum of all prepayments to so (also invoiced)
399         $order->prep_amount = $myrow["prep_amount"];
400         $order->prepayments = get_payments_for($order_no, $myrow['trans_type']);
401
402         $result = get_sales_order_details($order_no, $order->trans_type);
403         if (db_num_rows($result) > 0)
404         {
405                 $line_no=0;
406                 while ($myrow = db_fetch($result))
407                 {
408                         $order->add_to_cart($line_no,$myrow["stk_code"],$myrow["quantity"],
409                                 $myrow["unit_price"], $myrow["discount_percent"],
410                                 $myrow["qty_done"], $myrow["standard_cost"], $myrow["description"], $myrow["id"] );
411                 $line_no++;
412                 }
413         }
414
415         return true;
416 }
417
418 //----------------------------------------------------------------------------------------
419
420 function sales_order_has_deliveries($order_no)
421 {
422         $sql = "SELECT SUM(qty_sent) FROM ".TB_PREF.
423         "sales_order_details WHERE order_no=".db_escape($order_no)
424         ." AND trans_type=".ST_SALESORDER;
425
426         $result = db_query($sql, "could not query for sales order usage");
427
428         $row = db_fetch_row($result);
429
430         if ($row[0] > 0)
431                 return true;  // 2010-04-21 added check for eventually voided deliveries, Joe Hunt
432         $sql = "SELECT order_ FROM ".TB_PREF."debtor_trans WHERE type=".ST_CUSTDELIVERY." AND order_=".db_escape($order_no);
433         $result = db_query($sql,"The related delivery notes could not be retreived");
434         return (db_num_rows($result) > 0);      
435 }
436
437 //----------------------------------------------------------------------------------------
438
439 function close_sales_order($order_no)
440 {
441         // set the quantity of each item to the already sent quantity. this will mark item as closed.
442         $sql = "UPDATE ".TB_PREF."sales_order_details
443                 SET quantity = qty_sent WHERE order_no = ".db_escape($order_no)
444                 ." AND trans_type=".ST_SALESORDER;
445
446         db_query($sql, "The sales order detail record could not be updated");
447 }
448
449 //---------------------------------------------------------------------------------------------------------------
450
451 function get_invoice_duedate($terms, $invdate)
452 {
453         if (!is_date($invdate))
454         {
455                 return new_doc_date();
456         }
457         
458         $myrow = get_payment_terms($terms);
459         
460         if (!$myrow)
461                 return $invdate;
462
463         if ($myrow['day_in_following_month'] > 0)
464                 $duedate = add_days(end_month($invdate), $myrow['day_in_following_month']);
465         elseif ($myrow['days_before_due'] > 0)
466                 $duedate = add_days($invdate, $myrow['days_before_due']);
467         else
468                 $duedate = $invdate;
469         return $duedate;
470 }
471
472 function get_customer_to_order($customer_id) {
473
474         // Now check to ensure this account is not on hold */
475         $sql = "SELECT cust.name, 
476                   cust.address, "
477                   .TB_PREF."credit_status.dissallow_invoices, 
478                   cust.sales_type AS salestype,
479                   cust.dimension_id,
480                   cust.dimension2_id,
481                   stype.sales_type,
482                   stype.tax_included,
483                   stype.factor,
484                   cust.curr_code,
485                   cust.discount,
486                   cust.payment_terms,
487                   cust.pymt_discount,
488                   cust.credit_limit - Sum(IFNULL(IF(trans.type=11 OR trans.type=12 OR trans.type=2,
489                         -1, 1) * (ov_amount + ov_gst + ov_freight + ov_freight_tax + ov_discount),0)) as cur_credit
490                 FROM ".TB_PREF."debtors_master cust
491                   LEFT JOIN ".TB_PREF."debtor_trans trans ON trans.type!=".ST_CUSTDELIVERY." AND trans.debtor_no = cust.debtor_no,"
492                   .TB_PREF."credit_status, "
493                   .TB_PREF."sales_types stype
494                 WHERE cust.sales_type=stype.id
495                         AND cust.credit_status=".TB_PREF."credit_status.id
496                         AND cust.debtor_no = ".db_escape($customer_id)
497                 ." GROUP by cust.debtor_no";
498
499         $result =db_query($sql,"Customer Record Retreive");
500         return  db_fetch($result);
501 }
502
503 function get_branch_to_order($customer_id, $branch_id) {
504
505         // the branch was also selected from the customer selection so default the delivery details from the customer branches table cust_branch. The order process will ask for branch details later anyway
506                 $sql = "SELECT ".TB_PREF."cust_branch.br_name, "
507                         .TB_PREF."cust_branch.br_address, "
508                         .TB_PREF."cust_branch.br_post_address, "
509                         ." default_location, location_name, default_ship_via, "
510                         .TB_PREF."tax_groups.name AS tax_group_name, "
511                         .TB_PREF."tax_groups.id AS tax_group_id
512                         FROM ".TB_PREF."cust_branch, "
513                           .TB_PREF."tax_groups, "
514                           .TB_PREF."locations
515                         WHERE ".TB_PREF."cust_branch.tax_group_id = ".TB_PREF."tax_groups.id
516                                 AND ".TB_PREF."locations.loc_code=default_location
517                                 AND ".TB_PREF."cust_branch.branch_code=".db_escape($branch_id)."
518                                 AND ".TB_PREF."cust_branch.debtor_no = ".db_escape($customer_id);
519
520             return db_query($sql,"Customer Branch Record Retreive");
521 }
522
523 /*
524         Supported filters:
525
526         InvoiceTemplates
527         DeliveryTemplates
528         OutstandingOnly
529         PrepaidOrders
530 */
531 function get_sql_for_sales_orders_view($selected_customer, $trans_type, $trans_no, $filter, 
532         $stock_item=null, $from='', $to='', $ref='', $location='', $customer_id=ALL_TEXT)
533 {
534
535         $sql = "SELECT 
536                         sorder.order_no,
537                         sorder.reference,
538                         debtor.name,
539                         branch.br_name,"
540                         .($filter=='InvoiceTemplates' 
541                                 || $filter=='DeliveryTemplates' ?
542                          "sorder.comments, " : "sorder.customer_ref, ")
543                         ."sorder.ord_date,
544                         sorder.delivery_date,
545                         sorder.deliver_to,
546                         Sum(line.unit_price*line.quantity*(1-line.discount_percent))+freight_cost AS OrderValue,
547                         sorder.type,
548                         debtor.curr_code,
549                         Sum(line.qty_sent) AS TotDelivered,
550                         Sum(line.quantity) AS TotQuantity,
551                         Sum(line.invoiced) AS TotInvoiced,
552                         alloc,
553                         prep_amount,
554                         allocs.ord_payments,
555                         inv.inv_payments,
556                         sorder.total
557                 FROM ".TB_PREF."sales_orders as sorder
558                 LEFT JOIN (SELECT trans_no_to, sum(amt) ord_payments FROM ".TB_PREF."cust_allocations WHERE trans_type_to=".ST_SALESORDER." GROUP BY trans_no_to)
559                          allocs ON sorder.trans_type=".ST_SALESORDER." AND allocs.trans_no_to=sorder.order_no
560                 LEFT JOIN (SELECT order_, sum(prep_amount) inv_payments FROM ".TB_PREF."debtor_trans WHERE type=".ST_SALESINVOICE." GROUP BY order_)
561                                  inv ON sorder.trans_type=".ST_SALESORDER." AND inv.order_=sorder.order_no,"
562                         .TB_PREF."sales_order_details as line, "
563                         .TB_PREF."debtors_master as debtor, "
564                         .TB_PREF."cust_branch as branch
565                         WHERE sorder.order_no = line.order_no
566                         AND sorder.trans_type = line.trans_type
567                         AND sorder.trans_type = ".db_escape($trans_type)."
568                         AND sorder.debtor_no = debtor.debtor_no
569                         AND sorder.branch_code = branch.branch_code
570                         AND debtor.debtor_no = branch.debtor_no";
571
572         if (isset($trans_no) && $trans_no != "")
573         {
574                 // search orders with number like 
575                 $number_like = "%".$trans_no;
576                 $sql .= " AND sorder.order_no LIKE ".db_escape($number_like);
577 //                              ." GROUP BY sorder.order_no";
578         }
579         elseif ($ref != "")
580         {
581                 // search orders with reference like 
582                 $number_like = "%".$ref."%";
583                 $sql .= " AND sorder.reference LIKE ".db_escape($number_like);
584 //                              ." GROUP BY sorder.order_no";
585         }
586         else    // ... or select inquiry constraints
587         {
588                 if ($filter!='DeliveryTemplates' && $filter!='InvoiceTemplates' && $filter!='OutstandingOnly')
589                 {
590                         $date_after = date2sql($from);
591                         $date_before = date2sql($to);
592
593                         $sql .=  " AND sorder.ord_date >= '$date_after'"
594                                         ." AND sorder.ord_date <= '$date_before'";
595                 }
596         }
597                 if ($trans_type == ST_SALESQUOTE && !check_value('show_all'))
598                         $sql .= " AND sorder.delivery_date >= '".date2sql(Today())."' AND line.qty_sent=0"; // show only outstanding, not realized quotes
599
600                 if ($selected_customer != -1)
601                         $sql .= " AND sorder.debtor_no=".db_escape($selected_customer);
602
603                 if (isset($stock_item))
604                         $sql .= " AND line.stk_code=".db_escape($stock_item);
605
606                 if ($location)
607                         $sql .= " AND sorder.from_stk_loc = ".db_escape($location);
608
609                 if ($filter=='OutstandingOnly')
610                         $sql .= " AND line.qty_sent < line.quantity";
611
612                 if ($filter=='PrepaidOrders')
613                         $sql .= " AND prep_amount>0";
614
615                 elseif ($filter=='InvoiceTemplates' || $filter=='DeliveryTemplates')
616                         $sql .= " AND sorder.type=1";
617
618                 //Chaiatanya : New Filter
619                 if ($customer_id != ALL_TEXT)
620                         $sql .= " AND sorder.debtor_no = ".db_escape($customer_id);             
621
622                 $sql .= " GROUP BY sorder.order_no,
623                                         sorder.debtor_no,
624                                         sorder.branch_code,
625                                         sorder.customer_ref,
626                                         sorder.ord_date,
627                                         sorder.deliver_to";
628         return $sql;
629 }
630 //--------------------------------------------------------------------------------------------------
631 function update_prepaid_so_line($line_id, $qty_invoiced)
632 {
633         $sql = "UPDATE ".TB_PREF."sales_order_details
634                 SET invoiced = invoiced + ".(float)$qty_invoiced."
635                 WHERE id=".db_escape($line_id);
636
637         db_query($sql, "The document detail record could not be updated with invoiced qty");
638         return true;
639 }
640 /*
641         Returns array of all issued invoices to sales order $order_no, optinally up to trans_no==$up_to
642 */
643 function get_sales_order_invoices($order_no)
644 {
645         $sql = "SELECT trans_no, dt.type as type, tran_date, reference, prep_amount
646             FROM ".TB_PREF."debtor_trans dt
647                 LEFT JOIN ".TB_PREF."voided v ON v.type=dt.type AND v.id=dt.trans_no
648                 WHERE ISNULL(v.id) AND dt.type=".ST_SALESINVOICE." AND dt.order_=".db_escape($order_no)
649                 ." ORDER BY dt.tran_date, dt.reference, dt.trans_no";
650
651         return db_query($sql, "cannot retrieve sales invoices for sales order");
652 }
653
654 function is_sales_order_started($order_no)
655 {
656         $sql = "SELECT count(*) FROM ".TB_PREF."sales_order_details WHERE order_no=".db_escape($order_no)." AND trans_type=".ST_SALESORDER
657                 ." AND (invoiced!=0 OR qty_sent!=0)";
658
659         $result = db_fetch(db_query($sql, "cannot retrieve sales invoices for sales order"));
660         return $result[0];
661 }
662 ?>