X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fview%2Fprospect_main.html;h=6c4595dbe1b0c75586e8e401a140e5664cc01c7f;hb=fe4515eb37d76849dd08c62782d86bc7ba311dcd;hp=1c8195672953466a42612064d08db476b32f04e0;hpb=fb4ab1073f0d15d660c6cdc4e07afebf68ef3924;p=freeside.git
diff --git a/httemplate/view/prospect_main.html b/httemplate/view/prospect_main.html
index 1c8195672..6c4595dbe 100644
--- a/httemplate/view/prospect_main.html
+++ b/httemplate/view/prospect_main.html
@@ -32,7 +32,7 @@
% foreach my $contact ( $prospect_main->contact ) {
- Contact |
+ <% $contact->contact_classname %> Contact |
<% $contact->line %> |
%}
@@ -64,6 +64,38 @@
+% if ( $curuser->access_right('Generate quotation') ) {
+ <% mt( 'Quotations' ) |h %>
+ New quotation
+% my @quotations = $prospect_main->quotation;
+% if ( @quotations ) {
+ <& /elements/table-grid.html &>
+% my $bgcolor1 = '#eeeeee';
+% my $bgcolor2 = '#ffffff';
+% my $bgcolor = '';
+
+ # |
+ <% mt('Date') |h %> |
+
+% foreach my $quotation (@quotations) {
+% if ( $bgcolor eq $bgcolor1 ) {
+% $bgcolor = $bgcolor2;
+% } else {
+% $bgcolor = $bgcolor1;
+% }
+% my $a = qq(quotationnum. '">';
+
+ <% $a %><% $quotation->quotationnum %> |
+ <% $a %><% time2str($date_format, $quotation->_date) |h %> |
+
+% }
+
+% }
+
+% }
+
+
% if ( $curuser->access_right('Qualify service') ) {
<% include( '/elements/popup_link-prospect_main.html',
'action' => $p. 'misc/qual.html',
@@ -80,6 +112,7 @@
% }
+
<%init>
@@ -95,6 +129,10 @@ my $curuser = $FS::CurrentUser::CurrentUser;
die "access denied"
unless $curuser->access_right('View prospect');
+my $conf = new FS::Conf;
+
+my $date_format = $conf->config('date_format') || '%m/%d/%Y';
+
my $prospectnum;
if ( $cgi->param('prospectnum') =~ /^(\d+)$/ ) {
$prospectnum = $1;