X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FController%2FClientConfig.pm;h=bc0f28701be0bc57d3d53044aefa138ebdbd4930;hb=24af0d9994b2d7e00d740b6bb6e698c68ebc96a4;hp=59fe4f555fbaaffb7f985839f02162b89887d416;hpb=76383e4bd057a778acc2b3be2f2db278448dfe77;p=kivitendo-erp.git diff --git a/SL/Controller/ClientConfig.pm b/SL/Controller/ClientConfig.pm index 59fe4f555..bc0f28701 100644 --- a/SL/Controller/ClientConfig.pm +++ b/SL/Controller/ClientConfig.pm @@ -18,13 +18,16 @@ use SL::Locale::String qw(t8); use SL::PriceSource::ALL; use SL::Template; use SL::Controller::TopQuickSearch; +use SL::DB::Helper::AccountingPeriod qw(get_balance_startdate_method_options); use SL::Helper::ShippedQty; +use SL::VATIDNr; +use SL::ZUGFeRD; __PACKAGE__->run_before('check_auth'); use Rose::Object::MakeMethods::Generic ( 'scalar --get_set_init' => [ qw(defaults all_warehouses all_weightunits all_languages all_currencies all_templates all_price_sources h_unit_name available_quick_search_modules available_shipped_qty_item_identity_fields - all_project_statuses all_project_types + all_project_statuses all_project_types zugferd_settings posting_options payment_options accounting_options inventory_options profit_options balance_startdate_method_options displayable_name_specs_by_module) ], ); @@ -98,6 +101,11 @@ sub action_save { } } + my $cleaned_ustid = SL::VATIDNr->clean($defaults->{co_ustid}); + if ($cleaned_ustid && !SL::VATIDNr->validate($cleaned_ustid)) { + push @errors, t8("The VAT ID number '#1' is invalid.", $defaults->{co_ustid}); + } + # Show form again if there were any errors. Nothing's been changed # yet in the database. if (@errors) { @@ -159,6 +167,7 @@ sub init_all_templates { +{ SL::Template->available_templates } sub init_h_unit_name { first { SL::DB::Manager::Unit->find_by(name => $_) } qw(Std h Stunde) } sub init_all_project_types { SL::DB::Manager::ProjectType->get_all_sorted } sub init_all_project_statuses { SL::DB::Manager::ProjectStatus->get_all_sorted } +sub init_zugferd_settings { \@SL::ZUGFeRD::customer_settings } sub init_posting_options { [ { title => t8("never"), value => 0 }, @@ -188,11 +197,7 @@ sub init_profit_options { } sub init_balance_startdate_method_options { - [ { title => t8("After closed period"), value => "closed_to" }, - { title => t8("Start of year"), value => "start_of_year" }, - { title => t8("All transactions"), value => "all_transactions" }, - { title => t8("Last opening balance or all transactions"), value => "last_ob_or_all_transactions" }, - { title => t8("Last opening balance or start of year"), value => "last_ob_or_start_of_year" }, ] + return SL::DB::Helper::AccountingPeriod::get_balance_startdate_method_options; } sub init_all_price_sources { @@ -241,7 +246,7 @@ sub check_auth { sub edit_form { my ($self) = @_; - $::request->layout->use_javascript("${_}.js") for qw(jquery.selectboxes jquery.multiselect2side kivi.File); + $::request->layout->use_javascript("${_}.js") for qw(jquery.selectboxes jquery.multiselect2side kivi.File ckeditor/ckeditor ckeditor/adapters/jquery); $self->setup_edit_form_action_bar; $self->render('client_config/form', title => t8('Client Configuration'),