X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fdo.pl;h=5d86682c6876c7632b6da4eb22c1f19e70207ae3;hb=0a3d4b1595fad7895702b947272ce52381ff3589;hp=000fc6eeed9513cda4f3cb126e41ffa99dcf1b19;hpb=307f0b13b5d0b1068cb7eacad1601f4786b28353;p=kivitendo-erp.git diff --git a/bin/mozilla/do.pl b/bin/mozilla/do.pl index 000fc6eee..5d86682c6 100644 --- a/bin/mozilla/do.pl +++ b/bin/mozilla/do.pl @@ -239,31 +239,33 @@ sub prepare_order { sub setup_do_action_bar { my @transfer_qty = qw(kivi.SalesPurchase.delivery_order_check_transfer_qty); my @req_trans_desc = qw(kivi.SalesPurchase.check_transaction_description) x!!$::instance_conf->get_require_transaction_description_ps; + my $is_customer = $::form->{vc} eq 'customer'; for my $bar ($::request->layout->get('actionbar')) { $bar->add( action => [ t8('Update'), - submit => [ '#form', { action_update => 1 } ], + submit => [ '#form', { action => "update" } ], + id => 'update_button', accesskey => 'enter', ], combobox => [ action => [ t8('Save'), - submit => [ '#form', { action_save => 1 } ], + submit => [ '#form', { action => "save" } ], checks => [ @req_trans_desc ], disabled => $::form->{delivered} ? t8('This record has already been delivered.') : undef, ], action => [ t8('Save as new'), - submit => [ '#form', { action_save_as_new => 1 } ], + submit => [ '#form', { action => "save_as_new" } ], checks => [ @req_trans_desc ], disabled => !$::form->{id}, ], action => [ t8('Mark as closed'), - submit => [ '#form', { action_mark_closed => 1 } ], + submit => [ '#form', { action => "mark_closed" } ], checks => [ @req_trans_desc ], 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.') @@ -274,7 +276,7 @@ sub setup_do_action_bar { action => [ t8('Delete'), - submit => [ '#form', { action_delete => 1 } ], + submit => [ '#form', { action => "delete" } ], confirm => t8('Do you really want to delete this object?'), disabled => !$::form->{id} ? t8('This record has not been saved yet.') : $::form->{delivered} ? t8('This record has already been delivered.') @@ -284,30 +286,34 @@ sub setup_do_action_bar { ], combobox => [ - (action => [ + action => [ t8('Transfer out'), - submit => [ '#form', { action_transfer_out => 1 } ], + submit => [ '#form', { action => "transfer_out" } ], checks => [ @req_trans_desc, @transfer_qty ], disabled => $::form->{delivered} ? t8('This record has already been delivered.') : undef, - ]) x ($::form->{vc} eq 'customer'), - (action => [ + only_if => $is_customer, + ], + action => [ t8('Transfer out via default'), - submit => [ '#form', { action_transfer_out_default => 1 } ], + submit => [ '#form', { action => "transfer_out_default" } ], checks => [ @req_trans_desc, @transfer_qty ], disabled => $::form->{delivered} ? t8('This record has already been delivered.') : undef, - ]) x ($::form->{vc} eq 'customer' && $::instance_conf->get_transfer_default), - (action => [ + only_if => $is_customer && $::instance_conf->get_transfer_default, + ], + action => [ t8('Transfer in'), - submit => [ '#form', { action_transfer_in => 1 } ], + submit => [ '#form', { action => "transfer_in" } ], checks => [ @req_trans_desc, @transfer_qty ], disabled => $::form->{delivered} ? t8('This record has already been delivered.') : undef, - ]) x ($::form->{vc} eq 'vendor'), - (action => [ + only_if => !$is_customer, + ], + action => [ t8('Transfer in via default'), - submit => [ '#form', { action_transfer_in_default => 1 } ], + submit => [ '#form', { action => "transfer_in_default" } ], checks => [ @req_trans_desc, @transfer_qty ], disabled => $::form->{delivered} ? t8('This record has already been delivered.') : undef, - ]) x ($::form->{vc} eq 'vendor' && $::instance_conf->get_transfer_default), + only_if => !$is_customer && $::instance_conf->get_transfer_default, + ], ], # end of combobox "Transfer out" @@ -315,7 +321,7 @@ sub setup_do_action_bar { action => [ t8('Invoice'), - submit => [ '#form', { action_invoice => 1 } ], + submit => [ '#form', { action => "invoice" } ], disabled => !$::form->{id} ? t8('This record has not been saved yet.') : undef, ], @@ -323,7 +329,7 @@ sub setup_do_action_bar { action => [ t8('Export') ], action => [ t8('Print'), - submit => [ '#form', { action_print => 1 } ], + call => [ 'kivi.SalesPurchase.show_print_dialog' ], checks => [ @req_trans_desc ], ], action => [ @@ -371,10 +377,15 @@ sub setup_do_orders_action_bar { $bar->add( action => [ t8('New invoice'), - submit => [ '#orders_form' ], - checks => [ 'kivi.DeliveryOrder.multi_invoice_check_delivery_orders_selected' ], + submit => [ '#form', { action => 'invoice_multi' } ], + checks => [ [ 'kivi.check_if_entries_selected', '#form tbody input[type=checkbox]' ] ], accesskey => 'enter', ], + action => [ + t8('Print'), + call => [ 'kivi.SalesPurchase.show_print_dialog', 'js:kivi.MassDeliveryOrderPrint.submitMultiOrders' ], + checks => [ [ 'kivi.check_if_entries_selected', '#form tbody input[type=checkbox]' ] ], + ], ); } } @@ -390,8 +401,12 @@ 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", @@ -654,7 +669,7 @@ sub orders { my $locale = $main::locale; my $cgi = $::request->{cgi}; - $::request->{layout}->use_javascript(map { "${_}.js" } qw(kivi.MassDeliveryOrderPrint)); + $::request->{layout}->use_javascript(map { "${_}.js" } qw(kivi.MassDeliveryOrderPrint kivi.SalesPurchase)); ($form->{ $form->{vc} }, $form->{"$form->{vc}_id"}) = split(/--/, $form->{ $form->{vc} }); report_generator_set_default_sort('transdate', 1); @@ -796,9 +811,17 @@ sub orders { $form->{printer_id} = $pr->id; } + my $print_options = SL::Helper::PrintOptions->get_print_options( + options => { + hide_language_id => 1, + show_bothsided => 1, + show_headers => 1, + }, + ); + $report->set_options('top_info_text' => join("\n", @options), 'raw_top_info_text' => $form->parse_html_template('do/orders_top'), - 'raw_bottom_info_text' => $form->parse_html_template('do/orders_bottom', { print_options => print_options(inline => 1,hide_language_id => 1) }), + 'raw_bottom_info_text' => $form->parse_html_template('do/orders_bottom', { print_options => $print_options }), 'output_format' => 'HTML', 'title' => $form->{title}, 'attachment_basename' => $attachment_basename . strftime('_%Y%m%d', localtime time), @@ -838,11 +861,9 @@ sub orders { $idx++; } - $::request->layout->add_javascripts('kivi.DeliveryOrder.js'); - setup_do_orders_action_bar(); - $report->generate_with_headers(action_bar => 1); + $report->generate_with_headers(); $main::lxdebug->leave_sub(); } @@ -1177,26 +1198,6 @@ sub save_as_new { $main::lxdebug->leave_sub(); } -sub e_mail { - $main::lxdebug->enter_sub(); - - check_do_access(); - - $::form->mtime_ischanged('delivery_orders','mail'); - - $::form->{print_and_save} = 1; - - my $saved_form = save_form(); - - save(); - - restore_form($saved_form, 0, qw(id ordnumber quonumber)); - - edit_e_mail(); - - $main::lxdebug->leave_sub(); -} - sub calculate_stock_in_out { $main::lxdebug->enter_sub(); @@ -1736,7 +1737,7 @@ sub dispatcher { my $form = $main::form; my $locale = $main::locale; - foreach my $action (qw(update print e_mail save transfer_out transfer_out_default sort + foreach my $action (qw(update print save transfer_out transfer_out_default sort transfer_in transfer_in_default mark_closed save_as_new invoice delete)) { if ($form->{"action_${action}"}) { call_sub($action);