add never logged in report

[freeside.git] / httemplate / elements / menu.html

diff --git a/httemplate/elements/menu.html b/httemplate/elements/menu.html
index b40b019..08c0f67 100644 (file)
--- a/httemplate/elements/menu.html
+++ b/httemplate/elements/menu.html
@@ -131,6 +131,13 @@ foreach my $svcdb ( FS::part_svc->svc_tables() ) {
       ];
   }
 
+  if ( $svcdb = 'svc_acct' ) {
+    $report_svc{"All $lcname never logged in"} = 
+      [ svc_url( %svc_url, 'query' => "magic=nologin;sortby=svcnum" ),
+        '',
+      ];
+  }
+
   if ( $curuser->access_right('View/link unlinked services') ) {
     $report_svc{"Unlinked $lcname"} = 
       [ svc_url( %svc_url, 'query' => "magic=unlinked;sortby=". $sorts->[0] ),