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