Revision 07aa9777
Von Bernd Bleßmann vor mehr als 3 Jahren hinzugefügt
SL/Controller/File.pm | ||
---|---|---|
399 | 399 |
if ( $self->file_type eq 'document' ) { |
400 | 400 |
my @object_types; |
401 | 401 |
push @object_types, $self->object_type; |
402 |
push @object_types, qw(dunning dunning1 dunning2 dunning3) if $self->object_type eq 'invoice'; # hardcoded object types? |
|
402 |
push @object_types, qw(dunning dunning1 dunning2 dunning3 dunning_orig_invoice) if $self->object_type eq 'invoice'; # hardcoded object types?
|
|
403 | 403 |
@files = SL::File->get_all_versions(object_id => $self->object_id, |
404 | 404 |
object_type => \@object_types, |
405 | 405 |
file_type => $self->file_type, |
SL/DN.pm | ||
---|---|---|
1226 | 1226 |
if ($::instance_conf->get_doc_storage) { |
1227 | 1227 |
SL::File->save( |
1228 | 1228 |
object_id => $invoice_id, |
1229 |
object_type => 'dunning', |
|
1229 |
object_type => 'dunning_orig_invoice',
|
|
1230 | 1230 |
mime_type => 'application/pdf', |
1231 | 1231 |
source => 'created', |
1232 | 1232 |
file_type => 'document', |
bin/mozilla/dn.pl | ||
---|---|---|
456 | 456 |
push @files, SL::File->get_all_versions(object_id => $ref->{id}, |
457 | 457 |
object_type => 'dunning', |
458 | 458 |
file_type => 'document',); |
459 |
# object_type dunning_orig_invoice is the original dunned invoice. |
|
460 |
push @files, SL::File->get_all_versions(object_id => $ref->{id}, |
|
461 |
object_type => 'dunning_orig_invoice', |
|
462 |
file_type => 'document',); |
|
459 | 463 |
if (scalar @files) { |
460 | 464 |
my $html = join '<br>', map { SL::Presenter::FileObject::file_object($_) } @files; |
461 | 465 |
my $text = join "\n", map { $_->file_name } @files; |
sql/Pg-upgrade2/file_storage_type_dunning_orig_invoice.sql | ||
---|---|---|
1 |
-- @tag: file_storage_type_dunning_orig_invoice |
|
2 |
-- @description: original gemahnte Rechnung als valid_type für Filemanagement |
|
3 |
-- @depends: file_storage_type_letter |
|
4 |
|
|
5 |
ALTER TABLE files |
|
6 |
DROP CONSTRAINT valid_type; |
|
7 |
ALTER TABLE files |
|
8 |
ADD CONSTRAINT valid_type CHECK ( |
|
9 |
(object_type = 'credit_note' ) OR (object_type = 'invoice' ) OR (object_type = 'sales_order' ) |
|
10 |
OR (object_type = 'sales_quotation' ) OR (object_type = 'sales_delivery_order' ) OR (object_type = 'request_quotation' ) |
|
11 |
OR (object_type = 'purchase_order' ) OR (object_type = 'purchase_delivery_order' ) OR (object_type = 'purchase_invoice' ) |
|
12 |
OR (object_type = 'vendor' ) OR (object_type = 'customer' ) OR (object_type = 'part' ) |
|
13 |
OR (object_type = 'gl_transaction' ) OR (object_type = 'dunning' ) OR (object_type = 'dunning1' ) |
|
14 |
OR (object_type = 'dunning2' ) OR (object_type = 'dunning3' ) OR (object_type = 'dunning_orig_invoice' ) |
|
15 |
OR (object_type = 'draft' ) OR (object_type = 'statement' ) OR (object_type = 'shop_image' ) |
|
16 |
OR (object_type = 'letter' ) |
|
17 |
); |
Auch abrufbar als: Unified diff
Mahnungen: DMS: orig. Rechnung als eigenen Typ