From 3dfc446d8a4d241787c47ff7e2db72483d62ab7a Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 22 Mar 2011 06:00:54 +0000
Subject: new customer from prospect qualification, RT#7111

---
 httemplate/elements/small_prospect_view.html | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 httemplate/elements/small_prospect_view.html

(limited to 'httemplate/elements')

diff --git a/httemplate/elements/small_prospect_view.html b/httemplate/elements/small_prospect_view.html
new file mode 100644
index 000000000..4942e8dc7
--- /dev/null
+++ b/httemplate/elements/small_prospect_view.html
@@ -0,0 +1,11 @@
+% my $link = "${p}view/prospect_main.html?". $prospect_main->prospectnum;
+Prospect: <A HREF="<%$link%>"><% $prospect_main->name %></A>
+<%init>
+
+my($prospect_main, %opt) = @_;
+
+$prospect_main = qsearchs('prospect_main', { 'prospectnum' => $prospect_main } )
+                   || die "unknown prospectnum $prospect_main"
+  unless ref($prospect_main);
+
+</%init>
-- 
cgit v1.2.1