move "add" links to the top

[freeside.git] / httemplate / browse / part_bill_event.cgi

diff --git a/httemplate/browse/part_bill_event.cgi b/httemplate/browse/part_bill_event.cgi
index cd90bc1..670474d 100755 (executable)
--- a/httemplate/browse/part_bill_event.cgi
+++ b/httemplate/browse/part_bill_event.cgi
@@ -1,4 +1,4 @@
-<!-- $Id: part_bill_event.cgi,v 1.2 2002-01-30 14:18:08 ivan Exp $ -->
+<!-- mason kludge -->
 <% 
 
 my %search;
@@ -15,6 +15,8 @@ my $total = scalar(@part_bill_event);
 <%= header('Invoice Event Listing', menubar( 'Main Menu' => $p) ) %>
 
     Invoice events are actions taken on overdue invoices.<BR><BR>
+<A HREF="<%= $p %>edit/part_bill_event.cgi"><I>Add a new invoice event</I></A>
+<BR><BR>
 <%= $total %> events
 <%= $cgi->param('showdisabled')
       ? do { $cgi->param('showdisabled', 0);
@@ -27,6 +29,8 @@ my $total = scalar(@part_bill_event);
     <TH COLSPAN=<%= $cgi->param('showdisabled') ? 2 : 3 %>>Event</TH>
     <TH>Payby</TH>
     <TH>After</TH>
+    <TH>Action</TH>
+    <TH>Options</TH>
     <TH>Code</TH>
   </TR>
 
@@ -38,6 +42,8 @@ my $total = scalar(@part_bill_event);
      my $url = "${p}edit/part_bill_event.cgi?". $part_bill_event->eventpart;
      use Time::Duration;
      my $delay = duration_exact($part_bill_event->seconds);
+     my $plandata = $part_bill_event->plandata;
+     $plandata =~ s/\n/<BR>/go;
 %>
   <TR>
     <TD><A HREF="<%= $url %>">
@@ -53,13 +59,13 @@ my $total = scalar(@part_bill_event);
     <TD>
       <%= $delay %></TD>
     <TD>
-      <%= $part_bill_event->eventcode %></TD>
+      <%= $part_bill_event->plan %></TD>
+    <TD>
+      <%= $plandata %></TD>
+    <TD><FONT SIZE="-1">
+      <%= $part_bill_event->eventcode %></FONT></TD>
   </TR>
 <% } %>
-
-  <TR>
-    <TD COLSPAN=6><A HREF="<%= $p %>edit/part_bill_event.cgi"><I>Add a new billing event</I></A></TD>
-  </TR>
 </TABLE>
 </BODY>
 </HTML>