use SL::DB::Helper::PDF_A;
use SL::DB::Helper::PriceTaxCalculator;
use SL::DB::Helper::PriceUpdater;
+use SL::DB::Helper::SalesPurchaseInvoice;
use SL::DB::Helper::TransNumberGenerator;
use SL::DB::Helper::ZUGFeRD;
use SL::Locale::String qw(t8);
($netamount, $taxamount) = Form->calculate_tax($params{amount}, $tax->rate, $self->taxincluded, $roundplaces);
};
next unless $netamount; # netamount mustn't be zero
-
my $sign = $self->customer_id ? 1 : -1;
my $acc = SL::DB::AccTransaction->new(
amount => $netamount * $sign,
$self->add_transactions( $acc );
push( @$acc_trans, $acc );
return $acc_trans;
-};
+}
sub validate_acc_trans {
my ($self, %params) = @_;