<% include( 'elements/browse.html', 'title' => 'Discounts', 'name' => 'discounts', 'menubar' => \@menubar, 'query' => \%query, 'order_by_sql' => { description => 'discountnum' }, 'count_query' => 'SELECT COUNT(*) FROM discount', 'disableable' => 1, 'disabled_statuspos' => 1, 'header' => [ 'Name', 'Class', 'Discount', ], 'fields' => [ 'name', 'classname', 'description', ], 'links' => \@links ) %> <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); my @links = ( [ "${p}edit/discount.html?", 'discountnum' ], [ "${p}edit/discount_class.html?", 'classnum' ], ); my %query = ( select => 'discount.*, discount_class.*', table => 'discount', addl_from => 'LEFT JOIN discount_class USING(classnum)', ); my @menubar = ( 'Add a new discount' => $p.'edit/discount.html', 'Discount classes' => $p.'browse/discount_class.html', );