1 %# some overlap with report_sqlradius_usage_custnum.html
2 <& /elements/header.html, mt($title) &>
4 <FORM ACTION="sqlradius_usage.html" METHOD="GET">
6 <TABLE BGCOLOR="#cccccc" CELLSPACING=0>
8 <& /elements/tr-select-agent.html,
11 #'empty_label' => 'all',
14 %#more future-proof to actually ask all exports if they ->can('usage_sessions')
15 % my @exporttypes = qw( sqlradius sqlradius_withdomain broadband_sqlradius
16 % phone_sqlradius radiator
18 <& /elements/tr-select-table.html,
20 'table' => 'part_export',
21 'name_col' => 'label',
23 'extra_sql' => ' WHERE exporttype IN ( '.
24 join(',', map "'$_'", @exporttypes).
27 'order_by' => 'ORDER BY exportnum',
30 <& /elements/tr-input-beginning_ending.html &>
32 <& /elements/tr-radio.html,
33 'field' => 'combine_svcs',
34 'options' => [ 0, 1 ],
35 'labels' => { 0 => 'Per service',
44 <INPUT TYPE="submit" VALUE="<% mt('Get Report') |h %>">
48 <& /elements/footer.html &>
52 unless $FS::CurrentUser::CurrentUser->access_right('Usage: RADIUS sessions');
55 my $title = 'Data Usage Report';