Merged changes from main trunk up to 2.2.5
[fa-stable.git] / gl / manage / exchange_rates.php
1 <?php
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 ***********************************************************************/
12 $page_security = 'SA_EXCHANGERATE';
13 $path_to_root = "../..";
14 include($path_to_root . "/includes/db_pager.inc");
15 include_once($path_to_root . "/includes/session.inc");
16
17 include_once($path_to_root . "/includes/date_functions.inc");
18 include_once($path_to_root . "/includes/ui.inc");
19 include_once($path_to_root . "/includes/banking.inc");
20
21 $js = "";
22 if ($use_date_picker)
23         $js .= get_js_date_picker();
24 page(_($help_context = "Exchange Rates"), false, false, "", $js);
25
26 simple_page_mode(false);
27
28 //---------------------------------------------------------------------------------------------
29 function check_data()
30 {
31         if (!is_date($_POST['date_']))
32         {
33                 display_error( _("The entered date is invalid."));
34                 set_focus('date_');
35                 return false;
36         }
37         if (input_num('BuyRate') <= 0)
38         {
39                 display_error( _("The exchange rate cannot be zero or a negative number."));
40                 set_focus('BuyRate');
41                 return false;
42         }
43
44         return true;
45 }
46
47 //---------------------------------------------------------------------------------------------
48
49 function handle_submit()
50 {
51         global $selected_id;
52
53         if (!check_data())
54                 return false;
55
56         if ($selected_id != "")
57         {
58
59                 update_exchange_rate($_POST['curr_abrev'], $_POST['date_'],
60                 input_num('BuyRate'), input_num('BuyRate'));
61         }
62         else
63         {
64
65                 add_exchange_rate($_POST['curr_abrev'], $_POST['date_'],
66                     input_num('BuyRate'), input_num('BuyRate'));
67         }
68
69         $selected_id = '';
70         clear_data();
71 }
72
73 //---------------------------------------------------------------------------------------------
74
75 function handle_delete()
76 {
77         global $selected_id;
78
79         if ($selected_id == "")
80                 return;
81         delete_exchange_rate($selected_id);
82         $selected_id = '';
83         clear_data();
84 }
85
86 //---------------------------------------------------------------------------------------------
87 function edit_link($row) 
88 {
89   return button('Edit'.$row["id"], _("Edit"), true, ICON_EDIT);
90 }
91
92 function del_link($row) 
93 {
94   return button('Delete'.$row["id"], _("Delete"), true, ICON_DELETE);
95 }
96
97 function display_rates($curr_code)
98 {
99         global $table_style;
100
101 }
102
103 //---------------------------------------------------------------------------------------------
104
105 function display_rate_edit()
106 {
107         global $selected_id, $table_style2, $Ajax;
108
109         start_table($table_style2);
110
111         if ($selected_id != "")
112         {
113                 //editing an existing exchange rate
114
115                 $myrow = get_exchange_rate($selected_id);
116
117                 $_POST['date_'] = sql2date($myrow["date_"]);
118                 $_POST['BuyRate'] = exrate_format($myrow["rate_buy"]);
119
120                 hidden('selected_id', $selected_id);
121                 hidden('date_', $_POST['date_']);
122
123                 label_row(_("Date to Use From:"), $_POST['date_']);
124         }
125         else
126         {
127                 $_POST['date_'] = Today();
128                 $_POST['BuyRate'] = '';
129                 date_row(_("Date to Use From:"), 'date_');
130         }
131         if (isset($_POST['get_rate']))
132         {
133                 $_POST['BuyRate'] = 
134                         exrate_format(retrieve_exrate($_POST['curr_abrev'], $_POST['date_']));
135                 $Ajax->activate('BuyRate');
136         }
137         small_amount_row(_("Exchange Rate:"), 'BuyRate', null, '',
138                 submit('get_rate',_("Get"), false, _('Get current ECB rate') , true),
139                 user_exrate_dec());
140
141         end_table(1);
142
143         submit_add_or_update_center($selected_id == '', '', 'both');
144
145         display_note(_("Exchange rates are entered against the company currency."), 1);
146 }
147
148 //---------------------------------------------------------------------------------------------
149
150 function clear_data()
151 {
152         unset($_POST['selected_id']);
153         unset($_POST['date_']);
154         unset($_POST['BuyRate']);
155 }
156
157 //---------------------------------------------------------------------------------------------
158
159 if ($Mode=='ADD_ITEM' || $Mode=='UPDATE_ITEM') 
160         handle_submit();
161
162 //---------------------------------------------------------------------------------------------
163
164 if ($Mode == 'Delete')
165         handle_delete();
166
167
168 //---------------------------------------------------------------------------------------------
169
170 start_form();
171
172 if (!isset($_POST['curr_abrev']))
173         $_POST['curr_abrev'] = get_global_curr_code();
174
175 echo "<center>";
176 echo _("Select a currency :") . "  ";
177 echo currencies_list('curr_abrev', null, true);
178 echo "</center>";
179
180 // if currency sel has changed, clear the form
181 if ($_POST['curr_abrev'] != get_global_curr_code())
182 {
183         clear_data();
184         $selected_id = "";
185 }
186
187 set_global_curr_code($_POST['curr_abrev']);
188
189 $sql = get_sql_for_exchange_rates();
190
191 $cols = array(
192         _("Date to Use From") => 'date', 
193         _("Exchange Rate") => 'rate',
194         array('insert'=>true, 'fun'=>'edit_link'),
195         array('insert'=>true, 'fun'=>'del_link'),
196 );
197 $table =& new_db_pager('orders_tbl', $sql, $cols);
198
199 if (is_company_currency($_POST['curr_abrev']))
200 {
201
202         display_note(_("The selected currency is the company currency."), 2);
203         display_note(_("The company currency is the base currency so exchange rates cannot be set for it."), 1);
204 }
205 else
206 {
207
208         br(1);
209         $table->width = "40%";
210         display_db_pager($table);
211         br(1);
212     display_rate_edit();
213 }
214
215 end_form();
216
217 end_page();
218
219 ?>