Revision a3a6d136
Von Moritz Bunkus vor mehr als 8 Jahren hinzugefügt
bin/mozilla/ir.pl | ||
---|---|---|
$main::lxdebug->leave_sub();
|
||
}
|
||
|
||
sub setup_ir_action_bar {
|
||
my $form = $::form;
|
||
my $change_never = $::instance_conf->get_ir_changeable == 0;
|
||
my $change_on_same_day_only = $::instance_conf->get_ir_changeable == 2 && ($form->current_date(\%::myconfig) ne $form->{gldate});
|
||
|
||
for my $bar ($::request->layout->get('actionbar')) {
|
||
$bar->add_actions([ t8('Update'),
|
||
submit => [ '#form', { action_update => 1 } ],
|
||
id => 'update_button',
|
||
accesskey => 'enter',
|
||
]);
|
||
|
||
$bar->add_actions("combobox");
|
||
$bar->actions->[-1]->add_actions([ t8('Post'),
|
||
submit => [ '#form', { action_post => 1 } ],
|
||
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 } ],
|
||
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_ir_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?'),
|
||
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?'),
|
||
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('more'),
|
||
disabled => 1,
|
||
]);
|
||
$bar->actions->[-1]->add_actions([ t8('History'),
|
||
call => [ 'set_history_window', $::form->{id} * 1, 'id', 'glid' ],
|
||
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', 'ir', '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();
|
||
|
||
... | ... | |
|
||
$::request->{layout}->use_javascript(map { "${_}.js" } qw(kivi.Draft kivi.File kivi.SalesPurchase kivi.Part ckeditor/ckeditor ckeditor/adapters/jquery kivi.io autocomplete_customer autocomplete_project client_js));
|
||
|
||
my $change_never = $::instance_conf->get_ir_changeable == 0;
|
||
my $change_on_same_day_only = $::instance_conf->get_ir_changeable == 2 && ($form->current_date(\%myconfig) ne $form->{gldate});
|
||
|
||
for my $bar ($::request->layout->get('actionbar')) {
|
||
$bar->add_actions([ t8('Update'),
|
||
submit => [ '#form', { action_update => 1 } ],
|
||
id => 'update_button',
|
||
accesskey => '13',
|
||
]);
|
||
$bar->add_actions("combobox");
|
||
$bar->actions->[-1]->add_actions([ t8('Post'),
|
||
submit => [ '#form', { action_post => 1 } ],
|
||
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 } ],
|
||
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_ir_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?'),
|
||
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?'),
|
||
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('more'),
|
||
disabled => 1,
|
||
]);
|
||
$bar->actions->[-1]->add_actions([ t8('History'),
|
||
call => [ 'set_history_window', $::form->{id} * 1, 'id', 'glid' ],
|
||
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', 'ir', '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,
|
||
]);
|
||
}
|
||
setup_ir_action_bar();
|
||
|
||
$form->header();
|
||
|
Auch abrufbar als: Unified diff
ActionBar: Setup in ir.pl in eigene Funktion ausgelagert