[freeside-commits] freeside/rt/html/Admin/Users Modify.html, 1.1.1.5, 1.1.1.5.4.1

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/rt/html/Admin/Users
In directory wavetail.420.am:/tmp/cvs-serv27452/html/Admin/Users

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	Modify.html 
Log Message:
part 1 of #1160: associate users w/customers, manual editing

Index: Modify.html
===================================================================
RCS file: /home/cvs/cvsroot/freeside/rt/html/Admin/Users/Modify.html,v
retrieving revision 1.1.1.5
retrieving revision 1.1.1.5.4.1
diff -u -d -r1.1.1.5 -r1.1.1.5.4.1
--- Modify.html	15 Oct 2005 09:10:04 -0000	1.1.1.5
+++ Modify.html	23 Mar 2008 23:39:15 -0000	1.1.1.5.4.1
@@ -103,6 +103,11 @@
 </TABLE>
 <& /Elements/TitleBoxEnd &>
 <br>
+
+<& /Elements/TitleBoxStart, title => loc('Customers') &>
+<& /Elements/EditCustomers, Object => $UserObj, CustomerString=> $CustomerString, ServiceString => $ServiceString &>
+<br>
+
 <& /Elements/TitleBoxStart, title => loc('Access control') &>
 <INPUT TYPE=HIDDEN NAME="SetEnabled" VALUE="1">
 <INPUT TYPE=CHECKBOX NAME="Enabled" VALUE="1" <%$EnabledChecked%>>
@@ -327,6 +332,8 @@
     push (@results, at fieldresults);
     push @results, ProcessObjectCustomFieldUpdates( ARGSRef => \%ARGS, Object => $UserObj );
 
+    #deal with freeside customer links
+    push @results, ProcessObjectCustomers( ARGSRef => \%ARGS, Object => $UserObj );
 
     # {{{ Deal with special fields: Privileged, Enabled
     if  ( $SetPrivileged and $Privileged != $UserObj->Privileged ) {
@@ -418,4 +425,8 @@
 $Pass1 => undef
 $Pass2=> undef
 $Create=> undef
+$OnlySearchForCustomers => undef
+$OnlySearchForServices => undef
+$CustomerString => undef
+$ServiceString => undef
 </%ARGS>