httemplate/search/elements/grouped-search/html

   1 <%shared>
   2 my $conf = FS::Conf->new;
   3 </%shared>
   4 <%init>
   5 my %opt = @_;
   6 $opt{'name'} ||= PL($opt{'name_singular'});
   7
   8 my $group_info = $m->comp('core', %opt);
   9
  10 my $redirect;
  11
  12 if ( $group_info->{num} == 0 ) {
  13   $redirect = $opt{'redirect_empty'};
  14   if ($redirect) {
  15     $redirect = &$redirect($cgi) if ref($redirect) eq 'CODE';
  16     redirect( $redirect );
  17   } else { # just print this stuff and exit
  18     $m->comp('/elements/header.html', $opt{'title'});
  19     $m->print('<BR><BR>No matching ' . $opt{'name'} . ' found.<BR>');
  20     $m->comp('/elements/footer.html');
  21     $m->abort;
  22   }
  23 }
  24
  25 # this mode has a concept of "current group"
  26 my $curr_group = 0;
  27 if ($cgi->param('group') =~ /^(\d+)$/) {
  28   $curr_group = $1;
  29 }
  30
  31 my $group = $group_info->{groups}[$curr_group];
  32 my $query = $group_info->{queries}[$curr_group];
  33 my $footer = $group_info->{group_footers}[$curr_group];
  34 my $total_footer =  $group_info->{total_footer} || [];
  35 # pagination
  36 my ($limit, $offset);
  37 my $maxrecords = $conf->config('maxsearchrecordsperpage') || 50;
  38 if ( $cgi->param('maxrecords') =~ /^(\d+)$/ ) {
  39   $maxrecords = $1;
  40 }
  41 if ( $maxrecords ) {
  42   $limit = "LIMIT $maxrecords";
  43   if ( $cgi->param('offset') =~ /^(\d+)$/ ) {
  44     $offset = $1;
  45     $limit .= " OFFSET $offset";
  46   }
  47 }
  48 $query->{order_by} .= $limit if $limit;
  49
  50 #warn Dumper($query); #DEBUG
  51
  52 # run the query
  53 my @rows = $query->qsearch;
  54
  55 #warn Dumper(\@rows); #DEBUG
  56
  57 my $pager = '';
  58 # show pager if needed
  59 if ( $group->num_rows > scalar(@rows) ) {
  60   $pager = include( '/elements/pager.html',
  61     'offset'      => $offset,
  62     'num_rows'    => scalar(@rows),
  63     'total'       => $group->num_rows,
  64     'maxrecords'  => $maxrecords,
  65   );
  66 }
  67
  68 # set up tab bar
  69 my @menubar;
  70 for (my $i = 0; $i < $group_info->{num}; $i++) {
  71   push @menubar, $group_info->{group_labels}[$i], ";group=$i";
  72 }
  73
  74 </%init>
  75
  76 <& /elements/header.html, $opt{title} &>
  77
  78 %# tab bar
  79 % $cgi->delete('group');
  80 % $cgi->delete('offset');
  81 % $cgi->delete('type');
  82 <& /elements/menubar.html,
  83   { newstyle => 1,
  84     url_base => $cgi->self_url,
  85     selected => $group_info->{group_labels}[$curr_group] },
  86   @menubar
  87 &>
  88
  89 <DIV CLASS="fstabcontainer">
  90 %# download links
  91 <P><% emt('Download full results') %><BR>
  92 % $cgi->param('type', 'xls');
  93 <A HREF="<% $cgi->self_url %>"><% emt('as Excel spreadsheet') %></A><BR>
  94 % $cgi->param('type', 'html-print');
  95 <A HREF="<% $cgi->self_url %>"><% emt('as printable copy') %></A><BR>
  96 </P>
  97
  98 <% $pager %>
  99
 100 <STYLE>
 101   table.grid {
 102     border-spacing: 0;
 103   }
 104 </STYLE>
 105 <table class="grid">
 106   <thead>
 107   <& /search/elements/search-html.html:header_row,
 108     'header'      => $opt{'header'},
 109     'header2'     => $opt{'header2'},
 110     'sort_fields' => ($opt{'sort_fields'} || $opt{'fields'}),
 111   &>
 112   </thead>
 113   <tbody>
 114   <& /search/elements/search-html.html:data_rows,
 115     'rows' => \@rows,
 116     'opt'  => \%opt,
 117   &>
 118   </tbody>
 119   <tfoot>
 120   <& /search/elements/search-html.html:footer_row, row => $footer, opt => \%opt &>
 121 %   if ( scalar @$total_footer ) {
 122   <& /search/elements/search-html.html:footer_row, row => $total_footer, opt => \%opt &>
 123 %   }
 124   </tfoot>
 125 </table>
 126
 127 <% $pager %>
 128 </DIV>
 129
 130 <& /elements/footer.html &>
 131