if ($update_available) {
$form->{"title"} = $main::locale->text("Dataset upgrade");
- $form->header();
+ $form->header(no_layout => $form->{no_layout});
print $form->parse_html_template("dbupgrade/header");
$form->{dbupdate} = "db$myconfig{dbname}";
do_query($form, $dbh, $query, $form->{profit_determination});
$query = "UPDATE defaults SET inventory_system = ?";
do_query($form, $dbh, $query, $form->{inventory_system});
+ $query = "UPDATE defaults SET curr = ?";
+ do_query($form, $dbh, $query, $form->{defaultcurrency});
$dbh->disconnect;
sub config_vars {
$main::lxdebug->enter_sub();
- my @conf = qw(address admin businessnumber company countrycode
- currency dateformat dbconnect dbdriver dbhost dbport dboptions
- dbname dbuser dbpasswd email fax name numberformat password
- printer sid signature stylesheet tel templates vclimit angebote
- bestellungen rechnungen anfragen lieferantenbestellungen einkaufsrechnungen
- taxnumber co_ustid duns menustyle template_format default_media
- default_printer_id copies show_form_details favorites
- pdonumber sdonumber hide_cvar_search_options mandatory_departments
- sepa_creditor_id taxincluded_checked);
+ my @conf = qw(copies countrycode dateformat default_media default_printer_id email favorites fax hide_cvar_search_options mandatory_departments menustyle name
+ numberformat show_form_details signature stylesheet taxincluded_checked tel template_format vclimit);
$main::lxdebug->leave_sub();