<font size=2 face="sans-serif">Hi Christian!</font>
<br>
<br><font size=2 face="sans-serif">Thanks a lot for your response! This
solved my problem!</font>
<br>
<br><font size=2 face="sans-serif">As we have different lifecycles in place,
I stay with looping through all queues...</font>
<br>
<br>
<br><font size=2 face="sans-serif">Greetings,</font>
<br><font size=2 face="sans-serif">Markus</font>
<br>
<br>
<br>
<br>
<br>
<table width=100%>
<tr valign=top>
<td><font size=1 color=#5f5f5f face="sans-serif">Von:</font>
<td><font size=1 face="sans-serif">Christian Loos <cloos@netcologne.de></font>
<tr valign=top>
<td><font size=1 color=#5f5f5f face="sans-serif">An:</font>
<td><font size=1 face="sans-serif">markus.wildbolz@magna.com, rt-users@lists.bestpractical.com,
</font>
<tr valign=top>
<td><font size=1 color=#5f5f5f face="sans-serif">Datum:</font>
<td><font size=1 face="sans-serif">29.10.2015 15:33</font>
<tr valign=top>
<td><font size=1 color=#5f5f5f face="sans-serif">Betreff:</font>
<td><font size=1 face="sans-serif">Re: Problem with RT::SystemUser in escalatePriority</font></table>
<br>
<hr noshade>
<br>
<br>
<br><tt><font size=2>Am 29.10.2015 um 13:58 schrieb markus.wildbolz@magna.com:<br>
> Hi guys!<br>
> <br>
> Since a couple of days, I have the problem, that my priority escalation<br>
> script doesn't work anymore. Script is attached...<br>
> <br>
> <br>
> <br>
> The error message is:<br>
> <br>
> Name "RT::SystemUser" used only once: possible typo at<br>
> ./rt-escalatePriority line 36.<br>
> Can't locate object method "Deprecated" via package "RT"
at<br>
> /opt/rt4/lib/RT/Interface/CLI.pm line 93.<br>
> <br>
> <br>
> I currently cannot figure out, what's the problem with the mentioned<br>
> line 36:<br>
> <br>
> my $queues = new RT::Queues($RT::SystemUser);<br>
> <br>
> <br>
> Does anybody know this problem?<br>
> <br>
> <br>
> Greetings,<br>
> Markus<br>
<br>
Hi Markus,<br>
<br>
remove the following lines<br>
<br>
---<br>
 package RT;<br>
<br>
 use RT::Interface::CLI qw(CleanEnv);<br>
<br>
 # Clean our the environment<br>
<br>
 CleanEnv();<br>
<br>
 # Load the RT configuration<br>
 RT::LoadConfig();<br>
<br>
<br>
 # Initialise RT<br>
 RT::Init();<br>
<br>
 my $queues = new RT::Queues($RT::SystemUser);<br>
---<br>
<br>
with<br>
<br>
---<br>
use RT::Interface::CLI qw(Init);<br>
Init();<br>
my $queues = RT::Queues->new(RT->SystemUser);<br>
---<br>
<br>
Also, do you have different Lifecycles defined?<br>
If not, then you can use the rt-crontool with<br>
<br>
--search RT::Search::FromSQL<br>
<br>
and a search like<br>
<br>
-search-arg "Status != 'resolved' AND Status != 'rejected'"<br>
<br>
instead if use a Perl script to loop over the queues and then call<br>
rt-crontool from within the Perl script.<br>
<br>
See also the second example in<br>
</font></tt><a href="https://www.bestpractical.com/docs/rt/4.2/automating_rt.html#Escalating-Priority"><tt><font size=2>https://www.bestpractical.com/docs/rt/4.2/automating_rt.html#Escalating-Priority</font></tt></a><tt><font size=2><br>
<br>
Chris<br>
</font></tt>
<br>