Revision 0176fba8
Von Cem Aydin vor etwa 2 Jahren hinzugefügt
| SL/Template/OpenDocument.pm | ||
|---|---|---|
| 358 | 358 |
|
| 359 | 359 |
close(OUT); |
| 360 | 360 |
|
| 361 |
my $is_qr_bill = $::instance_conf->get_create_qrbill_invoices && |
|
| 362 |
$form->{formname} eq 'invoice' &&
|
|
| 363 |
$form->{'template_meta'}->{'printer'}->{'template_code'} =~ m/qr/ ?
|
|
| 364 |
1 : 0; |
|
| 365 |
|
|
| 361 | 366 |
my $qr_image_path; |
| 362 |
if ($::instance_conf->get_create_qrbill_invoices && $form->{formname} eq 'invoice') {
|
|
| 367 |
if ($is_qr_bill) {
|
|
| 363 | 368 |
# the biller account information, biller address and the reference number, |
| 364 | 369 |
# are needed in the template aswell as in the qr-code generation, therefore |
| 365 | 370 |
# assemble these and add to $::form |
| ... | ... | |
| 435 | 440 |
$zip->contents("styles.xml", Encode::encode('utf-8-strict', $new_styles));
|
| 436 | 441 |
} |
| 437 | 442 |
|
| 438 |
if ($::instance_conf->get_create_qrbill_invoices && $form->{formname} eq 'invoice') {
|
|
| 443 |
if ($is_qr_bill) {
|
|
| 439 | 444 |
# get placeholder path from odt XML |
| 440 | 445 |
my $qr_placeholder_path; |
| 441 | 446 |
my $dom = XML::LibXML->load_xml(string => $contents); |
Auch abrufbar als: Unified diff
Swiss QR-Bill: Für die QR-Rechnung nur Vorlagen mit dem Vorlagenkürzel 'qr' berücksichtigen
Ermöglicht die gleichzeitige Verwendung von QR und nicht-QR Rechnungen.