
7 Nov
2011
7 Nov
'11
8:41 a.m.
On Saturday 05 November 2011 18:13:51 Michiel Beijen wrote: Hi Mike,
Why do you think that these loops are still required: 119 my %StandardResponseData 120 = $Self->{StandardResponseObject}->StandardResponseList( Valid => 1 ); 121 for my $StandardResponseID ( keys %StandardResponseData ) { 122 my $Active = 0; 123 for my $QueueID (@IDs) { 124 next if $QueueID ne $StandardResponseID; 125 $Active = 1; 126 last; 127 } 159 my %QueueData = $Self->{QueueObject}->QueueList( Valid => 1 ); 160 for my $QueueID ( keys %QueueData ) { 161 my $Active = 0; 162 for my $StandardResponseID (@IDs) { 163 next if $StandardResponseID ne $QueueID; 164 $Active = 1; 165 last; 166 } Regards, Jens