3 * Table Definition for core_curr_rate
5 require_once 'DB/DataObject.php';
7 class Pman_Core_DataObjects_Core_curr_rate extends DB_DataObject
10 /* the code below is auto generated do not remove the above tag */
12 public $__table = 'core_curr_rate'; // table name
15 public $rate; // always to USD...
19 /* the code above is auto generated do not remove the tag below */
22 function applyFilters($q, $au, $roo)
31 * current rate fetching
33 * - we used to do historical rates... (but sources keep disappearing for that..)
35 * this just get's the current rates from the ecb..
42 static $checked = false;
48 // how often do we need to know this..?
49 // let's assume we do it once a week..
50 $x = DB_DataObject::Factory('core_curr_rate');
51 $x->whereAdd("to_dt > NOW() AND curr != ''");// ingore crap data.
54 // got some data for beyond today..
59 // load our default rates to start with..
60 $dom = simplexml_load_file(dirname(__FILE__).'/../eurofxref-daily.xml');
62 $rates['TWD'] = 46.7008412; // taiwan dorlar
63 $rates['VND'] = 25282.24; // veitnam dong?
66 foreach($dom->Cube->Cube->Cube as $c) {
67 //echo '<PRE>';print_r($c );
68 $rates[(string)$c['currency']] = (string)$c['rate'];
70 $rates['RMB'] = $rates['CNY'] ;
74 // now try loading from latest..
77 $f = @file_get_contents('http://www.ecb.europa.eu/stats/eurofxref/eurofxref-daily.xml');
82 $dom = simplexml_load_file($target);
85 foreach($dom->Cube->Cube->Cube as $c) {
86 //echo '<PRE>';print_r($c );
87 $rates[(string)$c['currency']] = (string)$c['rate'];
89 $rates['RMB'] = $rates['CNY'] ;
91 foreach($rates as $cur=>$euro) {
94 $rate = $this->rates['USD'] * $euro;
98 $ov = DB_DataObject::Factory('core_curr_rate');
101 $ov->orderBy('to_dt DESC');
105 $nl->from_dt = DB_DataObject::sqlValue("NOW()");
106 $nl->to_dt = DB_DataObject::sqlValue("NOW() + INTERVAL 7 DAY");
107 if ($ov->find(true)) {
108 if (strtotime($ov->to_dt) > time()) {
111 $nl->from_dt = $ov->to_dt;
114 if ($ov->rate == $rate) {
115 // modify the old one to expire
117 $ov->to_dt = $nv->from_dt;
122 // no previous record...
123 $nl->from_dt = '1970-01-01 00:00:00';
135 function rate($cur, $when)
137 $when === false ? date('Y-m-d H:i:s') : $when;
138 $this->loadRates(); // check if we have an rates.
140 $r = DB_DataObject::factory('core_curr_rate');
142 $r->whereAdd("from_dt < '" . date('Y-m-d H:i:s', strtotime($when)) . "'");
144 $r->orderBy('to_dt ASC');
146 if ($r->find(true)) {
152 function convert($val, $from, $to, $when = false)
156 $fr = $this->rate($from, $when);
157 $tr = $this->rate($to, $when);
159 // crappy error handling..
167 return ((1.0 / $fr) * $val) * $tr;