X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=bin%2Fmozilla%2Fgl.pl;h=0d39d47ea65e403c3b1818cec19839d95659c82e;hb=a40c356e3f574dbd0400aa3477d9da45ca1b1fdf;hp=bf3e436117cd9003563ccaea6291a2cddfc09ffb;hpb=8d183681663edcecdc49b9389b3869559b9b180d;p=kivitendo-erp.git diff --git a/bin/mozilla/gl.pl b/bin/mozilla/gl.pl index bf3e43611..0d39d47ea 100644 --- a/bin/mozilla/gl.pl +++ b/bin/mozilla/gl.pl @@ -975,6 +975,32 @@ sub setup_gl_action_bar { $is_linked_bank_transaction = 1; } + my $create_post_action = sub { + # $_[0]: description + # $_[1]: after_action + action => [ + $_[0], + submit => [ '#form', { action => 'post', after_action => $_[1] } ], + disabled => $form->{locked} ? t8('The billing period has already been locked.') + : $form->{storno} ? t8('A canceled general ledger transaction cannot be posted.') + : ($form->{id} && $change_never) ? t8('Changing general ledger transaction has been disabled in the configuration.') + : ($form->{id} && $change_on_same_day_only) ? t8('General ledger transactions can only be changed on the day they are posted.') + : $is_linked_bank_transaction ? t8('This transaction is linked with a bank transaction. Please undo and redo the bank transaction booking if needed.') + : undef, + ], + }; + + my %post_entry; + if ($::instance_conf->get_gl_add_doc && $::instance_conf->get_doc_storage) { + %post_entry = (combobox => [ $create_post_action->(t8('Post'), 'doc-tab'), + $create_post_action->(t8('Post and new booking')) ]); + } elsif ($::instance_conf->get_doc_storage) { + %post_entry = (combobox => [ $create_post_action->(t8('Post')), + $create_post_action->(t8('Post and upload document'), 'doc-tab') ]); + } else { + %post_entry = $create_post_action->(t8('Post')); + } + for my $bar ($::request->layout->get('actionbar')) { $bar->add( action => [ @@ -983,16 +1009,7 @@ sub setup_gl_action_bar { id => 'update_button', accesskey => 'enter', ], - action => [ - t8('Post'), - submit => [ '#form', { action => 'post' } ], - disabled => $form->{locked} ? t8('The billing period has already been locked.') - : $form->{storno} ? t8('A canceled general ledger transaction cannot be posted.') - : ($form->{id} && $change_never) ? t8('Changing general ledger transaction has been disabled in the configuration.') - : ($form->{id} && $change_on_same_day_only) ? t8('General ledger transactions can only be changed on the day they are posted.') - : $is_linked_bank_transaction ? t8('This transaction is linked with a bank transaction. Please undo and redo the bank transaction booking if needed.') - : undef, - ], + %post_entry, combobox => [ action => [ t8('Storno'), submit => [ '#form', { action => 'storno' } ], @@ -1019,7 +1036,7 @@ sub setup_gl_action_bar { action => [ t8('more') ], action => [ t8('History'), - call => [ 'set_history_window', $form->{id} * 1, 'id' ], + call => [ 'set_history_window', $form->{id} * 1, 'glid' ], disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef, ], action => [ @@ -1095,7 +1112,7 @@ sub form_header { my ($init) = @_; - $::request->layout->add_javascripts("autocomplete_chart.js", "autocomplete_project.js", "kivi.File.js", "kivi.GL.js", "kivi.RecordTemplate.js", "kivi.Validator.js"); + $::request->layout->add_javascripts("autocomplete_chart.js", "autocomplete_project.js", "kivi.File.js", "kivi.GL.js", "kivi.RecordTemplate.js", "kivi.Validator.js", "show_history.js"); my @old_project_ids = grep { $_ } map{ $::form->{"project_id_$_"} } 1..$::form->{rowcount}; my @conditions = @old_project_ids ? (id => \@old_project_ids) : (); @@ -1427,7 +1444,7 @@ sub post { if ($form->{callback} =~ /BankTransaction/ && $form->{bt_id}) { $form->redirect($msg); - } elsif ($::instance_conf->get_gl_add_doc && $::instance_conf->get_doc_storage) { + } elsif ('doc-tab' eq $form->{after_action}) { # Redirect with callback containing a fragment does not work (by now) # because the callback info is stored in the session an parsing the # callback parameters does not support fragments (see SL::Form::redirect).