+sub GetBookSellerFromId {
+ my ($id) = @_;
+ my $dbh = C4::Context->dbh();
+ my $query = "SELECT * FROM aqbooksellers WHERE id = ?";
+ my $sth =$dbh->prepare($query);
+ $sth->execute( $id );
+ if (my $data = $sth->fetchrow_hashref()){
+ my $sth2 = $dbh->prepare("SELECT count(*) FROM aqbasket WHERE booksellerid=?");
+ $sth2->execute($id);
+ $data->{basketcount}=$sth2->fetchrow();
+ $sth->finish;
+ $sth2->finish;
+ return ($data);
+ }
+ else {
+ return 0;
+ }
+}