diff options
Diffstat (limited to 'httemplate/view/svc_acct/hosting.html')
-rw-r--r-- | httemplate/view/svc_acct/hosting.html | 38 |
1 files changed, 0 insertions, 38 deletions
diff --git a/httemplate/view/svc_acct/hosting.html b/httemplate/view/svc_acct/hosting.html deleted file mode 100644 index 1d83603b7..000000000 --- a/httemplate/view/svc_acct/hosting.html +++ /dev/null @@ -1,38 +0,0 @@ -% if ( @svc_www || $opt{'showall'} ) { - Hosting - <% &ntable("#cccccc") %><TR><TD><% &ntable("#cccccc",2) %> -% foreach my $svc_www (@svc_www) { -% my($label, $value) = $svc_www->cust_svc->label; -% my $link = $p. 'view/svc_www.cgi?'. $svc_www->svcnum; - <TR> - <TD BGCOLOR="#ffffff"> - <A HREF="<% $link %>"><% "$label: $value" %></A> - </TD> - </TR> -% } - </TABLE></TD></TR></TABLE> - <BR><BR> -% } -<%init> - -my %opt = @_; - -#false laziness w/view_svc_acct.cgi and a zillion other places -my $addl_from = ' LEFT JOIN cust_svc USING ( svcnum ) '. - ' LEFT JOIN cust_pkg USING ( pkgnum ) '. - ' LEFT JOIN cust_main USING ( custnum ) '; - -my @svc_www = qsearch({ - 'select' => 'svc_www.*', - 'table' => 'svc_www', - 'addl_from' => $addl_from, - 'hashref' => { 'usersvc' => $opt{'svcnum'} }, - #XXX shit outta luck if you somehow got them linked across agents - # maybe we should show but not link to them? kinda makes sense... - # (maybe a specific ACL for this situation???) - 'extra_sql' => ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql( - 'null_right' => 'View/link unlinked services' - ), -}); - -</%init> |