/[SQLSession]/trunk/share/web/templates/fragments/queries
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/share/web/templates/fragments/queries

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 92 by dpavlin, Mon Feb 5 20:48:15 2007 UTC revision 93 by dpavlin, Mon Feb 5 21:32:40 2007 UTC
# Line 59  $date_menu->child( 'clear', Line 59  $date_menu->child( 'clear',
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();
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' );
# Line 69  $date_coll->group_by( function => $creat Line 67  $date_coll->group_by( function => $creat
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?";
# Line 88  while (my $q = $date_coll->next) { Line 88  while (my $q = $date_coll->next) {
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;">
Legend:
Removed from v.92  
changed lines
  Added in v.93
  ViewVC Help
Powered by ViewVC 1.1.26