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");
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");
23 $js .= get_js_date_picker();
24 page(_($help_context = "Exchange Rates"), false, false, "", $js);
26 simple_page_mode(false);
28 //---------------------------------------------------------------------------------------------
31 if (!is_date($_POST['date_']))
33 display_error( _("The entered date is invalid."));
37 if (input_num('BuyRate') <= 0)
39 display_error( _("The exchange rate cannot be zero or a negative number."));
47 //---------------------------------------------------------------------------------------------
49 function handle_submit()
56 if ($selected_id != "")
59 update_exchange_rate($_POST['curr_abrev'], $_POST['date_'],
60 input_num('BuyRate'), input_num('BuyRate'));
65 add_exchange_rate($_POST['curr_abrev'], $_POST['date_'],
66 input_num('BuyRate'), input_num('BuyRate'));
73 //---------------------------------------------------------------------------------------------
75 function handle_delete()
79 if ($selected_id == "")
81 delete_exchange_rate($selected_id);
86 //---------------------------------------------------------------------------------------------
87 function edit_link($row)
89 return button('Edit'.$row["id"], _("Edit"), true, ICON_EDIT);
92 function del_link($row)
94 return button('Delete'.$row["id"], _("Delete"), true, ICON_DELETE);
97 function display_rates($curr_code)
103 //---------------------------------------------------------------------------------------------
105 function display_rate_edit()
107 global $selected_id, $table_style2, $Ajax;
109 start_table($table_style2);
111 if ($selected_id != "")
113 //editing an existing exchange rate
115 $myrow = get_exchange_rate($selected_id);
117 $_POST['date_'] = sql2date($myrow["date_"]);
118 $_POST['BuyRate'] = exrate_format($myrow["rate_buy"]);
120 hidden('selected_id', $selected_id);
121 hidden('date_', $_POST['date_']);
123 label_row(_("Date to Use From:"), $_POST['date_']);
127 $_POST['date_'] = Today();
128 $_POST['BuyRate'] = '';
129 date_row(_("Date to Use From:"), 'date_');
131 if (isset($_POST['get_rate']))
134 exrate_format(retrieve_exrate($_POST['curr_abrev'], $_POST['date_']));
135 $Ajax->activate('BuyRate');
137 small_amount_row(_("Exchange Rate:"), 'BuyRate', null, '',
138 submit('get_rate',_("Get"), false, _('Get current ECB rate') , true),
143 submit_add_or_update_center($selected_id == '', '', 'both');
145 display_note(_("Exchange rates are entered against the company currency."), 1);
148 //---------------------------------------------------------------------------------------------
150 function clear_data()
152 unset($_POST['selected_id']);
153 unset($_POST['date_']);
154 unset($_POST['BuyRate']);
157 //---------------------------------------------------------------------------------------------
159 if ($Mode=='ADD_ITEM' || $Mode=='UPDATE_ITEM')
162 //---------------------------------------------------------------------------------------------
164 if ($Mode == 'Delete')
168 //---------------------------------------------------------------------------------------------
172 if (!isset($_POST['curr_abrev']))
173 $_POST['curr_abrev'] = get_global_curr_code();
176 echo _("Select a currency :") . " ";
177 echo currencies_list('curr_abrev', null, true);
180 // if currency sel has changed, clear the form
181 if ($_POST['curr_abrev'] != get_global_curr_code())
187 set_global_curr_code($_POST['curr_abrev']);
189 $sql = get_sql_for_exchange_rates();
192 _("Date to Use From") => 'date',
193 _("Exchange Rate") => 'rate',
194 array('insert'=>true, 'fun'=>'edit_link'),
195 array('insert'=>true, 'fun'=>'del_link'),
197 $table =& new_db_pager('orders_tbl', $sql, $cols);
199 if (is_company_currency($_POST['curr_abrev']))
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);
209 $table->width = "40%";
210 display_db_pager($table);