Koha-community/kumara
2
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

changes to borrower searching

Browse source
This commit is contained in:
olwen 1999-11-26 09:48:03 +00:00
parent 60e4d13655
commit bd1aea2de2
2 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
C4/Search.pm
View file

@ -351,9 +351,9 @@ sub BornameSearch {
my $dbh = &C4Connect;
$searchstring = lc $searchstring;
my $query="Select * from borrowers
where lower(surname) ~* '%$searchstring%'
or lower(firstname) ~* '%$searchstring%'
or lower(othernames) ~* '%$searchstring'
where lower(surname) like '%$searchstring%'
or lower(firstname) like '%$searchstring%'
or lower(othernames) like '%$searchstring%'
order by lower(surname),lower(firstname)";
#print $query,"\n";
my $sth=$dbh->prepare($query);

2
addborrower.pl
View file

@ -42,7 +42,7 @@ if ($action eq 'S') {
my $i = 0;
print center;
print mktablehdr;
print mktablerow(5,'#cccc99','<b>CARDNUMBER</b>','<b>NAME</b>','<b>CATEGORY</b>','<b>ADDRESS</B>','<b>PHONE</B>');
print mktablerow(5,'#cccc99','<b>CARDNO</b>','<b>NAME</b>','<b>CAT</b>','<b>ADDRESS</B>','<b>PHONE</B>');
my $colour = 1;
while ($i < $bcnt) {
# create a search list