use SL::DB::PurchaseInvoice;
use SL::DB::BankTransaction;
use SL::DB::AccTransaction;
-use SL::Controller::YearlyTransactions;
+use SL::Controller::YearEndTransactions;
use Data::Dumper;
my ($customer, $vendor, $currency_id, @parts, $unit, $employee, $tax, $tax7, $tax_9, $taxzone, $payment_terms, $bank_account);
SL::DB::Manager::Vendor->delete_all(all => 1);
SL::DB::Manager::BankAccount->delete_all(all => 1);
SL::DB::Manager::AccTransaction->delete_all(all => 1);
+ SL::DB::Manager::GLTransaction->delete_all(all => 1);
SL::DB::Manager::PaymentTerm->delete_all(all => 1);
SL::DB::Manager::Currency->delete_all(where => [ name => 'CUR' ]);
};
test1();
# remove all created data at end of test
-clear_up();
+#clear_up();
done_testing();
$ap_transaction = test_ap_transaction(invnumber => 'purchaseinv1');
my $ar_transaction_2 = test_ar_transaction(invnumber => 'salesinv_2');
- my $yt_controller = SL::Controller::YearlyTransactions->new;
+ my $yt_controller = SL::Controller::YearEndTransactions->new;
my $report = SL::ReportGenerator->new(\%::myconfig, $::form);
$::form->{"ob_date"} = DateTime->today->truncate(to => 'year')->add(years => 1)->to_kivitendo;
is($balance , '38.00000' , $chart->accno.' has right balance') if $chart->accno eq '1776';
is($balance , '-100.00000' , $chart->accno.' has right balance') if $chart->accno eq '3400';
is($balance , '200.00000' , $chart->accno.' has right balance') if $chart->accno eq '8400';
- $::form->{"trans_id_${idx}"} = $chart->id;
- $::form->{"multi_id_${idx}"} = 1;
+ $::form->{"multi_id_${idx}"} = $chart->id;
$idx++ ;
}
}