event refactor, landing on HEAD!
[freeside.git] / FS / FS / part_event / Action / cust_bill_batch.pm
1 package FS::part_event::Action::cust_bill_batch;
2
3 use strict;
4 use base qw( FS::part_event::Action );
5
6 sub description {
7   'Add card or check to a pending batch';
8 }
9
10 sub deprecated {
11   1;
12 }
13
14 sub eventtable_hashref {
15   { 'cust_bill' => 1 };
16 }
17
18 sub default_weight {
19   40;
20 }
21
22 sub do_action {
23   my( $self, $cust_bill ) = @_;
24
25   #my $cust_main = $self->cust_main($cust_bill);
26   my $cust_main = $cust_bill->cust_main;
27
28   $cust_bill->batch_card; # ( %options ); #XXX options??
29 }
30
31 1;