move header() to include(/elements/header.html) so it can be changed in one place...
[freeside.git] / httemplate / view / cust_main.cgi
index d5d77f2..4975c52 100755 (executable)
@@ -12,16 +12,10 @@ foreach my $part_svc ( qsearch('part_svc',{}) ) {
 
 %>
 
-<%= header("Customer View", menubar(
+<%= include("/elements/header.html","Customer View", menubar(
   'Main Menu' => $p,
 )) %>
 
-<STYLE TYPE="text/css">
-.package TH { font-size: medium }
-.package TR { font-size: smaller }
-.package .provision { font-weight: bold }
-</STYLE>
-
 <%
 
 die "No customer specified (bad URL)!" unless $cgi->keywords;
@@ -35,18 +29,43 @@ print qq!<A HREF="${p}edit/cust_main.cgi?$custnum">Edit this customer</A>!;
 
 %>
 
-<SCRIPT>
+<SCRIPT TYPE="text/javascript" SRC="../elements/overlibmws.js"></SCRIPT>
+<SCRIPT TYPE="text/javascript" SRC="../elements/overlibmws_iframe.js"></SCRIPT>
+<SCRIPT TYPE="text/javascript" SRC="../elements/overlibmws_draggable.js"></SCRIPT>
+
+<SCRIPT TYPE="text/javascript">
 function areyousure(href, message) {
-    if (confirm(message) == true)
-        window.location.href = href;
+  if (confirm(message) == true)
+    window.location.href = href;
 }
 </SCRIPT>
 
+<SCRIPT TYPE="text/javascript">
+
 <%
+my $ban = '';
+if ( $cust_main->payby =~ /^(CARD|DCRD|CHEK|DCHK)$/ ) {
+  $ban = '<BR><P ALIGN="center">'.
+         '<INPUT TYPE="checkbox" NAME="ban" VALUE="1"> Ban this customer\\\'s ';
+  if ( $cust_main->payby =~ /^(CARD|DCRD)$/ ) {
+    $ban .= 'credit card';
+  } elsif (  $cust_main->payby =~ /^(CHEK|DCHK)$/ ) {
+    $ban .= 'ACH account';
+  }
+}
+%>
+
+var confirm_cancel = '<FORM METHOD="POST" ACTION="<%= $p %>misc/cust_main-cancel.cgi"> <INPUT TYPE="hidden" NAME="custnum" VALUE="<%= $custnum %>"> <BR><P ALIGN="center"><B>Permanently delete all services and cancel this customer?</B> <%= $ban%><BR><P ALIGN="CENTER"> <INPUT TYPE="submit" VALUE="Cancel customer">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<INPUT TYPE="BUTTON" VALUE="Don\'t cancel" onClick="cClick()"> </FORM> ';
+
+</SCRIPT>
+
+<% if ( $cust_main->ncancelled_pkgs ) { %>
 
-print qq! | <A HREF="javascript:areyousure('${p}misc/cust_main-cancel.cgi?$custnum', 'Perminantly delete all services and cancel this customer?')">!.
-      'Cancel this customer</A>'
-  if $cust_main->ncancelled_pkgs;
+  | <A HREF="javascript:void(0);" onClick="overlib(confirm_cancel, CAPTION, 'Confirm cancellation', STICKY, AUTOSTATUSCAP, CLOSETEXT, '', MIDX, 0, MIDY, 0, DRAGGABLE, WIDTH, 576, HEIGHT, 128, TEXTSIZE, 3, BGCOLOR, '#ff0000', CGCOLOR, '#ff0000' ); return false; ">Cancel this customer</A>
+
+<% } %>
+
+<%
 
 print qq! | <A HREF="${p}misc/delete-customer.cgi?$custnum">!.
       'Delete this customer</A>'
@@ -109,13 +128,6 @@ Comments
 <% } %>
 
 <BR><BR>
-<%= include('cust_main/order_pkg.html', $cust_main ) %>
-
-<% if ( $conf->config('payby-default') ne 'HIDE' ) { %>
-  <%= include('cust_main/quick-charge.html', $cust_main ) %>
-  <BR>
-<% } %>
-
 <%= include('cust_main/packages.html', $cust_main ) %>
 
 <% if ( $conf->config('payby-default') ne 'HIDE' ) { %>