my $name = "FS::$svcdb"->table_info->{'name_plural'}
|| PL( "FS::$svcdb"->table_info->{'name'} );
my $lcname = lc($name);
+ my $lcsname = lc("FS::$svcdb"->table_info->{'name'});
my $longname = "FS::$svcdb"->table_info->{'longname_plural'} || $name;
my $lclongname = lc($longname);
my $sorts = "FS::$svcdb"->table_info->{'sorts'} || [ 'svcnum' ];
];
}
+ if ( $svcdb eq '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] ),
];
}
+ if ( $svcdb eq 'svc_acct' ) {
+ $report_svc{"Advanced $lcsname reports"} =
+ [ $fsurl."search/report_$svcdb.html", '' ];
+ }
+
$report_services{$name} = [ \%report_svc, $longname ];
}