[SOLVED] Auto-list companies

[HervE]

Hello,

I noticed someting new in OTRS 3.x.
When you click on Customers, the Search textbox is already filled with *, and thus the list of customers automatically appears.
It is good. Or maybe not. That's not the question.

Strange is, the behaviour is not the same with Companies. Why?
How can I configure it to auto-list, just like Customers?

Additionally, is it possible to disable auto-list for Customers, or to prefill the textbox with another value?

Regards,
HervE

[HervE]

I managed to do it in Kernel\Modules\AdminCustomerCompany.pm.

(Except the star doesn't come in the search textbox.)

HervE

[Joool]

Here's the actual code you'll have to add:

Code: Select all

sub _Overview {
    my ( $Self, %Param ) = @_;
    my $Search = $Self->{ParamObject}->GetParam( Param => 'Search' ) || '';
$Search
        ||= $Self->{ConfigObject}->Get('AdminCustomerUser::RunInitialWildcardSearch') ? '*' : '';

my $Output = '';

[HervE]

Hi Joool,

I'm getting a fatal error:
[Tue Oct 18 17:02:54 2011][Error][Kernel::System::Web::InterfaceAgent::Run][188] Global symbol "$Search" requires explicit package name at C:/PROGRA~1/OTRS/OTRS//Kernel/Modules/AdminCustomerCompany.pm line 402.

For information, what I did is:

Code: Select all

sub _Overview {
    my ( $Self, %Param ) = @_;
    #my $Search = $Self->{ParamObject}->GetParam( Param => 'Search' ) || '';
    my $Search = $Param{Search} || $Self->{ParamObject}->GetParam( Param => 'Search' ) || '';
    my $Output = '';

And it works... except the star doesn't come in the search textbox, like I said.

Regards,
HervE

[thoqui]

Hello,

I'm working on 3.3.8.
I wish auto-list for companies, I added a code in Kernel\Modules\AdminCustomerCompany.pm but it doesn't work.

This is the code :

Code: Select all

sub Run {
    my ( $Self, %Param ) = @_;

    my $Nav = $Self->{ParamObject}->GetParam( Param => 'Nav' ) || 0;
    my $NavigationBarType = $Nav eq 'Agent' ? 'Companies' : 'Admin';
    my $Search = $Self->{ParamObject}->GetParam( Param => 'Search' );
    $Search
        ||= $Self->{ConfigObject}->Get('AdminCustomerCompany::RunInitialWildcardSearch') ? '*' : '';

Thanks for your help.

Thomas