# change back when ive fixed request.pl
my @items = &ItemInfo(undef, $biblionumber, 'intra');
my $dat = &bibdata($biblionumber);
# change back when ive fixed request.pl
my @items = &ItemInfo(undef, $biblionumber, 'intra');
my $dat = &bibdata($biblionumber);
my ($webbiblioitemcount, @webbiblioitems) = &getwebbiblioitems($biblionumber);
my ($websitecount, @websites) = &getwebsites($biblionumber);
my $subscriptionsnumber = CountSubscriptionFromBiblionumber($biblionumber);
my ($webbiblioitemcount, @webbiblioitems) = &getwebbiblioitems($biblionumber);
my ($websitecount, @websites) = &getwebsites($biblionumber);
my $subscriptionsnumber = CountSubscriptionFromBiblionumber($biblionumber);