RT#38733: Sales forecasting using quotes [percentage sign and check]

diff --git a/FS/FS/quotation.pm b/FS/FS/quotation.pm
index db8b0fc..8e32eff 100644 (file)
--- a/FS/FS/quotation.pm
+++ b/FS/FS/quotation.pm
@@ -138,6 +138,9 @@ sub check {
 
   $self->usernum($FS::CurrentUser::CurrentUser->usernum) unless $self->usernum;
 
+  return 'confidence must be an integer between 1 and 100'
+    if length($self->confidence) && (($self->confidence < 1) || ($self->confidence > 100));
+
   return 'prospectnum or custnum must be specified'
     if ! $self->prospectnum
     && ! $self->custnum;

diff --git a/httemplate/edit/quotation.html b/httemplate/edit/quotation.html
index 4372840..43e815c 100644 (file)
--- a/httemplate/edit/quotation.html
+++ b/httemplate/edit/quotation.html
@@ -16,7 +16,7 @@
                    { field=>'custnum',     type=>'fixed-cust_main' },
                    { field=>'_date',       type=>'fixed-date' },
                    { field=>'close_date',  type=>'input-date-field' },
-                   { field=>'confidence',  type=>'text', size=>6 },
+                   { field=>'confidence',  type=>'text', size=>3, postfix=>'%' },
                    ($can_disable ? { field=>'disabled',    type=>'checkbox', value=>'Y'} : ()),
                               ],
                  #XXX some way to disable the "view all"

diff --git a/httemplate/search/quotation.html b/httemplate/search/quotation.html
index 16affeb..f9b77b9 100755 (executable)
--- a/httemplate/search/quotation.html
+++ b/httemplate/search/quotation.html
@@ -29,9 +29,11 @@
                    sub { my $cust_main = shift->cust_main;
                          $cust_main ? encode_entities($cust_main->name) : '';
                        },
-                   'confidence',
-                   sub { my $quot = shift;
-                         $quot->close_date ? time2str('%b %d %Y', $quot->close_date) : '';
+                   sub { my $quotation = shift;
+                         length($quotation->confidence) ? $quotation->confidence . '%' : '';
+                       },
+                   sub { my $quotation = shift;
+                         $quotation->close_date ? time2str('%b %d %Y', $quotation->close_date) : '';
                        },
                    #\&FS::UI::Web::cust_fields,
                  ],

diff --git a/httemplate/view/quotation.html b/httemplate/view/quotation.html
index 484bedd..5646fb9 100755 (executable)
--- a/httemplate/view/quotation.html
+++ b/httemplate/view/quotation.html
@@ -98,7 +98,7 @@ function areyousure(href, message) {
 </TR>
 %   }
 %   if (length($confidence)) {
-<TR><TH STYLE="text-align: right;">Confidence:</TH><TD><% $confidence %></TD></TR>
+<TR><TH STYLE="text-align: right;">Confidence:</TH><TD><% $confidence %>%</TD></TR>
 %   }
 </TABLE>
 % }