Fixed many issues in output HTML code according to HTML 4.01 Transitional format.
[fa-stable.git] / includes / ui / ui_lists.inc
index 0ce2546a3e8c469c5618a39654aeb67ffe6b1249..456f01938aa6e5e5c76162e69a6984327d1713a1 100644 (file)
@@ -1,7 +1,15 @@
 <?php
-
+/**********************************************************************
+    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>.
+***********************************************************************/
 include_once($path_to_root . "/includes/banking.inc");
-include_once($path_to_root . "/includes/reserved.inc");
 include_once($path_to_root . "/includes/types.inc");
 include_once($path_to_root . "/includes/current_user.inc");
 
@@ -11,7 +19,7 @@ $_search_button = "<input %s type='submit' class='combo_submit' style='border:0;
 $_select_button = "<input %s type='submit' class='combo_select' style='border:0;background:url($path_to_root/themes/"
        ."%s/images/button_ok.png) no-repeat;%s' aspect='fallback' name='%s' value=' ' title='"._("Select")."'> ";
 
-$all_items = reserved_words::get_all();
+$all_items = ALL_TEXT;
 
 //----------------------------------------------------------------------------
 //     Universal sql combo generator
@@ -31,25 +39,30 @@ $opts = array(              // default options
        'spec_id' => 0,         // option id
                // submit on select parameters
        'default' => '', // default value when $_POST is not set
+       'multi' => false,       // multiple select
        'select_submit' => false, //submit on select: true/false
-       'edit_submit' => false, // call editor on F4
        'async' => true,        // select update via ajax (true) vs _page_body reload
                // search box parameters
        'sel_hint' => null,
        'search_box' => false,  // name or true/false
        'type' => 0,    // type of extended selector:
-               // 0 - with (optional) visible search box, search by id
+               // 0 - with (optional) visible search box, search by fragment inside id
                // 1 - with hidden search box, search by option text
-               // 2 - TODO reverse: box with hidden selector available via enter; this
+               // 2 - with (optional) visible search box, search by fragment at the start of id
+               // 3 - TODO reverse: box with hidden selector available via enter; this
                // would be convenient for optional ad hoc adding of new item
        'search_submit' => true, //search submit button: true/false
        'size' => 8,    // size and max of box tag
        'max' => 50,
+       'height' => false,      // number of lines in select box
        'cells' => false,       // combo displayed as 2 <td></td> cells
        'search' => array(), // sql field names to search
        'format' => null,        // format functions for regular options
        'disabled' => false,
-       'box_hint' => null // box/selectors hints; null = std see below
+       'box_hint' => null, // box/selectors hints; null = std see below
+       'category' => false, // category column name or false
+       'show_inactive' => false, // show inactive records. 
+       'editable' => false // false, or length of editable entry field
 );
 // ------ merge options with defaults ----------
        if($options != null)
@@ -57,14 +70,28 @@ $opts = array(              // default options
        if (!is_array($opts['where']))  $opts['where'] = array($opts['where']);
 
        $search_box = $opts['search_box']===true ? '_'.$name.'_edit' : $opts['search_box'];
+       // select content filtered by search field:
        $search_submit = $opts['search_submit']===true ? '_'.$name.'_button' : $opts['search_submit'];
-       $select_submit =  $opts['select_submit']===true ? '_'.$name.'_update' : $opts['select_submit'];
+       // select set by select content field
+       $search_button = $opts['editable'] ? '_'.$name.'_button' : ($search_box ? $search_submit : false);
+
+       $select_submit =  $opts['select_submit'];
        $spec_id = $opts['spec_id'];
        $spec_option = $opts['spec_option'];
-       $by_id = ($opts['type'] == 0);
-       $class = $by_id ? 'combo':'combo2';
-       $disabled = $opts['disabled'] ? "disabled" : '';
+       if ($opts['type'] == 0) {
+               $by_id = true;
+               $class = 'combo';
+       } elseif($opts['type'] == 1) {
+               $by_id = false;
+               $class = 'combo2';
+       } else {
+               $by_id = true;
+               $class = 'combo3';
+       }
 
+       $disabled = $opts['disabled'] ? "disabled" : '';
+       $multi = $opts['multi'];
+       
        if(!count($opts['search'])) {
                $opts['search'] = array($by_id ? $valfield : $namefield);
        }
@@ -78,13 +105,15 @@ $opts = array(             // default options
                        : _('Enter description fragment to search or * for all')) :'';
 
        if ($selected_id == null) {
-               $selected_id = get_post($name, $opts['default']);
+               $selected_id = get_post($name, (string)$opts['default']);
        }
+       if(!is_array($selected_id))
+               $selected_id = array((string)$selected_id); // code is generalized for multiple selection support
+
        $txt = get_post($search_box);
        $rel = '';
        $limit = '';
-
-       if (isset($_POST[$select_submit])) {
+       if (isset($_POST['_'.$name.'_update'])) { // select list or search box change
                if ($by_id) $txt = $_POST[$name];
 
                if (!$opts['async'])
@@ -92,40 +121,57 @@ $opts = array(             // default options
                else
                        $Ajax->activate($name);
        }
-       if ($search_box) {
-               // search related sql modifications
-
-       $rel = "rel='$search_box'"; // set relation to list
-   if ($opts['search_submit']) {
-       if (isset($_POST[$search_submit])) {
-               $selected_id = ''; // ignore selected_id while search
+       if (isset($_POST[$search_button])) {
                if (!$opts['async'])
                        $Ajax->activate('_page_body');
                else
                        $Ajax->activate($name);
        }
-       if ($txt == '') {
-               if ($spec_option === false && $selected_id==null)
-                 $limit = ' LIMIT 1';
-               else
-                 $opts['where'][] = $valfield . "='". get_post($name, $spec_id)."'";
-       }
-       else
-               if ($txt != '*') {
+       if ($search_box) {
+               // search related sql modifications
 
-               foreach($opts['search'] as $i=> $s)
-                       $opts['search'][$i] = $s . " LIKE '%{$txt}%'";
-               $opts['where'][] = '('. implode($opts['search'], ' OR ') . ')';
+               $rel = "rel='$search_box'"; // set relation to list
+               if ($opts['search_submit']) {
+                       if (isset($_POST[$search_button])) {
+                               $selected_id = array(); // ignore selected_id while search
+                               if (!$opts['async'])
+                                       $Ajax->activate('_page_body');
+                               else
+                                       $Ajax->activate($name);
+                       }
+                       if ($txt == '') {
+                               if ($spec_option === false && $selected_id == array())
+                                       $limit = ' LIMIT 1';
+                               else
+                                       $opts['where'][] = $valfield . "=". db_escape(get_post($name, $spec_id));
+                       }
+                       else
+                               if ($txt != '*') {
+
+                                       foreach($opts['search'] as $i=> $s)
+                                               $opts['search'][$i] = $s . " LIKE "
+                                                       .db_escape(($class=='combo3' ? '' : '%').$txt.'%');
+                                       $opts['where'][] = '('. implode($opts['search'], ' OR ') . ')';
+                               }
                }
        }
-   }
+
        // sql completion
        if (count($opts['where'])) {
-               $sql .= strpos($sql, 'WHERE')==false ? ' WHERE ':' AND ';
-               $sql .= '('. implode($opts['where'], ' AND ') . ')';
+               $where = strpos($sql, 'WHERE')==false ? ' WHERE ':' AND ';
+               $where .= '('. implode($opts['where'], ' AND ') . ')';
+               $group_pos = strpos($sql, 'GROUP BY');
+               if ($group_pos) {
+                       $group = substr($sql, $group_pos);
+                       $sql = substr($sql, 0, $group_pos) . $where.' '.$group;
+               } else {
+                       $sql .= $where;
+               }
        }
        if ($opts['order'] != false) {
-               $sql .= ' ORDER BY '.$opts['order'];
+               if (!is_array($opts['order']))
+                       $opts['order'] = array($opts['order']);
+               $sql .= ' ORDER BY '.implode(',',$opts['order']);
        }
 
        $sql .= $limit;
@@ -133,29 +179,50 @@ $opts = array(            // default options
        $selector = $first_opt = '';
        $first_id = false;
        $found = false;
-//if($name=='SelectStockFromList') display_error($sql);
+       $lastcat = null;
+       $edit = false;
+//if($name=='stock_id')        display_notification('<pre>'.print_r($_POST, true).'</pre>');
+//if($name=='curr_default') display_notification($opts['search_submit']);
        if($result = db_query($sql)) {
                while ($contact_row = db_fetch($result)) {
                        $value = $contact_row[0];
                        $descr = $opts['format']==null ?  $contact_row[1] :
-                       call_user_func($opts['format'], $contact_row);
+                               call_user_func($opts['format'], $contact_row);
                        $sel = '';
-                       if (get_post($search_submit) && ($txt === $value)) {
-                                       $selected_id = $value; 
-                       } 
-                       if (get_post($search_submit) && ($txt === $value)) {
-                               $selected_id = $value;
+                       if (get_post($search_button) && ($txt == $value)) {
+                               $selected_id[] = $value;
                        }
-                       if      ((string)($selected_id) === $value) {
+
+                       if (in_array((string)$value, $selected_id, true)) {
                                $sel = 'selected';
                                $found = $value;
+                               $edit = $opts['editable'] && $contact_row['editable'] 
+                                       && (@$_POST[$search_box] == $value)
+                                       ? $contact_row[1] : false; // get non-formatted description
+                               if ($edit)
+                                       break;  // selected field is editable - abandon list construction
                        }
+                       // show selected option even if inactive 
+                       if (!$opts['show_inactive'] && @$contact_row['inactive'] && $sel==='') {
+                               continue;
+                       } else 
+                               $optclass = @$contact_row['inactive'] ? "class='inactive'" : '';
+
                        if ($first_id === false) {
                                $first_id = $value;
                                $first_opt = $descr;
                        }
-                       $selector .= "<option $sel value='$value'>$descr</option>\n";
+                       $cat = $contact_row[$opts['category']];
+                       if ($opts['category'] !== false && $cat != $lastcat){
+                               if ($lastcat!==null)
+                                       $selector .= "</optgroup>";
+                               $selector .= "<optgroup label='".$cat."'>\n";
+                               $lastcat = $cat;
+                       }
+                       $selector .= "<option $sel $optclass value='$value'>$descr</option>\n";
                }
+               if ($lastcat!==null)
+                       $selector .= "</optgroup>";
                db_free_result($result);
        }
 
@@ -163,61 +230,74 @@ $opts = array(            // default options
        if ($spec_option !== false) { // if special option used - add it
                $first_id = $spec_id;
                $first_opt = $spec_option;
+//     }
+//     if($first_id !== false) {
                $sel = $found===false ? 'selected' : '';
-               $selector = "<option $sel value='$spec_id'>$spec_option</option>\n"
+               $optclass = @$contact_row['inactive'] ? "class='inactive'" : '';
+               $selector = "<option $sel value='$first_id'>$first_opt</option>\n"
                        . $selector;
        }
 
-       if ($found === false) {
-               $selected_id = $first_id;
+       if ($found===false) {
+               $selected_id = array($first_id);
        }
-       $_POST[$name] = $selected_id;
-
-       if ($by_id && $search_box != false) {
-               $txt = $found;
+       
+       $_POST[$name] = $multi ? $selected_id : $selected_id[0];
+
+       $selector = "<select autocomplete='off' ".($multi ? "multiple" : '')
+               . ($opts['height']!==false ? ' size="'.$opts['height'].'"' : '')
+               . "$disabled name='$name".($multi ? '[]':'')."' class='$class' title='"
+               . $opts['sel_hint']."' $rel>".$selector."</select>\n";
+
+       if ($by_id && ($search_box != false || $opts['editable']) ) {
+               // on first display show selector list
+               if (isset($_POST[$search_box]) && $opts['editable'] && $edit) {
+                       $selector = "<input type='hidden' name='$name' value='".$_POST[$name]."'>"
+                       ."<input type='text' $disabled name='{$name}_text' id='{$name}_text' size='".
+                               $opts['editable']."' maxlength='".$opts['max']."' $rel value='$edit'>\n";
+                               set_focus($name.'_text'); // prevent lost focus
+               } else if (get_post($search_submit ? $search_submit : "_{$name}_button"))
+                       set_focus($name); // prevent lost focus
+               if (!$opts['editable'])
+                       $txt = $found;
                $Ajax->addUpdate($name, $search_box, $txt ? $txt : '');
        }
-       $aspect = $opts['edit_submit'] ? " aspect='editable'" : '';
-       $selector = "<select $disabled name='$name' class='$class' title='"
-               . $opts['sel_hint']."'$aspect $rel>".$selector."</select>\n";
 
        $Ajax->addUpdate($name, "_{$name}_sel", $selector);
 
-       // because of bug which M$ cannot fix since IE 5.0
-       // we must embed whole selector in span tags to enable proper ajax update
+       // span for select list/input field update
        $selector = "<span id='_{$name}_sel'>".$selector."</span>\n";
 
-       if ($select_submit != false) { // if submit on change is used - add select button
+        // if selectable or editable list is used - add select button
+       if ($select_submit != false || $search_button) {
                global $_select_button;
        // button class selects form reload/ajax selector update
                $selector .= sprintf($_select_button, $disabled, user_theme(),
-                       (in_ajax() ? 'display:none;':''),
-                       $select_submit)."\n";
+                       (fallback_mode() ? '' : 'display:none;'),
+                        '_'.$name.'_update')."\n";
        }
 // ------ make combo ----------
-
        $edit_entry = '';
        if ($search_box != false) {
                $edit_entry = "<input $disabled type='text' name='$search_box' id='$search_box' size='".
                        $opts['size']."' maxlength='".$opts['max'].
                        "' value='$txt' class='$class' rel='$name' autocomplete='off' title='"
                        .$opts['box_hint']."'"
-                       .(in_ajax() && !$by_id ? " style=display:none;":'')
+                       .(!fallback_mode() && !$by_id ? " style=display:none;":'')
                        .">\n";
-               if ($search_submit != false) {
+               if ($search_submit != false || $opts['editable']) {
                        global $_search_button;
                        $edit_entry .= sprintf($_search_button, $disabled, user_theme(),
-                               (in_ajax() ? 'display:none;':''),
-                               $search_submit)."\n";
+                               (fallback_mode() ? '' : 'display:none;'),
+                               $search_submit ? $search_submit : "_{$name}_button")."\n";
                }
        }
-       default_focus($name);
-       $str = $selector;
+       default_focus(($search_box && $by_id) ? $search_box : $name);
+
        if ($search_box && $opts['cells'])
-               echo ($edit_entry!='' ? "<td>$edit_entry</td>" : '')."<td>$selector</td>";
+               $str = ($edit_entry!='' ? "<td>$edit_entry</td>" : '')."<td>$selector</td>";
        else
-               echo $edit_entry.$selector;
-
+               $str = $edit_entry.$selector;
        return $str;
 }
 
@@ -242,26 +322,30 @@ $opts = array(            // default options
        'spec_option'=>false,   // option text or false
        'spec_id' => 0,         // option id
        'select_submit' => false, //submit on select: true/false
-       'edit_submit' => false, // call editor on F4
        'async' => true,        // select update via ajax (true) vs _page_body reload
        'default' => '', // default value when $_POST is not set
+       'multi'=>false, // multiple select
                // search box parameters
+       'height' => false,      // number of lines in select box
        'sel_hint' => null,
        'disabled' => false
 );
 // ------ merge options with defaults ----------
        if($options != null)
                $opts = array_merge($opts, $options);
-       $select_submit =  $opts['select_submit']===true ? '_'.$name.'_update' : $opts['select_submit'];
+       $select_submit =  $opts['select_submit'];
        $spec_id = $opts['spec_id'];
        $spec_option = $opts['spec_option'];
        $disabled = $opts['disabled'] ? "disabled" : '';
+       $multi = $opts['multi'];
 
        if ($selected_id == null) {
                $selected_id = get_post($name, $opts['default']);
        }
+       if(!is_array($selected_id))
+               $selected_id = array((string)$selected_id); // code is generalized for multiple selection support
 
-       if (isset($_POST[$select_submit])) {
+       if (isset($_POST[ '_'.$name.'_update'])) {
                if (!$opts['async'])
                        $Ajax->activate('_page_body');
                else
@@ -275,7 +359,7 @@ $opts = array(              // default options
 //if($name=='SelectStockFromList') display_error($sql);
                foreach($items as $value=>$descr) {
                        $sel = '';
-                       if ($selected_id == $value) {
+                       if (in_array((string)$value, $selected_id, true)) {
                                $sel = 'selected';
                                $found = $value;
                        }
@@ -286,6 +370,9 @@ $opts = array(              // default options
                        $selector .= "<option $sel value='$value'>$descr</option>\n";
                }
 
+       if ($first_id!==false) {
+               $sel = ($found===$first_id) || ($found===false && ($spec_option===false)) ? "selected='selected'" : '';
+       }
        // Prepend special option.
        if ($spec_option !== false) { // if special option used - add it
                $first_id = $spec_id;
@@ -295,13 +382,15 @@ $opts = array(            // default options
                        . $selector;
        }
 
-       if ($found === false) {
-               $_POST[$name] = $first_id;
+       if ($found===false) {
+               $selected_id = array($first_id);
        }
+       $_POST[$name] = $multi ? $selected_id : $selected_id[0];
 
-       $aspect = $opts['edit_submit'] ? " aspect='editable'" : '';
-       $selector = "<select $disabled name='$name' class='combo' title='"
-               . $opts['sel_hint']."'$aspect >".$selector."</select>\n";
+       $selector = "<select autocomplete='off' ".($multi  ? "multiple" : '')
+               . ($opts['height']!==false ? ' size="'.$opts['height'].'"' : '')
+               . "$disabled name='$name".($multi ? '[]' : '')."' class='combo' title='"
+               . $opts['sel_hint']."'>".$selector."</select>\n";
 
        $Ajax->addUpdate($name, "_{$name}_sel", $selector);
 
@@ -310,11 +399,10 @@ $opts = array(            // default options
        if ($select_submit != false) { // if submit on change is used - add select button
                global $_select_button;
                $selector .= sprintf($_select_button, $disabled, user_theme(),
-                       (in_ajax() ? 'display:none;':''),
-                       $select_submit)."\n";
+                       (fallback_mode() ? '' : 'display:none;'),
+                        '_'.$name.'_update')."\n";
        }
        default_focus($name);
-       echo $selector;
 
        return $selector;
 }
@@ -332,127 +420,177 @@ function _format_add_curr($row)
                '' : ("&nbsp;-&nbsp;" . $row[2]));
 }
 
-function supplier_list($name, $selected_id=null, $spec_option=false, $submit_on_change=false)
+function add_edit_combo($type)
+{
+       global $path_to_root, $popup_editors, $use_icon_for_editkey;
+
+       if (!isset($use_icon_for_editkey) || $use_icon_for_editkey==0)
+               return "";
+       // Derive theme path
+       $theme_path = $path_to_root . '/themes/' . user_theme();
+
+       $key = $popup_editors[$type][1];
+       $onclick = "onclick=\"javascript:callEditor($key); return false;\"";
+       $img = "<img width='12' height='12' border='0' alt='Add/Edit' title='Add/Edit' src='$theme_path/images/".ICON_EDIT."'>";
+       return "<a target = '_blank' href='#' $onclick tabindex='-1'>$img</a>"; 
+}
+
+function supplier_list($name, $selected_id=null, $spec_option=false, $submit_on_change=false,
+       $all=false, $editkey = false)
 {
        global $all_items;
 
-       $sql = "SELECT supplier_id, supp_name, curr_code FROM ".TB_PREF."suppliers ";
+       $sql = "SELECT supplier_id, supp_ref, curr_code, inactive FROM ".TB_PREF."suppliers ";
 
        $mode = get_company_pref('no_supplier_list');
 
-       return combo_input($name, $selected_id, $sql, 'supplier_id', 'supp_name',
+       if ($editkey)
+               set_editor('supplier', $name, $editkey);
+               
+       $ret = combo_input($name, $selected_id, $sql, 'supplier_id', 'supp_name',
        array(
                'format' => '_format_add_curr',
+           'order' => array('supp_ref'),
                'search_box' => $mode!=0,
-               'edit_submit' => true, 
                'type' => 1,
+        'search' => array("supp_ref","supp_name","gst_no"),        
                'spec_option' => $spec_option === true ? _("All Suppliers") : $spec_option,
                'spec_id' => $all_items,
                'select_submit'=> $submit_on_change,
                'async' => false,
                'sel_hint' => $mode ? _('Press Space tab to filter by name fragment') :
-               _('Select supplier')
+               _('Select supplier'),
+               'show_inactive'=>$all
                ));
+       if ($editkey)
+               $ret .= add_edit_combo('supplier');             
+       return $ret;
 }
 
-function supplier_list_cells($label, $name, $selected_id=null, $all_option=false, $submit_on_change=false)
+function supplier_list_cells($label, $name, $selected_id=null, $all_option=false, 
+       $submit_on_change=false, $all=false, $editkey = false)
 {
        if ($label != null)
                echo "<td>$label</td><td>\n";
-       $str = supplier_list($name, $selected_id, $all_option, $submit_on_change);
+               echo supplier_list($name, $selected_id, $all_option, $submit_on_change, 
+               $all, $editkey);
                echo "</td>\n";
-       return $str;
 }
 
-function supplier_list_row($label, $name, $selected_id=null, $all_option = false, $submit_on_change=false)
+function supplier_list_row($label, $name, $selected_id=null, $all_option = false, 
+       $submit_on_change=false, $all=false, $editkey = false)
 {
-echo "<tr><td>$label</td><td>";
-       $str = supplier_list($name, $selected_id, $all_option, $submit_on_change );
-echo "</td></tr>\n";
-return $str;
+       echo "<tr><td class='label'>$label</td><td>";
+       echo supplier_list($name, $selected_id, $all_option, $submit_on_change,
+               $all, $editkey);
+       echo "</td></tr>\n";
 }
 //----------------------------------------------------------------------------------------------
 
-function customer_list($name, $selected_id=null, $spec_option=false, $submit_on_change=false)
+function customer_list($name, $selected_id=null, $spec_option=false, $submit_on_change=false, 
+       $show_inactive=false, $editkey = false)
 {
        global $all_items;
 
-       $sql = "SELECT debtor_no, name, curr_code FROM ".TB_PREF."debtors_master ";
+       $sql = "SELECT debtor_no, debtor_ref, curr_code, inactive FROM ".TB_PREF."debtors_master ";
 
        $mode = get_company_pref('no_customer_list');
 
-return combo_input($name, $selected_id, $sql, 'debtor_no', 'name',
+       if ($editkey)
+               set_editor('customer', $name, $editkey);
+
+       $ret = combo_input($name, $selected_id, $sql, 'debtor_no', 'debtor_ref',
        array(
            'format' => '_format_add_curr',
+           'order' => array('debtor_ref'),
                'search_box' => $mode!=0,
                'type' => 1,
                'size' => 20,
+        'search' => array("debtor_ref","name","tax_id"),        
                'spec_option' => $spec_option === true ? _("All Customers") : $spec_option,
                'spec_id' => $all_items,
                'select_submit'=> $submit_on_change,
-               'edit_submit' => true, // call editor on F4
                'async' => false,
-               'sel_hint' => $mode ? _('Press Space tab to filter by name fragment; F4 - entry new customer') :
-               _('Select customer')
+               'sel_hint' => $mode ? _('Press Space tab to filter by name fragment; F2 - entry new customer') :
+               _('Select customer'),
+               'show_inactive' => $show_inactive
        ) );
+       if ($editkey)
+               $ret .= add_edit_combo('customer');
+       return $ret;
 }
 
-function customer_list_cells($label, $name, $selected_id=null, $all_option=false, $submit_on_change=false)
+function customer_list_cells($label, $name, $selected_id=null, $all_option=false, 
+       $submit_on_change=false, $show_inactive=false, $editkey = false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td nowrap>";
-       $str = customer_list($name, $selected_id, $all_option, $submit_on_change);
+       echo customer_list($name, $selected_id, $all_option, $submit_on_change,
+               $show_inactive, $editkey);
        echo "</td>\n";
-       return $str;
 }
 
-function customer_list_row($label, $name, $selected_id=null, $all_option = false, $submit_on_change=false)
+function customer_list_row($label, $name, $selected_id=null, $all_option = false, 
+       $submit_on_change=false, $show_inactive=false, $editkey = false)
 {
-       echo "<tr><td>$label</td><td nowrap>";
-       $str = customer_list($name, $selected_id, $all_option, $submit_on_change);
+       global $path_to_root;
+
+       echo "<tr><td class='label'>$label</td><td nowrap>";
+       echo customer_list($name, $selected_id, $all_option, $submit_on_change,
+               $show_inactive, $editkey);
        echo "</td>\n</tr>\n";
-       return $str;
 }
 
 //------------------------------------------------------------------------------------------------
 
 function customer_branches_list($customer_id, $name, $selected_id=null,
-       $spec_option = true, $enabled=true, $submit_on_change=false)
+       $spec_option = true, $enabled=true, $submit_on_change=false, $editkey = false)
 {
        global $all_items;
 
-       $sql = "SELECT branch_code, br_name FROM ".TB_PREF."cust_branch
-               WHERE debtor_no='" . $customer_id . "' ";
+       $sql = "SELECT branch_code, branch_ref FROM ".TB_PREF."cust_branch
+               WHERE debtor_no=" . db_escape($customer_id)." ";
+
+       if ($editkey)
+               set_editor('branch', $name, $editkey);
 
        $where = $enabled ? array("disable_trans = 0") : array();
-return  combo_input($name, $selected_id, $sql, 'branch_code', 'br_name',
+       $ret = combo_input($name, $selected_id, $sql, 'branch_code', 'branch_ref',
        array(
                'where' => $where,
+               'order' => array('branch_ref'),
                'spec_option' => $spec_option === true ? _('All branches') : $spec_option,
                'spec_id' => $all_items,
                'select_submit'=> $submit_on_change,
                'sel_hint' => _('Select customer branch')
        ) );
+       if ($editkey)
+       {
+               $ret .= add_edit_combo('branch');
+       }       
+       return $ret;
 }
 //------------------------------------------------------------------------------------------------
 
-function customer_branches_list_cells($label,$customer_id, $name, $selected_id=null, $all_option = true, $enabled=true, $submit_on_change=false)
+function customer_branches_list_cells($label,$customer_id, $name, $selected_id=null, 
+       $all_option = true, $enabled=true, $submit_on_change=false, $editkey = false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $ret = customer_branches_list($customer_id, $name, $selected_id, $all_option, $enabled, $submit_on_change);
+       echo customer_branches_list($customer_id, $name, $selected_id, $all_option, $enabled, 
+               $submit_on_change, $editkey);
        echo "</td>\n";
-       return $ret;
 }
 
-function customer_branches_list_row($label,$customer_id, $name, $selected_id=null, $all_option = true, $enabled=true, $submit_on_change=false)
+function customer_branches_list_row($label, $customer_id, $name, $selected_id=null, 
+       $all_option = true, $enabled=true, $submit_on_change=false, $editkey = false)
 {
-       echo "<tr>";
-       $ret = customer_branches_list_cells($label, $customer_id, $name, $selected_id, $all_option, $enabled, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       customer_branches_list_cells(null, $customer_id, $name, $selected_id, 
+               $all_option, $enabled, $submit_on_change, $editkey);
        echo "</tr>";
-       return $ret;
 }
 
 //------------------------------------------------------------------------------------------------
@@ -461,7 +599,7 @@ function locations_list($name, $selected_id=null, $all_option=false, $submit_on_
 {
        global $all_items;
 
-       $sql = "SELECT loc_code, location_name FROM ".TB_PREF."locations";
+       $sql = "SELECT loc_code, location_name, inactive FROM ".TB_PREF."locations";
 
 return combo_input($name, $selected_id, $sql, 'loc_code', 'location_name',
        array(
@@ -476,27 +614,24 @@ function locations_list_cells($label, $name, $selected_id=null, $all_option=fals
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = locations_list($name, $selected_id, $all_option, $submit_on_change);
+       echo locations_list($name, $selected_id, $all_option, $submit_on_change);
        echo "</td>\n";
-       return $str;
 }
 
 function locations_list_row($label, $name, $selected_id=null, $all_option=false, $submit_on_change=false)
 {
-       echo "<tr>";
-       $str = locations_list_cells($label, $name, $selected_id, $all_option, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       locations_list_cells(null, $name, $selected_id, $all_option, $submit_on_change);
        echo "</tr>\n";
-       return $str;
 }
 
 //-----------------------------------------------------------------------------------------------
 
 function currencies_list($name, $selected_id=null, $submit_on_change=false)
 {
-       $sql = "SELECT curr_abrev, currency FROM ".TB_PREF."currencies";
+       $sql = "SELECT curr_abrev, currency, inactive FROM ".TB_PREF."currencies";
 
 // default to the company currency
-
 return combo_input($name, $selected_id, $sql, 'curr_abrev', 'currency',
        array(
                'select_submit'=> $submit_on_change,
@@ -510,17 +645,15 @@ function currencies_list_cells($label, $name, $selected_id=null, $submit_on_chan
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = currencies_list($name, $selected_id, $submit_on_change);
+       echo currencies_list($name, $selected_id, $submit_on_change);
        echo "</td>\n";
-       return $str;
 }
 
 function currencies_list_row($label, $name, $selected_id=null, $submit_on_change=false)
 {
-       echo "<tr>\n";
-       $str = currencies_list_cells($label, $name, $selected_id, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       currencies_list_cells(null, $name, $selected_id, $submit_on_change);
        echo "</tr>\n";
-       return $str;
 }
 
 //---------------------------------------------------------------------------------------------------
@@ -553,17 +686,15 @@ function fiscalyears_list_cells($label, $name, $selected_id=null)
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = fiscalyears_list($name, $selected_id);
+       echo fiscalyears_list($name, $selected_id);
        echo "</td>\n";
-       return $str;
 }
 
 function fiscalyears_list_row($label, $name, $selected_id=null)
 {
-       echo "<tr>\n";
-       $str = fiscalyears_list_cells($label, $name, $selected_id);
+       echo "<tr><td class='label'>$label</td>";
+       fiscalyears_list_cells(null, $name, $selected_id);
        echo "</tr>\n";
-       return $str;
 }
 //------------------------------------------------------------------------------------
 
@@ -580,45 +711,47 @@ $options = array(
        'async' => false,
        );
 
-       if ($showclosed)
+       if (!$showclosed)
                $options['where'][] = "closed=0";
        if($showtype)
-               $options['where'][] = "type_=$showtype";
+               $options['where'][] = "type_=".db_escape($showtype);
 
        return combo_input($name, $selected_id, $sql, 'id', 'ref', $options);
 }
 
 function dimensions_list_cells($label, $name, $selected_id=null, $no_option=false, $showname=null,
-       $showclosed=false, $showtype=0)
+       $showclosed=false, $showtype=0, $submit_on_change=false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = dimensions_list($name, $selected_id, $no_option, $showname, false, $showclosed, $showtype);
+       echo dimensions_list($name, $selected_id, $no_option, $showname, $submit_on_change, $showclosed, $showtype);
        echo "</td>\n";
-       return $str;
 }
 
 function dimensions_list_row($label, $name, $selected_id=null, $no_option=false, $showname=null,
-       $showclosed=false, $showtype=0)
+       $showclosed=false, $showtype=0, $submit_on_change=false)
 {
-       echo "<tr>\n";
-       $str = dimensions_list_cells($label, $name, $selected_id, $no_option, $showname,
-               $showclosed, $showtype);
+       echo "<tr><td class='label'>$label</td>";
+       dimensions_list_cells(null, $name, $selected_id, $no_option, $showname,
+               $showclosed, $showtype, $submit_on_change);
        echo "</tr>\n";
-       return $str;
 }
 
 //---------------------------------------------------------------------------------------------------
 
-function stock_items_list($name, $selected_id=null, $all_option=false, $submit_on_change=false, $opts=array())
+function stock_items_list($name, $selected_id=null, $all_option=false, 
+       $submit_on_change=false, $opts=array(), $editkey = false)
 {
        global $all_items;
 
-       $sql = "SELECT stock_id, s.description, c.description
+       $sql = "SELECT stock_id, s.description, c.description, s.inactive, s.editable
                        FROM ".TB_PREF."stock_master s,".TB_PREF."stock_category c WHERE s.category_id=c.category_id";
 
-       return combo_input($name, $selected_id, $sql, 'stock_id', 's.description',
+       if ($editkey)
+               set_editor('item', $name, $editkey);
+
+       $ret = combo_input($name, $selected_id, $sql, 'stock_id', 's.description',
        array_merge(
          array(
                'format' => '_format_stock_items',
@@ -628,87 +761,117 @@ function stock_items_list($name, $selected_id=null, $all_option=false, $submit_o
                'search' => array("stock_id", "c.description","s.description"),
                'search_submit' => get_company_pref('no_item_list')!=0,
                'size'=>10,
-               'select_submit'=> $submit_on_change
+               'select_submit'=> $submit_on_change,
+               'category' => 2,
+               'order' => array('c.description','stock_id')
          ), $opts) );
+       if ($editkey)
+               $ret .= add_edit_combo('item');         
+       return $ret;
+         
 }
 
 function _format_stock_items($row)
 {
-       return (user_show_codes() ?  ($row[0] . "&nbsp;-&nbsp;") : "")
-               . $row[2] . "&nbsp;-&nbsp;" . $row[1];
+       return (user_show_codes() ?  ($row[0] . "&nbsp;-&nbsp;") : "") . $row[1];
 }
 
-function stock_items_list_cells($label, $name, $selected_id=null, $all_option=false, $submit_on_change=false)
+function stock_items_list_cells($label, $name, $selected_id=null, $all_option=false, 
+       $submit_on_change=false, $all=false, $editkey = false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
-       $str = stock_items_list($name, $selected_id, $all_option, $submit_on_change,
-               array('cells'=>true));
-       return $str;
+       echo stock_items_list($name, $selected_id, $all_option, $submit_on_change,
+               array('cells'=>true, 'show_inactive'=>$all), $editkey);
 }
 /*
 function stock_items_list_row($label, $name, $selected_id=null, $all_option=false, $submit_on_change=false)
 {
        echo "<tr>\n";
-       $str = stock_items_list_cells($label, $name, $selected_id, $all_option, $submit_on_change);
+       stock_items_list_cells($label, $name, $selected_id, $all_option, $submit_on_change);
        echo "</tr>\n";
-       return $str;
 }
 */
-//------------------------------------------------------------------------------------
-
-function base_stock_items_list($where, $name, $selected_id=null,
-       $all_option=false, $submit_on_change=false)
+//---------------------------------------------------------------------------------------------------
+//
+// Select item via foreign code.
+//
+function sales_items_list($name, $selected_id=null, $all_option=false, 
+       $submit_on_change=false, $type='', $opts=array())
 {
        global $all_items;
+       // all sales codes
+       $sql = "SELECT i.item_code, i.description, c.description, count(*)>1 as kit,
+                        i.inactive, if(count(*)>1, '0', s.editable) as editable
+                       FROM
+                       ".TB_PREF."stock_master s,
+                       ".TB_PREF."item_codes i
+                       LEFT JOIN
+                       ".TB_PREF."stock_category c
+                       ON i.category_id=c.category_id
+                       WHERE i.stock_id=s.stock_id";
 
-       $sql = "SELECT stock_id, s.description, c.description
-               FROM ".TB_PREF."stock_master s,".TB_PREF."stock_category c WHERE
-               s.category_id=c.category_id";
+       
+       if ($type == 'local')   { // exclude foreign codes
+               $sql .= " AND !i.is_foreign"; 
+       } elseif ($type == 'kits') { // sales kits
+               $sql .= " AND !i.is_foreign AND i.item_code!=i.stock_id";
+       }
+       $sql .= " AND !i.inactive AND !s.inactive AND !s.no_sale";
+       $sql .= " GROUP BY i.item_code";
 
-       return combo_input($name, $selected_id, $sql, 'stock_id', 's.description',
-       array(
+       return combo_input($name, $selected_id, $sql, 'i.item_code', 'c.description',
+       array_merge(
+         array(
                'format' => '_format_stock_items',
-               'spec_option' => $all_option==true ?  _("All Items") : $all_option,
+               'spec_option' => $all_option===true ?  _("All Items") : $all_option,
                'spec_id' => $all_items,
+               'search_box' => true,
+               'search' => array("i.item_code", "c.description", "i.description"),
+               'search_submit' => get_company_pref('no_item_list')!=0,
+               'size'=>15,
                'select_submit'=> $submit_on_change,
-               'where' => $where
-       ) );
+               'category' => 2,
+               'order' => array('c.description','i.item_code'),
+               'editable' => 30,
+               'max' => 255
+         ), $opts) );
 }
-//------------------------------------------------------------------------------------
 
-function stock_bom_items_list($name, $selected_id=null, $all_option=false, $submit_on_change=false)
+function sales_items_list_cells($label, $name, $selected_id=null, $all_option=false, $submit_on_change=false, $editkey=false)
 {
+       if ($editkey)
+               set_editor('item', $name, $editkey);
 
-       return base_stock_items_list("(s.mb_flag='M' OR s.mb_flag='K')",
-               $name, $selected_id, $all_option, $submit_on_change);
-}
-/*
-function stock_bom_items_list_cells($label, $name, $selected_id=null, $all_option=false, $submit_on_change=false)
-{
        if ($label != null)
                echo "<td>$label</td>\n";
-       echo "<td>";
-       $str = stock_bom_items_list($name, $selected_id, $all_option, $submit_on_change);
-       echo "</td>\n";
-       return $str;
+       echo sales_items_list($name, $selected_id, $all_option, $submit_on_change,
+               '', array('cells'=>true));
 }
 
-function stock_bom_items_list_row($label, $name, $selected_id=null, $all_option=false, $submit_on_change=false)
+function sales_kits_list($name, $selected_id=null, $all_option=false, $submit_on_change=false)
 {
-       echo "<tr>\n";
-       $str = stock_bom_items_list_cells($label, $name, $selected_id, $all_option, $submit_on_change);
-       echo "</tr>\n";
-       return $str;
+       return sales_items_list($name, $selected_id, $all_option, $submit_on_change,
+               'kits', array('cells'=>false, 'editable' => false));
+}
+
+function sales_local_items_list_row($label, $name, $selected_id=null, $all_option=false, $submit_on_change=false)
+{
+       echo "<tr>";
+       if ($label != null)
+               echo "<td class='label'>$label</td>\n";
+       echo "<td>";
+       echo sales_items_list($name, $selected_id, $all_option, $submit_on_change,
+               'local', array('cells'=>false, 'editable' => false));
+       echo "</td></tr>";
 }
-*/
 //------------------------------------------------------------------------------------
 
 function stock_manufactured_items_list($name, $selected_id=null,
        $all_option=false, $submit_on_change=false)
 {
-       return base_stock_items_list("s.mb_flag='M'",
-               $name, $selected_id, $all_option, $submit_on_change);
+       return stock_items_list($name, $selected_id, $all_option, $submit_on_change,
+               array('where'=>array("mb_flag= 'M'")));
 }
 
 function stock_manufactured_items_list_cells($label, $name, $selected_id=null,
@@ -717,48 +880,42 @@ function stock_manufactured_items_list_cells($label, $name, $selected_id=null,
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = stock_manufactured_items_list($name, $selected_id, $all_option,
-                               $submit_on_change);
+       echo stock_manufactured_items_list($name, $selected_id, $all_option, $submit_on_change);
        echo "</td>\n";
-       return $str;
 }
 
 function stock_manufactured_items_list_row($label, $name, $selected_id=null,
                $all_option=false, $submit_on_change=false)
 {
-       echo "<tr>\n";
-       $str = stock_manufactured_items_list_cells($label, $name, $selected_id,
-                       $all_option, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       stock_manufactured_items_list_cells(null, $name, $selected_id, $all_option, $submit_on_change);
        echo "</tr>\n";
-       return $str;
 }
 //------------------------------------------------------------------------------------
 
 function stock_component_items_list($name, $parent_stock_id, $selected_id=null,
-       $all_option=false, $submit_on_change=false)
+       $all_option=false, $submit_on_change=false, $editkey = false)
 {
-       $str = stock_items_list($name, $selected_id, $all_option, $submit_on_change,
-               array('where'=>array("stock_id != '$parent_stock_id'")));
-       return $str;
+       return stock_items_list($name, $selected_id, $all_option, $submit_on_change,
+               array('where'=>array("stock_id != ".db_escape($parent_stock_id))), $editkey);
 }
 
 function stock_component_items_list_cells($label, $name, $parent_stock_id, 
-       $selected_id=null, $all_option=false, $submit_on_change=false)
+       $selected_id=null, $all_option=false, $submit_on_change=false, $editkey = false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
-       $str = stock_items_list($name, $selected_id, $all_option, $submit_on_change,
-               array('where'=>array("stock_id != '$parent_stock_id'"), 'cells'=>true));
-       return $str;
+       echo stock_items_list($name, $selected_id, $all_option, $submit_on_change,
+               array('where'=>array("stock_id != ".db_escape($parent_stock_id)), 'cells'=>true),
+               $editkey);
 }
 //------------------------------------------------------------------------------------
 
 function stock_costable_items_list($name, $selected_id=null,
        $all_option=false, $submit_on_change=false)
 {
-       $str = stock_items_list($name, $selected_id, $all_option, $submit_on_change,
+       return stock_items_list($name, $selected_id, $all_option, $submit_on_change,
                array('where'=>array("mb_flag!='D'")));
-       return $str;
 }
 
 function stock_costable_items_list_cells($label, $name, $selected_id=null, 
@@ -766,59 +923,53 @@ function stock_costable_items_list_cells($label, $name, $selected_id=null,
 {
        if ($label != null)
                echo "<td>$label</td>\n";
-       $str = stock_items_list($name, $selected_id, $all_option, $submit_on_change,
+       echo stock_items_list($name, $selected_id, $all_option, $submit_on_change,
                array('where'=>array("mb_flag!='D'"), 'cells'=>true));
-       return $str;
 }
 
 //------------------------------------------------------------------------------------
 function stock_purchasable_items_list($name, $selected_id=null,        
-       $all_option=false, $submit_on_change=false)
+       $all_option=false, $submit_on_change=false, $all=false, $editkey=false)
 {
-       $str = stock_items_list($name, $selected_id, $all_option, $submit_on_change,
+       return stock_items_list($name, $selected_id, $all_option, $submit_on_change,
                array('where'=>array("mb_flag!= 'M'"), 
-                       'edit_submit' => true));
-       return $str;
+                       'show_inactive'=>$all), $editkey);
 }
-
+//
+//     This helper is used in PO/GRN/PI entry and supports editable descriptions.
+//
 function stock_purchasable_items_list_cells($label, $name, $selected_id=null,
-                       $all_option=false, $submit_on_change=false)
+                       $all_option=false, $submit_on_change=false, $editkey=false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
-       $str = stock_items_list($name, $selected_id, $all_option, $submit_on_change,
+       echo stock_items_list($name, $selected_id, $all_option, $submit_on_change,
                array('where'=>array("mb_flag!= 'M'"), 
-                        'edit_submit' => true,
-                        'cells'=>true));
-       return $str;
+                        'editable' => 30,
+                        'cells'=>true), $editkey);
 }
-
+/*
 function stock_purchasable_items_list_row($label, $name, $selected_id=null,
-                       $all_option=false, $submit_on_change=false)
+                       $all_option=false, $submit_on_change=false, $editkey=false)
 {
-       echo "<tr>\n";
-       $ret = stock_purchasable_items_list_cells($label, $name, $selected_id=null,
-               $all_option, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       stock_purchasable_items_list_cells(null, $name, $selected_id=null,
+               $all_option, $submit_on_change, $editkey);
        echo "</tr>\n";
-       return $ret;
 }
-
+*/
 //------------------------------------------------------------------------------------
 
 function stock_item_types_list_row($label, $name, $selected_id=null, $enabled=true)
 {
-       $types = array(
-               'M' => _("Manufactured"),
-               'B' => _("Purchased"),
-               'D' => _("Service")
-       );
+       global $stock_types;
 
        echo "<tr>";
        if ($label != null)
-               echo "<td>$label</td>\n";
+               echo "<td class='label'>$label</td>\n";
        echo "<td>";
 
-       array_selector($name, $selected_id, $types, 
+       echo array_selector($name, $selected_id, $stock_types, 
                array( 
                        'select_submit'=> true, 
                        'disabled' => !$enabled) );
@@ -830,16 +981,13 @@ function stock_units_list_row($label, $name, $value=null, $enabled=true)
        $result = get_all_item_units();
        echo "<tr>";
        if ($label != null)
-               echo "<td>$label</td>\n";
+               echo "<td class='label'>$label</td>\n";
        echo "<td>";
 
        while($unit = db_fetch($result))
                $units[$unit['abbr']] = $unit['name'];
 
-       array_selector($name, $value, $units, 
-               array( 
-                       'select_submit'=> true, 
-                       'disabled' => !$enabled) );
+       echo array_selector($name, $value, $units, array( 'disabled' => !$enabled) );
 
        echo "</td></tr>\n";
 }
@@ -853,7 +1001,7 @@ function tax_types_list($name, $selected_id=null, $none_option=false, $submit_on
        return combo_input($name, $selected_id, $sql, 'id', 'name',
        array(
                'spec_option' => $none_option,
-               'spec_id' => reserved_words::get_all_numeric(),
+               'spec_id' => ALL_NUMERIC,
                'select_submit'=> $submit_on_change,
                'async' => false,
        ) );
@@ -865,18 +1013,16 @@ function tax_types_list_cells($label, $name, $selected_id=null, $none_option=fal
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = tax_types_list($name, $selected_id, $none_option, $submit_on_change);
+       echo tax_types_list($name, $selected_id, $none_option, $submit_on_change);
        echo "</td>\n";
-       return $str;
 }
 
 function tax_types_list_row($label, $name, $selected_id=null, $none_option=false,
        $submit_on_change=false)
 {
-       echo "<tr>\n";
-       $str = tax_types_list_cells($label, $name, $selected_id, $none_option, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       tax_types_list_cells(null, $name, $selected_id, $none_option, $submit_on_change);
        echo "</tr>\n";
-       return $str;
 }
 
 //------------------------------------------------------------------------------------
@@ -890,28 +1036,26 @@ function tax_groups_list($name, $selected_id=null,
        array(
                'order' => 'id',
                'spec_option' => $none_option,
-               'spec_id' => 0,
+               'spec_id' => ALL_NUMERIC,
                'select_submit'=> $submit_on_change,
                'async' => false,
        ) );
 }
 
-function tax_groups_list_cells($label, $name, $selected_id=null, $submit_on_change=false)
+function tax_groups_list_cells($label, $name, $selected_id=null, $none_option=false, $submit_on_change=false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = tax_groups_list($name, $selected_id, false, $submit_on_change);
+       echo tax_groups_list($name, $selected_id, $none_option, $submit_on_change);
        echo "</td>\n";
-       return $str;
 }
 
-function tax_groups_list_row($label, $name, $selected_id=null, $submit_on_change=false)
+function tax_groups_list_row($label, $name, $selected_id=null, $none_option=false, $submit_on_change=false)
 {
-       echo "<tr>\n";
-       $str = tax_groups_list_cells($label, $name, $selected_id, false, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       tax_groups_list_cells(null, $name, $selected_id, $none_option, $submit_on_change);
        echo "</tr>\n";
-       return $str;
 }
 
 //------------------------------------------------------------------------------------
@@ -919,7 +1063,7 @@ function tax_groups_list_row($label, $name, $selected_id=null, $submit_on_change
 function item_tax_types_list($name, $selected_id=null)
 {
        $sql ="SELECT id, name FROM ".TB_PREF."item_tax_types";
-       combo_input($name, $selected_id, $sql, 'id', 'name', array('order' => 'id') );
+       return combo_input($name, $selected_id, $sql, 'id', 'name', array('order' => 'id') );
 }
 
 function item_tax_types_list_cells($label, $name, $selected_id=null)
@@ -927,14 +1071,14 @@ function item_tax_types_list_cells($label, $name, $selected_id=null)
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       item_tax_types_list($name, $selected_id);
+       echo item_tax_types_list($name, $selected_id);
        echo "</td>\n";
 }
 
 function item_tax_types_list_row($label, $name, $selected_id=null)
 {
-       echo "<tr>\n";
-       item_tax_types_list_cells($label, $name, $selected_id);
+       echo "<tr><td class='label'>$label</td>";
+       item_tax_types_list_cells(null, $name, $selected_id);
        echo "</tr>\n";
 }
 
@@ -942,8 +1086,9 @@ function item_tax_types_list_row($label, $name, $selected_id=null)
 
 function shippers_list($name, $selected_id=null)
 {
-       $sql = "SELECT shipper_id, shipper_name FROM ".TB_PREF."shippers";
-       combo_input($name, $selected_id, $sql, 'shipper_id', 'shipper_name', array());
+       $sql = "SELECT shipper_id, shipper_name, inactive FROM ".TB_PREF."shippers";
+       return combo_input($name, $selected_id, $sql, 'shipper_id', 'shipper_name', 
+               array('order'=>array('shipper_name')));
 }
 
 function shippers_list_cells($label, $name, $selected_id=null)
@@ -951,38 +1096,41 @@ function shippers_list_cells($label, $name, $selected_id=null)
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       shippers_list($name, $selected_id);
+       echo shippers_list($name, $selected_id);
        echo "</td>\n";
 }
 
 function shippers_list_row($label, $name, $selected_id=null)
 {
-       echo "<tr>\n";
-       shippers_list_cells($label, $name, $selected_id);
+       echo "<tr><td class='label'>$label</td>";
+       shippers_list_cells(null, $name, $selected_id);
        echo "</tr>\n";
 }
 
 //-------------------------------------------------------------------------------------
 
-function sales_persons_list($name, $selected_id=null)
+function sales_persons_list($name, $selected_id=null, $spec_opt=false)
 {
-       $sql = "SELECT salesman_code, salesman_name FROM ".TB_PREF."salesman";
-       combo_input($name, $selected_id, $sql, 'salesman_code', 'salesman_name', array());
+       $sql = "SELECT salesman_code, salesman_name, inactive FROM ".TB_PREF."salesman";
+       return combo_input($name, $selected_id, $sql, 'salesman_code', 'salesman_name', 
+               array('order'=>array('salesman_name'),
+                       'spec_option' => $spec_opt,
+                       'spec_id' => ALL_NUMERIC));
 }
 
-function sales_persons_list_cells($label, $name, $selected_id=null)
+function sales_persons_list_cells($label, $name, $selected_id=null, $spec_opt=false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>\n";
-       sales_persons_list($name, $selected_id);
+       echo sales_persons_list($name, $selected_id, $spec_opt);
        echo "</td>\n";
 }
 
-function sales_persons_list_row($label, $name, $selected_id=null, $submit_on_change=false)
+function sales_persons_list_row($label, $name, $selected_id=null, $spec_opt=false)
 {
-       echo "<tr>\n";
-       sales_persons_list_cells($label, $name, $selected_id, $submit_on_change=false);
+       echo "<tr><td class='label'>$label</td>";
+       sales_persons_list_cells(null, $name, $selected_id, $spec_opt);
        echo "</tr>\n";
 }
 
@@ -990,8 +1138,8 @@ function sales_persons_list_row($label, $name, $selected_id=null, $submit_on_cha
 
 function sales_areas_list($name, $selected_id=null)
 {
-       $sql = "SELECT area_code, description FROM ".TB_PREF."areas";
-       combo_input($name, $selected_id, $sql, 'area_code', 'description', array());
+       $sql = "SELECT area_code, description, inactive FROM ".TB_PREF."areas";
+       return combo_input($name, $selected_id, $sql, 'area_code', 'description', array());
 }
 
 function sales_areas_list_cells($label, $name, $selected_id=null)
@@ -999,14 +1147,76 @@ function sales_areas_list_cells($label, $name, $selected_id=null)
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       sales_areas_list($name, $selected_id);
+       echo sales_areas_list($name, $selected_id);
        echo "</td>\n";
 }
 
 function sales_areas_list_row($label, $name, $selected_id=null)
 {
-       echo "<tr>\n";
-       sales_areas_list_cells($label, $name, $selected_id);
+       echo "<tr><td class='label'>$label</td>";
+       sales_areas_list_cells(null, $name, $selected_id);
+       echo "</tr>\n";
+}
+
+//------------------------------------------------------------------------------------
+
+function sales_groups_list($name, $selected_id=null, $special_option=false)
+{
+       $sql = "SELECT id, description, inactive FROM ".TB_PREF."groups";
+       return combo_input($name, $selected_id, $sql, 'id', 'description', array(
+               'spec_option' => $special_option===true ? ' ' : $special_option,
+               'order' => 'description', 'spec_id' => 0,
+       ));
+}
+
+function sales_groups_list_cells($label, $name, $selected_id=null, $special_option=false)
+{
+       if ($label != null)
+               echo "<td>$label</td>\n";
+       echo "<td>";
+       echo sales_groups_list($name, $selected_id, $special_option);
+       echo "</td>\n";
+}
+
+function sales_groups_list_row($label, $name, $selected_id=null, $special_option=false)
+{
+       echo "<tr><td class='label'>$label</td>";
+       sales_groups_list_cells(null, $name, $selected_id, $special_option);
+       echo "</tr>\n";
+}
+
+//------------------------------------------------------------------------------------
+
+function _format_template_items($row)
+{
+       return ($row[0] . "&nbsp;- &nbsp;" . _("Amount") . "&nbsp;".$row[1]);
+}
+
+function templates_list($name, $selected_id=null, $special_option=false)
+{
+       $sql = "SELECT sorder.order_no, Sum(line.unit_price*line.quantity*(1-line.discount_percent)) AS OrderValue
+               FROM ".TB_PREF."sales_orders as sorder, ".TB_PREF."sales_order_details as line
+               WHERE sorder.order_no = line.order_no AND sorder.type = 1 GROUP BY line.order_no";
+       return combo_input($name, $selected_id, $sql, 'order_no', 'OrderValue', array(
+               'format' => '_format_template_items',
+               'spec_option' => $special_option===true ? ' ' : $special_option,
+               'order' => 'order_no', 'spec_id' => 0,
+       ));
+}
+
+function templates_list_cells($label, $name, $selected_id=null, $special_option=false)
+{
+       if ($label != null)
+               echo "<td>$label</td>\n";
+       echo "<td>";
+       echo templates_list($name, $selected_id, $special_option);
+       echo "</td>\n";
+}
+
+function templates_list_row($label, $name, $selected_id=null, $special_option=false)
+{
+       echo "<tr><td class='label'>$label</td>";
+       templates_list_cells(null, $name, $selected_id, $special_option);
        echo "</tr>\n";
 }
 
@@ -1015,7 +1225,7 @@ function sales_areas_list_row($label, $name, $selected_id=null)
 function workorders_list($name, $selected_id=null)
 {
        $sql = "SELECT id, wo_ref FROM ".TB_PREF."workorders WHERE closed=0";
-       combo_input($name, $selected_id, $sql, 'id', 'wo_ref', array());
+       return combo_input($name, $selected_id, $sql, 'id', 'wo_ref', array());
 }
 
 function workorders_list_cells($label, $name, $selected_id=null)
@@ -1023,14 +1233,14 @@ function workorders_list_cells($label, $name, $selected_id=null)
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       workorders_list($name, $selected_id);
+       echo workorders_list($name, $selected_id);
        echo "</td>\n";
 }
 
 function workorders_list_row($label, $name, $selected_id=null)
 {
-       echo "<tr>\n";
-       workorders_list_cells($label, $name, $selected_id);
+       echo "<tr><td class='label'>$label</td>";
+       workorders_list_cells(null, $name, $selected_id);
        echo "</tr>\n";
 }
 
@@ -1038,8 +1248,8 @@ function workorders_list_row($label, $name, $selected_id=null)
 
 function payment_terms_list($name, $selected_id=null)
 {
-       $sql = "SELECT terms_indicator, terms FROM ".TB_PREF."payment_terms";
-       combo_input($name, $selected_id, $sql, 'terms_indicator', 'terms', array());
+       $sql = "SELECT terms_indicator, terms, inactive FROM ".TB_PREF."payment_terms";
+       return combo_input($name, $selected_id, $sql, 'terms_indicator', 'terms', array());
 }
 
 function payment_terms_list_cells($label, $name, $selected_id=null)
@@ -1047,14 +1257,14 @@ function payment_terms_list_cells($label, $name, $selected_id=null)
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       payment_terms_list($name, $selected_id);
+       echo payment_terms_list($name, $selected_id);
        echo "</td>\n";
 }
 
 function payment_terms_list_row($label, $name, $selected_id=null)
 {
-       echo "<tr>\n";
-       payment_terms_list_cells($label, $name, $selected_id);
+       echo "<tr><td class='label'>$label</td>";
+       payment_terms_list_cells(null, $name, $selected_id);
        echo "</tr>\n";
 }
 
@@ -1062,8 +1272,8 @@ function payment_terms_list_row($label, $name, $selected_id=null)
 
 function credit_status_list($name, $selected_id=null)
 {
-       $sql ="SELECT id, reason_description FROM ".TB_PREF."credit_status";
-       combo_input($name, $selected_id, $sql, 'id', 'reason_description', array());
+       $sql ="SELECT id, reason_description, inactive FROM ".TB_PREF."credit_status";
+       return combo_input($name, $selected_id, $sql, 'id', 'reason_description', array());
 }
 
 function credit_status_list_cells($label, $name, $selected_id=null)
@@ -1071,14 +1281,14 @@ function credit_status_list_cells($label, $name, $selected_id=null)
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       credit_status_list($name, $selected_id);
+       echo credit_status_list($name, $selected_id);
        echo "</td>\n";
 }
 
 function credit_status_list_row($label, $name, $selected_id=null)
 {
-       echo "<tr>\n";
-       credit_status_list_cells($label, $name, $selected_id);
+       echo "<tr><td class='label'>$label</td>";
+       credit_status_list_cells(null, $name, $selected_id);
        echo "</tr>\n";
 }
 
@@ -1086,7 +1296,7 @@ function credit_status_list_row($label, $name, $selected_id=null)
 
 function sales_types_list($name, $selected_id=null, $submit_on_change=false, $special_option=false)
 {
-       $sql = "SELECT id, sales_type FROM ".TB_PREF."sales_types";
+       $sql = "SELECT id, sales_type, inactive FROM ".TB_PREF."sales_types";
 
        return combo_input($name, $selected_id, $sql, 'id', 'sales_type',
        array(
@@ -1102,17 +1312,15 @@ function sales_types_list_cells($label, $name, $selected_id=null, $submit_on_cha
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = sales_types_list($name, $selected_id, $submit_on_change, $special_option);
+       echo sales_types_list($name, $selected_id, $submit_on_change, $special_option);
        echo "</td>\n";
-       return $str;
 }
 
 function sales_types_list_row($label, $name, $selected_id=null, $submit_on_change=false, $special_option=false)
 {
-       echo "<tr>\n";
-       $str = sales_types_list_cells($label, $name, $selected_id, $submit_on_change, $special_option);
+       echo "<tr><td class='label'>$label</td>";
+       sales_types_list_cells(null, $name, $selected_id, $submit_on_change, $special_option);
        echo "</tr>\n";
-       return $str;
 }
 
 //-----------------------------------------------------------------------------------------------
@@ -1120,7 +1328,7 @@ function sales_types_list_row($label, $name, $selected_id=null, $submit_on_chang
 function movement_types_list($name, $selected_id=null)
 {
        $sql = "SELECT id, name FROM ".TB_PREF."movement_types";
-       combo_input($name, $selected_id, $sql, 'id', 'name', array());
+       return combo_input($name, $selected_id, $sql, 'id', 'name', array());
 }
 
 function movement_types_list_cells($label, $name, $selected_id=null)
@@ -1128,48 +1336,60 @@ function movement_types_list_cells($label, $name, $selected_id=null)
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       movement_types_list($name, $selected_id);
+       echo movement_types_list($name, $selected_id);
        echo "</td>\n";
 }
 
 function movement_types_list_row($label, $name, $selected_id=null)
 {
-       echo "<tr>\n";
-       movement_types_list_cells($label, $name, $selected_id);
+       echo "<tr><td class='label'>$label</td>";
+       movement_types_list_cells(null, $name, $selected_id);
        echo "</tr>\n";
 }
 
 //-----------------------------------------------------------------------------------------------
+function _format_date($row)
+{
+       return sql2date($row['reconciled']);
+}
 
-function bank_trans_types_list($name, $selected_id=null)
+function bank_reconciliation_list($account, $name, $selected_id=null, $submit_on_change=false, $special_option=false)
 {
-       $sql = "SELECT id, name FROM ".TB_PREF."bank_trans_types";
-       combo_input($name, $selected_id, $sql, 'id', 'name', array());
+       $sql = "SELECT reconciled, reconciled FROM ".TB_PREF."bank_trans
+               WHERE bank_act=".db_escape($account)." AND reconciled IS NOT NULL
+               GROUP BY reconciled";
+       return combo_input($name, $selected_id, $sql, 'id', 'reconciled',
+       array(
+               'spec_option' => $special_option,
+               'format' => '_format_date',
+               'spec_id' => '',
+               'select_submit'=> $submit_on_change
+       ) );
 }
 
-function bank_trans_types_list_cells($label, $name, $selected_id=null)
+function bank_reconciliation_list_cells($label,$account, $name, $selected_id=null, $submit_on_change=false, $special_option=false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       bank_trans_types_list($name, $selected_id);
+       echo bank_reconciliation_list($account, $name, $selected_id, $submit_on_change, $special_option);
        echo "</td>\n";
 }
-
-function bank_trans_types_list_row($label, $name, $selected_id=null)
+/*
+function bank_reconciliation_list_row($label, $account, $name, $selected_id=null, $submit_on_change=false, $special_option=false)
 {
        echo "<tr>\n";
-       bank_trans_types_list_cells($label, $name, $selected_id);
+       bank_reconciliation_list_cells($label, $account, $name, $selected_id, $submit_on_change, $special_option);
        echo "</tr>\n";
 }
-
+*/
 //-----------------------------------------------------------------------------------------------
 
 function workcenter_list($name, $selected_id=null, $all_option=false)
 {
        global $all_items;
 
-       $sql = "SELECT id, name FROM ".TB_PREF."workcentres";
+       $sql = "SELECT id, name, inactive FROM ".TB_PREF."workcentres";
 
        return combo_input($name, $selected_id, $sql, 'id', 'name',
        array(
@@ -1184,29 +1404,30 @@ function workcenter_list_cells($label, $name, $selected_id=null, $all_option=fal
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       workcenter_list($name, $selected_id, $all_option);
+       echo workcenter_list($name, $selected_id, $all_option);
        echo "</td>\n";
 }
 
 function workcenter_list_row($label, $name, $selected_id=null, $all_option=false)
 {
-       echo "<tr>\n";
-       workcenter_list_cells($label, $name, $selected_id, $all_option);
+       echo "<tr><td class='label'>$label</td>";
+       workcenter_list_cells(null, $name, $selected_id, $all_option);
        echo "</tr>\n";
 }
 
 //-----------------------------------------------------------------------------------------------
 
-function bank_accounts_list($name, $selected_id=null, $submit_on_change=false)
+function bank_accounts_list($name, $selected_id=null, $submit_on_change=false, $spec_option=false)
 {
-       $sql = "SELECT ".TB_PREF."bank_accounts.account_code, bank_account_name, bank_curr_code
-               FROM ".TB_PREF."bank_accounts, ".TB_PREF."chart_master
-               WHERE ".TB_PREF."bank_accounts.account_code=".TB_PREF."chart_master.account_code";
+       $sql = "SELECT ".TB_PREF."bank_accounts.id, bank_account_name, bank_curr_code, inactive
+               FROM ".TB_PREF."bank_accounts";
 
-       return combo_input($name, $selected_id, $sql, 'account_code', 'bank_account_name',
+       return combo_input($name, $selected_id, $sql, 'id', 'bank_account_name',
        array(
                'format' => '_format_add_curr',
                'select_submit'=> $submit_on_change,
+               'spec_option' => $spec_option,
+               'spec_id' => '',
                'async' => false
        ) );
 }
@@ -1216,19 +1437,88 @@ function bank_accounts_list_cells($label, $name, $selected_id=null, $submit_on_c
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = bank_accounts_list($name, $selected_id, $submit_on_change);
+       echo bank_accounts_list($name, $selected_id, $submit_on_change);
        echo "</td>\n";
-       return $str;
 }
 
 function bank_accounts_list_row($label, $name, $selected_id=null, $submit_on_change=false)
 {
-       echo "<tr>\n";
-       $str = bank_accounts_list_cells($label, $name, $selected_id, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       bank_accounts_list_cells(null, $name, $selected_id, $submit_on_change);
        echo "</tr>\n";
-       return $str;
 }
+//-----------------------------------------------------------------------------------------------
+
+function cash_accounts_list_row($label, $name, $selected_id=null, $submit_on_change=false)
+{
+       $sql = "SELECT ".TB_PREF."bank_accounts.id, bank_account_name, bank_curr_code, inactive
+               FROM ".TB_PREF."bank_accounts
+               WHERE ".TB_PREF."bank_accounts.account_type=".BT_CASH;
+
+       if ($label != null)
+               echo "<tr><td class='label'>$label</td>\n";
+       echo "<td>";
+       echo combo_input($name, $selected_id, $sql, 'id', 'bank_account_name',
+       array(
+               'format' => '_format_add_curr',
+               'select_submit'=> $submit_on_change,
+               'async' => true
+       ) );
+       echo "</td></tr>\n";
+}
+//-----------------------------------------------------------------------------------------------
+
+function pos_list_row($label, $name, $selected_id=null, $spec_option=false, $submit_on_change=false)
+{
+       $sql = "SELECT id, pos_name, inactive FROM ".TB_PREF."sales_pos";
+
+       default_focus($name);
+       echo '<tr>';
+       if ($label != null)
+               echo "<td class='label'>$label</td>\n";
+       echo "<td>";
+
+       echo combo_input($name, $selected_id, $sql, 'id', 'pos_name',
+       array(
+               'select_submit'=> $submit_on_change,
+               'async' => true,
+               'spec_option' =>$spec_option,
+               'spec_id' => -1,
+               'order'=> array('pos_name')
+       ) );
+       echo "</td></tr>\n";
+
+}
+//-----------------------------------------------------------------------------------------------
+// Payment type selector for current user.
+//
+function sale_payment_list($name, $category, $selected_id=null, $submit_on_change=true)
+{
+       $sql = "SELECT terms_indicator, terms, inactive FROM ".TB_PREF."payment_terms";
+       
+       if ($category == PM_CASH) // only cash
+                       $sql .= " WHERE days_before_due=0 AND day_in_following_month=0";
+       if ($category == PM_CREDIT) // only delayed payments
+                       $sql .= " WHERE days_before_due!=0 OR day_in_following_month!=0";
+
+       return combo_input($name, $selected_id, $sql, 'terms_indicator', 'terms',
+       array(
+               'select_submit'=> $submit_on_change,
+               'async' => true
+       ) );
+
+}
+
+function sale_payment_list_cells($label, $name, $category, $selected_id=null, $submit_on_change=true)
+{
+       if ($label != null)
+               echo "<td class='label'>$label</td>\n";
+       echo "<td>";
 
+       echo sale_payment_list($name, $category, $selected_id, $submit_on_change);
+
+       echo "</td>\n";
+}
 //-----------------------------------------------------------------------------------------------
 
 function class_list($name, $selected_id=null, $submit_on_change=false)
@@ -1248,108 +1538,112 @@ function class_list_cells($label, $name, $selected_id=null, $submit_on_change=fa
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = class_list($name, $selected_id, $submit_on_change);
+       echo class_list($name, $selected_id, $submit_on_change);
        echo "</td>\n";
-       return $str;
 }
 
 function class_list_row($label, $name, $selected_id=null, $submit_on_change=false)
 {
-       echo "<tr>\n";
-       $str = class_list_cells($label, $name, $selected_id, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       class_list_cells(null, $name, $selected_id, $submit_on_change);
        echo "</tr>\n";
-       return $str;
 }
 
 //-----------------------------------------------------------------------------------------------
-
-function stock_categories_list($name, $selected_id=null)
+function stock_categories_list($name, $selected_id=null, $spec_opt=false, $submit_on_change=false)
 {
-       $sql = "SELECT category_id, description FROM ".TB_PREF."stock_category";
-       combo_input($name, $selected_id, $sql, 'category_id', 'description',
-       array('order'=>'category_id'));
+       $sql = "SELECT category_id, description, inactive FROM ".TB_PREF."stock_category";
+       return combo_input($name, $selected_id, $sql, 'category_id', 'description',
+       array('order'=>'category_id',
+               'spec_option' => $spec_opt,
+               'spec_id' => -1,
+               'select_submit'=> $submit_on_change,
+               'async' => true
+       ));
 }
 
-function stock_categories_list_cells($label, $name, $selected_id=null)
+function stock_categories_list_cells($label, $name, $selected_id=null, $spec_opt=false, $submit_on_change=false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       stock_categories_list($name, $selected_id);
+       echo stock_categories_list($name, $selected_id, $spec_opt, $submit_on_change);
        echo "</td>\n";
 }
 
-function stock_categories_list_row($label, $name, $selected_id=null)
+function stock_categories_list_row($label, $name, $selected_id=null, $spec_opt=false, $submit_on_change=false)
 {
-       echo "<tr>\n";
-       stock_categories_list_cells($label, $name, $selected_id);
+       echo "<tr><td class='label'>$label</td>";
+       stock_categories_list_cells(null, $name, $selected_id, $spec_opt, $submit_on_change);
        echo "</tr>\n";
 }
 
 //-----------------------------------------------------------------------------------------------
 
-function gl_account_types_list($name, $selected_id=null, $all_option, $all_option_numeric)
+function gl_account_types_list($name, $selected_id=null, $all_option=false, $all=true)
 {
        global $all_items;
 
        $sql = "SELECT id, name FROM ".TB_PREF."chart_types";
 
-       combo_input($name, $selected_id, $sql, 'id', 'name',
+       return combo_input($name, $selected_id, $sql, 'id', 'name',
        array(
-               'order' => 'id',
+               'format' => '_format_account',
+               'order' => array('class_id', 'id', 'parent'),
                'spec_option' =>$all_option,
-               'spec_id' => $all_option_numeric ? 0 : $all_items
+               'spec_id' => $all_items
        ) );
 }
 
-function gl_account_types_list_cells($label, $name, $selected_id=null, $all_option=false,
-       $all_option_numeric=false)
+function gl_account_types_list_cells($label, $name, $selected_id=null, $all_option=false, $all=false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       gl_account_types_list($name, $selected_id, $all_option, $all_option_numeric);
+       echo gl_account_types_list($name, $selected_id, $all_option, $all);
        echo "</td>\n";
 }
 
-function gl_account_types_list_row($label, $name, $selected_id=null, $all_option=false,
-       $all_option_numeric=false)
+function gl_account_types_list_row($label, $name, $selected_id=null, $all_option=false,        $all=false)
 {
-       echo "<tr>\n";
-       gl_account_types_list_cells($label, $name, $selected_id, $all_option,
-               $all_option_numeric);
+       echo "<tr><td class='label'>$label</td>";
+       gl_account_types_list_cells(null, $name, $selected_id, $all_option,
+               $all);
        echo "</tr>\n";
 }
 
 //-----------------------------------------------------------------------------------------------
 function gl_all_accounts_list($name, $selected_id=null, $skip_bank_accounts=false,
-       $show_group=false, $cells=false, $all_option=false, $submit_on_change=false)
+       $cells=false, $all_option=false, $submit_on_change=false, $all=false)
 {
        if ($skip_bank_accounts)
-               $sql = "SELECT chart.account_code, chart.account_name, type.name
+               $sql = "SELECT chart.account_code, chart.account_name, type.name, chart.inactive, type.id
                        FROM (".TB_PREF."chart_master chart,".TB_PREF."chart_types type) "
                        ."LEFT JOIN ".TB_PREF."bank_accounts acc "
                        ."ON chart.account_code=acc.account_code
-                               WHERE acc.account_code IS NULL
+                               WHERE acc.account_code  IS NULL
                        AND chart.account_type=type.id";
        else
-               $sql = "SELECT chart.account_code, chart.account_name, type.name
+               $sql = "SELECT chart.account_code, chart.account_name, type.name, chart.inactive, type.id
                        FROM ".TB_PREF."chart_master chart,".TB_PREF."chart_types type
                        WHERE chart.account_type=type.id";
 
-       combo_input($name, $selected_id, $sql, 'chart.account_code', 'chart.account_name',
+       return combo_input($name, $selected_id, $sql, 'chart.account_code', 'chart.account_name',
        array(
-               'format' => '_format_account' .  ($show_group ? '2' : ''),
+               'format' => '_format_account',
                'spec_option' => $all_option===true ?  _("Use Item Sales Accounts") : $all_option,
                'spec_id' => '',
-               'order' => 'account_code',
+               'type' => 2,
+               'order' => array('type.class_id','type.id','account_code'),
                'search_box' => $cells,
                        'search_submit' => false,
                        'size' => 12,
                        'max' => 10,
                        'cells' => true,
                'select_submit'=> $submit_on_change,
-               'async' => false
+               'async' => false,
+               'category' => 2,
+               'show_inactive' => $all
        ) );
 
 }
@@ -1359,35 +1653,32 @@ function _format_account($row)
                return $row[0] .  "&nbsp;&nbsp;&nbsp;&nbsp;" . $row[1];
 }
 
-function _format_account2($row)
-{
-               return $row[0] .  "&nbsp;&nbsp;&nbsp;&nbsp;" . $row[2] . "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;" . $row[1];
-}
-
-function gl_all_accounts_list_cells($label, $name, $selected_id=null, $skip_bank_accounts=false,
-       $show_group=false, $cells=false, $all_option=false)
+function gl_all_accounts_list_cells($label, $name, $selected_id=null, 
+       $skip_bank_accounts=false, $cells=false, $all_option=false, 
+       $submit_on_change=false, $all=false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       gl_all_accounts_list($name, $selected_id, $skip_bank_accounts, $show_group, $cells, $all_option);
+       echo gl_all_accounts_list($name, $selected_id, 
+               $skip_bank_accounts, $cells, $all_option, $submit_on_change, $all);
        echo "</td>\n";
 }
 
-function gl_all_accounts_list_row($label, $name, $selected_id=null, $skip_bank_accounts=false,
-       $show_group=false, $cells=false, $all_option=false)
+function gl_all_accounts_list_row($label, $name, $selected_id=null, 
+       $skip_bank_accounts=false, $cells=false, $all_option=false)
 {
-       echo "<tr>\n";
-       gl_all_accounts_list_cells($label, $name, $selected_id, $skip_bank_accounts,
-               $show_group, $cells, $all_option);
+       echo "<tr><td class='label'>$label</td>";
+       gl_all_accounts_list_cells(null, $name, $selected_id, 
+               $skip_bank_accounts, $cells, $all_option);
        echo "</tr>\n";
 }
 
 function yesno_list($name, $selected_id=null, $name_yes="", $name_no="", $submit_on_change=false)
 {
        $items = array();
-       $items['1'] = strlen($name_yes) ? $name_yes : _("Yes");
        $items['0'] = strlen($name_no) ? $name_no : _("No");
+       $items['1'] = strlen($name_yes) ? $name_yes : _("Yes");
 
        return array_selector($name, $selected_id, $items, 
                array( 
@@ -1400,45 +1691,44 @@ function yesno_list_cells($label, $name, $selected_id=null, $name_yes="", $name_
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = yesno_list($name, $selected_id, $name_yes, $name_no, $submit_on_change);
+       echo yesno_list($name, $selected_id, $name_yes, $name_no, $submit_on_change);
        echo "</td>\n";
-       return $str;
 }
 
 function yesno_list_row($label, $name, $selected_id=null, $name_yes="", $name_no="", $submit_on_change=false)
 {
-       echo "<tr>\n";
-       $str = yesno_list_cells($label, $name, $selected_id, $name_yes, $name_no, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       yesno_list_cells(null, $name, $selected_id, $name_yes, $name_no, $submit_on_change);
        echo "</tr>\n";
-       return $str;
 }
 
 //------------------------------------------------------------------------------------------------
 
-function languages_list($name, $selected_id=null)
+function languages_list($name, $selected_id=null, $all_option=false)
 {
        global $installed_languages;
 
        $items = array();
+       if ($all_option)
+               $items[''] = $all_option;
        foreach ($installed_languages as $lang)
                        $items[$lang['code']] = $lang['name'];
-       
-       return array_selector($name, $selected_id, $items );
+       return array_selector($name, $selected_id, $items);
 }
 
-function languages_list_cells($label, $name, $selected_id=null)
+function languages_list_cells($label, $name, $selected_id=null, $all_option=false)
 {
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       languages_list($name, $selected_id);
+       echo languages_list($name, $selected_id, $all_option);
        echo "</td>\n";
 }
 
-function languages_list_row($label, $name, $selected_id=null)
+function languages_list_row($label, $name, $selected_id=null, $all_option=false)
 {
-       echo "<tr>\n";
-       languages_list_cells($label, $name, $selected_id);
+       echo "<tr><td class='label'>$label</td>";
+       languages_list_cells(null, $name, $selected_id, $all_option);
        echo "</tr>\n";
 }
 
@@ -1446,15 +1736,9 @@ function languages_list_row($label, $name, $selected_id=null)
 
 function bank_account_types_list($name, $selected_id=null)
 {
-       $types = bank_account_types::get_all();
+       global $bank_account_types;
 
-       $items = array();
-       foreach ($types as $type)
-       {
-                       $items[$type['id']] = $type['name'];
-       }
-       
-       return array_selector($name, $selected_id, $items );
+       return array_selector($name, $selected_id, $bank_account_types);
 }
 
 function bank_account_types_list_cells($label, $name, $selected_id=null)
@@ -1462,31 +1746,28 @@ function bank_account_types_list_cells($label, $name, $selected_id=null)
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       bank_account_types_list($name, $selected_id);
+       echo bank_account_types_list($name, $selected_id);
        echo "</td>\n";
 }
 
 function bank_account_types_list_row($label, $name, $selected_id=null)
 {
-       echo "<tr>\n";
-       bank_account_types_list_cells($label, $name, $selected_id);
+       echo "<tr><td class='label'>$label</td>";
+       bank_account_types_list_cells(null, $name, $selected_id);
        echo "</tr>\n";
 }
 
 //------------------------------------------------------------------------------------------------
 function payment_person_types_list($name, $selected_id=null, $submit_on_change=false)
 {
-       $types = payment_person_types::get_all();
+       global $payment_person_types;
 
        $items = array();
-       foreach ($types as $type)
+       foreach ($payment_person_types as $key=>$type)
        {
-               if (payment_person_types::has_items($type['id']))
-               {
-                       $items[$type['id']] = $type['name'];
-               }
-       }
-       
+               if ($key != PT_WORKORDER)
+                       $items[$key] = $type;
+       }               
        return array_selector($name, $selected_id, $items, 
                array( 'select_submit'=> $submit_on_change ) );
 }
@@ -1496,39 +1777,32 @@ function payment_person_types_list_cells($label, $name, $selected_id=null, $rela
        if ($label != null)
                echo "<td>$label</td>\n";
        echo "<td>";
-       $str = payment_person_types_list($name, $selected_id, $related);
+       echo payment_person_types_list($name, $selected_id, $related);
        echo "</td>\n";
-       return $str;
 }
 
 function payment_person_types_list_row($label, $name, $selected_id=null, $related=null)
 {
-       echo "<tr>\n";
-       $str = payment_person_types_list_cells($label, $name, $selected_id, $related);
+       echo "<tr><td class='label'>$label</td>";
+       payment_person_types_list_cells(null, $name, $selected_id, $related);
        echo "</tr>\n";
-       return $str;
 }
 
 //------------------------------------------------------------------------------------------------
 
 function wo_types_list($name, $selected_id=null)
 {
-       $types = wo_types::get_all();
-
-       $items = array();
-       foreach ($types as $type)
-               $items[$type['id']] = $type['name'];
+       global $wo_types_array;
        
-       return array_selector($name, $selected_id, $items
+       return array_selector($name, $selected_id, $wo_types_array
                array( 'select_submit'=> true, 'async' => true ) );
 }
 
 function wo_types_list_row($label, $name, $selected_id=null)
 {
-       echo "<tr><td>$label</td><td>\n";
-       $str = wo_types_list($name, $selected_id);
+       echo "<tr><td class='label'>$label</td><td>\n";
+       echo wo_types_list($name, $selected_id);
        echo "</td></tr>\n";
-       return $str;
 }
 
 //------------------------------------------------------------------------------------------------
@@ -1537,8 +1811,8 @@ function dateformats_list_row($label, $name, $value=null)
 {
        global $dateformats;
 
-       echo "<tr><td>$label</td>\n<td>";
-       array_selector( $name, $value, $dateformats );
+       echo "<tr><td class='label'>$label</td>\n<td>";
+       echo array_selector( $name, $value, $dateformats );
        echo "</td></tr>\n";
 }
 
@@ -1546,8 +1820,8 @@ function dateseps_list_row($label, $name, $value=null)
 {
        global $dateseps;
 
-       echo "<tr><td>$label</td>\n<td>";
-       array_selector( $name, $value, $dateseps );
+       echo "<tr><td class='label'>$label</td>\n<td>";
+       echo array_selector( $name, $value, $dateseps );
        echo "</td></tr>\n";
 }
 
@@ -1555,8 +1829,8 @@ function thoseps_list_row($label, $name, $value=null)
 {
        global $thoseps;
 
-       echo "<tr><td>$label</td>\n<td>";
-       array_selector( $name, $value, $thoseps );
+       echo "<tr><td class='label'>$label</td>\n<td>";
+       echo array_selector( $name, $value, $thoseps );
        echo "</td></tr>\n";
 }
 
@@ -1564,8 +1838,8 @@ function decseps_list_row($label, $name, $value=null)
 {
        global $decseps;
 
-       echo "<tr><td>$label</td>\n<td>";
-       array_selector( $name, $value, $decseps );
+       echo "<tr><td class='label'>$label</td>\n<td>";
+       echo array_selector( $name, $value, $decseps );
        echo "</td></tr>\n";
 }
 
@@ -1585,8 +1859,8 @@ function themes_list_row($label, $name, $value=null)
        }
        ksort($themes);
 
-       echo "<tr><td>$label</td>\n<td>";
-       array_selector( $name, $value, $themes );
+       echo "<tr><td class='label'>$label</td>\n<td>";
+       echo array_selector( $name, $value, $themes );
        echo "</td></tr>\n";
 }
 
@@ -1598,21 +1872,44 @@ function pagesizes_list_row($label, $name, $value=null)
        foreach ($pagesizes as $pz)
                $items[$pz] = $pz;
 
-       echo "<tr><td>$label</td>\n<td>";
-       array_selector( $name, $value, $items );
+       echo "<tr><td class='label'>$label</td>\n<td>";
+       echo array_selector( $name, $value, $items );
        echo "</td></tr>\n";
 }
 
-function security_headings_list_row($label, $name, $value=null)
+function systypes_list($name, $value=null, $spec_opt=false, $submit_on_change=false, $exclude=array())
 {
-       global $security_headings;
+       global $systypes_array;
 
-       echo "<tr><td>$label</td>\n<td>";
-       array_selector( $name, $value, $security_headings );
-       echo "</td></tr>\n";
+       // emove non-voidable transactions if needed
+       $systypes = array_diff_key($systypes_array, array_flip($exclude));
+       return array_selector($name, $value, $systypes, 
+               array( 
+                       'spec_option'=> $spec_opt,
+                       'spec_id' => ALL_NUMERIC,
+                       'select_submit'=> $submit_on_change,
+                       'async' => false,
+                       )
+       );
+}
+
+function systypes_list_cells($label, $name, $value=null, $submit_on_change=false, $exclude=array())
+{
+       if ($label != null)
+               echo "<td>$label</td>\n";
+       echo "<td>";
+       echo systypes_list($name, $value, false, $submit_on_change, $exclude);
+       echo "</td>\n";
 }
 
-function systypes_list_cells($label, $name, $value=null, $submit_on_change=false)
+function systypes_list_row($label, $name, $value=null, $submit_on_change=false, $exclude=array())
+{
+       echo "<tr><td class='label'>$label</td>";
+       systypes_list_cells(null, $name, $value, $submit_on_change, $exclude);
+       echo "</tr>\n";
+}
+
+function journal_types_list_cells($label, $name, $value=null, $submit_on_change=false)
 {
        global $systypes_array;
 
@@ -1620,26 +1917,21 @@ function systypes_list_cells($label, $name, $value=null, $submit_on_change=false
                echo "<td>$label</td>\n";
        echo "<td>";
 
-       $items = array();
-       foreach ($systypes_array as $key=>$type)
-                       $items[$key] = $type['name'];
+       $items = $systypes_array;
+
+       // exclude quotes, orders and dimensions
+       foreach (array(ST_PURCHORDER, ST_SALESORDER, ST_DIMENSION, ST_SALESQUOTE, ST_LOCTRANSFER) as $excl)
+                       unset($items[$excl]);
        
-       $str = array_selector($name, $value, $items, 
+       echo array_selector($name, $value, $items, 
                array( 
+                       'spec_option'=> _("All"),
+                       'spec_id' => -1,
                        'select_submit'=> $submit_on_change,
                        'async' => false
                        )
        );
        echo "</td>\n";
-       return $str;
-}
-
-function systypes_list_row($label, $name, $value=null, $submit_on_change=false)
-{
-       echo "<tr>\n";
-       $str = systypes_list_cells($label, $name, $value, $submit_on_change);
-       echo "</tr>\n";
-       return $str;
 }
 
 function cust_allocations_list_cells($label, $name, $selected=null)
@@ -1657,9 +1949,8 @@ function cust_allocations_list_cells($label, $name, $selected=null)
                '4' => _("Credit Notes"),
                '5' => _("Delivery Notes")
        );
-       $str = array_selector($name, $selected, $allocs);
+       echo array_selector($name, $selected, $allocs);
        echo "</td>\n";
-       return $str;
 }
 
 function supp_allocations_list_cell($name, $selected=null)
@@ -1675,9 +1966,27 @@ function supp_allocations_list_cell($name, $selected=null)
                '4' => _("Credit Notes"),
                '5' => _("Overdue Credit Notes")
        );
-       $str = array_selector($name, $selected, $allocs);
+       echo array_selector($name, $selected, $allocs);
+       echo "</td>\n";
+}
+
+function supp_transactions_list_cell($name, $selected=null)
+{
+       global $all_items;
+
+       echo "<td>\n";
+       $allocs = array( 
+               $all_items=>_("All Types"),
+               '6'=>_("GRNs"),
+               '1'=> _("Invoices"),
+               '2'=> _("Overdue Invoices"),
+               '3' => _("Payments"),
+               '4' => _("Credit Notes"),
+               '5' => _("Overdue Credit Notes")
+       );
+
+       echo array_selector($name, $selected, $allocs);
        echo "</td>\n";
-       return $str;
 }
 
 function policy_list_cells($label, $name, $selected=null)
@@ -1685,17 +1994,16 @@ function policy_list_cells($label, $name, $selected=null)
        if ($label != null)
                label_cell($label);
        echo "<td>\n";
-       $str = array_selector($name, $selected, 
+       echo array_selector($name, $selected, 
                                array( '' => _("Automatically put balance on back order"),
                                        'CAN' => _("Cancel any quantites not delivered")) );
        echo "</td>\n";
-       return $str;
 }
 
 function policy_list_row($label, $name, $selected=null)
 {
-       echo "<tr>\n";
-       policy_list_cells($label, $name, $selected);
+       echo "<tr><td class='label'>$label</td>";
+       policy_list_cells(null, $name, $selected);
        echo "</tr>\n";
 }
 
@@ -1704,20 +2012,18 @@ function credit_type_list_cells($label, $name, $selected=null, $submit_on_change
        if ($label != null)
                label_cell($label);
        echo "<td>\n";
-       $str = array_selector($name, $selected, 
+       echo array_selector($name, $selected, 
                                array( 'Return' => _("Items Returned to Inventory Location"),
                                        'WriteOff' => _("Items Written Off")),
                                array( 'select_submit'=> $submit_on_change ) );
        echo "</td>\n";
-       return $str;
 }
 
 function credit_type_list_row($label, $name, $selected=null, $submit_on_change=false)
 {
-       echo "<tr>\n";
-       $str = credit_type_list_cells($label, $name, $selected, $submit_on_change);
+       echo "<tr><td class='label'>$label</td>";
+       credit_type_list_cells(null, $name, $selected, $submit_on_change);
        echo "</tr>\n";
-       return $str;
 }
 
 function number_list($name, $selected, $from, $to, $no_option=false)
@@ -1728,7 +2034,7 @@ function number_list($name, $selected, $from, $to, $no_option=false)
 
        return array_selector($name, $selected, $items,
                                array(  'spec_option' => $no_option,
-                                               'spec_id' => reserved_words::get_all_numeric()) );
+                                               'spec_id' => ALL_NUMERIC) );
 }
 
 function number_list_cells($label, $name, $selected, $from, $to, $no_option=false)
@@ -1736,15 +2042,337 @@ function number_list_cells($label, $name, $selected, $from, $to, $no_option=fals
        if ($label != null)
                label_cell($label);
        echo "<td>\n";
-       number_list($name, $selected, $from, $to, $no_option);
+       echo number_list($name, $selected, $from, $to, $no_option);
        echo "</td>\n";
 }
 
 function number_list_row($label, $name, $selected, $from, $to, $no_option=false)
 {
-       echo "<tr>\n";
-       number_list_cells($label, $name, $selected, $from, $to, $no_option);
+       echo "<tr><td class='label'>$label</td>";
+       echo number_list_cells(null, $name, $selected, $from, $to, $no_option);
+       echo "</tr>\n";
+}
+
+function print_profiles_list_row($label, $name, $selected_id=null, $spec_opt=false,
+       $submit_on_change=true)
+{
+       $sql = "SELECT profile FROM ".TB_PREF."print_profiles"
+               ." GROUP BY profile";
+       $result = db_query($sql, 'cannot get all profile names');
+       $profiles = array();
+       while($myrow=db_fetch($result)) {
+               $profiles[$myrow['profile']] = $myrow['profile'];
+       }
+
+       echo "<tr>";
+       if ($label != null)
+               echo "<td class='label'>$label</td>\n";
+       echo "<td>";
+
+       echo array_selector($name, $selected_id, $profiles, 
+               array( 'select_submit'=> $submit_on_change,
+                       'spec_option'=>$spec_opt,
+                       'spec_id' => ''
+                ));
+
+       echo "</td></tr>\n";
+}
+
+function printers_list($name, $selected_id=null, $spec_opt=false, $submit_on_change=false)
+{
+       static $printers; // query only once for page display
+
+       if (!$printers) {
+               $sql = "SELECT id, name, description FROM ".TB_PREF."printers"; 
+               $result = db_query($sql, 'cannot get all printers');
+               $printers = array();
+               while($myrow=db_fetch($result)) {
+                       $printers[$myrow['id']] = $myrow['name'].'&nbsp;-&nbsp;'.$myrow['description'];
+               }
+       }
+       return array_selector($name, $selected_id, $printers, 
+               array( 'select_submit'=> $submit_on_change,
+                       'spec_option'=>$spec_opt,
+                       'spec_id' => ''
+                ));
+}
+
+//------------------------------------------------------------------------------------------------
+
+function quick_entries_list($name, $selected_id=null, $type=null, $submit_on_change=false)
+{
+       $where = false;
+       $sql = "SELECT id, description FROM ".TB_PREF."quick_entries";
+       if ($type != null)
+               $sql .= " WHERE type=$type";
+
+       return combo_input($name, $selected_id, $sql, 'id', 'description',
+               array(
+                       'spec_id' => '',
+                       'order' => 'description',
+                       'select_submit'=> $submit_on_change,
+                       'async' => false
+               ) );
+
+}
+
+function quick_entries_list_cells($label, $name, $selected_id=null, $type, $submit_on_change=false)
+{
+       if ($label != null)
+               echo "<td>$label</td>\n";
+       echo "<td>";    
+       echo quick_entries_list($name, $selected_id, $type, $submit_on_change);
+       echo "</td>";
+}
+
+function quick_entries_list_row($label, $name, $selected_id=null, $type, $submit_on_change=false)
+{
+       echo "<tr><td class='label'>$label</td>";
+       quick_entries_list_cells(null, $name, $selected_id, $type, $submit_on_change);
        echo "</tr>\n";
 }
 
-?>
\ No newline at end of file
+
+function quick_actions_list_row($label, $name, $selected_id=null, $submit_on_change=false)
+{
+       global $quick_actions;
+       
+       echo "<tr><td class='label'>$label</td><td>";
+       echo array_selector($name, $selected_id, $quick_actions, 
+               array( 
+                       'select_submit'=> $submit_on_change
+               ) );
+       echo "</td></tr>\n";
+}
+
+function quick_entry_types_list_row($label, $name, $selected_id=null, $submit_on_change=false)
+{
+       global $quick_entry_types;
+               
+       echo "<tr><td class='label'>$label</td><td>";
+       echo array_selector($name, $selected_id, $quick_entry_types, 
+               array( 
+                       'select_submit'=> $submit_on_change
+                       ) );
+       echo "</td></tr>\n";
+}
+
+function record_status_list_row($label, $name) {
+       return yesno_list_row($label, $name, null,      _('Inactive'), _('Active'));
+}
+
+function class_types_list_row($label, $name, $selected_id=null, $submit_on_change=false)
+{
+       global $class_types;
+       
+       echo "<tr><td class='label'>$label</td><td>";
+       echo array_selector($name, $selected_id, $class_types, 
+               array( 
+                       'select_submit'=> $submit_on_change
+               ) );
+       echo "</td></tr>\n";
+}
+
+//------------------------------------------------------------------------------------------------
+
+function security_roles_list($name, $selected_id=null, $new_item=false, $submit_on_change=false,
+       $show_inactive = false)
+{
+       global $all_items;
+
+       $sql = "SELECT id, role, inactive FROM ".TB_PREF."security_roles";
+
+return combo_input($name, $selected_id, $sql, 'id', 'description',
+       array(
+               'spec_option'=>$new_item ? _("New role") : false,
+               'spec_id' => '',
+               'select_submit'=> $submit_on_change,
+               'show_inactive' => $show_inactive
+       ) );
+}
+
+function security_roles_list_cells($label, $name, $selected_id=null, $new_item=false, $submit_on_change=false,
+       $show_inactive = false)
+{
+       if ($label != null)
+               echo "<td>$label</td>\n";
+       echo "<td>";
+       echo security_roles_list($name, $selected_id, $new_item, $submit_on_change, $show_inactive);
+       echo "</td>\n";
+}
+
+function security_roles_list_row($label, $name, $selected_id=null, $new_item=false, $submit_on_change=false,
+       $show_inactive = false)
+{
+       echo "<tr><td class='label'>$label</td>";
+       security_roles_list_cells(null, $name, $selected_id, $new_item, $submit_on_change, $show_inactive);
+       echo "</tr>\n";
+}
+
+function tab_list_row($label, $name, $selected_id=null)
+{
+       global $installed_extensions;
+       
+       $tabs = array();
+       foreach ($_SESSION['App']->applications as $app) {
+               $tabs[$app->id] = access_string($app->name, true);
+       }
+       echo "<tr>\n";
+       echo "<td class='label'>$label</td><td>\n";
+       echo array_selector($name, $selected_id, $tabs);
+       echo "</td></tr>\n";
+}
+
+//-----------------------------------------------------------------------------------------------
+
+function tag_list($name, $height, $type, $multi=false, $all=false, $spec_opt = false)
+{
+       // Get tags
+       global $path_to_root;
+       include_once($path_to_root . "/admin/db/tags_db.inc");
+       $results = get_tags($type, $all);
+
+       while ($tag = db_fetch($results))
+               $tags[$tag['id']] = $tag['name'];
+       
+       if (!isset($tags)) {
+               $tags[''] = $all ? _("No tags defined.") : _("No active tags defined.");
+               $spec_opt = false;
+       }
+       return array_selector($name, null, $tags,
+               array(
+                       'multi' => $multi,
+                       'height' => $height,
+                       'spec_option'=> $spec_opt,
+                       'spec_id' => -1,
+               ) );
+}
+
+function tag_list_cells($label, $name, $height, $type, $mult=false, $all=false, $spec_opt = false)
+{
+       if ($label != null)
+               echo "<td>$label</td>\n";
+       echo "<td>\n";
+       echo tag_list($name, $height, $type, $mult, $all, $spec_opt);
+       echo "</td>\n";
+       
+}
+
+function tag_list_row($label, $name, $height, $type, $mult=false, $all=false, $spec_opt = false)
+{
+       echo "<tr><td class='label'>$label</td>";
+       tag_list_cells(null, $name, $height, $type, $mult, $all, $spec_opt);
+       echo "</tr>\n"; 
+}
+
+//---------------------------------------------------------------------------------------------
+//     List of sets of active extensions 
+//
+function extset_list($name, $value=null, $submit_on_change=false)
+{
+       global $db_connections;
+
+       $items = array();
+       foreach ($db_connections as $comp)
+               $items[] = sprintf(_("Activated for '%s'"), $comp['name']);
+       return array_selector( $name, $value, $items,
+               array(
+                       'spec_option'=> _("Available and/or installed"),
+                       'spec_id' => -1,
+                       'select_submit'=> $submit_on_change,
+                       'async' => true
+               ));
+}
+
+function crm_category_types_list($name, $selected_id=null, $filter=array(), $submit_on_change=true)
+{
+
+       $sql = "SELECT id, name, type, inactive FROM ".TB_PREF."crm_categories";
+
+       $multi = false;
+       $groups = false;
+       $where = array();
+       if (@$filter['class']) {
+               $where[] = 'type='.db_escape($filter['class']);
+       } else
+               $groups = 'type';
+       if (@$filter['subclass']) $where[] = 'action='.db_escape($filter['subclass']);
+       if (@$filter['entity']) $where[] = 'entity_id='.db_escape($filter['entity']);
+       if (@$filter['multi']) { // contact category selector for person
+               $multi = true;
+       }
+
+       return combo_input($name, $selected_id, $sql, 'id', 'name',
+               array(
+                       'multi' => $multi,
+                       'height' => $multi ? 5:1,
+                       'category' => $groups,
+                       'select_submit'=> $submit_on_change,
+                       'async' => true,
+                       'where' => $where
+               ));
+}
+
+function crm_category_types_list_row($label, $name, $selected_id=null, $filter=array(), $submit_on_change=true)
+{
+       echo "<tr><td class='label'>$label</td><td>";
+       echo crm_category_types_list($name, $selected_id, $filter, $submit_on_change);
+       echo "</td></tr>\n";
+}
+
+function payment_type_list_row($label, $name, $selected_id=null, $submit_on_change=false)
+{
+       global $pterm_types;
+       
+       echo "<tr><td class='label'>$label</td><td>";
+       echo array_selector($name, $selected_id, $pterm_types, 
+               array( 
+                       'select_submit'=> $submit_on_change
+               ) );
+       echo "</td></tr>\n";
+}
+
+function coa_list_row($label, $name, $value=null)
+{
+       global $path_to_root, $installed_extensions;
+
+       $path = $path_to_root.'/sql/';
+       $coas = array();
+       $sqldir = opendir($path);
+       while (false !== ($fname = readdir($sqldir)))
+       {
+               if (is_file($path.$fname) && substr($fname,-4)=='.sql' && @($fname[2] == '_'))
+               {
+                       $ext = array_search_value($fname, $installed_extensions, 'sql');
+                       if ($ext!=null) {
+                               $descr = $ext['name'];
+                       } elseif ($fname == 'en_US-new.sql') { // two standard COAs
+                               $descr = _("Standard new company American COA (4 digit)");
+                       } elseif ($fname == 'en_US-demo.sql') {
+                               $descr = _("Standard American COA (4 digit) with demo data");
+                       } else
+                               $descr = $fname;
+
+                       $coas[$fname] =  $descr;
+               }
+       }
+       ksort($coas);
+
+       echo "<tr><td class='label'>$label</td>\n<td>";
+       echo array_selector( $name, $value, $coas );
+       echo "</td></tr>\n";
+}
+
+function payment_services($name)
+{
+       global $payment_services;
+
+       $services = array_combine(array_keys($payment_services), array_keys($payment_services));
+
+       return array_selector($name, null, $services, array(
+                       'spec_option'=> _("No payment Link"),
+                       'spec_id' => '',
+               ));
+}
+
+?>