[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] CVS: koha/admin aqbookfund.pl,1.7,1.8

From: David Strainchamps
Subject: [Koha-cvs] CVS: koha/admin aqbookfund.pl,1.7,1.8
Date: Sat, 16 Nov 2002 13:37:05 -0800

Update of /cvsroot/koha/koha/admin
In directory usw-pr-cvs1:/tmp/cvs-serv28262

Modified Files:
Log Message:
add links to aqbudget.pl

Index: aqbookfund.pl
RCS file: /cvsroot/koha/koha/admin/aqbookfund.pl,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -r1.7 -r1.8
*** aqbookfund.pl       11 Nov 2002 08:36:44 -0000      1.7
--- aqbookfund.pl       16 Nov 2002 21:37:03 -0000      1.8
*** 51,55 ****
        my @data=split(' ',$searchstring);
        my address@hidden;
!       my $query="Select 
aqbudget.bookfundid,startdate,enddate,budgetamount,bookfundname from 
aqbudget,aqbookfund where aqbudget.bookfundid=aqbookfund.bookfundid and 
(aqbudget.bookfundid like \"$data[0]%\") order by bookfundid";
        my $sth=$dbh->prepare($query);
--- 51,55 ----
        my @data=split(' ',$searchstring);
        my address@hidden;
!       my $query="select bookfundid,bookfundname,bookfundgroup from aqbookfund 
where bookfundid and (bookfundid like \"$data[0]%\") order by bookfundid";
        my $sth=$dbh->prepare($query);

reply via email to

[Prev in Thread] Current Thread [Next in Thread]