Feature 5388: Print Invoices (documents) list gets too long. Fixed by default 180...

[fa-stable.git] / includes / data_checks.inc

diff --git a/includes/data_checks.inc b/includes/data_checks.inc
index 7243e43fe937be460c3650d47028ade5939d7a33..4b9689045e410c42e3140451a32bdc41cee30dd9 100644 (file)
--- a/includes/data_checks.inc
+++ b/includes/data_checks.inc
@@ -37,21 +37,21 @@ function check_db_has_currencies($msg)
     {
        display_error($msg, true);
        end_page();
-       exit;   
-    }  
+       exit;
+    }
 }
 
 function db_has_currency_rates($currency, $date_, $msg=false)
 {
        $date = date2sql($date_);
-       
+
        if (is_company_currency($currency))
                return 1;
        $ret = check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."exchange_rates WHERE curr_code = '$currency' && date_ <= '$date'");
        if ($ret == 0 && $msg)
                display_error(sprintf(_("Cannot retrieve exchange rate for currency %s as of %s. Please add exchange rate manually on Exchange Rates page."),
                                         $currency, $date_), true);
-       return $ret;                             
+       return $ret;
 }
 
 function db_has_sales_types()
@@ -153,8 +153,8 @@ function check_db_has_sales_people($msg)
     {
        display_error($msg, true);
        end_page();
-       exit;   
-    }  
+       exit;
+    }
 }
 
 function db_has_sales_areas()
@@ -250,7 +250,8 @@ function check_db_has_suppliers($msg)
 
 function db_has_stock_items()
 {
-       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."stock_master");
+
+       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."stock_master WHERE mb_flag!='F'");
 }
 
 function check_db_has_stock_items($msg)
@@ -328,9 +329,129 @@ function check_db_has_costable_items($msg)
     }  
 }
 
+function check_db_has_fixed_asset_classes($msg)
+{
+       global $path_to_root;
+    if (!db_has_fixed_asset_classes()) 
+    {
+       display_error($msg, true);
+       end_page();
+       exit;
+    }
+}
+
+function db_has_fixed_asset_classes()
+{
+       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."stock_fa_class");
+}
+
+function db_has_depreciable_fixed_assets()
+{
+       $year = get_current_fiscalyear();
+       $begin = date2sql(add_months(sql2date($year['begin']), -1));
+       $end = date2sql(add_months(sql2date($year['end']), -1));
+
+       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."stock_master 
+           WHERE mb_flag='F'
+                   AND material_cost > 0
+               AND stock_id IN ( SELECT stock_id FROM ".TB_PREF."stock_moves WHERE type=".ST_SUPPRECEIVE." AND qty!=0 )
+                   AND stock_id NOT IN ( SELECT stock_id FROM ".TB_PREF."stock_moves WHERE (type=".ST_CUSTDELIVERY." OR type=".ST_INVADJUST.") AND qty!=0 )
+                   AND depreciation_date <= '".$end."'
+               AND depreciation_date >='".$begin."'");
+}
+
+function check_db_has_depreciable_fixed_assets($msg)
+{
+       global $path_to_root;
+
+       if (!db_has_depreciable_fixed_assets()) 
+       {
+               display_error($msg, true);
+               end_page();
+       exit;
+       }
+}
+
+function db_has_fixed_assets()
+{
+       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."stock_master WHERE mb_flag='F'");
+}
+
+function check_db_has_fixed_assets($msg)
+{
+       global $path_to_root;
+
+       if (!db_has_fixed_assets()) 
+       {
+               display_error($msg, true);
+               end_page();
+               exit;
+       }
+}
+
+function db_has_purchasable_fixed_assets()
+{
+       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."stock_master 
+       WHERE mb_flag='F'
+               AND !inactive
+                       AND stock_id NOT IN
+                               ( SELECT stock_id FROM ".TB_PREF."stock_moves WHERE type=".ST_SUPPRECEIVE." AND qty!=0 )");
+}
+
+function check_db_has_purchasable_fixed_assets($msg)
+{
+       global $path_to_root;
+
+       if (!db_has_purchasable_fixed_assets()) 
+       {
+               display_error($msg, true);
+               end_page();
+               exit;
+    }
+}
+
+function db_has_disposable_fixed_assets()
+{
+       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."stock_master 
+       WHERE mb_flag='F'
+                   AND !inactive
+                   AND stock_id IN
+                               ( SELECT stock_id FROM ".TB_PREF."stock_moves WHERE type=".ST_SUPPRECEIVE." AND qty!=0 )
+                   AND stock_id NOT IN
+                               ( SELECT stock_id FROM ".TB_PREF."stock_moves WHERE (type=".ST_CUSTDELIVERY." OR type=".ST_INVADJUST.") AND qty!=0 )");
+}
+
+function check_db_has_disposable_fixed_assets($msg)
+{
+       global $path_to_root;
+
+       if (!db_has_disposable_fixed_assets()) 
+       {
+               display_error($msg, true);
+               end_page();
+               exit;
+       }
+}
+
 function db_has_stock_categories()
 {
-       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."stock_category");
+       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."stock_category WHERE dflt_mb_flag!='F'");
+}
+
+function check_db_has_fixed_asset_categories($msg)
+{
+       global $path_to_root;
+    if (!db_has_fixed_asset_categories()) 
+    {
+       display_error($msg, true);
+       end_page();
+       exit;
+    }
+}
+
+function db_has_fixed_asset_categories()
+{
+       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."stock_category WHERE dflt_mb_flag='F'");
 }
 
 function check_db_has_stock_categories($msg)
@@ -340,8 +461,8 @@ function check_db_has_stock_categories($msg)
     {
        display_error($msg, true);
        end_page();
-       exit;   
-    }  
+       exit;
+    }
 }
 
 function db_has_workcentres()
@@ -362,7 +483,7 @@ function check_db_has_workcentres($msg)
 
 function db_has_locations()
 {
-       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."locations");
+       return check_empty_result("SELECT COUNT(*) FROM ".TB_PREF."locations WHERE fixed_asset=0");
 }
 
 function check_db_has_locations($msg)
@@ -495,6 +616,22 @@ function check_is_closed($type, $type_no, $msg=null)
        }
 }
 
+function check_db_has_template_orders($msg)
+{
+       $sql  = "SELECT sorder.order_no 
+               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";
+
+    if (!check_empty_result($sql))
+    {
+       display_error($msg, true);
+       end_page();
+       exit;
+    }
+}
+
 function check_deferred_income_act($msg)
 {
        global $path_to_root;
@@ -538,3 +675,14 @@ function check_reference($reference, $trans_type, $trans_no=0, $context=null, $l
        }
        return true;
 }
+
+function check_sys_pref($name, $msg, $empty = '')
+{
+       global $path_to_root;
+
+       if (get_company_pref($name) === $empty)
+       {
+               display_error(menu_link("/admin/gl_setup.php", $msg), true);
+               display_footer_exit();
+       }
+}