<& /Elements/Header, Title => loc("Assets at a glance"), Refresh => $session{'home_refresh_interval'} &> <& /AssetTracker/Elements/Tabs, current_tab => 'index.html', Title => loc("Asset Tracker") &>
<& /AssetTracker/Elements/Quicksearch &> %#
%#
%#<& /Elements/Refresh, Name => 'HomeRefreshInterval', Default => $session {'home_refresh_interval'} &> %#
%#
<& /AssetTracker/Elements/RecentAssets &>
<%init> if ( $ARGS{'q'} ) { my $query = $ARGS{'q'}; if ( $query =~ m/^(\d+\.\d+\.\d+\.\d+)$/ ) { $m->comp("/AssetTracker/Search/Results.html", Query => "IP = '$query'", AutoForwardSingleResult => 1); return(); } elsif ( $query =~ /^(\d+)$/ ) { my $id = $1; my $asset = RTx::AssetTracker::Asset->new($session{CurrentUser}); $asset->Load($id); if ($asset->Status) { $m->comp("/AssetTracker/Asset/Display.html", id => $id); return; Abort("Asset $id not found"); } } if ($m->comp('/Elements/Callback', _CallbackName => 'SearchPreFilter', query => $query, %ARGS)) { return(); } $m->comp("/AssetTracker/Search/Results.html", Query => "Name LIKE '$query' AND Status != 'retired'", AutoForwardSingleResult => 1); return(); } if ($ARGS{'HomeRefreshInterval'}) { $session{'home_refresh_interval'} = $ARGS{'HomeRefreshInterval'}; }