Add access right to view attachments

[freeside.git] / FS / FS / part_event / Condition / cust_bill_has_service.pm

diff --git a/FS/FS/part_event/Condition/cust_bill_has_service.pm b/FS/FS/part_event/Condition/cust_bill_has_service.pm
index be7ea2b..91d75dd 100644 (file)
--- a/FS/FS/part_event/Condition/cust_bill_has_service.pm
+++ b/FS/FS/part_event/Condition/cust_bill_has_service.pm
@@ -32,7 +32,7 @@ sub condition {
   my($self, $cust_bill) = @_;
 
   my $servicenum = $self->option('has_service');
-  grep { $servicenum == $_->svcnum } 
+  grep { $servicenum == $_->svcpart } 
   map { $_->cust_pkg->cust_svc }
   $cust_bill->cust_bill_pkg ;
 }
@@ -45,7 +45,7 @@ sub condition_sql {
      FROM cust_bill_pkg cbp, cust_svc cs
     WHERE cbp.invnum = cust_bill.invnum
       AND cs.pkgnum = cbp.pkgnum
-      AND cs.svcpart = $servicenum
+      AND cs.svcpart = CAST( $servicenum AS integer )
   )
   |;
   return $sql;