From e54d71b7950f1a4dade4a51eebfc42b036780343 Mon Sep 17 00:00:00 2001
From: Jonathan Druart
[% bookselleremail %][% END %] diff --git a/serials/claims.pl b/serials/claims.pl index dc55fad..bf2ed2f 100755 --- a/serials/claims.pl +++ b/serials/claims.pl @@ -84,21 +84,15 @@ if (@serialnums) { # i.e. they have been flagged to generate claims my $letters = GetLetters({ module => 'claimissues' }); my @missingissues; -my @supplierinfo; if ($supplierid) { @missingissues = GetLateOrMissingIssues($supplierid); - @supplierinfo=GetBookSeller($supplierid); } $template->param( suploop => $supplierlist, - phone => $supplierinfo[0]->{phone}, - booksellerfax => $supplierinfo[0]->{booksellerfax}, - bookselleremail => $supplierinfo[0]->{bookselleremail}, missingissues => \@missingissues, supplierid => $supplierid, claimletter => $claimletter, - supplierloop => \@supplierinfo, branchloop => $branchloop, csv_profiles => C4::Csv::GetCsvProfiles( "sql" ), letters => $letters, -- 1.7.10.4