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