Revision 1522aeb7
Von Johannes Grassler vor etwa 1 Jahr hinzugefügt
| SL/Controller/ZUGFeRD.pm | ||
|---|---|---|
| 163 | 163 |
|
| 164 | 164 |
if ( ! ($metadata{'ustid'} or $metadata{'taxnumber'}) ) {
|
| 165 | 165 |
die t8("Cannot process this invoice: neither VAT ID nor tax ID present.");
|
| 166 |
}
|
|
| 166 |
} |
|
| 167 | 167 |
|
| 168 | 168 |
$vendor = find_vendor($metadata{'ustid'}, $metadata{'taxnumber'});
|
| 169 | 169 |
|
| ... | ... | |
| 238 | 238 |
my $tax_rate = $item{'tax_rate'} / 100; # XML data is usually in percent
|
| 239 | 239 |
|
| 240 | 240 |
my $taxes = SL::DB::Manager::Tax->get_all( |
| 241 |
where => [ chart_categories => { like => '%' . $default_ap_amount_chart->category . '%' },
|
|
| 242 |
rate => $tax_rate, |
|
| 243 |
], |
|
| 241 |
where => [ |
|
| 242 |
chart_categories => { like => '%' . $default_ap_amount_chart->category . '%' },
|
|
| 243 |
rate => $tax_rate, |
|
| 244 |
], |
|
| 244 | 245 |
); |
| 245 | 246 |
|
| 246 | 247 |
# If we really can't find any tax definition (a simple rounding error may |
| ... | ... | |
| 254 | 255 |
|
| 255 | 256 |
my $tax = ${$taxes}[0];
|
| 256 | 257 |
|
| 257 |
my $item_obj = SL::DB::RecordTemplateItem |
|
| 258 |
->new(amount1 => $net_total,
|
|
| 259 |
record_template_id => $template_ap->id,
|
|
| 260 |
chart_id => $default_ap_amount_chart->id,
|
|
| 261 |
tax_id => $tax->id,
|
|
| 262 |
);
|
|
| 258 |
my $item_obj = SL::DB::RecordTemplateItem->new(
|
|
| 259 |
amount1 => $net_total, |
|
| 260 |
record_template_id => $template_ap->id, |
|
| 261 |
chart_id => $default_ap_amount_chart->id, |
|
| 262 |
tax_id => $tax->id, |
|
| 263 |
); |
|
| 263 | 264 |
$item_obj->save; |
| 264 | 265 |
} |
| 265 | 266 |
|
Auch abrufbar als: Unified diff
Einrueckungen und weitere Stilprobleme repariert