mason/tools/genefamily/search.mas

   1
   2 <%doc>
   3
   4 </%doc>
   5
   6 <%args>
   7 $build => "dummy_build_test"
   8 $genefamily_id => undef
   9 $member_id => undef
  10 $action => undef
  11 </%args>
  12
  13 <& /page/page_title.mas, title=>'Gene family search' &>
  14
  15
  16 <h4>Browse Genefamilies</h4>
  17
  18 <%perl>
  19
  20 use SGN::Genefamily;
  21 use Bio::Seq;
  22
  23 my  $DIR = $c->get_conf('genefamily_dir'); # '/home/mueller/dutch_tomato_assembly/tomato_ara_rice_comparison/';
  24 if (!$action) { $action = "input"; }
  25 if ($genefamily_id eq '') { $genefamily_id=0; }
  26
  27
  28 my @builds = SGN::Genefamily->get_available_builds($DIR);
  29
  30 my $select = '<select id="build" name="build">';
  31 my $selected = "";
  32 foreach my $d (@builds) {
  33   if ($d eq $build) { $selected="selected=\"selected\" "; }
  34   else { $selected= ""; }
  35   $select .= qq | <option value="$d" $selected>$d</option> |;
  36 }
  37 $select .= "</select>";
  38
  39 print $select."<br /><br />";
  40
  41 </%perl>
  42
  43
  44 <table id="genefamily_datatable">
  45 <thead>
  46   <th>Genefamily ID</th><th>Sequences</th><th>Alignments</th><th>Trees</th><th>Member Count</th><th>Members</th></thead>
  47   </thead>
  48   <tbody>
  49   </tbody>
  50   </table>
  51
  52
  53 <script>
  54
  55 jQuery(document).ready( function() {
  56
  57     var build = jQuery('#build option:selected').val();
  58     //alert('using build '+build);
  59     jQuery('#genefamily_datatable').dataTable( {
  60         ajax: '/ajax/tools/genefamily/table?build='+build,
  61         destroy: true,
  62         "aoColumnDefs": [
  63             { "bSearchable" : true,
  64               "bVisible"   : false,
  65               "aTargets"   : [ 5 ]
  66             }]
  67     });
  68 });
  69
  70 </script>
  71
  72
  73
  74
  75
  76
  77
  78
  79 <%init>
  80 use File::Spec::Functions;
  81 </%init>