X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fbrowse%2Fpart_bill_event.cgi;h=670474d48873d3f7a95930c9ddef3d52d5ff3bfc;hp=f33997666a64547989c695b20b3dd21e0b4d3335;hb=6d02e527490b2f0cf080f7b519443caeecd76357;hpb=6991d4986df7fb3a6c7c49b5ae1b3713e87a16c4

diff --git a/httemplate/browse/part_bill_event.cgi b/httemplate/browse/part_bill_event.cgi
index f33997666..670474d48 100755
--- 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.1 2002-01-29 16:33:15 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);
@@ -22,21 +24,26 @@ my $total = scalar(@part_bill_event);
       : do { $cgi->param('showdisabled', 1);
              '( <a href="'. $cgi->self_url. '">show disabled events</a> )'; }
 %>
-<TABLE BORDER=1>
+<%= table() %>
   <TR>
     <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>
 
 <% foreach my $part_bill_event ( sort {    $a->payby     cmp $b->payby
                                         || $a->seconds   <=> $b->seconds
+                                        || $a->weight    <=> $b->weight
                                         || $a->eventpart <=> $b->eventpart
                                       } @part_bill_event ) {
      my $url = "${p}edit/part_bill_event.cgi?". $part_bill_event->eventpart;
      use Time::Duration;
-     my $delay = duration_exact($hashref->{seconds});
+     my $delay = duration_exact($part_bill_event->seconds);
+     my $plandata = $part_bill_event->plandata;
+     $plandata =~ s/\n/<BR>/go;
 %>
   <TR>
     <TD><A HREF="<%= $url %>">
@@ -52,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>