fix more fallout from agent-virtualized packages

[freeside.git] / FS / FS / Report / Table / Monthly.pm

diff --git a/FS/FS/Report/Table/Monthly.pm b/FS/FS/Report/Table/Monthly.pm
index a44cafe..33fdfd8 100644 (file)
--- a/FS/FS/Report/Table/Monthly.pm
+++ b/FS/FS/Report/Table/Monthly.pm
@@ -331,11 +331,12 @@ sub in_time_period_and_agent {
   my $sql = "$col >= $speriod AND $col < $eperiod";
 
   #agent selection
-  $sql .= " AND agentnum = $agentnum"
+  $sql .= " AND cust_main.agentnum = $agentnum"
     if $agentnum;
 
   #agent virtualization
-  $sql .= ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql;
+  $sql .= ' AND '.
+          $FS::CurrentUser::CurrentUser->agentnums_sql( 'table'=>'cust_main' );
 
   $sql;
 }