From d1ff41f315440e6b28093ee844a92fdfb5b5fbf1 Mon Sep 17 00:00:00 2001
From: Janusz Dobrowolski <janusz@frontaccounting.eu>
Date: Sat, 23 Jan 2010 18:21:25 +0000
Subject: [PATCH] Cached company currency retrieval.

---
 includes/banking.inc | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/includes/banking.inc b/includes/banking.inc
index 301a3729..6a0dee83 100644
--- a/includes/banking.inc
+++ b/includes/banking.inc
@@ -41,14 +41,7 @@ function is_company_currency($currency)
 
 function get_company_currency()
 {
-	$sql= "SELECT curr_default FROM ".TB_PREF."company";
-	$result = db_query($sql, "retreive company currency");
-
-	if (db_num_rows($result) == 0)
-		display_db_error("Could not find the requested currency. Fatal.", $sql);
-
-	$myrow = db_fetch_row($result);
-	return $myrow[0];
+	return get_company_pref('curr_default');
 }
 
 //----------------------------------------------------------------------------------
-- 
2.30.2