X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/854500401fb91ccb0dfc4ff4115adc90f1cefcdc..4b04c42212bb045a98535fcc16eef4ad81b2dbb6:/SL/Controller/Order.pm diff --git a/SL/Controller/Order.pm b/SL/Controller/Order.pm index 83938509f..7728f6766 100644 --- a/SL/Controller/Order.pm +++ b/SL/Controller/Order.pm @@ -175,6 +175,7 @@ sub action_add_item { ->val('#add_item_discount_as_percent', '') ->run('row_table_scroll_down') ->run('row_set_keyboard_events_by_id', $item_id) + ->on('.recalc', 'change', 'recalc_amounts_and_taxes') ->focus('#add_item_parts_id_name'); $self->_js_redisplay_amounts_and_taxes; @@ -186,10 +187,19 @@ sub action_recalc_amounts_and_taxes { $self->_recalc(); + $self->_js_redisplay_linetotals; $self->_js_redisplay_amounts_and_taxes; $self->js->render($self); } +sub _js_redisplay_linetotals { + my ($self) = @_; + + my @data = map {$::form->format_amount(\%::myconfig, $_->{linetotal}, 2, 0)} @{ $self->order->items }; + $self->js + ->run('redisplay_linetotals', \@data); +} + sub _js_redisplay_amounts_and_taxes { my ($self) = @_; @@ -322,6 +332,11 @@ sub _recalc { sub _save { my ($self) = @_; + # autovivify all cvars that are not in the form (cvars_by_config can do it) + foreach my $item (@{ $self->order->items }) { + $item->cvars_by_config; + } + my $errors = []; my $db = $self->order->db; @@ -337,15 +352,19 @@ sub _save { sub _pre_render { my ($self) = @_; - $self->{all_taxzones} = SL::DB::Manager::TaxZone->get_all_sorted(); - $self->{all_employees} = SL::DB::Manager::Employee->get_all(where => [ or => [ id => $self->order->employee_id, - deleted => 0 ] ], - sort_by => 'name'); - $self->{all_projects} = SL::DB::Manager::Project->get_all(where => [ or => [ id => $self->order->globalproject_id, - active => 1 ] ], - sort_by => 'projectnumber'); + $self->{all_taxzones} = SL::DB::Manager::TaxZone->get_all_sorted(); + $self->{all_employees} = SL::DB::Manager::Employee->get_all(where => [ or => [ id => $self->order->employee_id, + deleted => 0 ] ], + sort_by => 'name'); + $self->{all_projects} = SL::DB::Manager::Project->get_all(where => [ or => [ id => $self->order->globalproject_id, + active => 1 ] ], + sort_by => 'projectnumber'); + $self->{all_payment_terms} = SL::DB::Manager::PaymentTerm->get_all_sorted(); + $self->{all_delivery_terms} = SL::DB::Manager::DeliveryTerm->get_all_sorted(); $self->{current_employee_id} = SL::DB::Manager::Employee->current->id; + + $::request->{layout}->use_javascript("${_}.js") for qw(ckeditor/ckeditor ckeditor/adapters/jquery); } sub _sales_order_type {