X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fpart_bill_event.cgi;h=939eff3604349f5fe1f7df04933bbec4400b98c0;hp=41d6666dcd05aa35f578104b3cca592a04a9073c;hb=1fd6d8cf5d7854860ef4fd10ed89828e0c04ec39;hpb=ea0d3938b57a079ce4aa6db0cae316e3ac6da654
diff --git a/httemplate/edit/part_bill_event.cgi b/httemplate/edit/part_bill_event.cgi
index 41d6666dc..939eff360 100755
--- a/httemplate/edit/part_bill_event.cgi
+++ b/httemplate/edit/part_bill_event.cgi
@@ -1,4 +1,4 @@
-
+
<%
@@ -71,42 +71,57 @@ print '
Action | ';
#this is pretty kludgy right here.
tie my %events, 'Tie::IxHash',
- 'Charge a fee' => {
- 'code' => '$cust_main->charge( %%%charge%%%, \'%%%reason%%%\' );',
- 'html' => 'Amount '.
+ 'fee' => {
+ 'name' => 'Late fee',
+ 'code' => '$cust_main->charge( %%%charge%%%, \'%%%reason%%%\' );',
+ 'html' => 'Amount '.
'Reason ',
+ 'weight' => 10,
},
- 'Suspend accounts' => {
- 'code' => '$cust_main->suspend();',
+ 'suspend' => {
+ 'name' => 'Suspend',
+ 'code' => '$cust_main->suspend();',
+ 'weight' => 10,
},
- 'Cancel accounts' => {
- 'code' => '$cust_main->cancel();',
+ 'cancel' => {
+ 'name' => 'Cancel',
+ 'code' => '$cust_main->cancel();',
+ 'weight' => 10,
},
- 'Add postal invoicing' => {
+ 'addpost' => {
+ 'name' => 'Add postal invoicing',
'code' => '$cust_main->invoicing_list_addpost();',
- 'pad' => 10,
+ 'pad' => 20,
+ },
+
+ 'send' => {
+ 'name' => 'Send invoice (email/print)',
+ 'code' => '',
+ 'weight' => 30
},
'Generate invoices' => {
'code' => '$cust_main->bill();',
- 'pad' => 20,
+ 'pad' => 40,
},
'Apply unapplied payments and credits' => {
'code' => '$cust_main->apply_payments; $cust_main->apply_credits;',
- 'pad' => 30,
+ 'pad' => 50,
},
'Collect on invoices' => {
'code' => '$cust_main->collect();',
- 'pad' => 40,
+ 'pad' => 60,
},
;
foreach my $event ( keys %events ) {
- print ntable( "#cccccc", 2). qq! |