So I was finally able to achieve this by modifying the following pieces of code:
Keep in mind I am using version 3.0
1.) in System/Customeruser.pm I added a "declaration line"
=item CustomerSearch()
to search users
my %List = $CustomerUserObject->CustomerSearch(
Search => '*some*', # also 'hans+huber' possible
Valid => 1, # not required, default 1
User => 3, //************this line was added
);
my %List = $CustomerUserObject->CustomerSearch(
UserLogin => '*some*',
Valid => 1, # not required, default 1
User => 3, //************this line was added
);
my %List = $CustomerUserObject->CustomerSearch(
PostMasterSearch => '
email@example.com',
Valid => 1, # not required, default 1
User => 3, //************this line was added
);
=cut
2.) in Modules/AdminCustomeruser.pm
I modified the call to CustomerSearch and added the line: User => $Self->{UserID},
The result looks like:
if ( $Param{Search} ) {
my %List = $Self->{CustomerUserObject}->CustomerSearch(
Search => $Param{Search},
Valid => 0,
User => $Self->{UserID},
3.) Then in System/CustomeruSer.DB.pm
I added the following line that I stated in my earlier post.
$SQL .= " FROM $Self->{CustomerTable} WHERE create_by='".$Param{User}."' AND ";
Let me know if you have questions.