mason/qtl/qtl_form/confirm.mas

   1 <%doc>
   2
   3 =head1 NAME
   4 qtl/qtl_form/confirm.mas - a mason component for displaying a confirmation
   5 message of qtl population loading completion and a link to the population
   6 page.
   7
   8 =AUTHOR
   9 Isaak Y Tecle (iyt2@cornell.edu)
  10
  11 =cut
  12
  13 </%doc>
  14
  15 <%args>
  16
  17 $pop_id
  18 $guide
  19
  20 </%args>
  21
  22 <%perl>
  23
  24 my $dbh = CXGN::DB::Connection->new();
  25 my ($pop_name, $pop_link);
  26
  27 if ($pop_id)  {
  28   my $pop   = CXGN::Phenome::Population->new($dbh, $pop_id);
  29   $pop_name = $pop->get_name();
  30   $pop_link = qq | <a href="/qtl/population/$pop_id"><b>$pop_name</b></a> |;
  31 }
  32
  33 </%perl>
  34
  35 <& /page/page_title.mas, title => "Step 6: Confirmation" &>
  36 <&| /page/info_section.mas, title => "Confirmation", subtitle => $guide &>
  37  <form action="/phenome/qtl_load.pl" method="POST" enctype="MULTIPART/FORM-DATA">
  38     <table cellspacing=20>
  39     <tr>
  40       <td><b><p>You have successfully uploaded your QTL data.</p>
  41            <p>On the next page you will see the population data summary.
  42              The qtl analysis is performed on-the-fly and you need to click the
  43              graph icon  corresponding to the trait of your interest to proceed
  44              with the QTL mapping analysis. The QTL analysis takes a few minutes,
  45              so please be patient. </p>
  46           <p>To continue to the QTL analysis page, follow the link below:</p>
  47           <% $pop_link %></b>
  48       </td>
  49      </tr>
  50      <tr>
  51         <td>
  52           <input type="hidden" name="type" value="confirm">
  53         </td>
  54      </tr>
  55    </table>
  56   </form>
  57 </&>