2 /**********************************************************************
3 Copyright (C) FrontAccounting, LLC.
4 Released under the terms of the GNU General Public License, GPL,
5 as published by the Free Software Foundation, either version 3
6 of the License, or (at your option) any later version.
7 This program is distributed in the hope that it will be useful,
8 but WITHOUT ANY WARRANTY; without even the implied warranty of
9 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
10 See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
11 ***********************************************************************/
13 var $version = '2.2'; // version installed
14 var $description = 'Version 2.2';
15 var $sql = 'alter2.2.sql';
17 // Install procedure. All additional changes
18 // not included in sql file should go here.
20 function install($pref, $force)
22 global $db, $systypes_array;
23 // set item category dflt accounts to values from company GL setup
24 $prefs = get_company_prefs();
25 $sql = "UPDATE {$pref}stock_category SET "
26 ."dflt_sales_act = '" . $prefs['default_inv_sales_act'] . "',"
27 ."dflt_cogs_act = '". $prefs['default_cogs_act'] . "',"
28 ."dflt_inventory_act = '" . $prefs['default_inventory_act'] . "',"
29 ."dflt_adjustment_act = '" . $prefs['default_adj_act'] . "',"
30 ."dflt_assembly_act = '" . $prefs['default_assembly_act']."'";
31 if (db_query($sql)==false) {
32 display_error("Cannot update category default GL accounts"
33 .':<br>'. db_error_msg($db));
36 // add all references to refs table for easy searching via journal interface
37 foreach($systypes_array as $typeno => $typename) {
38 $info = get_systype_db_info($typeno);
39 if ($info == null || $info[3] == null) continue;
40 $tbl = str_replace(TB_PREF, $pref, $info[0]);
41 $sql = "SELECT {$info[2]} as id,{$info[3]} as ref FROM $tbl";
43 $sql .= " WHERE {$info[1]}=$typeno";
44 $result = db_query($sql);
45 if (db_num_rows($result)) {
46 while ($row = db_fetch($result)) {
47 $res2 = db_query("INSERT INTO {$pref}refs VALUES("
48 . $row['id'].",".$typeno.",'".$row['ref']."')");
50 display_error(_("Cannot copy references from $tbl")
51 .':<br>'. db_error_msg($db));
57 /* FIX // restore/init audit_trail data
59 "gl_trans"=> array("type", "type_no","tran_date"),
60 "purch_orders" => array("order_no", "'18'", "ord_date"),
61 "sales_orders" => array("order_no", "'30'", "ord_date"),
62 "workorders" => array("id", "'26'", "date_") );
63 foreach ( $datatbl as $tblname => $tbl) {
64 $sql = "SELECT {$tbl[0]} as type, {$tbl[1]} as trans, {$tbl[2]} as dat"
65 . " FROM {$pref}{$tblname}";
66 $result = db_query($sql);
67 if (db_num_rows($result)) {
70 while ($row = db_fetch($result)) {
71 $sql2 = "INSERT INTO ".$pref."audit_trail"
72 ." (type, trans_no, user, fiscal_year, gl_date, gl_seq) VALUES ("
73 . "{$row['type']},{$row['trans']},$user,$year,{$row['dat']},0)";
74 $res2 = db_query($sql2);
76 display_error(_("Cannot init audit_trail data")
77 .':<br>'. db_error_msg($db));
87 // Checking before install
89 function pre_check($pref)
91 return true; // true when ok, fail otherwise
94 // Test if patch was applied before.
96 function installed($pref) {
97 if (check_table($pref, 'company', 'login_tout')) return false;
98 if (check_table($pref, 'stock_category', 'dflt_dim2')) return false;
99 if (check_table($pref, 'users', 'sticky_doc_date')) return false;
100 if (check_table($pref, 'audit_trail')) return false;
101 if (check_table($pref, 'stock_master','no_sale')) return false;
106 $install = new fa2_2;