stray closing /TABLE in the no-ticket case
[freeside.git] / httemplate / browse / sales.html
index 6fac058..47db420 100644 (file)
@@ -16,6 +16,8 @@
 my $curuser = $FS::CurrentUser::CurrentUser;
 die "access denied" unless $curuser->access_right('Edit sales people');
 
+my $conf = new FS::Conf;
+
 #Sales people bring in business.<BR><BR>
 
 my @header = ( 'Sales person' );
@@ -28,6 +30,19 @@ if ( $curuser->access_right('Configuration') ) {
   push @links,  [ $p.'edit/agent.cgi?', 'agentnum' ];
 }
 
+push @header, 'Master Customer';
+push @fields, sub {
+  my $sales = shift;
+  return '' unless $sales->sales_custnum;
+  include('/elements/small_custview.html',
+            $sales->sales_custnum,
+            scalar($conf->config('countrydefault')),
+            1, #show balance
+            $p.'view/cust_main.cgi',
+         );
+};
+push @links, '';
+
 push @header, 'Commissions';
 push @fields, sub {
 
@@ -51,13 +66,19 @@ push @fields, sub {
           #my $param = 'classnum'. $sales_pkg_class{classnum};
 
           [
+            { align => 'left',
+              data  => encode_entities(
+                         $_ ? $_->classname : mt('(no package class)')
+                       ). ':&nbsp;',
+            },
             { align => 'right',
               data  => ($sales_pkg_class->commission_percent || 0). '%',
             },
             { align => 'left',
-              data  => '&nbsp;'. encode_entities(
-                         $_ ? $_->classname : mt('(no package class)')
-                       ),
+              data  =>
+                $sales_pkg_class->commission_duration
+                  ? '&nbsp;for '. $sales_pkg_class->commission_duration. ' months'
+                  : ''
             },
           ];