X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_event%2FAction%2Fcust_bill_send_with_notice.pm;h=efaa03537faeedf3bb2cc8d84811c1a45b3d78fe;hb=980069e7ae3d87b710c0fd044a06695822437987;hp=10e86e37fb7b835afc601ca822d34a9e9d499f21;hpb=871700058406b65d66bfcf645e4546fafb132246;p=freeside.git diff --git a/FS/FS/part_event/Action/cust_bill_send_with_notice.pm b/FS/FS/part_event/Action/cust_bill_send_with_notice.pm index 10e86e37f..efaa03537 100644 --- a/FS/FS/part_event/Action/cust_bill_send_with_notice.pm +++ b/FS/FS/part_event/Action/cust_bill_send_with_notice.pm @@ -8,7 +8,15 @@ use MIME::Entity; sub description { 'Email a notice to the customer with invoice attached'; } sub eventtable_hashref { - { 'cust_bill' => 1 }; + { + 'cust_main' => 1, + 'cust_bill' => 1, + 'cust_pkg' => 1, + 'cust_pay' => 1, + 'cust_pay_batch' => 1, + 'cust_statement' => 1, + 'svc_acct' => 1, + }; } sub option_fields { @@ -30,10 +38,10 @@ sub option_fields { sub default_weight { 56; } sub do_action { - my( $self, $cust_bill, %opt ) = @_; + my( $self, $cust_bill, $cust_event ) = @_; $cust_bill->set('mode' => $self->option('modenum')); - my %args = ( 'time' => $opt{'time'} ); + my %args = ( 'time' => $cust_event->_date ); my $mimepart = MIME::Entity->build( $cust_bill->mimebuild_pdf(\%args) ); my $msgnum = $self->option('msgnum'); my $msg_template = FS::msg_template->by_key($msgnum)