X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fis.pl;h=c2e696854bf0ddf18458917912c1c5f1eab02a26;hb=a3a6d136cbd97bd18b5943937b80b1b1b504ef3b;hp=5ac59b27e74b3256af2536d0ac94d7cd41171c93;hpb=7ca30d76589b74e1b84c1a182550e33ebf618372;p=kivitendo-erp.git diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl index 5ac59b27e..c2e696854 100644 --- a/bin/mozilla/is.pl +++ b/bin/mozilla/is.pl @@ -252,6 +252,117 @@ sub prepare_invoice { $main::lxdebug->leave_sub(); } +sub setup_is_action_bar { + my $form = $::form; + my $change_never = $::instance_conf->get_is_changeable == 0; + my $change_on_same_day_only = $::instance_conf->get_is_changeable == 2 && ($form->current_date(\%::myconfig) ne $form->{gldate}); + my @req_trans_desc = qw(kivi.SalesPurchase.check_transaction_description) x!!$::instance_conf->get_require_transaction_description_ps; + + for my $bar ($::request->layout->get('actionbar')) { + $bar->add_actions([ t8('Update'), + submit => [ '#form', { action_update => 1 } ], + disabled => $form->{locked} ? t8('The billing period has already been locked.') : undef, + id => 'update_button', + accesskey => 'enter', + ]); + + $bar->add_actions("combobox"); + $bar->actions->[-1]->add_actions([ t8('Post'), + submit => [ '#form', { action_post => 1 } ], + checks => [ @req_trans_desc ], + disabled => $form->{locked} ? t8('The billing period has already been locked.') + : $form->{storno} ? t8('A canceled invoice cannot be posted.') + : ($form->{id} && $change_never) ? t8('Changing invoices has been disabled in the configuration.') + : ($form->{id} && $change_on_same_day_only) ? t8('Invoices can only be changed on the day they are posted.') + : undef, + ]); + $bar->actions->[-1]->add_actions([ t8('Post Payment'), + submit => [ '#form', { action_post_payment => 1 } ], + checks => [ @req_trans_desc ], + disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef, + ]); + $bar->actions->[-1]->add_actions([ t8('mark as paid'), + submit => [ '#form', { action_mark_as_paid => 1 } ], + confirm => t8('This will remove the invoice from showing as unpaid even if the unpaid amount does not match the amount. Proceed?'), + disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef, + ]) if $::instance_conf->get_is_show_mark_as_paid; + + + $bar->add_actions("combobox"); + $bar->actions->[-1]->add_actions([ t8('Storno'), + submit => [ '#form', { action_storno => 1 } ], + confirm => t8('Do you really want to cancel this invoice?'), + checks => [ @req_trans_desc ], + disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef, + ]); + $bar->actions->[-1]->add_actions([ t8('Delete'), + submit => [ '#form', { action_delete => 1 } ], + confirm => t8('Do you really want to delete this object?'), + checks => [ @req_trans_desc ], + disabled => !$form->{id} ? t8('This invoice has not been posted yet.') + : $form->{locked} ? t8('The billing period has already been locked.') + : $change_never ? t8('Changing invoices has been disabled in the configuration.') + : $change_on_same_day_only ? t8('Invoices can only be changed on the day they are posted.') + : undef, + ]); + + $bar->add_actions('separator'); + + $bar->add_actions('combobox'); + $bar->actions->[-1]->add_actions([ t8('Workflow'), + disabled => 1, + ]); + $bar->actions->[-1]->add_actions([ t8('Use As New'), + submit => [ '#form', { action_use_as_new => 1 } ], + disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef, + ]); + $bar->actions->[-1]->add_actions([ t8('Credit Note'), + submit => [ '#form', { action_credit_note => 1 } ], + checks => [ @req_trans_desc ], + disabled => $form->{type} eq "credit_note" ? t8('Credit notes cannot be converted into other credit notes.') + : !$form->{id} ? t8('This invoice has not been posted yet.') + : undef, + ]); + $bar->actions->[-1]->add_actions([ t8('Sales Order'), + submit => [ '#form', { action_sales_order => 1 } ], + disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef, + ]); + + $bar->add_actions('combobox'); + $bar->actions->[-1]->add_actions([ t8('Export'), + disabled => 1, + ]); + $bar->actions->[-1]->add_actions([ ($form->{id} ? t8('Print') : t8('Preview')), + submit => [ '#form', { action_print => 1 } ], + checks => [ @req_trans_desc ], + disabled => !$form->{id} && $form->{locked} ? t8('The billing period has already been locked.') : undef, + ]); + $bar->actions->[-1]->add_actions([ t8('E Mail'), + submit => [ '#form', { action_print => 1 } ], + checks => [ @req_trans_desc ], + disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef, + ]); + $bar->add_actions('combobox'); + $bar->actions->[-1]->add_actions([ t8('more'), + disabled => 1, + ]); + $bar->actions->[-1]->add_actions([ t8('History'), + call => [ 'set_history_window', $form->{id} * 1, 'id' ], + disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef, + ]); + $bar->actions->[-1]->add_actions([ t8('Follow-Up'), + call => [ 'follow_up_window' ], + disabled => !$form->{id} ? t8('This invoice has not been posted yet.') : undef, + ]); + $bar->actions->[-1]->add_actions([ t8('Drafts'), + call => [ 'kivi.Draft.popup', 'is', 'invoice', $form->{draft_id}, $form->{draft_description} ], + disabled => $form->{id} ? t8('This invoice has already been posted.') + : $form->{locked} ? t8('The billing period has already been locked.') + : undef, + ]); + } +} + sub form_header { $main::lxdebug->enter_sub(); @@ -354,11 +465,13 @@ sub form_header { ), @custom_hiddens, map { $_.'_rate', $_.'_description', $_.'_taxnumber' } split / /, $form->{taxaccounts}]; - $::request->{layout}->use_javascript(map { "${_}.js" } qw(kivi.Draft kivi.SalesPurchase ckeditor/ckeditor ckeditor/adapters/jquery kivi.io autocomplete_customer autocomplete_part client_js)); + $::request->{layout}->use_javascript(map { "${_}.js" } qw(kivi.Draft kivi.File kivi.SalesPurchase kivi.Part ckeditor/ckeditor ckeditor/adapters/jquery kivi.io autocomplete_customer client_js)); $TMPL_VAR{payment_terms_obj} = get_payment_terms_for_invoice(); $form->{duedate} = $TMPL_VAR{payment_terms_obj}->calc_date(reference_date => $form->{invdate}, due_date => $form->{duedate})->to_kivitendo if $TMPL_VAR{payment_terms_obj}; + setup_is_action_bar(); + $form->header(); print $form->parse_html_template("is/form_header", \%TMPL_VAR); @@ -793,7 +906,7 @@ sub post { relink_accounts(); my $terms = get_payment_terms_for_invoice(); - $form->{duedate} = $terms->calc_date(reference_date => $form->{invdate}, due_date => $form->{due_due})->to_kivitendo if $terms; + $form->{duedate} = $terms->calc_date(reference_date => $form->{invdate}, due_date => $form->{duedate})->to_kivitendo if $terms; # If transfer_out is requested, get rose db handle and do post and # transfer out in one transaction. Otherwise just post the invoice.