This commit was generated by cvs2svn to compensate for changes in r11022,
[freeside.git] / httemplate / edit / cdr_type.cgi
1 <% include('/elements/header.html', { title => 'CDR Types' } ) %>
2 <% include('/elements/menubar.html', 'Rate plans' => "${p}browse/rate.cgi" ) %>
3 <BR><% include('/elements/error.html') %>
4 <BR>
5 CDR types define types of phone usage for billing, such as voice 
6 calls and SMS messages.  Each CDR type must have a set of rates 
7 configured in the rate tables.
8 <BR>
9 <FORM METHOD="POST" ACTION="<% "${p}edit/process/cdr_type.cgi" %>">
10 <% include('/elements/auto-table.html',
11   'header' => [ 'Type#', 'Name' ],
12   'fields' => [ qw( cdrtypenum cdrtypename ) ],
13   'data'   => \@data,
14   ) %>
15 <INPUT TYPE="submit" VALUE="Apply changes"> </FORM> <BR>
16 <% include('/elements/footer.html') %>
17 <%init>
18
19 die "access denied"
20   unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
21
22 my @data = (
23   map { [ $_->cdrtypenum, $_->cdrtypename ] }
24   qsearch({ 
25     'table' => 'cdr_type',
26     'hashref' => {},
27     'order_by' => 'ORDER BY cdrtypenum ASC'
28   })
29 );
30
31 </%init>