Revision 7854aaaa
Von Bernd Bleßmann vor mehr als 2 Jahren hinzugefügt
SL/Controller/Order.pm | ||
---|---|---|
604 | 604 |
|
605 | 605 |
$self->save_history('MAILED'); |
606 | 606 |
|
607 |
# self is generated on the fly. form is a file from the dms |
|
608 |
# TODO: for the case Filesystem and Webdav we want the real file from the filesystem |
|
609 |
# for the nyi case DMS/CMIS we need a gloid or whatever the system offers (elo_id for ELO) |
|
610 |
# DMS kivi version should have a record_link to email_journal |
|
611 |
# the record link has to refer to the correct version -> helper table file <-> file_version |
|
612 |
my $file_id = $self->{file_id} || $::form->{file_id}; |
|
613 |
die "No file id" unless $file_id; |
|
614 |
|
|
615 | 607 |
if ($::instance_conf->get_lock_oe_subversions) { |
608 |
my $file_id; |
|
609 |
if ($::instance_conf->get_doc_storage && $::form->{attachment_policy} ne 'no_file') { |
|
610 |
# self is generated on the fly. form is a file from the dms |
|
611 |
# TODO: for the case Filesystem and Webdav we want the real file from the filesystem |
|
612 |
# for the nyi case DMS/CMIS we need a gloid or whatever the system offers (elo_id for ELO) |
|
613 |
# DMS kivi version should have a record_link to email_journal |
|
614 |
# the record link has to refer to the correct version -> helper table file <-> file_version |
|
615 |
$file_id = $self->{file_id} || $::form->{file_id}; |
|
616 |
die "No file id" unless $file_id; |
|
617 |
} |
|
618 |
|
|
616 | 619 |
# email is sent -> set this version to final and link to journal and file |
617 | 620 |
my $current_version = SL::DB::Manager::OrderVersion->get_all(where => [oe_id => $self->order->id, final_version => 0]); |
618 | 621 |
die "Invalid version state" unless scalar @{ $current_version } == 1; |
Auch abrufbar als: Unified diff
Unterversionen: Prüfung auf DMS-File angepasst: …
Nur prüfen, wenn Versionierung an, DMS an und Beleg mit verschickt wird.