From 458b0ed510a9e2fa615ec3074171ae2b1a8589c1 Mon Sep 17 00:00:00 2001 From: Joe Atzberger Date: Wed, 7 Jan 2009 14:57:29 -0600 Subject: [PATCH] GetAuthValCode calls were positioned inside the loop, despite the same values being supplied each time. Then the conditional assignments would repeat the same calls again! That means execution was liable to query the DB at least once and as many as four times per item. With a large number of items this is an unnecessary burden. By moving the calls outside the loop, we can guarantee that we never have to call the DB for that info more than twice (once for lost, once for damaged). Signed-off-by: Galen Charlton --- catalogue/detail.pl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/catalogue/detail.pl b/catalogue/detail.pl index 6913636114..93b05fb002 100755 --- a/catalogue/detail.pl +++ b/catalogue/detail.pl @@ -70,8 +70,6 @@ my $subtitle = C4::Biblio::get_koha_field_from_marc('bibliosubtitle', 's # Get Branches, Itemtypes and Locations my $branches = GetBranches(); my $itemtypes = GetItemTypes(); - -# FIXME: move this to a pm, check waiting status for holds my $dbh = C4::Context->dbh; # change back when ive fixed request.pl @@ -103,6 +101,8 @@ my $shelflocations = GetKohaAuthorisedValues('items.location', $fw); my $collections = GetKohaAuthorisedValues('items.ccode' , $fw); my (@itemloop, %itemfields); my $norequests = 1; +my $authvalcode_items_itemlost = GetAuthValCode('items.itemlost',$fw); +my $authvalcode_items_damaged = GetAuthValCode('items.damaged', $fw); foreach my $item (@items) { # can place holds defaults to yes @@ -117,9 +117,9 @@ foreach my $item (@items) { $item->{$_} = format_date($item->{$_}); } # item damaged, lost, withdrawn loops - $item->{itemlostloop}= GetAuthorisedValues(GetAuthValCode('items.itemlost',$fw),$item->{itemlost}) if GetAuthValCode('items.itemlost',$fw); + $item->{itemlostloop} = GetAuthorisedValues($authvalcode_items_itemlost, $item->{itemlost}) if $authvalcode_items_itemlost; if ($item->{damaged}) { - $item->{itemdamagedloop}= GetAuthorisedValues(GetAuthValCode('items.damaged',$fw),$item->{damaged}) if GetAuthValCode('items.damaged',$fw); + $item->{itemdamagedloop} = GetAuthorisedValues($authvalcode_items_damaged, $item->{damaged}) if $authvalcode_items_damaged; } #get shelf location and collection code description if they are authorised value. my $shelfcode = $item->{'location'}; -- 2.39.5