Revision 2a4583f3
Von Jan Büren vor mehr als 3 Jahren hinzugefügt
| bin/mozilla/is.pl | ||
|---|---|---|
| 411 | 411 |
action => [ t8('E Mail'),
|
| 412 | 412 |
call => [ 'kivi.SalesPurchase.show_email_dialog' ], |
| 413 | 413 |
checks => [ 'kivi.validate_form' ], |
| 414 |
disabled => !$may_edit_create ? t8('You must not print this invoice.')
|
|
| 415 |
: !$form->{id} ? t8('This invoice has not been posted yet.')
|
|
| 414 |
disabled => !$may_edit_create ? t8('You must not print this invoice.')
|
|
| 415 |
: !$form->{id} ? t8('This invoice has not been posted yet.')
|
|
| 416 |
: $form->{postal_invoice} ? t8('This customer wants a postal invoices.')
|
|
| 416 | 417 |
: undef, |
| 417 | 418 |
], |
| 418 | 419 |
], # end of combobox "Export" |
| ... | ... | |
| 459 | 460 |
$TMPL_VAR{customer_obj} = SL::DB::Customer->load_cached($form->{customer_id}) if $form->{customer_id};
|
| 460 | 461 |
$TMPL_VAR{invoice_obj} = SL::DB::Invoice->load_cached($form->{id}) if $form->{id};
|
| 461 | 462 |
|
| 463 |
# only print, no mail |
|
| 464 |
$form->{postal_invoice} = $TMPL_VAR{customer_obj}->postal_invoice if ref $TMPL_VAR{customer_obj} eq 'SL::DB::Customer';
|
|
| 465 |
|
|
| 462 | 466 |
my $current_employee = SL::DB::Manager::Employee->current; |
| 463 | 467 |
$form->{employee_id} = $form->{old_employee_id} if $form->{old_employee_id};
|
| 464 | 468 |
$form->{salesman_id} = $form->{old_salesman_id} if $form->{old_salesman_id};
|
Auch abrufbar als: Unified diff
Neues Kundenattribut Rechnungsversand per Post -> Deaktiviert E-Mail für Rechnung