register_report(
{
category
=>
'Device'
,
tag
=>
'devicebylocation'
,
label
=>
'Inventory by Location'
,
provides_csv
=> 1,
api_endpoint
=> 1,
}
);
get
'/ajax/content/report/devicebylocation'
=> require_login
sub
{
my
@results
= schema(vars->{
'tenant'
})->resultset(
'Device'
)
->columns( [
qw/ ip dns name location vendor model /
] )
->order_by( [
qw/ location name ip vendor model /
] )->hri->all;
return
unless
scalar
@results
;
if
( request->is_ajax ) {
my
$json
= to_json( \
@results
);
template
'ajax/report/devicebylocation.tt'
, {
results
=>
$json
}, {
layout
=>
'noop'
};
}
else
{
header(
'Content-Type'
=>
'text/comma-separated-values'
);
template
'ajax/report/devicebylocation_csv.tt'
,
{
results
=> \
@results
}, {
layout
=>
'noop'
};
}
};
1;