|
Lines 30-35
use C4::Context;
Link Here
|
| 30 |
use C4::Breeding; |
30 |
use C4::Breeding; |
| 31 |
use C4::Koha; |
31 |
use C4::Koha; |
| 32 |
use C4::Charset; |
32 |
use C4::Charset; |
|
|
33 |
use C4::Bookseller qw/ GetBookSellerFromId /; |
| 33 |
use ZOOM; |
34 |
use ZOOM; |
| 34 |
|
35 |
|
| 35 |
my $input = new CGI; |
36 |
my $input = new CGI; |
|
Lines 44-49
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
Link Here
|
| 44 |
} |
45 |
} |
| 45 |
); |
46 |
); |
| 46 |
|
47 |
|
|
|
48 |
|
| 47 |
my $dbh = C4::Context->dbh; |
49 |
my $dbh = C4::Context->dbh; |
| 48 |
my $error = $input->param('error'); |
50 |
my $error = $input->param('error'); |
| 49 |
my $biblionumber = $input->param('biblionumber'); |
51 |
my $biblionumber = $input->param('biblionumber'); |
|
Lines 102-111
foreach my $thisframeworkcode ( keys %$frameworks ) {
Link Here
|
| 102 |
push @frameworkcodeloop, \%row; |
104 |
push @frameworkcodeloop, \%row; |
| 103 |
} |
105 |
} |
| 104 |
|
106 |
|
|
|
107 |
my $vendor = GetBookSellerFromId($booksellerid); |
| 105 |
$template->param( frameworkcode => $frameworkcode, |
108 |
$template->param( frameworkcode => $frameworkcode, |
| 106 |
frameworkcodeloop => \@frameworkcodeloop, |
109 |
frameworkcodeloop => \@frameworkcodeloop, |
| 107 |
booksellerid => $booksellerid, |
110 |
booksellerid => $booksellerid, |
| 108 |
basketno => $basketno); |
111 |
basketno => $basketno, |
|
|
112 |
name => $vendor->{'name'} |
| 113 |
); |
| 114 |
|
| 109 |
|
115 |
|
| 110 |
|
116 |
|
| 111 |
if ( $op ne "do_search" ) { |
117 |
if ( $op ne "do_search" ) { |