[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/C4 Acquisition.pm [rel_2_2]
From: |
paul poulain |
Subject: |
[Koha-cvs] koha/C4 Acquisition.pm [rel_2_2] |
Date: |
Wed, 14 Dec 2005 13:09:42 +0000 |
CVSROOT: /cvsroot/koha
Module name: koha
Branch: rel_2_2
Changes by: paul poulain <address@hidden> 05/12/14 13:09:42
Modified files:
C4 : Acquisition.pm
Log message:
* reordering a query to have correct values in a hash.
* formatting a date for output
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/C4/Acquisition.pm.diff?only_with_tag=rel_2_2&tr1=1.9.2.10&tr2=1.9.2.11&r1=text&r2=text
Patches:
Index: koha/C4/Acquisition.pm
diff -u koha/C4/Acquisition.pm:1.9.2.10 koha/C4/Acquisition.pm:1.9.2.11
--- koha/C4/Acquisition.pm:1.9.2.10 Thu Dec 1 17:27:55 2005
+++ koha/C4/Acquisition.pm Wed Dec 14 13:09:42 2005
@@ -108,7 +108,7 @@
sub getbasketcontent {
my ($basketno,$supplier,$orderby)address@hidden;
my $dbh = C4::Context->dbh;
- my $query="Select
biblio.*,biblioitems.*,aqorders.*,aqorderbreakdown.*,biblio.title from
aqorders,biblio,biblioitems
+ my $query="Select
aqorderbreakdown.*,biblio.*,biblioitems.*,aqorders.*,biblio.title from
aqorders,biblio,biblioitems
left join aqorderbreakdown on
aqorderbreakdown.ordernumber=aqorders.ordernumber
where basketno='$basketno'
and biblio.biblionumber=aqorders.biblionumber and
biblioitems.biblioitemnumber
@@ -625,6 +625,7 @@
my $hilighted = 1;
while (my $data = $sth->fetchrow_hashref) {
$data->{hilighted}=$hilighted if ($hilighted>0);
+ $data->{orderdate} = format_date($data->{orderdate});
push @results, $data;
$hilighted= -$hilighted;
}
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/C4 Acquisition.pm [rel_2_2],
paul poulain <=