httemplate/search/report_sqlradius_usage.html

   1 %# some overlap with report_sqlradius_usage_custnum.html
   2 <& /elements/header.html, mt($title) &>
   3
   4 <FORM ACTION="sqlradius_usage.html" METHOD="GET">
   5
   6 <TABLE BGCOLOR="#cccccc" CELLSPACING=0>
   7
   8 <& /elements/tr-select-agent.html,
   9   'multiple'      => 1,
  10   'disable_empty' => 1,
  11   #'empty_label'   => 'all',
  12 &>
  13
  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
  17 %                     );
  18 <& /elements/tr-select-table.html,
  19   'label'         => 'Export',
  20   'table'         => 'part_export',
  21   'name_col'      => 'label',
  22   'hashref'       => {},
  23   'extra_sql'     => ' WHERE exporttype IN ( '.
  24                                             join(',', map "'$_'", @exporttypes).
  25                                           ')',
  26   'multiple'      => 1,
  27   'order_by'      => 'ORDER BY exportnum',
  28 &>
  29
  30 <& /elements/tr-input-beginning_ending.html &>
  31
  32 <& /elements/tr-radio.html,
  33   'field'         => 'combine_svcs',
  34   'options'       => [ 0, 1 ],
  35   'labels'        => { 0 => 'Per service',
  36                        1 => 'Per package',
  37                      },
  38   'curr_value'    => 0,
  39 &>
  40
  41 </TABLE>
  42
  43 <BR>
  44 <INPUT TYPE="submit" VALUE="<% mt('Get Report') |h %>">
  45
  46 </FORM>
  47
  48 <& /elements/footer.html &>
  49 <%init>
  50
  51 die "access denied"
  52   unless $FS::CurrentUser::CurrentUser->access_right('Usage: RADIUS sessions');
  53   # yes?
  54
  55 my $title = 'Data Usage Report';
  56
  57 </%init>