Activated strict SQL mode, minor SQL injection fix, fixed _vl() debug helper.
[fa-stable.git] / includes / ui / ui_input.inc
index 951bbccd018b25b025e3704547cd347b25987d73..59a3676ef5664ed7ccc7bd004411ac37c2c824aa 100644 (file)
@@ -1,19 +1,14 @@
 <?php
 /**********************************************************************
     Copyright (C) FrontAccounting, LLC.
-       Released under the terms of the GNU Affero General Public License,
-       AGPL, as published by the Free Software Foundation, either version 
-       of the License, or (at your option) any later version.
+       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/agpl-3.0.html>.
+    See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
 ***********************************************************************/
-
-function get_post($name, $dflt='')
-{
-       return ((!isset($_POST[$name]) || $_POST[$name] === '') ? $dflt : $_POST[$name]);
-}
 //
 // Sets local POST value and adds Value to ajax posting if needed
 //
@@ -42,6 +37,15 @@ function find_submit($prefix, $numeric=true)
     }
     return $numeric ? -1 : null;
 }
+/*
+       Helper function.
+       Returns true if input $name with $submit_on_change option set is subject to update.
+*/
+function input_changed($name)
+{
+       return isset($_POST['_'.$name.'_changed']);
+}
+
 //------------------------------------------------------------------------------
 //
 // Helper function for simple db table editor pages
@@ -52,11 +56,12 @@ function simple_page_mode($numeric_id = true)
 
        $default = $numeric_id ? -1 : '';
        $selected_id = get_post('selected_id', $default);
-       foreach (array('ADD_ITEM', 'UPDATE_ITEM', 'RESET') as $m) {
+       foreach (array('ADD_ITEM', 'UPDATE_ITEM', 'RESET', 'CLONE') as $m) {
                if (isset($_POST[$m])) {
                        $Ajax->activate('_page_body');
-                       if ($m == 'RESET') 
+                       if ($m == 'RESET'  || $m == 'CLONE'
                                $selected_id = $default;
+                       unset($_POST['_focus']);
                        $Mode = $m; return;
                }
        }
@@ -79,7 +84,7 @@ function simple_page_mode($numeric_id = true)
 //
 //     Read numeric value from user formatted input
 //
-function input_num($postname=null, $dflt=null)
+function input_num($postname=null, $dflt=0)
 {
        if (!isset($_POST[$postname]) || $_POST[$postname] == "")
                return $dflt;
@@ -88,10 +93,16 @@ function input_num($postname=null, $dflt=null)
 }
 
 //---------------------------------------------------------------------------------
+//
+//     Thanks to hidden fields buffering hidden() helper can be used in arbitrary places and 
+//  proper html structure is still preserved. Buffered hidden fields are output on the nearest 
+//  table or form closing tag (see output_hidden()).
+//
+$hidden_fields = array();
 
 function hidden($name, $value=null, $echo=true)
 {
-       global $Ajax;
+       global $Ajax, $hidden_fields;
        
        if ($value === null) 
                $value = get_post($name);
@@ -99,25 +110,69 @@ function hidden($name, $value=null, $echo=true)
        $ret = "<input type=\"hidden\" name=\"$name\" value=\"$value\">";
        $Ajax->addUpdate($name, $name, $value);
        if ($echo)
-               echo $ret."\n";
+                       $hidden_fields[] = $ret;
        else
                return $ret;
 }
-
-function submit($name, $value, $echo=true, $title=false, $async=false, $icon=false)
+/*
+       Universal submit form button.
+       $atype - type of submit:
+        Normal submit:
+               false - normal button; optional icon
+               null  - button visible only in fallback mode; optional icon
+        Ajax submit:
+               true      - standard button; optional icon
+
+               'default' - default form submit on Ctrl-Enter press; dflt ICON_OK icon
+               'selector' - ditto with closing current popup editor window
+               'cancel'  - cancel form entry on Escape press; dflt ICON_CANCEL
+               'process' - displays progress bar during call; optional icon
+               'nonajax' - ditto, non-ajax submit
+
+       $atype can contain also multiply type selectors separated by space, 
+       however make sense only combination of 'process' and one of defualt/selector/cancel
+*/
+function submit($name, $value, $echo=true, $title=false, $atype=false, $icon=false)
 {
        global $path_to_root;
-       
-       default_focus($name);
+
+       $aspect='';
+       if ($atype === null) {
+               $aspect = fallback_mode() ? " aspect='fallback'" : " style='display:none;'";
+
+       } elseif (!is_bool($atype)) { // necessary: switch uses '=='
+
+               $aspect = " aspect='$atype' ";
+               $types = explode(' ', $atype);
+
+               foreach ($types as $type) {
+                       switch($type) {
+                               case 'selector':
+                                       $aspect = " aspect='selector' rel = '$value'"; 
+                                       $value = _("Select");
+                                       if ($icon===false) $icon=ICON_SUBMIT; break;
+
+                               case 'default':
+                                       if ($icon===false) $icon=ICON_SUBMIT; break;
+
+                               case 'cancel':
+                                       if ($icon===false) $icon=ICON_ESCAPE; break;
+
+                               case 'nonajax':
+                               case 'download':
+                                       $atype = false;
+                       }
+               }
+       }
        $submit_str = "<button class=\""
-           .($async ? 'ajaxsubmit' : 'inputsubmit')
+           .($atype ? 'ajaxsubmit' : 'inputsubmit')
                ."\" type=\"submit\""
-               .($async === null ? (fallback_mode() ? ' aspect="fallback"' : " style='display:none;'" ): 
-                       ($async === 'process' ? 'aspect="process"' : '') )
+               .$aspect
            ." name=\"$name\"  id=\"$name\" value=\"$value\""
            .($title ? " title='$title'" : '')
-           ."><span>$value</span>"
-               .($icon ? "<img src='$path_to_root/themes/".user_theme()."/images/$icon'>" : '')
+           .">"
+               .($icon ? "<img src='$path_to_root/themes/".user_theme()."/images/$icon' height='12' alt=''>" : '')
+               ."<span>$value</span>"
                ."</button>\n";
        if ($echo)
                echo $submit_str;
@@ -127,9 +182,9 @@ function submit($name, $value, $echo=true, $title=false, $async=false, $icon=fal
 
 function submit_center($name, $value, $echo=true, $title=false, $async=false, $icon=false)
 {
-       echo "<center>";
+       if ($echo) echo "<center>";
        submit($name, $value, $echo, $title, $async, $icon);
-       echo "</center>";
+       if ($echo) echo "</center>";
 }
 
 function submit_center_first($name, $value, $title=false, $async=false, $icon=false)
@@ -145,39 +200,51 @@ function submit_center_last($name, $value, $title=false, $async=false, $icon=fal
        submit($name, $value, true, $title, $async, $icon);
        echo "</center>";
 }
-
-function submit_add_or_update($add=true, $title=false, $async=false)
+/*
+       For following controls:
+       'both' - use both Ctrl-Enter and Escape hotkeys 
+       'upgrade' - use Ctrl-Enter with progress ajax indicator and Escape hotkeys. Nonajax request for OK option is performed.
+       'cancel' - apply to 'RESET' button
+*/
+function submit_add_or_update($add=true, $title=false, $async=false, $clone=false)
 {
+       $cancel = $async;
+
+       if ($async === 'both') {
+               $async = 'default'; $cancel = 'cancel';
+       }
+       elseif ($async === 'upgrade') {
+               $async = 'default nonajax process'; $cancel = 'cancel';
+       }
+       elseif ($async === 'default')
+               $cancel = true;
+       elseif ($async === 'cancel')
+               $async = true;
+       
        if ($add)
                submit('ADD_ITEM', _("Add new"), true, $title, $async);
        else {
-               submit('UPDATE_ITEM', _("Update"), true, $title, $async);
-               submit('RESET', _("Cancel"), true, $title, $async);
+               submit('UPDATE_ITEM', _("Update"), true, _('Submit changes'), $async);
+               if ($clone) submit('CLONE', _("Clone"), true, 
+                       _('Edit new record with current data'), $async);
+               submit('RESET', _("Cancel"), true, _('Cancel edition'), $cancel);
        }
 }
 
-function submit_add_or_update_center($add=true, $title=false, $async=false)
+function submit_add_or_update_center($add=true, $title=false, $async=false, $clone=false)
 {
        echo "<center>";
-       submit_add_or_update($add, $title, $async);
+       submit_add_or_update($add, $title, $async, $clone);
        echo "</center>";
 }
 
-/*
-function submit_add_or_update_row($add=true)
-{
-       echo "<tr><td colspan=99 align=center>";
-       submit_add_or_update($add);
-       echo "</td></tr>\n";
-}
-*/
-function submit_add_or_update_row($add=true, $right=true, $extra="", $title=false, $async=false)
+function submit_add_or_update_row($add=true, $right=true, $extra="", $title=false, $async=false, $clone = false)
 {
        echo "<tr>";
        if ($right)
                echo "<td>&nbsp;</td>\n";
        echo "<td $extra>";
-       submit_add_or_update($add, $title, $async);
+       submit_add_or_update($add, $title, $async, $clone);
        echo "</td></tr>\n";
 }
 
@@ -197,76 +264,164 @@ function submit_row($name, $value, $right=true, $extra="", $title=false, $async=
        echo "</tr>\n";
 }
 
-function submit_return($name, $value, $title=false, $async=false)
+function submit_return($name, $value, $title=false)
 {
-       if (count($_SESSION['Context'])) {
-               submit($name, $value, true, $title, $async);
+       if (@$_REQUEST['popup']) {
+               submit($name, $value, true, $title, 'selector');
        }
 }
-//---------------------------------------------------------------------------------
-/*
-function button($name, $value, $onclick, $title=false)
+
+function submit_js_confirm($name, $msg, $set = true) {
+       global $Ajax;
+       $js = "_validate.$name=".($set ? "function(){ return confirm('"
+                               . strtr($msg, array("\n"=>'\\n')) . "');};"
+                               : 'null;');
+       if (in_ajax()) {
+               $Ajax->addScript(true, $js);
+       } else
+               add_js_source($js);
+}
+//-----------------------------------------------------------------------------------
+
+function set_icon($icon, $title=false)
 {
-       default_focus($name);
-       echo "<input type=\"button\" class=\"inputsubmit\" name=\"$name\" value=\"$value\" onclick=\"$onclick\""
-           .($title ? " title='$title'" : '')
-           ." />\n";
+       global $path_to_root;
+       if (basename($icon) === $icon) // standard icons does not contain path separator
+               $icon = "$path_to_root/themes/".user_theme()."/images/$icon";
+       return "<img src='$icon' style='vertical-align:middle;width:12px;height:12px;border:0;'".($title ? " title='$title'" : "")." >\n";      
 }
 
-function button_cell($name, $value, $onclick, $title=false)
+function button($name, $value, $title=false, $icon=false,  $aspect='')
 {
-       echo "<td>";
-       button($name, $value, $onclick, $title);
-       echo "</td>\n";
+       // php silently changes dots,spaces,'[' and characters 128-159
+       // to underscore in POST names, to maintain compatibility with register_globals
+       $rel = '';
+       if ($aspect == 'selector') {
+               $rel = " rel='$value'";
+               $value = _("Select");
+       }
+       if (user_graphic_links() && $icon)
+       {
+               if ($value == _("Delete")) // Helper during implementation
+                       $icon = ICON_DELETE;
+               return "<button type='submit' class='editbutton' name='"
+                       .html_specials_encode(strtr($name, array('.'=>'=2E', '='=>'=3D',// ' '=>'=20','['=>'=5B'
+                       )))
+                       ."' value='1'" . ($title ? " title='$title'":" title='$value'")
+                       . ($aspect ? " aspect='$aspect'" : '')
+                       . $rel
+                       ." >".set_icon($icon)."</button>\n";
+       }
+       else
+               return "<input type='submit' class='editbutton' name='"
+                       .htmlentities(strtr($name, array('.'=>'=2E', '='=>'=3D',// ' '=>'=20','['=>'=5B'
+                       )))
+                       ."' value='$value'"
+                       .($title ? " title='$title'":'')
+                       . ($aspect ? " aspect='$aspect'" : '')
+                       . $rel
+                       ." >\n";
+}
+
+function button_cell($name, $value, $title=false, $icon=false, $aspect='')
+{
+       echo "<td align='center'>";
+       echo button($name, $value, $title, $icon, $aspect);
+       echo "</td>";
+}
+
+function delete_button_cell($name, $value, $title=false)
+{
+       button_cell($name, $value, $title, ICON_DELETE);
+}
+
+function edit_button_cell($name, $value, $title=false)
+{
+       button_cell($name, $value, $title, ICON_EDIT);
+}
+
+function select_button_cell($name, $value, $title=false)
+{
+       button_cell($name, $value, $title, ICON_ADD, 'selector');
 }
-*/
 //-----------------------------------------------------------------------------------
 
 function check_value($name)
 {
-       if (!isset($_POST[$name]))
-               return 0;
-       return 1;
+       if (is_array($name)) {
+               $ret = array();
+               foreach($name as $key)
+                       $ret[$key] = check_value($key);
+               return $ret;
+       } else
+               return (empty($_POST[$name]) ? 0 : 1);
 }
 
-function check($label, $name, $value=null, $submit_on_change=false, $title=false)
+function checkbox($label, $name, $value=null, $submit_on_change=false, $title=false)
 {
        global $Ajax;
 
-       default_focus($name);
-       if ($label)
-               echo $label . "  ";
+       $str = '';      
 
+       if ($label)
+               $str .= $label . "  ";
+       if ($submit_on_change !== false) {
+               if ($submit_on_change === true)
+                       $submit_on_change = 
+                               "JsHttpRequest.request(\"_{$name}_update\", this.form);";
+       }
        if ($value === null)
                $value = get_post($name,0);
 
-               echo "<input"
-                   .($value == 1 ? ' checked':'')
-                   ." type='checkbox' name='$name' value='1'"
-                   .($submit_on_change ? " onclick='JsHttpRequest.request(\"_{$name}_update\", this.form);'" : '')
-                   .($title ? " title='$title'" : '')
-                   ." >\n";
+       $str .= "<input"
+           .($value == 1 ? ' checked':'')
+           ." type='checkbox' name='$name' value='1'"
+           .($submit_on_change ? " onclick='$submit_on_change'" : '')
+           .($title ? " title='$title'" : '')
+           ." >\n";
+
        $Ajax->addUpdate($name, $name, $value);
+       return $str;
+}
+
+function check($label, $name, $value=null, $submit_on_change=false, $title=false)
+{
+       echo checkbox($label, $name, $value, $submit_on_change, $title);
 }
 
-function check_cells($label, $name, $value, $submit_on_change=false, $title=false)
+function check_cells($label, $name, $value=null, $submit_on_change=false, $title=false,
+       $params='')
 {
        if ($label != null)
                echo "<td>$label</td>\n";
-       echo "<td>";
-       check(null, $name, $value, $submit_on_change, $title);
+       echo "<td $params>";
+       echo check(null, $name, $value, $submit_on_change, $title);
        echo "</td>";
 }
 
-function check_row($label, $name, $value, $submit_on_change=false, $title=false)
+function check_row($label, $name, $value=null, $submit_on_change=false, $title=false)
 {
-       echo "<tr>";
-       check_cells($label, $name, $value, $submit_on_change, $title);
+       echo "<tr><td class='label'>$label</td>";
+       echo check_cells(NULL, $name, $value, $submit_on_change, $title);
        echo "</tr>\n";
 }
 
 //-----------------------------------------------------------------------------------
+function radio($label, $name, $value, $selected=null, $submit_on_change=false)
+{
+       if (!isset($selected))
+               $selected = get_post($name) === (string)$value;
+
+       if ($submit_on_change === true)
+               $submit_on_change = 
+                       "JsHttpRequest.request(\"_{$name}_update\", this.form);";
+
+       return "<input type='radio' name=$name value='$value' ".($selected ? "checked":'')
+           .($submit_on_change ? " onclick='$submit_on_change'" : '')
+               .">".($label ? $label : '');
+}
 
+//-----------------------------------------------------------------------------------
 function labelheader_cell($label, $params="")
 {
        echo "<td class='tableheader' $params>$label</td>\n";
@@ -286,6 +441,17 @@ function label_cell($label, $params="", $id=null)
        return $label;
 }
 
+function email_cell($label, $params="", $id=null)
+{
+       label_cell("<a href='mailto:$label'>$label</a>", $params, $id);
+}
+
+function amount_decimal_cell($label, $params="", $id=null)
+{
+       $dec = 0;
+       label_cell(price_decimal_format($label, $dec), "nowrap align=right ".$params, $id);
+}
+
 function amount_cell($label, $bold=false, $params="", $id=null)
 {
        if ($bold)
@@ -294,6 +460,16 @@ function amount_cell($label, $bold=false, $params="", $id=null)
                label_cell(price_format($label), "nowrap align=right ".$params, $id);
 }
 
+//JAM  Allow entered unit prices to be fractional
+function unit_amount_cell($label, $bold=false, $params="", $id=null)
+{
+       if ($bold)
+               label_cell("<b>".unit_price_format($label)."</b>", "nowrap align=right ".$params, $id);
+       else
+               label_cell(unit_price_format($label), "nowrap align=right ".$params, $id);
+}
+
+
 function percent_cell($label, $bold=false, $id=null)
 {
        if ($bold)
@@ -312,38 +488,50 @@ function qty_cell($label, $bold=false, $dec=null, $id=null)
                label_cell(number_format2($label, $dec), "nowrap align=right", $id);
 }
 
-function label_cells($label, $value, $params="", $params2="", $id='')
+function label_cells($label, $value, $params="", $params2="", $id=null)
 {
        if ($label != null)
                echo "<td $params>$label</td>\n";
        label_cell($value, $params2, $id);
 }
 
-function label_row($label, $value, $params="", $params2="", $leftfill=0, $id='')
+function label_row($label, $value, $params="", $params2="", $leftfill=0, $id=null)
 {
        echo "<tr>";
+       if ($params == "")
+       {
+               echo "<td class='label'>$label</td>";
+               $label = null;
+       }       
        label_cells($label, $value, $params, $params2, $id);
        if ($leftfill!=0)
                echo "<td colspan=$leftfill></td>";
        echo "</tr>\n";
 }
 
+function text_input($name, $value=null, $size='', $max='', $title='', $params='')
+{
+       if ($value === null)
+               $value = get_post($name);
+
+       return "<input $params type=\"text\" name=\"$name\" size=\"$size\" maxlength=\"$max\" value=\"$value\""
+           .($title ? " title='$title'" : '')
+           .">";
+}
+
 //-----------------------------------------------------------------------------------
 
-function text_cells($label, $name, $value=null, $size="", $max="", $title=false, $params="", $post_label="", $disabled="")
+function text_cells($label, $name, $value=null, $size="", $max="", $title=false, 
+       $labparams="", $post_label="", $inparams="")
 {
        global $Ajax;
 
        default_focus($name);
        if ($label != null)
-               label_cell($label, $params);
+               label_cell($label, $labparams);
        echo "<td>";
 
-       if ($value === null)
-               $value = get_post($name);
-       echo "<input $disabled type=\"text\" name=\"$name\" size=\"$size\" maxlength=\"$max\" value=\"$value\""
-           .($title ? " title='$title'" : '')
-           .">";
+       echo text_input($name, $value, $size, $max, $title, $inparams);
 
        if ($post_label != "")
                echo " " . $post_label;
@@ -352,7 +540,8 @@ function text_cells($label, $name, $value=null, $size="", $max="", $title=false,
        $Ajax->addUpdate($name, $name, $value);
 }
 
-function text_cells_ex($label, $name, $size, $max=null, $init=null, $title=null, $params=null, $post_label=null, $submit_on_change=false)
+function text_cells_ex($label, $name, $size, $max=null, $init=null, $title=null,
+       $labparams=null, $post_label=null, $submit_on_change=false)
 {
        global $Ajax;
 
@@ -365,7 +554,7 @@ function text_cells_ex($label, $name, $size, $max=null, $init=null, $title=null,
                        $_POST[$name] = "";
        }
        if ($label != null)
-               label_cell($label, $params);
+               label_cell($label, $labparams);
 
        if (!isset($max))
                $max = $size;
@@ -384,9 +573,8 @@ function text_cells_ex($label, $name, $size, $max=null, $init=null, $title=null,
 
 function text_row($label, $name, $value, $size, $max, $title=null, $params="", $post_label="")
 {
-       echo "<tr>";
-
-       text_cells($label, $name, $value, $size, $max, $title, $params, $post_label);
+       echo "<tr><td class='label'>$label</td>";
+       text_cells(null, $name, $value, $size, $max, $title, $params, $post_label);
 
        echo "</tr>\n";
 }
@@ -395,70 +583,201 @@ function text_row($label, $name, $value, $size, $max, $title=null, $params="", $
 
 function text_row_ex($label, $name, $size, $max=null, $title=null, $value=null, $params=null, $post_label=null)
 {
-       echo "<tr>";
-
-       text_cells_ex($label, $name, $size, $max, $value, $title, $params, $post_label);
+       echo "<tr><td class='label'>$label</td>";
+       text_cells_ex(null, $name, $size, $max, $value, $title, $params, $post_label);
 
        echo "</tr>\n";
 }
 
 //-----------------------------------------------------------------------------------
+function email_row($label, $name, $value, $size, $max, $title=null, $params="", $post_label="")
+{
+       if (get_post($name)) 
+               $label = "<a href='Mailto:".$_POST[$name]."'>$label</a>";
+       text_row($label, $name, $value, $size, $max, $title, $params, $post_label);
+}
 
-function date_cells($label, $name, $title = null, $init=null, $inc_days=0, 
+function email_row_ex($label, $name, $size, $max=null, $title=null, $value=null, $params=null, $post_label=null)
+{
+       if (get_post($name)) 
+               $label = "<a href='Mailto:".$_POST[$name]."'>$label</a>";
+       text_row_ex($label, $name, $size, $max, $title, $value, $params, $post_label);
+}
+
+function link_row($label, $name, $value, $size, $max, $title=null, $params="", $post_label="")
+{
+       $val = get_post($name);
+       if ($val) {
+               if (strpos($val,'http://')===false)
+                       $val = 'http://'.$val;
+               $label = "<a href='$val' target='_blank'>$label</a>";
+       }
+       text_row($label, $name, $value, $size, $max, $title, $params, $post_label);
+}
+
+function link_row_ex($label, $name, $size, $max=null, $title=null, $value=null, $params=null, $post_label=null)
+{
+       $val = get_post($name);
+       if ($val) {
+               if (strpos($val,'http://')===false)
+                       $val = 'http://'.$val;
+               $label = "<a href='$val' target='_blank'>$label</a>";
+       }
+       text_row_ex($label, $name, $size, $max, $title, $value, $params, $post_label);
+}
+
+//-----------------------------------------------------------------------------------
+//
+//     Since FA 2.2  $init parameter is superseded by $check. 
+//  When $check!=null current date is displayed in red when set to other 
+//     than current date.
+//     
+function date_cells($label, $name, $title = null, $check=null, $inc_days=0, 
        $inc_months=0, $inc_years=0, $params=null, $submit_on_change=false)
 {
-       global $use_date_picker, $path_to_root;
+       global $path_to_root, $Ajax;
+
        if (!isset($_POST[$name]) || $_POST[$name] == "")
        {
-               if (!$init)
+               if ($inc_years == 1001)
+                       $_POST[$name] = null;
+               else
                {
-                       if ($inc_years == 1001)
-                               $_POST[$name] = null;
-                       else
-                       {
-                               $dd = Today();
-                               if ($inc_days != 0)
-                                       $dd = add_days($dd, $inc_days);
-                               if ($inc_months != 0)
-                                       $dd = add_months($dd, $inc_months);
-                               if ($inc_years != 0)
-                                       $dd = add_years($dd, $inc_years);
-                               $_POST[$name] = $dd;
-                       }
+                       $dd = Today();
+                       if ($inc_days != 0)
+                               $dd = add_days($dd, $inc_days);
+                       if ($inc_months != 0)
+                               $dd = add_months($dd, $inc_months);
+                       if ($inc_years != 0)
+                               $dd = add_years($dd, $inc_years);
+                       $_POST[$name] = $dd;
                }
-               else
-                       $_POST[$name] = $init;
        }
-       if ($use_date_picker)
+       if (user_use_date_picker())
+       {
+               $calc_image = (file_exists("$path_to_root/themes/".user_theme()."/images/cal.gif")) ? 
+                       "$path_to_root/themes/".user_theme()."/images/cal.gif" : "$path_to_root/themes/default/images/cal.gif";
                $post_label = "<a tabindex='-1' href=\"javascript:date_picker(document.getElementsByName('$name')[0]);\">"
-               . "     <img src='$path_to_root/themes/default/images/cal.gif' width='16' height='16' border='0' alt='"._('Click Here to Pick up the date')."'></a>\n";
+               . "     <img src='$calc_image' style='vertical-align:middle;padding-bottom:4px;width:16px;height:16px;border:0;' alt='"._('Click Here to Pick up the date')."'></a>\n";
+       }       
        else
                $post_label = "";
-       text_cells_ex($label, $name, 9, 12, $_POST[$name], $title, $params, $post_label, $submit_on_change);
+
+       if ($label != null)
+               label_cell($label, $params);
+
+       echo "<td>";
+       
+       $class = $submit_on_change ? 'date active' : 'date';
+
+       $aspect = $check ? 'aspect="cdate"' : '';
+       if ($check && (get_post($name) != Today()))
+               $aspect .= ' style="color:#FF0000"';
+
+       default_focus($name);
+       $size = (user_date_format()>3)?11:10; 
+       echo "<input type=\"text\" name=\"$name\" class=\"$class\" $aspect size=\"$size\" maxlength=\"12\" value=\"" 
+        . $_POST[$name]. "\""
+        .($title ? " title='$title'": '')." > $post_label";
+       echo "</td>\n";
+       $Ajax->addUpdate($name, $name, $_POST[$name]);
 }
 
-function date_row($label, $name, $title=null, $init=null, $inc_days=0, $inc_months=0, 
+function date_row($label, $name, $title=null, $check=null, $inc_days=0, $inc_months=0, 
        $inc_years=0, $params=null, $submit_on_change=false)
 {
-       echo "<tr>";
-       date_cells($label, $name, $title, $init, $inc_days, $inc_months, 
+       echo "<tr><td class='label'>$label</td>";
+       date_cells(null, $name, $title, $check, $inc_days, $inc_months, 
                $inc_years, $params, $submit_on_change);
        echo "</tr>\n";
 }
 
 //-----------------------------------------------------------------------------------
+function password_row($label, $name, $value)
+{
+       echo "<tr><td class='label'>$label</td>";
+       label_cell("<input type='password' name='$name' size=20 maxlength=20 value='$value' >");
+       echo "</tr>\n";
+}      
+
+//-----------------------------------------------------------------------------------
+function file_cells($label, $name, $id="")
+{
+       if ($id != "")
+               $id = "id='$id'";
+       label_cells($label, "<input type='file' name='$name' $id >");
+}              
+function file_row($label, $name, $id = "")
+{
+       echo "<tr><td class='label'>$label</td>";
+       file_cells(null, $name, $id);
+       echo "</tr>\n";
+}      
+
+/*-----------------------------------------------------------------------------------
+
+ Reference number input.
 
-function ref_cells($label, $name, $title=null, $init=null, $params=null, $submit_on_change=false)
+ Optional  $context array contains transaction data used in number parsing:
+       'data' - data used for month/year codes
+       'location' - location code
+       'customer' - debtor_no
+       'supplier' - supplier id
+       'branch' - branch_code
+*/
+function ref_cells($label, $name, $title=null, $init=null, $params=null, $submit_on_change=false, $type=null, $context=null)
 {
-       text_cells_ex($label, $name, 16, 18, $init, $title, $params, null, $submit_on_change);
+       global $Ajax, $Refs;
+
+       if (isset($type)) {
+               if (empty($_POST[$name.'_list'])) // restore refline id
+                       $_POST[$name.'_list'] = $Refs->reflines->find_refline_id(empty($_POST[$name]) ? $init : $_POST[$name], $type);
+
+               if (empty($_POST[$name])) // initialization
+               {
+                       if (isset($init))
+                       {
+                               $_POST[$name] = $init;
+                       } else {
+                               $_POST[$name] = $Refs->get_next($type, $_POST[$name.'_list'], $context);
+                       }
+                       $Ajax->addUpdate(true, $name, $_POST[$name]);
+               }
+
+               if (check_ui_refresh($name)) { // call context changed
+                       $_POST[$name] = $Refs->normalize($_POST[$name], $type, $context, $_POST[$name.'_list']);
+                       $Ajax->addUpdate(true, $name, $_POST[$name]);
+               }
+
+               if ($Refs->reflines->count($type)>1) {
+                       if (list_updated($name.'_list')) {
+                               $_POST[$name] = $Refs->get_next($type, $_POST[$name.'_list'], $context);
+                               $Ajax->addUpdate(true, $name, $_POST[$name]);
+                       }
+                       $list = refline_list($name.'_list', $type);
+               } else {
+                       $list = '';
+               }
+
+               if (isset($label))
+                       label_cell($label, $params);
+
+               label_cell($list."<input name='".$name."' "
+                       .(check_edit_access($name) ? '' : 'disabled ')
+                       ."value='".@$_POST[$name]."' size=16 maxlength=35>");
+       }
+       else // just wildcard ref field (e.g. for global inquires)
+       {
+               text_cells_ex($label, $name, 16, 35, $init, $title, $params, null, $submit_on_change);
+       }
 }
 
 //-----------------------------------------------------------------------------------
 
-function ref_row($label, $name, $title=null, $init=null, $submit_on_change=false)
+function ref_row($label, $name, $title=null, $init=null, $submit_on_change=false, $type=null, $context = null)
 {
-       echo "<tr>";
-       ref_cells($label, $name, $title, $init, null, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       ref_cells(null, $name, $title, $init, null, $submit_on_change, $type, $context);
        echo "</tr>\n";
 }
 
@@ -489,12 +808,18 @@ function amount_cells_ex($label, $name, $size, $max=null, $init=null, $params=nu
                        $_POST[$name] = '';
        }
        if ($label != null)
+       {
+               if ($params == null)
+                       $params = "class='label'";
                label_cell($label, $params);
-
+       }
        if (!isset($max))
                $max = $size;
 
-       echo "<td align='right'>";
+       if ($label != null)
+               echo "<td>";
+       else
+               echo "<td align='right'>";
 
        echo "<input class='amount' type=\"text\" name=\"$name\" size=\"$size\" maxlength=\"$max\" dec=\"$dec\" value=\"" . $_POST[$name]. "\">";
 
@@ -515,6 +840,15 @@ function amount_cells($label, $name, $init=null, $params=null, $post_label=null,
        amount_cells_ex($label, $name, 15, 15, $init, $params, $post_label, $dec);
 }
 
+//JAM  Allow entered unit prices to be fractional
+function unit_amount_cells($label, $name, $init=null, $params=null, $post_label=null, $dec=null)
+{
+       if (!isset($dec))
+               $dec = user_price_dec()+2;
+
+       amount_cells_ex($label, $name, 15, 15, $init, $params, $post_label, $dec+2);
+}
+
 function amount_row($label, $name, $init=null, $params=null, $post_label=null, $dec=null)
 {
        echo "<tr>";
@@ -594,32 +928,101 @@ function textarea_cells($label, $name, $value, $cols, $rows, $title = null, $par
 
 function textarea_row($label, $name, $value, $cols, $rows, $title=null, $params="")
 {
-       echo "<tr>";
-       textarea_cells($label, $name, $value, $cols, $rows, $title, $params);
+       echo "<tr><td class='label'>$label</td>";
+       textarea_cells(null, $name, $value, $cols, $rows, $title, $params);
        echo "</tr>\n";
 }
 
 //-----------------------------------------------------------------------------------
-/*
-function text_row_with_submit($label, $name, $value, $size, $max, $input_name, $input_value)
+//
+//     When show_inactive page option is set 
+//  displays value of inactive field as checkbox cell.
+//  Also updates database record after status change.
+//
+function inactive_control_cell($id, $value, $table, $key)
 {
-       global $Ajax;
+       global  $Ajax;
 
-       default_focus($name);
-       echo "<tr><td>$label</td>\n";
-       echo "<td>";
+       $name = "Inactive". $id;
+       $value = $value ? 1:0;
 
-       if ($value == null)
-               $value = (!isset($_POST[$name]) ? "" : $_POST[$name]);
-       echo "<input type=\"text\" name=\"$name\" size=\"$size\" maxlength=\"$max\" value=\"$value\">   ";
+       if (check_value('show_inactive')) {
+               if (isset($_POST['LInact'][$id]) && (get_post('_Inactive'.$id.'_update') || 
+                       get_post('Update')) && (check_value('Inactive'.$id) != $value)) {
+                       update_record_status($id, !$value, $table, $key);
+               }
+               echo '<td align="center">'. checkbox(null, $name, $value, true, '')
+                       . hidden("LInact[$id]", $value, false) . '</td>';       
+       }
+}
+//
+//     Displays controls for optional display of inactive records
+//
+function inactive_control_row($th) {
+       echo  "<tr><td colspan=".(count($th)).">"
+               ."<div style='float:left;'>"
+               . checkbox(null, 'show_inactive', null, true). _("Show also Inactive")
+               ."</div><div style='float:right;'>"
+               . submit('Update', _('Update'), false, '', null)
+               ."</div></td></tr>";
+}
+//
+//     Inserts additional column header when display of inactive records is on.
+//
+function inactive_control_column(&$th) {
+       global $Ajax;
+       
+       if (check_value('show_inactive')) 
+               array_insert($th, count($th)-2 , _("Inactive"));
+       if (get_post('_show_inactive_update')) {
+               $Ajax->activate('_page_body');
+       }
+}
+
+function customer_credit_row($customer, $credit, $parms='')
+{
+       global $path_to_root;
+       
+       label_row( _("Current Credit:"),
+               "<a target='_blank' " . ($credit<0 ? 'class="redfg"' : '')
+               ."href='$path_to_root/sales/inquiry/customer_inquiry.php?customer_id=".$customer."'"
+               ." onclick=\"javascript:openWindow(this.href,this.target); return false;\" >"
+               . price_format($credit)
+               ."</a>", $parms);
+}
 
-       submit($input_name, $input_value);
+function supplier_credit_row($supplier, $credit, $parms='')
+{
+       global $path_to_root;
+       
+       label_row( _("Current Credit:"),
+               "<a target='_blank' " . ($credit<0 ? 'class="redfg"' : '')
+               ."href='$path_to_root/purchasing/inquiry/supplier_inquiry.php?supplier_id=".$supplier."'"
+               ." onclick=\"javascript:openWindow(this.href,this.target); return false;\" >"
+               . price_format($credit)
+               ."</a>", $parms);
+}
 
-       echo "</td></tr>\n";
-       $Ajax->addUpdate($name, $name, $value);
+function bank_balance_row($bank_acc, $parms='')
+{
+       global $path_to_root;
+
+       $to = add_days(Today(), 1);
+       $bal = get_balance_before_for_bank_account($bank_acc, $to);
+       label_row( _("Bank Balance:"),
+               "<a target='_blank' " . ($bal<0 ? 'class="redfg"' : '')
+               ."href='$path_to_root/gl/inquiry/bank_inquiry.php?bank_account=".$bank_acc."'"
+               ." onclick=\"javascript:openWindow(this.href,this.target); return false;\" >&nbsp;"
+               . price_format($bal)
+               ."</a>", $parms);
 }
-*/
-//-----------------------------------------------------------------------------------
 
+function ahref($label, $href, $target="", $onclick="") {
+  echo "<a href='$href' target='$target' onclick='$onclick'>$label</a>";
+}
 
-?>
\ No newline at end of file
+function ahref_cell($label, $href, $target="", $onclick="") {
+  echo "<td align='center'>&nbsp;&nbsp;";
+  ahref($label, $href, $target, $onclick);
+  echo "&nbsp;&nbsp;</td>";
+}