small_prospect_view.html

   1 % my $link = "${p}view/prospect_main.html?". $prospect_main->prospectnum;
   2 Prospect: <A HREF="<%$link%>"><% $prospect_main->name |h %></A>
   3 <%init>
   4
   5 my($prospect_main, %opt) = @_;
   6
   7 $prospect_main = qsearchs('prospect_main', { 'prospectnum' => $prospect_main } )
   8                    || die "unknown prospectnum $prospect_main"
   9   unless ref($prospect_main);
  10
  11 </%init>