[freeside-commits] branch FREESIDE_4_BRANCH updated. d0a592d22b43b8d884c85a74364bc0366127cee2
Christopher Burger
burgerc at freeside.biz
Tue Apr 3 11:22:19 PDT 2018
The branch, FREESIDE_4_BRANCH has been updated
via d0a592d22b43b8d884c85a74364bc0366127cee2 (commit)
from 4238deb67701a30d328d4b032a907de208491de1 (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit d0a592d22b43b8d884c85a74364bc0366127cee2
Author: Christopher Burger <burgerc at freeside.biz>
Date: Tue Apr 3 12:04:43 2018 -0400
RT 37817 - created new billing event condition, invoice has not been sent.
diff --git a/FS/FS/part_event/Condition/invoice_has_not_been_sent.pm b/FS/FS/part_event/Condition/invoice_has_not_been_sent.pm
new file mode 100644
index 000000000..882762dfe
--- /dev/null
+++ b/FS/FS/part_event/Condition/invoice_has_not_been_sent.pm
@@ -0,0 +1,41 @@
+package FS::part_event::Condition::invoice_has_not_been_sent;
+
+use strict;
+use FS::Record qw( qsearchs );
+use FS::cust_bill;
+use Time::Local 'timelocal';
+
+use base qw( FS::part_event::Condition );
+
+sub description {
+ 'Invoice has not been sent previously';
+}
+
+sub eventtable_hashref {
+ { 'cust_main' => 0,
+ 'cust_bill' => 1,
+ 'cust_pkg' => 0,
+ };
+}
+
+sub condition {
+ my($self, $cust_bill, %opt) = @_;
+
+ my $event = qsearchs( {
+ 'table' => 'cust_event',
+ 'addl_from' => 'LEFT JOIN part_event USING ( eventpart )',
+ 'hashref' => {
+ 'tablenum' => $cust_bill->{Hash}->{invnum},
+ 'eventtable' => 'cust_bill',
+ 'status' => 'done',
+ },
+ 'order_by' => " LIMIT 1",
+ } );
+
+ return 0 if $event;
+
+ 1;
+
+}
+
+1;
\ No newline at end of file
-----------------------------------------------------------------------
Summary of changes:
.../Condition/invoice_has_not_been_sent.pm | 41 ++++++++++++++++++++++
1 file changed, 41 insertions(+)
create mode 100644 FS/FS/part_event/Condition/invoice_has_not_been_sent.pm
More information about the freeside-commits
mailing list