Lines 437-442
while (my $data=$sth->fetchrow_hashref){
Link Here
|
437 |
$sth->finish; |
437 |
$sth->finish; |
438 |
my @row_loop; |
438 |
my @row_loop; |
439 |
my @itemtypes = @{ GetItemTypes( style => 'array' ) }; |
439 |
my @itemtypes = @{ GetItemTypes( style => 'array' ) }; |
|
|
440 |
@itemtypes = sort { lc $a->{translated_description} cmp lc $b->{translated_description} } @itemtypes; |
440 |
|
441 |
|
441 |
my $sth2 = $dbh->prepare(" |
442 |
my $sth2 = $dbh->prepare(" |
442 |
SELECT issuingrules.*, |
443 |
SELECT issuingrules.*, |
Lines 540-546
my @branch_item_rules = ();
Link Here
|
540 |
while (my $row = $sth_branch_item->fetchrow_hashref) { |
541 |
while (my $row = $sth_branch_item->fetchrow_hashref) { |
541 |
push @branch_item_rules, $row; |
542 |
push @branch_item_rules, $row; |
542 |
} |
543 |
} |
543 |
my @sorted_branch_item_rules = sort { $a->{translated_description} cmp $b->{translated_description} } @branch_item_rules; |
544 |
my @sorted_branch_item_rules = sort { lc $a->{translated_description} cmp lc $b->{translated_description} } @branch_item_rules; |
544 |
|
545 |
|
545 |
# note undef holdallowed so that template can deal with them |
546 |
# note undef holdallowed so that template can deal with them |
546 |
foreach my $entry (@sorted_branch_item_rules) { |
547 |
foreach my $entry (@sorted_branch_item_rules) { |
Lines 619-624
sub by_itemtype {
Link Here
|
619 |
} elsif ($b->{'default_translated_description'}) { |
620 |
} elsif ($b->{'default_translated_description'}) { |
620 |
return -1; |
621 |
return -1; |
621 |
} else { |
622 |
} else { |
622 |
return $a->{'translated_description'} cmp $b->{'translated_description'}; |
623 |
return lc $a->{'translated_description'} cmp lc $b->{'translated_description'}; |
623 |
} |
624 |
} |
624 |
} |
625 |
} |
625 |
- |
|
|