Revision b827f193
Von Tamino Steinert vor mehr als 1 Jahr hinzugefügt
| SL/Controller/Order.pm | ||
|---|---|---|
|
use SL::DB::RecordLink;
|
||
|
use SL::DB::Shipto;
|
||
|
use SL::DB::Translation;
|
||
|
use SL::DB::EmailJournal;
|
||
|
use SL::DB::EmailJournalAttachment;
|
||
|
use SL::DB::ValidityToken;
|
||
|
use SL::DB::Helper::RecordLink qw(set_record_link_conversions RECORD_ID RECORD_TYPE_REF RECORD_ITEM_ID RECORD_ITEM_TYPE_REF);
|
||
|
use SL::DB::Helper::TypeDataProxy;
|
||
| ... | ... | |
|
$self->action_edit();
|
||
|
}
|
||
|
|
||
|
sub action_add_from_email_journal {
|
||
|
my ($self) = @_;
|
||
|
my $email_journal_id = $::form->{from_id};
|
||
|
my $email_attachment_id = $::form->{email_attachment_id};
|
||
|
|
||
|
$self->order->{RECORD_ID()} = $email_journal_id;
|
||
|
$self->order->{RECORD_TYPE_REF()} = 'SL::DB::EmailJournal';
|
||
|
$self->{email_attachment_id} = $email_attachment_id;
|
||
|
|
||
|
$self->action_add();
|
||
|
}
|
||
|
|
||
|
# edit an existing order
|
||
|
sub action_edit {
|
||
|
my ($self) = @_;
|
||
| ... | ... | |
|
set_project_in_linked_requirement_specs => 1,
|
||
|
);
|
||
|
|
||
|
if ($::form->{email_attachment_id}) {
|
||
|
my $attachment = SL::DB::EmailJournalAttachment->new(id => $::form->{email_attachment_id})->load;
|
||
|
$attachment->add_file_to_record($self->order);
|
||
|
}
|
||
|
|
||
|
if ($is_new && $self->order->is_sales) {
|
||
|
my $imap_client = SL::IMAPClient->new();
|
||
|
if ($imap_client) {
|
||
Auch abrufbar als: Unified diff
Workflow: E-Mail → Angebot/Auftrag