Release 2.3.9 and rerun of some files
[fa-stable.git] / includes / ui / ui_view.inc
index 5e3a8a157bd069004617be15bfc365e30dba70b4..14d1eb021347967e630ac58a3d2bc76466563c8e 100644 (file)
@@ -201,6 +201,19 @@ function get_journal_trans_view_str($type, $trans_no, $label="", $icon=false,
        return viewer_link($label, $viewer, $class, $id,  $icon);
 }
 
+//--------------------------------------------------------------------------------------
+
+function get_package_view_str($pkg, $label="", $icon=false, $class='', $id='')
+{
+       if ($label == "")
+       {
+               $label = _("Info");
+//             $icon = ICON_GL;
+       }
+       return viewer_link($label, "includes/ui/view_package.php?id=$pkg", $class, $id, $icon);
+}
+
+
 //--------------------------------------------------------------------------------------
 
 function get_trans_view_str($type, $trans_no, $label="", $icon=false, 
@@ -283,13 +296,12 @@ function exchange_rate_display($from_currency, $to_currency, $date_, $edit_rate=
 
 function is_voided_display($type, $id, $label)
 {
-       global $table_style;
        $void_entry = get_voided_entry($type, $id);
 
        if ($void_entry == null)
                return false;
 
-       start_table("width=50% $table_style");
+       start_table(TABLESTYLE, "width=50%");
        echo "<tr><td align=center><font color=red>$label</font><br>";
        echo "<font color=red>" . _("Date Voided:") . " " . sql2date($void_entry["date_"]) . "</font><br>";
        if (strlen($void_entry["memo_"]) > 0)
@@ -356,18 +368,18 @@ function view_stock_status_cell($stock_id, $description=null)
 
 //--------------------------------------------------------------------------------------
 
-function display_debit_or_credit_cells($value)
+function display_debit_or_credit_cells($value, $bold=false)
 {
        $value = round2($value, user_price_dec());
        if ($value >= 0)
        {
-               amount_cell($value);
+               amount_cell($value, $bold);
                label_cell("");
        }
        elseif ($value < 0)
        {
                label_cell("");
-               amount_cell(abs($value));
+               amount_cell(abs($value), $bold);
        }
 }
 
@@ -375,15 +387,34 @@ function display_debit_or_credit_cells($value)
 
 function display_customer_trans_tax_details($tax_items, $columns)
 {
+       global $alternative_tax_include_on_docs, $suppress_tax_rates;
+       $first = true;
     while ($tax_item = db_fetch($tax_items))
     {
+       if (!$tax_item['amount'])
+               continue;
+
        $tax = number_format2($tax_item['amount'],user_price_dec());
+               if (isset($suppress_tax_rates) && $suppress_tax_rates == 1)
+                       $tax_type_name = $tax_item['tax_type_name'];
+               else
+                       $tax_type_name = $tax_item['tax_type_name']." (".$tax_item['rate']."%) ";
        if ($tax_item['included_in_price'])
-               label_row(_("Included") . " " . $tax_item['tax_type_name'] . " (" . $tax_item['rate'] . "%) " .
-                       _("Amount") . ": $tax", "", "colspan=$columns align=right", "align=right");
+       {
+                       if (isset($alternative_tax_include_on_docs) && $alternative_tax_include_on_docs == 1)
+                       {
+                               if ($first)
+                                       label_row(_("Total Tax Excluded"), number_format2($tax_item['net_amount'], user_price_dec()),
+                                               "colspan=$columns align=right", "align=right");
+                       label_row($tax_type_name, $tax, "colspan=$columns align=right", "align=right");
+                       $first = false;
+               }
+               else
+                       label_row(_("Included") . " " . $tax_type_name
+                               . ": $tax", "", "colspan=$columns align=right", "align=right");
+        }                      
        else
-               label_row($tax_item['tax_type_name'] . " (" . $tax_item['rate'] . "%)",
-                       $tax, "colspan=$columns align=right", "align=right");
+               label_row($tax_type_name, $tax, "colspan=$columns align=right", "align=right");
     }
 }
 
@@ -393,10 +424,13 @@ function display_supp_trans_tax_details($tax_items, $columns)
 {
     while ($tax_item = db_fetch($tax_items))
     {
+       if (!$tax_item['amount'])
+               continue;
+
        $tax = number_format2(abs($tax_item['amount']),user_price_dec());
        if ($tax_item['included_in_price'])
-               label_row(_("Included") . " " . $tax_item['tax_type_name'] . " (" . $tax_item['rate'] . "%) " .
-                       _("Amount") . ": $tax", "colspan=$columns align=right", "align=right");
+               label_row(_("Included") . " " . $tax_item['tax_type_name'] . " (" . $tax_item['rate'] . "%) "
+                       . ": $tax", '', "colspan=$columns align=right", "align=right");
        else
                label_row($tax_item['tax_type_name'] . " (" . $tax_item['rate'] . "%)",
                        $tax, "colspan=$columns align=right", "align=right");
@@ -411,16 +445,18 @@ function display_edit_tax_items($taxes, $columns, $tax_included, $leftspan=0)
 
     foreach ($taxes as $taxitem)
     {
-       if ($tax_included)
-       {
-               label_row(_("Included") . " " . $taxitem['tax_type_name'] . " (" . $taxitem['rate'] . "%) " .
-                       _("Amount:") . " " . number_format2($taxitem['Value'],user_price_dec()), "", "colspan=$columns align=right", "align=right",$leftspan);
-       }
-       else
-       {
-               label_row($taxitem['tax_type_name'] . " (" . $taxitem['rate'] . "%)",
-                       number_format2($taxitem['Value'],user_price_dec()), "colspan=$columns align=right", "align=right",$leftspan);
-               $total +=  round2($taxitem['Value'], user_price_dec());
+       if ($taxitem['Value'] != 0) {
+               if ($tax_included)
+               {
+                       label_row(_("Included") . " " . $taxitem['tax_type_name']
+                               . " " . number_format2($taxitem['Value'],user_price_dec()), "", "colspan=$columns align=right", "align=right",$leftspan);
+               }
+               else
+               {
+                       label_row($taxitem['tax_type_name'],
+                               number_format2($taxitem['Value'],user_price_dec()), "colspan=$columns align=right", "align=right",$leftspan);
+                       $total +=  round2($taxitem['Value'], user_price_dec());
+               }
        }
     }
 
@@ -438,16 +474,16 @@ function display_footer_exit()
 
 //--------------------------------------------------------------------------------------
 
-function display_allocations($alloc_result, $total)
+function display_allocations($alloc_result, $total, $payments=false)
 {
-       global $table_style, $systypes_array;
+       global $systypes_array;
 
        if (!$alloc_result || db_num_rows($alloc_result) == 0)
                return;
 
-    display_heading2(_("Allocations"));
+    display_heading2(($payments ? _("Payments") : _("Allocations")));
 
-    start_table("$table_style width=80%");
+    start_table(TABLESTYLE, "width=80%");
 
     $th = array( _("Type"), _("Number"), _("Date"), _("Total Amount"),
        _("Left to Allocate"), _("This Allocation"));
@@ -502,6 +538,23 @@ function display_allocations_from($person_type, $person_id, $type, $type_no, $to
        }
 }
 
+//--------------------------------------------------------------------------------------
+
+function display_allocations_to($person_type, $person_id, $type, $type_no, $total)
+{
+       switch ($person_type)
+       {
+               case PT_CUSTOMER :
+                       $alloc_result = get_allocatable_from_cust_transactions($person_id, $type_no, $type);
+                       display_allocations($alloc_result, $total, true);
+                       return;
+               case PT_SUPPLIER :
+                       $alloc_result = get_allocatable_from_supp_transactions($person_id, $type_no, $type);
+                       display_allocations($alloc_result, $total, true);
+                       return;
+       }
+}
+
 //--------------------------------------------------------------------------------------
 //
 //     Expands selected quick entry $id into GL posings and adds to cart.
@@ -523,8 +576,28 @@ function display_quick_entries(&$cart, $id, $base, $type, $descr='')
                if ($type != QE_SUPPINV)        // only one quick entry on journal/bank transaction
                        $cart->clear_items();
                $qe = get_quick_entry($id);
+               if ($qe['bal_type'] == 1)
+               {
+                       if ($qe['base_amount'] == 1.0) // monthly
+                               $begin = begin_month($cart->tran_date);
+                       else
+                       {
+                               if (is_account_balancesheet($qe['base_desc'])) // total
+                                       $begin = "";
+                               else
+                                       $begin = begin_fiscalyear(); // from fiscalyear begin
+                       }               
+                       $base = get_gl_trans_from_to($begin, $cart->tran_date, $qe['base_desc']);
+                               
+               }
                if ($descr != '') $qe['description'] .= ': '.$descr;
                $result = get_quick_entry_lines($id);
+               if (db_num_rows($result) == 0)
+               {
+                       display_error( _("No Quick Entry lines are defined."));
+                       set_focus('totamount');
+                       return 0;
+               }       
                $totrate = 0;
                while ($row = db_fetch($result))
                {
@@ -578,13 +651,14 @@ function display_quick_entries(&$cart, $id, $base, $type, $descr='')
                                        if (substr($qe_line['action'],0,1) != 'T') 
                                                $part = $taxbase;
                                        else
-                                               $part = $base;
+                                               $part = $base/100;
                                        $item_tax = get_tax_type($qe_line['dest_id']);
-                                       if ($type == QE_SUPPINV && substr($qe_line['action'],0,1) != 'T')
+                                       //if ($type == QE_SUPPINV && substr($qe_line['action'],0,1) != 'T')
+                                       if ($type == QE_SUPPINV)
                                        {
                                                $taxgroup = $cart->tax_group_id;
                                                $rates = 0;
-                                               $res = get_tax_group_items($cart->tax_group_id);
+                                               $res = get_tax_group_rates($cart->tax_group_id);
                                                while ($row = db_fetch($res))
                                                        $rates += $row['rate'];
                                                if ($rates == 0)
@@ -660,10 +734,10 @@ function _number_to_words($number)
 
     $ones = array("", "One", "Two", "Three", "Four", "Five", "Six", 
         "Seven", "Eight", "Nine", "Ten", "Eleven", "Twelve", "Thirteen", 
-        "Fourteen", "Fifteen", "Sixteen", "Seventeen", "Eightteen", 
+        "Fourteen", "Fifteen", "Sixteen", "Seventeen", "Eighteen", 
         "Nineteen"); 
     $tens = array("", "", "Twenty", "Thirty", "Fourty", "Fifty", "Sixty", 
-        "Seventy", "Eigthy", "Ninety"); 
+        "Seventy", "Eighty", "Ninety"); 
 
     if ($Dn || $n) 
     { 
@@ -686,12 +760,11 @@ function _number_to_words($number)
 
 function price_in_words($amount, $document=0)
 {
-       global $Hooks;
        // use local price_in_words() if the hook is defined
-       if (method_exists($Hooks, 'price_in_words'))
-       {
-               return $Hooks->price_in_words($amount, $document);
-       }
+       $price = hook_price_in_words($amount, $document);
+       if ($price) 
+               return $price;
+
        // Only usefor Remittance and Receipts as default
        if (!($document == ST_SUPPAYMENT || $document == ST_CUSTPAYMENT || $document == ST_CHEQUE))
                return "";
@@ -752,35 +825,10 @@ function reset_focus()
        unset($_POST['_focus']);
 }
 
-function get_js_png_fix()
-{
-       $js = "function fixPNG(myImage)\n"
-               . "{\n"
-               . " var arVersion = navigator.appVersion.split(\"MSIE\")\n"
-               . " var version = parseFloat(arVersion[1])\n"
-       . " if ((version >= 5.5) && (version < 7) && (document.body.filters))\n"
-       . " {\n"
-               . "  var imgID = (myImage.id) ? \"id='\" + myImage.id + \"' \" : \"\"\n"
-               . "  var imgClass = (myImage.className) ? \"class='\" + myImage.className + \"' \" : \"\"\n"
-               . "  var imgTitle = (myImage.title) ?\n"
-               . "    \"title='\" + myImage.title  + \"' \" : \"title='\" + myImage.alt + \"' \"\n"
-               . "  var imgStyle = \"display:inline-block;\" + myImage.style.cssText\n"
-               . "  var strNewHTML = \"<span \" + imgID + imgClass + imgTitle\n"
-        . "    + \" style=\\\"\" + \"width:\" + myImage.width\n"
-        . "    + \"px; height:\" + myImage.height\n"
-        . "    + \"px;\" + imgStyle + \";\"\n"
-        . "    + \"filter:progid:DXImageTransform.Microsoft.AlphaImageLoader\"\n"
-        . "    + \"(src=\'\" + myImage.src + \"\', sizingMethod='scale');\\\"></span>\"\n"
-               . "  myImage.outerHTML = strNewHTML\n"
-       . " }\n"
-               . "}\n";
-       return $js;
-}
-
 function get_js_date_picker()
 {
-    global $comp_path, $go_debug;
-    $fpath = $comp_path.'/'.user_company().'/js_cache/'.'date_picker.js';
+    global $go_debug;
+    $fpath = company_path().'/js_cache/'.'date_picker.js';
 
     if (!file_exists($fpath) || $go_debug) {
 
@@ -1242,53 +1290,59 @@ if (!function_exists('_vd'))
 {
        function _vd($mixed, $title = '', $exit = false)
        {
-       // Only the site admin is able to proceed here.
        $str = (!empty($title) ? ($title .':') : '') .'<pre>';
        $str .= print_r($mixed, true); //var_dump($mixed);
        $str .= "</pre>\n";
-               display_error('<table><tr><td>'.$str.'</td></tr></table>');
+               display_notification('<table><tr><td>'.$str.'</td></tr></table>');
        if ($exit)
                exit;
        }
 }
 
-function display_backtrace($cond=true, $msg='') {
+function _vl($mixed, $title = '', $exit = false)
+{
+       error_log((!empty($title) ? ($title .':') : '') . var_export($mixed, true));
+       if ($exit)
+               exit;
+}
 
+function display_backtrace($cond=true, $msg='') {
        if ($cond) {
                if ($msg) 
                        $str = "<center><span class='headingtext'>$msg</span></center>\n";
                else
                        $str = '';
-               $str .= '<table border=0>';
-        $trace = debug_backtrace();
-               foreach($trace as $trn => $tr) {
-                       if (!$trn) continue;
-                       $str .= '<tr><td>';
-                       $str .= $tr['file'].':'.$tr['line'].': ';
-                       $str .= '</td><td>';
-                       if (isset($tr['type'])) {
-                               if($tr['type'] == '::') {
-                                       $str .= $tr['class'].'::';
-                               } else if($tr['type'] == '->') {
-                                       $str .= '('.$tr['class'].' Object)'.'->';
-                               }
-                       }
-                       foreach($tr['args'] as $n=>$a) {
-                               if (is_object($tr['args'][$n]))
-                                       $tr['args'][$n] = "(".get_class($tr['args'][$n])." Object)";
-                               if (is_array($tr['args'][$n]))
-                                       $tr['args'][$n] = "(Array[".count($tr['args'][$n])."])";
-                               else
-                                       $tr['args'][$n] = "'".$tr['args'][$n]."'";
-                       }
-                       $str .= $tr['function'].'('. implode(',',$tr['args']).')</td>';
-
-                       $str .= '</tr>';
-               }
-               
-               $str .= '</table>';
-               display_error($str);
+               $str .= get_backtrace(true);
+               display_error($str);
        }
 }
 
+//
+// FIXME: $payment_services array will be moved to bank_accounts in 2.4.x
+//
+if (!isset($payment_services))
+{
+       $payment_services = array(
+               'PayPal' => "https://www.paypal.com/xclick/business=<company_email>&item_name=<comment>&amount=<amount>&currency_code=<currency>",
+       );
+}
+/*
+*      Payment link generation. Options provided during invoice generation:
+*      company_email, comment, amount, currency
+*/
+function payment_link($name, $options)
+{
+       global $payment_services;
+
+       $link = @$payment_services[$name];
+
+       if (!$link) return null;
+
+       $patterns = array();
+       foreach ($options as $id => $option)
+               $patterns['<'.$id.'>'] = urlencode($options[$id]);
+
+       return strtr($link, $patterns);
+}
+
 ?>
\ No newline at end of file