X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fdo.pl;h=af00d34e45024997754dea90d72bcc3144cc9fc0;hb=6770b19ab3f0dc0d8b00f70d8aab74149354a181;hp=7340e66489b8b9266cf116bad4acc4d4cb3a1b42;hpb=e6291b3ab19b0f14f39ef371cbb337d6e7667d1c;p=kivitendo-erp.git diff --git a/bin/mozilla/do.pl b/bin/mozilla/do.pl index 7340e6648..af00d34e4 100644 --- a/bin/mozilla/do.pl +++ b/bin/mozilla/do.pl @@ -247,6 +247,7 @@ sub setup_do_action_bar { [ t8('Update'), submit => [ '#form', { action => "update" } ], id => 'update_button', + checks => [ 'kivi.validate_form' ], accesskey => 'enter', ], @@ -254,19 +255,19 @@ sub setup_do_action_bar { action => [ t8('Save'), submit => [ '#form', { action => "save" } ], - checks => [ @req_trans_desc ], + checks => [ 'kivi.validate_form' ], disabled => $::form->{delivered} ? t8('This record has already been delivered.') : undef, ], action => [ t8('Save as new'), submit => [ '#form', { action => "save_as_new" } ], - checks => [ @req_trans_desc ], + checks => [ 'kivi.validate_form' ], disabled => !$::form->{id}, ], action => [ t8('Mark as closed'), submit => [ '#form', { action => "mark_closed" } ], - checks => [ @req_trans_desc ], + checks => [ 'kivi.validate_form' ], confirm => t8('This will remove the delivery order from showing as open even if contents are not delivered. Proceed?'), disabled => !$::form->{id} ? t8('This record has not been saved yet.') : $::form->{closed} ? t8('This record has already been closed.') @@ -289,28 +290,28 @@ sub setup_do_action_bar { action => [ t8('Transfer out'), submit => [ '#form', { action => "transfer_out" } ], - checks => [ @req_trans_desc, @transfer_qty ], + checks => [ 'kivi.validate_form', @transfer_qty ], disabled => $::form->{delivered} ? t8('This record has already been delivered.') : undef, only_if => $is_customer, ], action => [ t8('Transfer out via default'), submit => [ '#form', { action => "transfer_out_default" } ], - checks => [ @req_trans_desc, @transfer_qty ], + checks => [ 'kivi.validate_form' ], disabled => $::form->{delivered} ? t8('This record has already been delivered.') : undef, only_if => $is_customer && $::instance_conf->get_transfer_default, ], action => [ t8('Transfer in'), - submit => [ '#form', { action => "transfer_in"> 1 } ], - checks => [ @req_trans_desc, @transfer_qty ], + submit => [ '#form', { action => "transfer_in" } ], + checks => [ 'kivi.validate_form', @transfer_qty ], disabled => $::form->{delivered} ? t8('This record has already been delivered.') : undef, only_if => !$is_customer, ], action => [ t8('Transfer in via default'), submit => [ '#form', { action => "transfer_in_default" } ], - checks => [ @req_trans_desc, @transfer_qty ], + checks => [ 'kivi.validate_form' ], disabled => $::form->{delivered} ? t8('This record has already been delivered.') : undef, only_if => !$is_customer && $::instance_conf->get_transfer_default, ], @@ -330,12 +331,12 @@ sub setup_do_action_bar { action => [ t8('Print'), call => [ 'kivi.SalesPurchase.show_print_dialog' ], - checks => [ @req_trans_desc ], + checks => [ 'kivi.validate_form' ], ], action => [ t8('E Mail'), call => [ 'kivi.SalesPurchase.show_email_dialog' ], - checks => [ @req_trans_desc ], + checks => [ 'kivi.validate_form' ], ], ], # end of combobox "Export" @@ -354,6 +355,7 @@ sub setup_do_action_bar { ], # end if combobox "more" ); } + $::request->layout->add_javascripts('kivi.Validator.js'); } sub setup_do_search_action_bar { @@ -365,9 +367,11 @@ sub setup_do_search_action_bar { t8('Search'), submit => [ '#form' ], accesskey => 'enter', + checks => [ 'kivi.validate_form' ], ], ); } + $::request->layout->add_javascripts('kivi.Validator.js'); } sub setup_do_orders_action_bar { @@ -401,14 +405,18 @@ sub form_header { my $class = "SL::DB::" . ($form->{vc} eq 'customer' ? 'Customer' : 'Vendor'); $form->{VC_OBJ} = $class->load_cached($form->{ $form->{vc} . '_id' }); - $form->{employee_id} = $form->{old_employee_id} if $form->{old_employee_id}; - $form->{salesman_id} = $form->{old_salesman_id} if $form->{old_salesman_id}; + $form->{CONTACT_OBJ} = $form->{cp_id} ? SL::DB::Contact->load_cached($form->{cp_id}) : undef; + my $current_employee = SL::DB::Manager::Employee->current; + $form->{employee_id} = $form->{old_employee_id} if $form->{old_employee_id}; + $form->{salesman_id} = $form->{old_salesman_id} if $form->{old_salesman_id}; + $form->{employee_id} ||= $current_employee->id; + $form->{salesman_id} ||= $current_employee->id; my $vc = $form->{vc} eq "customer" ? "customers" : "vendors"; $form->get_lists("price_factors" => "ALL_PRICE_FACTORS", "business_types" => "ALL_BUSINESS_TYPES", ); - $form->{ALL_DEPARTMENTS} = SL::DB::Manager::Department->get_all; + $form->{ALL_DEPARTMENTS} = SL::DB::Manager::Department->get_all_sorted; # Projects my @old_project_ids = uniq grep { $_ } map { $_ * 1 } ($form->{"globalproject_id"}, map { $form->{"project_id_$_"} } 1..$form->{"rowcount"}); @@ -454,9 +462,9 @@ sub form_header { $::request->{layout}->add_javascripts_inline("\$(function(){$dispatch_to_popup});"); - $form->{follow_up_trans_info} = $form->{donumber} .'('. $form->{VC_OBJ}->name .')'; + $form->{follow_up_trans_info} = $form->{donumber} .'('. $form->{VC_OBJ}->name .')' if $form->{VC_OBJ}; - $::request->{layout}->use_javascript(map { "${_}.js" } qw(kivi.File kivi.MassDeliveryOrderPrint kivi.SalesPurchase kivi.Part ckeditor/ckeditor ckeditor/adapters/jquery kivi.io autocomplete_customer)); + $::request->{layout}->use_javascript(map { "${_}.js" } qw(kivi.File kivi.MassDeliveryOrderPrint kivi.SalesPurchase kivi.Part kivi.CustomerVendor kivi.Validator ckeditor/ckeditor ckeditor/adapters/jquery kivi.io)); my @custom_hidden; push @custom_hidden, map { "shiptocvar_" . $_->name } @{ SL::DB::Manager::CustomVariableConfig->get_all(where => [ module => 'ShipTo' ]) }; @@ -643,7 +651,7 @@ sub search { "all" => 1 }, "business_types" => "ALL_BUSINESS_TYPES"); $form->{ALL_EMPLOYEES} = SL::DB::Manager::Employee->get_all_sorted(query => [ deleted => 0 ]); - $form->{ALL_DEPARTMENTS} = SL::DB::Manager::Department->get_all; + $form->{ALL_DEPARTMENTS} = SL::DB::Manager::Department->get_all_sorted; $form->{title} = $locale->text('Delivery Orders'); setup_do_search_action_bar(); @@ -965,7 +973,9 @@ sub invoice { $main::auth->assert($form->{type} eq 'purchase_delivery_order' ? 'vendor_invoice_edit' : 'invoice_edit'); $form->{convert_from_do_ids} = $form->{id}; - $form->{deliverydate} = $form->{transdate}; + # if we have a reqdate (Liefertermin), this is definetely the preferred + # deliverydate for invoices + $form->{deliverydate} = $form->{reqdate} || $form->{transdate}; $form->{transdate} = $form->{invdate} = $form->current_date(\%myconfig); $form->{duedate} = $form->current_date(\%myconfig, $form->{invdate}, $form->{terms} * 1); $form->{defaultcurrency} = $form->get_default_currency(\%myconfig); @@ -1802,7 +1812,7 @@ sub transfer_in_out_default { # ... and do not create a hash entry in %qty_parts below (will skip check for bins for the transfer == out case) # ... and push only a empty (undef) element to @all_requests (will skip check for bin_id and warehouse_id and will not alter the row) - $qty = 0 if (!$::instance_conf->get_transfer_default_services && !defined($part_info_map{$form->{"id_$i"}}->{inventory_accno_id}) && !$part_info_map{$form->{"id_$i"}}->{assembly}); + $qty = 0 if (!$::instance_conf->get_transfer_default_services && $part_info_map{$form->{"id_$i"}}->{part_type} eq 'service'); $qty_parts{$form->{"id_$i"}} += $qty; if ($qty == 0) { delete $qty_parts{$form->{"id_$i"}} unless $qty_parts{$form->{"id_$i"}};