New files from unstable branch
[fa-stable.git] / sales / view / view_credit.php
index f220fca140512116bcd29f3f7af4c1d8fe935855..4291d9dc11ee89805c42ab2c9e0d428aa97249d7 100644 (file)
@@ -1,7 +1,16 @@
 <?php
-
-$page_security = 1;
-$path_to_root="../..";
+/**********************************************************************
+    Copyright (C) FrontAccounting, LLC.
+       Released under the terms of the GNU General Public License, GPL, 
+       as published by the Free Software Foundation, either version 3 
+       of the License, or (at your option) any later version.
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
+    See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
+***********************************************************************/
+$page_security = 'SA_SALESTRANSVIEW';
+$path_to_root = "../..";
 include_once($path_to_root . "/includes/session.inc");
 
 include_once($path_to_root . "/includes/date_functions.inc");
@@ -12,7 +21,7 @@ include_once($path_to_root . "/sales/includes/sales_db.inc");
 $js = "";
 if ($use_popup_windows)
        $js .= get_js_open_window(900, 500);
-page(_("View Credit Note"), true, false, "", $js);
+page(_($help_context = "View Credit Note"), true, false, "", $js);
 
 if (isset($_GET["trans_no"]))
 {
@@ -23,18 +32,18 @@ elseif (isset($_POST["trans_no"]))
        $trans_id = $_POST["trans_no"];
 }
 
-$myrow = get_customer_trans($trans_id, 11);
+$myrow = get_customer_trans($trans_id, ST_CUSTCREDIT);
 
 $branch = get_branch($myrow["branch_code"]);
 
 display_heading("<font color=red>" . sprintf(_("CREDIT NOTE #%d"), $trans_id). "</font>");
 echo "<br>";
 
-start_table("$table_style2 width=95%");
+start_table(TABLESTYLE2, "width=95%");
 echo "<tr valign=top><td>"; // outer table
 
 /*Now the customer charged to details in a sub table*/
-start_table("$table_style width=100%");
+start_table(TABLESTYLE, "width=100%");
 $th = array(_("Customer"));
 table_header($th);
 
@@ -45,7 +54,7 @@ end_table();
 
 echo "</td><td>"; // outer table
 
-start_table("$table_style width=100%");
+start_table(TABLESTYLE, "width=100%");
 $th = array(_("Branch"));
 table_header($th);
 
@@ -54,7 +63,7 @@ end_table();
 
 echo "</td><td>"; // outer table
 
-start_table("$table_style width=100%");
+start_table(TABLESTYLE, "width=100%");
 start_row();
 label_cells(_("Ref"), $myrow["reference"], "class='tableheader2'");
 label_cells(_("Date"), sql2date($myrow["tran_date"]), "class='tableheader2'");
@@ -64,7 +73,7 @@ start_row();
 label_cells(_("Sales Type"), $myrow["sales_type"], "class='tableheader2'");
 label_cells(_("Shipping Company"), $myrow["shipper_name"], "class='tableheader2'");
 end_row();
-comments_display_row(11, $trans_id);
+comments_display_row(ST_CUSTCREDIT, $trans_id);
 end_table();
 
 echo "</td></tr>";
@@ -72,9 +81,9 @@ end_table(1); // outer table
 
 $sub_total = 0;
 
-$result = get_customer_trans_details(11, $trans_id);
+$result = get_customer_trans_details(ST_CUSTCREDIT, $trans_id);
 
-start_table("$table_style width=95%");
+start_table(TABLESTYLE, "width=95%");
 
 if (db_num_rows($result) > 0)
 {
@@ -87,10 +96,10 @@ if (db_num_rows($result) > 0)
 
        while ($myrow2 = db_fetch($result))
        {
-
+               if ($myrow2["quantity"] == 0) continue;
                alt_table_row_color($k);
 
-               $value = round(((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"]),
+               $value = round2(((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"]),
                   user_price_dec());
                $sub_total += $value;
 
@@ -128,21 +137,21 @@ if ($sub_total != 0)
                "nowrap align=right width=15%");
 label_row(_("Shipping"), $display_freight, "colspan=6 align=right", "nowrap align=right");
 
-$tax_items = get_customer_trans_tax_details(11, $trans_id);
+$tax_items = get_trans_tax_details(ST_CUSTCREDIT, $trans_id);
 display_customer_trans_tax_details($tax_items, 6);
 
 label_row("<font color=red>" . _("TOTAL CREDIT") . "</font",
        "<font color=red>$display_total</font>", "colspan=6 align=right", "nowrap align=right");
 end_table(1);
 
-$voided = is_voided_display(11, $trans_id, _("This credit note has been voided."));
+$voided = is_voided_display(ST_CUSTCREDIT, $trans_id, _("This credit note has been voided."));
 
 if (!$voided)
-       display_allocations_from(payment_person_types::customer(),
-               $myrow['debtor_no'], 11, $trans_id, $credit_total);
+       display_allocations_from(PT_CUSTOMER,
+               $myrow['debtor_no'], ST_CUSTCREDIT, $trans_id, $credit_total);
 
 /* end of check to see that there was an invoice record to print */
 
-end_page(true);
+end_page(true, false, false, ST_CUSTCREDIT, $trans_id);
 
 ?>
\ No newline at end of file