Early payment discount option moved from branch to payment terms.
[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(__FUNCTION__, func_get_args());
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(__FUNCTION__, func_get_args());
90         hook_db_prevoid($trans_type, $order_no);
91
92         $sql = "DELETE FROM ".TB_PREF."sales_orders WHERE order_no=" . db_escape($order_no) 
93                 . " AND trans_type=".db_escape($trans_type);
94
95         db_query($sql, "order Header Delete");
96
97         $sql = "DELETE FROM ".TB_PREF."sales_order_details WHERE order_no =" 
98                 .db_escape($order_no) . " AND trans_type=".db_escape($trans_type);
99         db_query($sql, "order Detail Delete");
100
101         add_audit_trail($trans_type, $order_no, Today(), _("Deleted."));
102         commit_transaction();
103 }
104
105 //----------------------------------------------------------------------------------------
106 // Mark changes in sales_order_details
107 //
108 function update_sales_order_version($order)
109 {
110   foreach ($order as $so_num => $so_ver) {
111   $sql= 'UPDATE '.TB_PREF.'sales_orders SET version=version+1 WHERE order_no='. db_escape($so_num).
112         ' AND version='.$so_ver . " AND trans_type=".ST_SALESORDER;
113   db_query($sql, 'Concurrent editing conflict while sales order update');
114   }
115 }
116
117 //----------------------------------------------------------------------------------------
118
119 function update_sales_order($order)
120 {
121         global $SysPrefs, $path_to_root, $Refs;
122
123         $del_date = date2sql($order->due_date);
124         $ord_date = date2sql($order->document_date);
125         $order_no =  key($order->trans_no);
126         $version= current($order->trans_no);
127         $total = $order->get_trans_total();
128
129         begin_transaction(__FUNCTION__, func_get_args());
130         hook_db_prewrite($order, $order->trans_type);
131
132         if ($order->trans_type == ST_SALESORDER)
133                 $allocs = get_payments_for($order_no, $order->trans_type, $order->customer_id);
134
135         $sql = "UPDATE ".TB_PREF."sales_orders SET type =".db_escape($order->so_type)." ,
136                 debtor_no = " . db_escape($order->customer_id) . ",
137                 branch_code = " . db_escape($order->Branch) . ",
138                 customer_ref = ". db_escape($order->cust_ref) .",
139                 reference = ". db_escape($order->reference) .",
140                 comments = ". db_escape($order->Comments) .",
141                 ord_date = " . db_escape($ord_date) . ",
142                 order_type = " .db_escape($order->sales_type) . ",
143                 ship_via = " . db_escape($order->ship_via) .",
144                 deliver_to = " . db_escape($order->deliver_to) . ",
145                 delivery_address = " . db_escape($order->delivery_address) . ",
146                 contact_phone = " .db_escape($order->phone) . ",
147                 freight_cost = " .db_escape($order->freight_cost) .",
148                 from_stk_loc = " .db_escape($order->Location) .",
149                 delivery_date = " .db_escape($del_date). ",
150                 version = ".($version+1).",
151                 payment_terms = " .db_escape($order->payment). ",
152                 total = ". db_escape($total). ",
153                 prep_amount = ". db_escape($order->prep_amount) ."
154          WHERE order_no=" . db_escape($order_no) ."
155          AND trans_type=".$order->trans_type." AND version=".$version;
156         db_query($sql, "order Cannot be Updated, this can be concurrent edition conflict");
157
158         $id_tokeep = array();
159         foreach ($order->line_items as $line) {
160                 array_push($id_tokeep , $line->id);
161         }
162         $id_list = implode(', ', $id_tokeep);
163         
164         $sql = "DELETE FROM ".TB_PREF."sales_order_details WHERE order_no =" . db_escape($order_no) . " AND trans_type=".$order->trans_type;
165         $sql .= " AND id NOT IN ($id_list)";
166
167         db_query($sql, "Old order Cannot be Deleted");
168
169         if ($SysPrefs->loc_notification() == 1)
170         {
171                 include_once($path_to_root . "/inventory/includes/inventory_db.inc");
172                 $st_ids = array();
173                 $st_names = array();
174                 $st_num = array();
175                 $st_reorder = array();
176         }
177         foreach ($order->line_items as $line)
178         {
179                 if ($SysPrefs->loc_notification() == 1 && is_inventory_item($line->stock_id))
180                         $loc = calculate_reorder_level($order->Location, $line, $st_ids, $st_names, $st_num, $st_reorder); 
181
182                 if (!$line->id) //new line
183                         $sql = "INSERT INTO ".TB_PREF."sales_order_details
184                          (order_no, trans_type, stk_code,  description, unit_price, quantity,
185                           discount_percent, qty_sent)
186                          VALUES (".$order_no . ",".$order->trans_type.","
187                                   .db_escape($line->stock_id) . ","
188                                   .db_escape($line->item_description) . ", "
189                                   .db_escape($line->price) . ", "
190                                   .db_escape($line->quantity) . ", "
191                                   .db_escape($line->discount_percent) . ", "
192                                   .db_escape($line->qty_done) ." )";
193                 else
194                 $sql = "UPDATE ".TB_PREF."sales_order_details
195                         SET id=".db_escape($line->id).",
196                                 order_no=$order_no,
197                                 trans_type=".$order->trans_type.",
198                                 stk_code=".db_escape($line->stock_id).",
199                                 description=".db_escape($line->item_description).",
200                                 unit_price=".db_escape($line->price).",
201                                 quantity=".db_escape($line->quantity).",
202                         discount_percent=".db_escape($line->discount_percent).",
203                             qty_sent=".db_escape($line->qty_done)."
204                          WHERE id = ".db_escape($line->id);
205
206                 db_query($sql, "Old order Cannot be updated");
207         } /* inserted line items into sales order details */
208
209         if ($order->trans_type == ST_SALESORDER)
210                 reallocate_payments($order_no, ST_SALESORDER, $ord_date, $total, $allocs, $order->customer_id);
211         add_audit_trail($order->trans_type, $order_no, $order->document_date, _("Updated."));
212         $Refs->save($order->trans_type, $order_no, $order->reference, null, $order->fixed_asset);
213
214         hook_db_postwrite($order, $order->trans_type);
215         commit_transaction();
216         if ($SysPrefs->loc_notification() == 1 && count($st_ids) > 0)
217                 send_reorder_email($loc, $st_ids, $st_names, $st_num, $st_reorder);
218 }
219
220 //----------------------------------------------------------------------------------------
221
222 function get_sales_order_header($order_no, $trans_type)
223 {
224         $sql = "SELECT sorder.*,
225           cust.name,
226           cust.curr_code,
227           cust.address,
228           loc.location_name,
229           cust.discount,
230           stype.sales_type,
231           stype.id AS sales_type_id,
232           stype.tax_included,
233           stype.factor,
234           ship.description as shipping,
235           tax_group.name AS tax_group_name,
236           tax_group.id AS tax_group_id,
237           cust.tax_id,
238           sorder.alloc,
239           IFNULL(allocs.ord_allocs, 0)+IFNULL(inv.inv_allocs ,0) AS sum_paid,
240           sorder.prep_amount>0 as prepaid,
241           terms.type=".PTT_CASH." as cash_sale
242         FROM ".TB_PREF."sales_orders sorder
243                         LEFT JOIN (SELECT trans_no_to, sum(amt) ord_allocs FROM ".TB_PREF."cust_allocations
244                                 WHERE trans_type_to=".ST_SALESORDER." AND trans_no_to=".db_escape($order_no)." GROUP BY trans_no_to) allocs 
245                                         ON sorder.trans_type=".ST_SALESORDER." AND allocs.trans_no_to=sorder.order_no
246                         LEFT JOIN (SELECT order_, sum(alloc) inv_allocs FROM ".TB_PREF."debtor_trans 
247                                 WHERE type=".ST_SALESINVOICE." AND order_=".db_escape($order_no)."  GROUP BY order_)
248                                  inv ON sorder.trans_type=".ST_SALESORDER." AND inv.order_=sorder.order_no
249                         LEFT JOIN ".TB_PREF."stock_master ship ON ship.stock_id = sorder.ship_via
250                         LEFT JOIN ".TB_PREF."payment_terms terms ON sorder.payment_terms=terms.id,"
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['type'] == PTT_FOLLOWING)
399                 $duedate = add_days(end_month($invdate), $myrow['days']);
400         elseif ($myrow['type'] == PTT_DAYS)
401                 $duedate = add_days($invdate, $myrow['days']);
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.credit_limit - Sum(IFNULL(IF(trans.type IN(".implode(',', array(ST_CUSTCREDIT, ST_CUSTPAYMENT, ST_BANKDEPOSIT))."),
423                         -1, 1) * (ov_amount + ov_gst + ov_freight + ov_freight_tax + ov_discount),0)) as cur_credit
424                 FROM ".TB_PREF."debtors_master cust
425                   LEFT JOIN ".TB_PREF."debtor_trans trans ON trans.type!=".ST_CUSTDELIVERY." AND trans.debtor_no = cust.debtor_no,"
426                   .TB_PREF."credit_status credit_status,"
427                   .TB_PREF."sales_types stype
428                 WHERE cust.sales_type=stype.id
429                         AND cust.credit_status=credit_status.id
430                         AND cust.debtor_no=".db_escape($customer_id)
431                 ." GROUP by cust.debtor_no";
432
433         $result =db_query($sql,"Customer Record Retreive");
434         return  db_fetch($result);
435 }
436
437 function get_branch_to_order($customer_id, $branch_id) {
438
439         // 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
440                 $sql = "SELECT branch.br_name,
441                                         branch.br_address,
442                                         branch.br_post_address,
443                                         default_location, location_name, default_ship_via,
444                                         tax_group.name AS tax_group_name,
445                                         tax_group.id AS tax_group_id
446                                 FROM ".TB_PREF."cust_branch branch,"
447                                         .TB_PREF."tax_groups tax_group,"
448                                         .TB_PREF."locations location
449                         WHERE branch.tax_group_id = tax_group.id
450                                 AND location.loc_code=default_location
451                                 AND branch.branch_code=".db_escape($branch_id)."
452                                 AND branch.debtor_no=".db_escape($customer_id);
453
454             return db_query($sql,"Customer Branch Record Retreive");
455 }
456
457 /*
458         Supported filters:
459
460         InvoiceTemplates
461         DeliveryTemplates
462         OutstandingOnly
463         PrepaidOrders
464 */
465 function get_sql_for_sales_orders_view($trans_type, $trans_no, $filter, 
466         $stock_item='', $from='', $to='', $ref='', $location=ALL_TEXT, $customer_id=ALL_TEXT)
467 {
468
469         $sql = "SELECT 
470                         sorder.order_no,
471                         sorder.reference,
472                         debtor.name,
473                         branch.br_name,"
474                         .($filter=='InvoiceTemplates' 
475                                 || $filter=='DeliveryTemplates' ?
476                          "sorder.comments, " : "sorder.customer_ref, ")
477                         ."sorder.ord_date,
478                         sorder.delivery_date,
479                         sorder.deliver_to,
480                         Sum(line.unit_price*line.quantity*(1-line.discount_percent))+freight_cost AS OrderValue,
481                         sorder.type,
482                         debtor.curr_code,
483                         Sum(line.qty_sent) AS TotDelivered,
484                         Sum(line.quantity) AS TotQuantity,
485                         Sum(line.invoiced) AS TotInvoiced,
486                         alloc,
487                         prep_amount,
488                         allocs.ord_payments,
489                         inv.inv_payments,
490                         sorder.total,
491                         sorder.trans_type
492                 FROM ".TB_PREF."sales_orders as sorder
493                 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)
494                          allocs ON sorder.trans_type=".ST_SALESORDER." AND allocs.trans_no_to=sorder.order_no
495                 LEFT JOIN (SELECT order_, sum(prep_amount) inv_payments FROM ".TB_PREF."debtor_trans WHERE type=".ST_SALESINVOICE." GROUP BY order_)
496                                  inv ON sorder.trans_type=".ST_SALESORDER." AND inv.order_=sorder.order_no,"
497                         .TB_PREF."sales_order_details as line, "
498                         .TB_PREF."debtors_master as debtor, "
499                         .TB_PREF."cust_branch as branch
500                         WHERE sorder.order_no = line.order_no
501                         AND sorder.trans_type = line.trans_type
502                         AND sorder.trans_type = ".db_escape($trans_type)."
503                         AND sorder.debtor_no = debtor.debtor_no
504                         AND sorder.branch_code = branch.branch_code
505                         AND debtor.debtor_no = branch.debtor_no";
506
507         if (isset($trans_no) && $trans_no != "")
508         {
509                 // search orders with number like 
510                 $number_like = "%".$trans_no;
511                 $sql .= " AND sorder.order_no LIKE ".db_escape($number_like);
512 //                              ." GROUP BY sorder.order_no";
513         }
514         elseif ($ref != "")
515         {
516                 // search orders with reference like 
517                 $sql .= " AND sorder.reference LIKE ".db_escape('%' . $ref . '%');
518 //                              ." GROUP BY sorder.order_no";
519         }
520         else    // ... or select inquiry constraints
521         {
522                 if ($filter!='DeliveryTemplates' && $filter!='InvoiceTemplates' && $filter!='OutstandingOnly')
523                 {
524                         $date_after = date2sql($from);
525                         $date_before = date2sql($to);
526
527                         $sql .=  " AND sorder.ord_date >= '$date_after'"
528                                         ." AND sorder.ord_date <= '$date_before'";
529                 }
530         }
531                 if ($trans_type == ST_SALESQUOTE && !check_value('show_all'))
532                         $sql .= " AND sorder.delivery_date >= '".date2sql(Today())."' AND line.qty_sent=0"; // show only outstanding, not realized quotes
533
534                 //if ($selected_customer != -1)
535                 //      $sql .= " AND sorder.debtor_no=".db_escape($selected_customer);
536
537                 if ($stock_item != ALL_TEXT)
538                         $sql .= " AND line.stk_code=".db_escape($stock_item);
539
540                 if ($location != ALL_TEXT)
541                         $sql .= " AND sorder.from_stk_loc = ".db_escape($location);
542
543                 if ($filter=='OutstandingOnly')
544                         $sql .= " AND line.qty_sent < line.quantity";
545
546                 if ($filter=='PrepaidOrders')
547                         $sql .= " AND prep_amount>0";
548
549                 elseif ($filter=='InvoiceTemplates' || $filter=='DeliveryTemplates')
550                         $sql .= " AND sorder.type=1";
551
552                 //Chaiatanya : New Filter
553                 if ($customer_id != ALL_TEXT)
554                         $sql .= " AND sorder.debtor_no = ".db_escape($customer_id);             
555
556                 $sql .= " GROUP BY sorder.order_no,
557                                         sorder.debtor_no,
558                                         sorder.branch_code,
559                                         sorder.customer_ref,
560                                         sorder.ord_date,
561                                         sorder.deliver_to";
562         return $sql;
563 }
564
565 //--------------------------------------------------------------------------------------------------
566 function update_prepaid_so_line($line_id, $qty_invoiced)
567 {
568         $sql = "UPDATE ".TB_PREF."sales_order_details
569                 SET invoiced = invoiced + ".(float)$qty_invoiced."
570                 WHERE id=".db_escape($line_id);
571
572         db_query($sql, "The document detail record could not be updated with invoiced qty");
573         return true;
574 }
575 /*
576         Returns array of all issued invoices to sales order $order_no, optinally up to trans_no==$up_to
577 */
578 function get_sales_order_invoices($order_no)
579 {
580         $sql = "SELECT trans_no, dt.type as type, tran_date, reference, prep_amount
581             FROM ".TB_PREF."debtor_trans dt
582                 LEFT JOIN ".TB_PREF."voided v ON v.type=dt.type AND v.id=dt.trans_no
583                 WHERE ISNULL(v.id) AND dt.type=".ST_SALESINVOICE." AND dt.order_=".db_escape($order_no)
584                 ." ORDER BY dt.tran_date, dt.reference, dt.trans_no";
585
586         return db_query($sql, "cannot retrieve sales invoices for sales order");
587 }
588
589 function is_sales_order_started($order_no)
590 {
591         $sql = "SELECT count(*) FROM ".TB_PREF."sales_order_details WHERE order_no=".db_escape($order_no)." AND trans_type=".ST_SALESORDER
592                 ." AND (invoiced!=0 OR qty_sent!=0)";
593
594         $result = db_fetch(db_query($sql, "cannot retrieve sales invoices for sales order"));
595         return $result[0];
596 }
597
598 //---------------------------------------------------------------------------------------------
599 //
600 // Mark/unmark sales order as template.
601 //
602 function sales_order_set_template($id, $status)
603 {
604         $sql = "UPDATE ".TB_PREF."sales_orders SET type = ".db_escape($status)." WHERE order_no=".db_escape($id);
605         db_query($sql, "Can't change sales order type");
606 }
607
608 /*
609         Check whether sales order is issued in prepaid mode and already opened
610 */
611
612 function is_prepaid_order_open($order_no)
613 {
614         $sql = "SELECT count(*)
615                 FROM ".TB_PREF."sales_orders o,
616                 ((SELECT trans_no_to FROM ".TB_PREF."cust_allocations
617                                 WHERE trans_type_to=".ST_SALESORDER." AND trans_no_to=".db_escape($order_no).")
618                 UNION
619                   (SELECT order_ FROM ".TB_PREF."debtor_trans 
620                         WHERE type=".ST_SALESINVOICE." AND order_=".db_escape($order_no).")) related
621         WHERE
622                 o.prep_amount>0
623                 AND o.trans_type = ".ST_SALESORDER."
624                 AND o.order_no = " . db_escape($order_no);
625
626         $result = db_fetch(db_query($sql, "cannot check prepaid order open"));
627
628         return $result[0];
629 }
630
631 function last_sales_order_detail($order, $field)
632 {
633         $sql = "SELECT $field
634             FROM ".TB_PREF."sales_order_details d
635             WHERE order_no =
636             (SELECT order_no FROM ".TB_PREF."sales_orders o
637             WHERE debtor_no=" . db_escape($order->customer_id) . "
638             ORDER BY order_no DESC LIMIT 1)
639             ORDER BY d.id DESC LIMIT 1";        
640
641         $last_query=db_query($sql, "Retreive last order detail");
642         $row = db_fetch_row($last_query);
643         return $row[0];
644 }
645
646 function get_sales_vat_category($trans_no, $type=ST_SALESINVOICE)
647 {
648         $sql = "SELECT vat_category
649                         FROM ".TB_PREF."debtor_trans_details line
650                         LEFT JOIN ".TB_PREF."stock_master stock ON line.stock_id=stock.stock_id
651                 WHERE debtor_trans_type=".db_escape($type)." AND debtor_trans_no=".db_escape($trans_no);
652         $result = db_query($sql, 'cannot check invoice category');
653   $line = db_fetch($result);
654         return $line['vat_category'];
655 }
656