[0000235],[000236] db error when no deliveries yet.
[fa-stable.git] / sales / view / view_sales_order.php
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 $page_security = 'SA_SALESTRANSVIEW';
13 $path_to_root = "../..";
14 include_once($path_to_root . "/sales/includes/cart_class.inc");
15
16 include_once($path_to_root . "/includes/session.inc");
17 include_once($path_to_root . "/includes/date_functions.inc");
18
19 include_once($path_to_root . "/sales/includes/sales_ui.inc");
20 include_once($path_to_root . "/sales/includes/sales_db.inc");
21
22 $js = "";
23 if ($use_popup_windows)
24         $js .= get_js_open_window(900, 600);
25
26 if ($_GET['trans_type'] == ST_SALESQUOTE)
27 {
28         page(_($help_context = "View Sales Quotation"), true, false, "", $js);
29         display_heading(sprintf(_("Sales Quotation #%d"),$_GET['trans_no']));
30 }       
31 else
32 {
33         page(_($help_context = "View Sales Order"), true, false, "", $js);
34         display_heading(sprintf(_("Sales Order #%d"),$_GET['trans_no']));
35 }
36
37 if (isset($_SESSION['View']))
38 {
39         unset ($_SESSION['View']);
40 }
41
42 $_SESSION['View'] = new Cart($_GET['trans_type'], $_GET['trans_no'], true);
43
44 start_table("$table_style2 width=95%", 5);
45 echo "<tr valign=top><td>";
46 display_heading2(_("Order Information"));
47 if ($_GET['trans_type'] != ST_SALESQUOTE)
48 {
49         echo "</td><td>";
50         display_heading2(_("Deliveries"));
51         echo "</td><td>";
52         display_heading2(_("Invoices/Credits"));
53 }       
54 echo "</td></tr>";
55
56 echo "<tr valign=top><td>";
57
58 start_table("$table_style width=95%");
59 label_row(_("Customer Name"), $_SESSION['View']->customer_name, "class='tableheader2'",
60         "colspan=3");
61 start_row();
62 label_cells(_("Customer Order Ref."), $_SESSION['View']->cust_ref, "class='tableheader2'");
63 label_cells(_("Deliver To Branch"), $_SESSION['View']->deliver_to, "class='tableheader2'");
64 end_row();
65 start_row();
66 label_cells(_("Ordered On"), $_SESSION['View']->document_date, "class='tableheader2'");
67 if ($_GET['trans_type'] == ST_SALESQUOTE)
68         label_cells(_("Valid until"), $_SESSION['View']->due_date, "class='tableheader2'");
69 else
70         label_cells(_("Requested Delivery"), $_SESSION['View']->due_date, "class='tableheader2'");
71 end_row();
72 start_row();
73 label_cells(_("Order Currency"), $_SESSION['View']->customer_currency, "class='tableheader2'");
74 label_cells(_("Deliver From Location"), $_SESSION['View']->location_name, "class='tableheader2'");
75 end_row();
76
77 label_row(_("Delivery Address"), nl2br($_SESSION['View']->delivery_address),
78         "class='tableheader2'", "colspan=3");
79 label_row(_("Reference"), $_SESSION['View']->reference, "class='tableheader2'", "colspan=3");
80 label_row(_("Telephone"), $_SESSION['View']->phone, "class='tableheader2'", "colspan=3");
81 label_row(_("E-mail"), "<a href='mailto:" . $_SESSION['View']->email . "'>" . $_SESSION['View']->email . "</a>",
82         "class='tableheader2'", "colspan=3");
83 label_row(_("Comments"), $_SESSION['View']->Comments, "class='tableheader2'", "colspan=3");
84 end_table();
85
86 if ($_GET['trans_type'] != ST_SALESQUOTE)
87 {
88         echo "</td><td valign='top'>";
89
90         start_table($table_style);
91         display_heading2(_("Delivery Notes"));
92
93
94         $th = array(_("#"), _("Ref"), _("Date"), _("Total"));
95         table_header($th);
96
97         $sql = "SELECT * FROM ".TB_PREF."debtor_trans WHERE type=".ST_CUSTDELIVERY." AND order_=".db_escape($_GET['trans_no']);
98         $result = db_query($sql,"The related delivery notes could not be retreived");
99
100         $delivery_total = 0;
101         $k = 0;
102         $dn_numbers = array();
103         
104         while ($del_row = db_fetch($result))
105         {
106
107                 alt_table_row_color($k);
108                 $dn_numbers[] = $del_row["trans_link"];
109                 $this_total = $del_row["ov_freight"]+ $del_row["ov_amount"] + $del_row["ov_freight_tax"]  + $del_row["ov_gst"] ;
110                 $delivery_total += $this_total;
111
112                 label_cell(get_customer_trans_view_str($del_row["type"], $del_row["trans_no"]));
113                 label_cell($del_row["reference"]);
114                 label_cell(sql2date($del_row["tran_date"]));
115                 amount_cell($this_total);
116                 end_row();
117
118         }
119
120         label_row(null, price_format($delivery_total), " ", "colspan=4 align=right");
121
122         end_table();
123         echo "</td><td valign='top'>";
124
125         start_table($table_style);
126         display_heading2(_("Sales Invoices"));
127
128         $th = array(_("#"), _("Ref"), _("Date"), _("Total"));
129         table_header($th);
130
131         $inv_numbers = array();
132         $invoices_total = 0;
133
134         if (count($dn_numbers)) {
135
136                 $sql = "SELECT * FROM ".TB_PREF."debtor_trans WHERE type=".ST_SALESINVOICE
137                         ." AND trans_no IN(". implode(',', array_values($dn_numbers)).")";
138
139                 $result = db_query($sql,"The related invoices could not be retreived");
140
141                 $k = 0;
142
143                 while ($inv_row = db_fetch($result))
144                 {
145
146                         alt_table_row_color($k);
147
148                         $this_total = $inv_row["ov_freight"] + $inv_row["ov_freight_tax"]  + $inv_row["ov_gst"] + $inv_row["ov_amount"];
149                         $invoices_total += $this_total;
150
151                         $inv_numbers[] = $inv_row["trans_no"];
152                         label_cell(get_customer_trans_view_str($inv_row["type"], $inv_row["trans_no"]));
153                         label_cell($inv_row["reference"]);
154                         label_cell(sql2date($inv_row["tran_date"]));
155                         amount_cell($this_total);
156                         end_row();
157
158                 }
159         }
160         label_row(null, price_format($invoices_total), " ", "colspan=4 align=right");
161
162         end_table();
163
164         display_heading2(_("Credit Notes"));
165
166         start_table($table_style);
167         $th = array(_("#"), _("Ref"), _("Date"), _("Total"));
168         table_header($th);
169
170         $credits_total = 0;
171         if (count($inv_numbers)) {
172                 // FIXME -  credit notes retrieved here should be those linked to invoices containing 
173                 // at least one line from this order
174         
175                 $sql = "SELECT * FROM ".TB_PREF."debtor_trans WHERE type=".ST_CUSTCREDIT
176                         ." AND trans_link IN(". implode(',', array_values($inv_numbers)).")";
177
178                 $result = db_query($sql,"The related credit notes could not be retreived");
179
180                 $k = 0;
181
182                 while ($credits_row = db_fetch($result))
183                 {
184
185                         alt_table_row_color($k);
186
187                         $this_total = $credits_row["ov_freight"] + $credits_row["ov_freight_tax"]  + $credits_row["ov_gst"] + $credits_row["ov_amount"];
188                         $credits_total += $this_total;
189
190                         label_cell(get_customer_trans_view_str($credits_row["type"], $credits_row["trans_no"]));
191                         label_cell($credits_row["reference"]);
192                         label_cell(sql2date($credits_row["tran_date"]));
193                         amount_cell(-$this_total);
194                         end_row();
195
196                 }
197         }
198         label_row(null, "<font color=red>" . price_format(-$credits_total) . "</font>",
199                 " ", "colspan=4 align=right");
200
201         end_table();
202
203         echo "</td></tr>";
204
205         end_table();
206 }
207 echo "<center>";
208 if ($_SESSION['View']->so_type == 1)
209         display_note(_("This Sales Order is used as a Template."), 0, 0, "class='currentfg'");
210 display_heading2(_("Line Details"));
211
212 start_table("colspan=9 width=95% $table_style");
213 $th = array(_("Item Code"), _("Item Description"), _("Quantity"), _("Unit"),
214         _("Price"), _("Discount"), _("Total"), _("Quantity Delivered"));
215 table_header($th);
216
217 $k = 0;  //row colour counter
218
219 foreach ($_SESSION['View']->line_items as $stock_item) {
220
221         $line_total = round2($stock_item->quantity * $stock_item->price * (1 - $stock_item->discount_percent),
222            user_price_dec());
223
224         alt_table_row_color($k);
225
226         label_cell($stock_item->stock_id);
227         label_cell($stock_item->item_description);
228         $dec = get_qty_dec($stock_item->stock_id);
229         qty_cell($stock_item->quantity, false, $dec);
230         label_cell($stock_item->units);
231         amount_cell($stock_item->price);
232         amount_cell($stock_item->discount_percent * 100);
233         amount_cell($line_total);
234
235         qty_cell($stock_item->qty_done, false, $dec);
236         end_row();
237 }
238
239 $items_total = $_SESSION['View']->get_items_total();
240
241 $display_total = price_format($items_total + $_SESSION['View']->freight_cost);
242
243 label_row(_("Shipping"), price_format($_SESSION['View']->freight_cost),
244         "align=right colspan=6", "nowrap align=right", 1);
245 label_row(_("Total Order Value"), $display_total, "align=right colspan=6",
246         "nowrap align=right", 1);
247
248 end_table(2);
249
250 end_page(true);
251
252 ?>