errorpage("No search term specified");
}
-if ( $cgi->param('pkgnum') =~ /^(\d+)$/ ) {
- push @extra_sql, "cust_svc.pkgnum = $1";
-}
-
#here is the agent virtualization
push @extra_sql, $FS::CurrentUser::CurrentUser->agentnums_sql(
'null_right' => 'View/link unlinked services'
'extra_sql' => "$extra_sql $orderby",
};
-warn Dumper($sql_query)."\n";
-
my $count_query = "SELECT COUNT(*) FROM cust_svc $addl_from $extra_sql";
my $link = sub {