X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/044c37079706d192669ed062e464a55d0ecb38f0..726a9fae9fe3bd0f3d66c351f6c91146a685bcd1:/SL/Form.pm?ds=sidebyside diff --git a/SL/Form.pm b/SL/Form.pm index 9c05c3353..6a7f285f9 100644 --- a/SL/Form.pm +++ b/SL/Form.pm @@ -1089,6 +1089,7 @@ sub get_formname_translation { credit_note => $main::locale->text('Credit Note'), invoice => $main::locale->text('Invoice'), invoice_copy => $main::locale->text('Invoice Copy'), + invoice_for_advance_payment => $main::locale->text('Invoice for Advance Payment'), pick_list => $main::locale->text('Pick List'), proforma => $main::locale->text('Proforma Invoice'), purchase_order => $main::locale->text('Purchase Order'), @@ -1131,7 +1132,7 @@ sub get_number_prefix_for_type { my ($self) = @_; my $prefix = - (first { $self->{type} eq $_ } qw(invoice credit_note)) ? 'inv' + (first { $self->{type} eq $_ } qw(invoice invoice_for_advance_payment credit_note)) ? 'inv' : ($self->{type} =~ /_quotation$/) ? 'quo' : ($self->{type} =~ /_delivery_order$/) ? 'do' : ($self->{type} =~ /letter/) ? 'letter' @@ -1170,7 +1171,7 @@ sub generate_attachment_filename { my $attachment_filename = $main::locale->unquote_special_chars('HTML', $self->get_formname_translation()); my $prefix = $self->get_number_prefix_for_type(); - if ($self->{preview} && (first { $self->{type} eq $_ } qw(invoice credit_note))) { + if ($self->{preview} && (first { $self->{type} eq $_ } qw(invoice invoice_for_advance_payment credit_note))) { $attachment_filename .= ' (' . $recipient_locale->text('Preview') . ')' . $self->get_extension_for_format(); } elsif ($attachment_filename && $self->{"${prefix}number"}) { @@ -2944,6 +2945,7 @@ sub save_status { # $main::locale->text('UNDO TRANSFER') # $main::locale->text('UNIMPORT') # $main::locale->text('invoice') +# $main::locale->text('invoice_for_advance_payment') # $main::locale->text('proforma') # $main::locale->text('sales_order') # $main::locale->text('pick_list')