29 |
foreach my $c ( qw/name created_on owner/ ) { |
foreach my $c ( qw/name created_on owner/ ) { |
30 |
#next if ($c eq $order); |
#next if ($c eq $order); |
31 |
$sort_menu->child( $c, |
$sort_menu->child( $c, |
32 |
#active => $c eq $order, |
active => $c eq $order, |
33 |
link => Jifty->web->link( |
link => Jifty->web->link( |
34 |
label => $sort_label->{$c}, |
label => $sort_label->{$c}, |
35 |
onclick => { |
onclick => { |
59 |
), |
), |
60 |
) if ($created_on); |
) if ($created_on); |
61 |
|
|
|
my $dates; |
|
|
|
|
62 |
# select created_on,count(date(created_on)) from queries group by date(created_on) order by created_on; |
# select created_on,count(date(created_on)) from queries group by date(created_on) order by created_on; |
63 |
my $date_coll = SQLSession::Model::QueryCollection->new(); |
my $date_coll = SQLSession::Model::QueryCollection->new( results_are_readable => 1 ); |
64 |
my $created_on_date = $date_coll->column( function => 'date(created_on)', column => 'date' ); |
my $created_on_date = $date_coll->column( function => 'date(created_on)', column => 'date' ); |
65 |
my $count = $date_coll->column( function => 'count(date(created_on))', column => 'count' ); |
my $count = $date_coll->column( function => 'count(date(created_on))', column => 'count' ); |
66 |
$date_coll->group_by( function => $created_on_date ); |
$date_coll->group_by( function => $created_on_date ); |
67 |
$date_coll->order_by( column => 'date', order => 'DESC' ); |
$date_coll->order_by( column => 'date', order => 'DESC' ); |
68 |
$date_coll->unlimit; |
$date_coll->unlimit; |
69 |
|
|
70 |
warn "## ", $date_coll->build_select_query; |
#warn "## ", $date_coll->build_select_query; |
71 |
|
|
72 |
|
my $dates = 0; |
73 |
|
|
74 |
while (my $q = $date_coll->next) { |
while (my $q = $date_coll->next) { |
75 |
my $date = $q->{values}->{date} || die "no date?"; |
my $date = $q->{values}->{date} || die "no date?"; |
88 |
}, |
}, |
89 |
), |
), |
90 |
); |
); |
|
} |
|
91 |
|
|
92 |
use Data::Dump qw/dump/; |
$dates++; # why is this different from $date_coll->count ? |
93 |
warn "dates = ",dump( $dates ); |
} |
94 |
|
|
95 |
</%init> |
</%init> |
96 |
|
|
97 |
<div class="sort"> |
<div class="sort"> |
98 |
<% $sort_menu->render_as_context_menu %> |
<% $sort_menu->render_as_context_menu %> |
99 |
|
% if ( $dates > 0 ) { |
100 |
<% $date_menu->render_as_context_menu %> |
<% $date_menu->render_as_context_menu %> |
101 |
|
% } |
102 |
</div> |
</div> |
103 |
|
|
104 |
<dl style="clear: left;"> |
<dl style="clear: left;"> |