Revision dec0e491
Von Tamino Steinert vor 12 Monaten hinzugefügt
| SL/Helper/EmailProcessing.pm | ||
|---|---|---|
| 53 | 53 |
|
| 54 | 54 |
my $purchase_invoice; |
| 55 | 55 |
eval {
|
| 56 |
$purchase_invoice = SL::DB::PurchaseInvoice->create_from_zugferd_xml(\%res)->save();
|
|
| 56 |
$purchase_invoice = SL::DB::PurchaseInvoice->create_from_zugferd_data(\%res)->save();
|
|
| 57 | 57 |
1; |
| 58 | 58 |
} or do {
|
| 59 | 59 |
my $error = $@; |
| 60 |
$email_journal->extended_status( |
|
| 61 |
join "\n", $email_journal->extended_status, |
|
| 62 |
"Error processing ZUGFeRD attachment $name: $error" |
|
| 63 |
)->save; |
|
| 60 |
$email_journal->update_attributes( |
|
| 61 |
extended_status => |
|
| 62 |
join "\n", $email_journal->extended_status, |
|
| 63 |
"Error processing ZUGFeRD attachment $name: $error" |
|
| 64 |
); |
|
| 64 | 65 |
return 0; |
| 65 | 66 |
}; |
| 66 | 67 |
|
Auch abrufbar als: Unified diff
FIX: S:H:EmailProcessing: automatischer ZUGFeRD-Import