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