port skinning, customer display/edit from RT 3.6 integration to RT 3.8 integration

7 files changed, 0 insertions, 220 deletions

diff --git a/rt/html/Elements/AddCustomers b/rt/html/Elements/AddCustomers
deleted file mode 100644
index aaf8ca8ba..000000000
--- a/rt/html/Elements/AddCustomers
+++ /dev/null
@@ -1,59 +0,0 @@
-%# Copyright (c) 2004 Ivan Kohler <ivan-rt@420.am>
-%# Copyright (c) 2008 Freeside Internet Services, Inc.
-%# 
-%# This work is made available to you under the terms of Version 2 of
-%# the GNU General Public License. A copy of that license should have
-%# been provided with this software, but in any event can be snarfed
-%# from www.gnu.org.
-%# 
-%# This work is distributed in the hope that it will be useful, but
-%# WITHOUT ANY WARRANTY; without even the implied warranty of
-%# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-%# General Public License for more details.
-<BR>
-<%$msg%><br>
-
-% if (@Customers) {
-
-<br><i>(Check box to link)<i>
-<table>
-% foreach my $customer (@Customers) {
-<tr>
-  <td>
-    <input type="checkbox" name="Object-AddCustomer-<% $customer->{'custnum'} %>" VALUE="1" <% scalar(@Customers) == 1 ? 'CHECKED' : '' %>>
-    <A HREF="<%$freeside_url%>/view/cust_main.cgi?<% $customer->{'custnum'} %>"><% &RT::URI::freeside::small_custview($customer->{'custnum'}, &RT::URI::freeside::FreesideGetConfig('countrydefault'), 1) |n %>
-  </td>
-</tr>
-% }
-</table>
-
-% }
-
-<%INIT>
-my ($msg);
-
-my $freeside_url = &RT::URI::freeside::FreesideURL();
-
-warn "/Elements/AddCustomers called with CustomerString $CustomerString\n"
-  if $Debug;
-
-my @Customers = ();
-if ( $CustomerString ) {
-    @Customers = &RT::URI::freeside::smart_search( 'search' => $CustomerString );
-}
-
-my @Services = ();
-if ($ServiceString) {
-    @Services = (); #service_search();
-}
-
-warn "/Elements/AddCustomers displaying ". scalar(@Customers). " customers\n"
-  if $Debug;
-
-</%INIT>
-
-<%ARGS>
-$CustomerString => undef
-$ServiceString => undef
-$Debug => 0
-</%ARGS>
diff --git a/rt/html/Elements/EditCustomers b/rt/html/Elements/EditCustomers
deleted file mode 100644
index 68efb5f40..000000000
--- a/rt/html/Elements/EditCustomers
+++ /dev/null
@@ -1,63 +0,0 @@
-%# Copyright (c) 2004 Ivan Kohler <ivan-rt@420.am>
-%# Copyright (c) 2008 Freeside Internet Services, Inc.
-%# 
-%# This work is made available to you under the terms of Version 2 of
-%# the GNU General Public License. A copy of that license should have
-%# been provided with this software, but in any event can be snarfed
-%# from www.gnu.org.
-%# 
-%# This work is distributed in the hope that it will be useful, but
-%# WITHOUT ANY WARRANTY; without even the implied warranty of
-%# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-%# General Public License for more details.
-<TABLE width=100%>
-  <TR>
-    <TD VALIGN=TOP WIDTH=50%>
-      <h3><&|/l&>Current Customers</&></h3>
-
-<table>
-  <tr>
-    <td><i><&|/l&>(Check box to disassociate)</&></i></td>
-  </tr>
-  <tr>
-    <td class="value">
-% foreach my $link ( @{ $Object->Customers->ItemsArrayRef } ) {
-
-      <INPUT TYPE=CHECKBOX NAME="DeleteLink--<%$link->Type%>-<%$link->Target%>">
-%#        <& ShowLink, URI => $link->TargetURI &><br>
-        <A HREF="<% $link->TargetURI->Resolver->HREF %>"><% $link->TargetURI->Resolver->AsStringLong |n %></A>
-      <BR>
-% }
-    </td>
-  </tr>
-</table>
-			    
-</TD>
-
-<TD VALIGN=TOP>
-<h3><&|/l&>New Customer Links</&></h3>
-<&|/l&>Find customer</&><BR>
-<input name="CustomerString">
-<input type=submit name="OnlySearchForCustomers" value="<&|/l&>Go!</&>">
-<br><i>cust #, name, company or phone</i>
-<BR>
-%#<BR>
-%#<&|/l&>Find service</&><BR>
-%#<input name="ServiceString">
-%#<input type=submit name="OnlySearchForServices" value="<&|/l&>Go!</&>">
-%#<br><i>username, username@domain, domain, or IP address</i>
-%#<BR>
-
-<& AddCustomers, Object         => $Object,
-                 CustomerString => $CustomerString,
-                 ServiceString  => $ServiceString,  &>
-
-</TD>
-</TR>
-</TABLE>
-      
-<%ARGS>
-$CustomerString => undef
-$ServiceString => undef
-$Object => undef
-</%ARGS>
diff --git a/rt/html/Elements/FreesideInvoiceSearch b/rt/html/Elements/FreesideInvoiceSearch
deleted file mode 100644
index 3842b2ff9..000000000
--- a/rt/html/Elements/FreesideInvoiceSearch
+++ /dev/null
@@ -1,20 +0,0 @@
-% if ( $FS::CurrentUser::CurrentUser->access_right('View invoices') ) {
-
-  <form action="<% $RT::URI::freeside::URL %>/search/cust_bill.html" STYLE="margin:0">
-      <SCRIPT TYPE="text/javascript">
-        function clearhint_search_invoice (what) {
-          if ( what.value == '(inv #)' )
-            what.value = '';
-        }
-      </SCRIPT>
-  <input name="invnum" accesskey="0" VALUE="(inv #)" SIZE="4" onFocus="clearhint_search_invoice(this);" onClick="clearhint_search_invoice(this);" STYLE="text-align:right; margin-bottom:1px; font-family: Arial, Verdana, Helvetica, sans-serif;">
-  
-% if ( $FS::CurrentUser::CurrentUser->access_right('List invoices') ) {
-  <A HREF="<% $RT::URI::freeside::URL %>search/report_cust_bill.html" STYLE="color: #ffffff; font-size: 70%; font-weight:normal">Advanced</A>
-% } 
-  <BR>
-  
-  <input type="submit" value="<&|/l&>Search invoices</&>" CLASS="fsblackbutton" onMouseOver="this.className='fsblackbuttonselected'; return true;" onMouseOut="this.className='fsblackbutton'; return true;" STYLE="font-size:70%">
-  </form>
-
-% }
diff --git a/rt/html/Elements/FreesideNewCust b/rt/html/Elements/FreesideNewCust
deleted file mode 100644
index f60e99559..000000000
--- a/rt/html/Elements/FreesideNewCust
+++ /dev/null
@@ -1,3 +0,0 @@
-<form action="<% $RT::URI::freeside::URL %>/edit/cust_main.cgi" STYLE="margin:0">
-<INPUT TYPE="submit" VALUE="<&|/l&>New customer</&>" CLASS="fsblackbutton" onMouseOver="this.className='fsblackbuttonselected'; return true;" onMouseOut="this.className='fsblackbutton'; return true;" STYLE="vertical-align:bottom; font-size:100%">&nbsp;
-</FORM>
diff --git a/rt/html/Elements/FreesideSearch b/rt/html/Elements/FreesideSearch
deleted file mode 100644
index 8e609bb4b..000000000
--- a/rt/html/Elements/FreesideSearch
+++ /dev/null
@@ -1,13 +0,0 @@
-% if ( $FS::CurrentUser::CurrentUser->access_right('List customers') ) {
-<form action="<% $RT::URI::freeside::URL %>/search/cust_main.cgi" STYLE="margin:0">
-    <SCRIPT TYPE="text/javascript">
-      function clearhint_search_cust (what) {
-        if ( what.value == '(cust #, name, company or phone)' )
-          what.value = '';
-      }
-    </SCRIPT>
-<input name="search_cust" accesskey="0" VALUE="(cust #, name, company or phone)" SIZE="28" onFocus="clearhint_search_cust(this);" onClick="clearhint_search_cust(this);" STYLE="text-align:right; font-family: Arial, Verdana, Helvetica, sans-serif;"><BR>
-<A HREF="<% $RT::URI::freeside::URL %>/search/report_cust_main.html" STYLE="color: #ffffff; font-size: 70%; font-weight:normal">Advanced</A>
-<input type="submit" value="<&|/l&>Search customers</&>" CLASS="fsblackbutton" onMouseOver="this.className='fsblackbuttonselected'; return true;" onMouseOut="this.className='fsblackbutton'; return true;" STYLE="font-size:70%">
-</form>
-% }
diff --git a/rt/html/Elements/FreesideSvcSearch b/rt/html/Elements/FreesideSvcSearch
deleted file mode 100644
index d68122da5..000000000
--- a/rt/html/Elements/FreesideSvcSearch
+++ /dev/null
@@ -1,13 +0,0 @@
-% if ( $FS::CurrentUser::CurrentUser->access_right('View customer services') ) {
-<form action="<% $RT::URI::freeside::URL %>/search/cust_svc.html" STYLE="margin:0">
-    <SCRIPT TYPE="text/javascript">
-      function clearhint_search_svc (what) {
-        if ( what.value == '(user, user@domain or domain)' )
-          what.value = '';
-      }
-    </SCRIPT>
-<input name="search_svc" accesskey="0" VALUE="(user, user@domain or domain)" SIZE="26" onFocus="clearhint_search_svc(this);" onClick="clearhint_search_svc(this);" STYLE="text-align:right; font-family: Arial, Verdana, Helvetica, sans-serif;"><BR>
-            <A NOTYET="<% $RT::URI::freeside::URL %>search/svc_Smarter.html" STYLE="color: #000000; font-size: 70%; font-weight:normal">Advanced</A>
-<input type="submit" value="<&|/l&>Search services</&>" CLASS="fsblackbutton" onMouseOver="this.className='fsblackbuttonselected'; return true;" onMouseOut="this.className='fsblackbutton'; return true;" STYLE="font-size:70%">
-</form>
-% }
diff --git a/rt/html/Ticket/ModifyCustomers.html b/rt/html/Ticket/ModifyCustomers.html
deleted file mode 100644
index 72d103b23..000000000
--- a/rt/html/Ticket/ModifyCustomers.html
+++ /dev/null
@@ -1,49 +0,0 @@
-%# Copyright (c) 2004 Ivan Kohler <ivan-rt@420.am>
-%#
-%# This work is made available to you under the terms of Version 2 of
-%# the GNU General Public License. A copy of that license should have
-%# been provided with this software, but in any event can be snarfed
-%# from www.gnu.org.
-%# 
-%# This work is distributed in the hope that it will be useful, but
-%# WITHOUT ANY WARRANTY; without even the implied warranty of
-%# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-%# General Public License for more details.
-<& /Elements/Header, Title => loc("Customers for ticket #[_1]", $Ticket->Id) &>
-<& /Ticket/Elements/Tabs, 
-    Ticket => $Ticket, 
-    current_tab => "Ticket/ModifyCustomers.html?id=".$Ticket->Id, 
-    Title => loc("Customers for ticket #[_1]", $Ticket->Id) &>
-
-<& /Elements/ListActions, actions => \@results &>
-
-<form action="ModifyCustomers.html" method="post">
-<input type="hidden" name="id" value="<%$Ticket->id%>">
-
-<& /Elements/TitleBoxStart, title => loc('Edit Customer Links'), color => "#7f007b"&>
-<& Elements/EditCustomers, Ticket => $Ticket, CustomerString => $CustomerString, ServiceString => $ServiceString &>
-<& /Elements/TitleBoxEnd &>
-<& /Elements/Submit, color => "#7f007b", Label => loc('Save Changes') &>
-</form>
-
-
-<%INIT>
-
-my @results = ();
-my $Ticket = LoadTicket($id);
-
-# if we're trying to search for customers/services and nothing else
-unless ( $OnlySearchForCustomers || $OnlySearchForServices) {
-   @results = ProcessTicketCustomers( TicketObj => $Ticket, ARGSRef => \%ARGS);
-}
-    
-</%INIT>
-
-
-<%ARGS>
-$OnlySearchForCustomers => undef
-$OnlySearchForServices => undef
-$CustomerString => undef
-$ServiceString => undef
-$id => undef
-</%ARGS>