X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fview%2Fsvc_domain.cgi;fp=httemplate%2Fview%2Fsvc_domain.cgi;h=3f2d4736a05ff7dfe58b4249fbdb779ea4e2a6de;hp=a9fc775ee6f8b30da1b7e7be9120840c94a4d364;hb=cc647ae934abe5c9d9a5fc12f020adfc566349d9;hpb=af5b5947a7bcb13a94a84bb2b20c80a2778e0f35 diff --git a/httemplate/view/svc_domain.cgi b/httemplate/view/svc_domain.cgi index a9fc775ee..3f2d4736a 100755 --- a/httemplate/view/svc_domain.cgi +++ b/httemplate/view/svc_domain.cgi @@ -1,19 +1,48 @@ -<% include("/elements/header.html",'Domain View', menubar( - ( ( $pkgnum || $custnum ) - ? ( "View this customer (#$display_custnum)" => "${p}view/cust_main.cgi?$custnum", - ) - : ( "Delete this (unaudited) domain" => - "javascript:areyousure('${p}misc/cancel-unaudited.cgi?$svcnum', 'Delete $domain and all records?' )" ) - ) -)) %> +% if ( $custnum ) { + +%# <% include("/elements/header.html","View $svcdomain") %> + <% include("/elements/header.html","View domain") %> + <% include( '/elements/small_custview.html', $custnum, '', 1, + "${p}view/cust_main.cgi") %> +
+ +% } else { + + <% include("/elements/header.html",'View domain', menubar( + "Cancel this (unaudited) domain" => + "javascript:areyousure('${p}misc/cancel-unaudited.cgi?$svcnum', 'Delete $domain and all records?')", + )) + %> + +% } <% include('/elements/error.html') %> -Service #<% $svcnum %> -
Service: <% $part_svc->svc %> -
Domain name: <% $domain %> +Service #<% $svcnum %> +% #if ( $conf->exists('svc_domain-edit_domain') ) { + | Edit this domain +% #} + +<% &ntable("#cccccc") %><% &ntable("#cccccc",2) %> + + + Service + <% $part_svc->svc %> + + + + Domain + + <% $domain %> + (view whois information) + + + % if ($export) { -
Status: <% $status %> + + Registration status + <% $status %> + % if ( $FS::CurrentUser::CurrentUser->access_right('Manage domain registration') ) { % if ( defined($ops{'register'}) ) { Register at <% $registrar->{'name'} %>  @@ -28,17 +57,30 @@ Service #<% $svcnum %> Revoke % } % } + + + +% } + +% if ( $svc_domain->max_accounts ) { + + Maximum number of Accounts + <% $svc_domain->max_accounts %> + % } + + Catch all email + <% $email ? "$email" : '(none)' %> % if ( $FS::CurrentUser::CurrentUser->access_right('Edit domain catchall') ) { -
Catch all email (change): -% } else { -
Catch all email: + (change) % } + + + + +
-<% $email ? "$email" : "(none)" %> -

View whois information. -

+DNS records % my @records; if ( @records = $svc_domain->domain_record ) { <% include('/elements/table-grid.html') %> @@ -96,7 +139,6 @@ Service #<% $svcnum %> % } % if ( $FS::CurrentUser::CurrentUser->access_right('Edit domain nameservice') ) { -
@@ -110,16 +152,12 @@ Service #<% $svcnum %>
-

- or -

-
% if ( @records ) { Delete all records and % } - Slave from nameserver IP + Or slave from nameserver IP @@ -129,8 +167,30 @@ Service #<% $svcnum %>
% } +
+ +% my ( $settings, $defaults ) = $svc_domain->export_getsettings; +% if ( keys %$settings ) { + +%# XXX a way to label this "Communigate pro settings".. just a config maybe + External settings + <% ntable('#cccccc',2) %> + +% foreach my $key ( keys %$settings ) { + + <% $key |h %> + + <% $defaults->{$key} ? '' : '' %> + <% $settings->{$key} |h %> + <% $defaults->{$key} ? '' : '' %> + + +% } -

+ +
+ +% } <% joblisting({'svcnum'=>$svcnum}, 1) %> @@ -140,6 +200,8 @@ Service #<% $svcnum %> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('View customer services'); +my $conf = new FS::Conf; + my($query) = $cgi->keywords; $query =~ /^(\d+)$/; my $svcnum = $1;