use C4::Acquisition;
use C4::Bookseller qw/GetBookSellerFromId/;
use C4::Budgets;
+use Koha::Misc::Files;
my $input = new CGI;
my ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user(
my $invoiceid = $input->param('invoiceid');
my $op = $input->param('op');
+my $invoice_files;
+if ( C4::Context->preference('AcqEnableFiles') ) {
+ $invoice_files = Koha::Misc::Files->new(
+ tabletag => 'aqinvoices', recordid => $invoiceid );
+}
+
if ( $op && $op eq 'close' ) {
CloseInvoice($invoiceid);
my $referer = $input->param('referer');
} elsif ($input->param('merge')) {
my @sources = $input->param('merge');
MergeInvoices($invoiceid, \@sources);
+ defined($invoice_files) && $invoice_files->MergeFileRecIds(@sources);
}
$template->param( modified => 1 );
}
elsif ( $op && $op eq 'delete' ) {
DelInvoice($invoiceid);
+ defined($invoice_files) && $invoice_files->DelAllFiles();
my $referer = $input->param('referer') || 'invoices.pl';
if ($referer) {
print $input->redirect($referer);
$foot{$$line{gstgsti}}{totalgsti} += $$line{totalgsti};
$total_gsti += $$line{totalgsti};
- my %row = %{ $order, $line };
- $row{'orderline'} = $row{'parent_ordernumber'};
- push @orders_loop, \%row;
+ $line->{orderline} = $line->{parent_ordernumber};
+ push @orders_loop, $line;
}
push @foot_loop, map {$_} values %foot;
suppliername => $details->{'suppliername'},
booksellerid => $details->{'booksellerid'},
datereceived => $details->{'datereceived'},
- billingdate => C4::Dates->new($details->{'billingdate'}, "iso")->output(),
- invoiceclosedate => $details->{'invoiceclosedate'},
+ billingdate => $details->{'billingdate'},
+ invoiceclosedate => $details->{'closedate'},
shipmentcost => $details->{'shipmentcost'},
orders_loop => \@orders_loop,
foot_loop => \@foot_loop,
budgets_loop => \@budgets_loop,
);
+defined( $invoice_files ) && $template->param( files => $invoice_files->GetFilesInfo() );
+
# FIXME
# Fonction dupplicated from basket.pl
# Code must to be exported. Where ??