X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=httemplate%2Fbrowse%2Fpart_bill_event.cgi;h=11bc14e5c411932c82a8ce869d11f180ced616f0;hb=9a98d39e3ce40c1f2c324991e8ad469271093fb5;hp=f7c3e03d979f436de46b5064ed8b2c34685f853a;hpb=52281cbeaf8d4e02345eca3c1aa0500133823558;p=freeside.git
diff --git a/httemplate/browse/part_bill_event.cgi b/httemplate/browse/part_bill_event.cgi
index f7c3e03d9..11bc14e5c 100755
--- a/httemplate/browse/part_bill_event.cgi
+++ b/httemplate/browse/part_bill_event.cgi
@@ -1,19 +1,6 @@
-%
-%my %search;
-%if ( $cgi->param('showdisabled') ) {
-% %search = ();
-%} else {
-% %search = ( 'disabled' => '' );
-%}
-%
-%my @part_bill_event = qsearch('part_bill_event', \%search );
-%my $total = scalar(@part_bill_event);
-%
-
-
-<% include("/elements/header.html",'Invoice Event Listing', menubar( 'Main Menu' => $p) ) %>
+<% include('/elements/header.html', 'Invoice Event Listing') %>
- Invoice events are actions taken on open invoices.
+ Invoice events are the deprecated, old-style actions taken on open invoices. Any events still listed here should be migrated to new-style events.
Add a new invoice event
@@ -115,6 +102,21 @@
% }
% }
+<% include('/elements/footer.html') %>
+
+<%init>
+
+die "access denied"
+ unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
+
+my %search;
+if ( $cgi->param('showdisabled') ) {
+%search = ();
+} else {
+%search = ( 'disabled' => '' );
+}
+
+my @part_bill_event = qsearch('part_bill_event', \%search );
+my $total = scalar(@part_bill_event);
-