Revision d453ab54
Von Tamino Steinert vor 10 Monaten hinzugefügt
| SL/DB/PurchaseInvoice.pm | ||
|---|---|---|
| 13 | 13 |
use SL::DB::Helper::LinkedRecords; |
| 14 | 14 |
use SL::DB::Helper::Payment qw(:ALL); |
| 15 | 15 |
use SL::DB::Helper::SalesPurchaseInvoice; |
| 16 |
use SL::DB::Helper::ZUGFeRD qw(:IMPORT); |
|
| 16 | 17 |
use SL::Locale::String qw(t8); |
| 17 | 18 |
use Rose::DB::Object::Helpers qw(has_loaded_related forget_related as_tree strip); |
| 18 | 19 |
|
| ... | ... | |
| 137 | 138 |
return $reclamation; |
| 138 | 139 |
} |
| 139 | 140 |
|
| 141 |
sub create_from_zugferd_xml {
|
|
| 142 |
my ($class, $zugferd_xml) = @_; |
|
| 143 |
|
|
| 144 |
my $ap_invoice = $class->new(); |
|
| 145 |
|
|
| 146 |
$ap_invoice->import_zugferd_xml($zugferd_xml)->save(); |
|
| 147 |
} |
|
| 148 |
|
|
| 140 | 149 |
sub create_ap_row {
|
| 141 | 150 |
my ($self, %params) = @_; |
| 142 | 151 |
# needs chart as param |
Auch abrufbar als: Unified diff
ZUGFeRD: Kreditorenbuchung direkt aus ZUGFeRD-XML erstellen