fix incompatibility w/invoice_sections vs. cust_bill_pkg.pkgnum -1 "virtual line item" (rare)

1 files changed, 5 insertions, 2 deletions

diff --git a/FS/FS/cust_bill_pkg_display.pm b/FS/FS/cust_bill_pkg_display.pm
index cf70cbd..e9da18d 100644
--- a/FS/FS/cust_bill_pkg_display.pm
+++ b/FS/FS/cust_bill_pkg_display.pm
@@ -54,8 +54,11 @@ sub section {
   } else {
     my $section = $self->getfield('section');
     unless ($section) {
-      my $part_pkg = $self->cust_bill_pkg->part_pkg;
-      $section = $part_pkg->categoryname if $part_pkg;
+      my $cust_bill_pkg = $self->cust_bill_pkg;
+      if ( $cust_bill_pkg->pkgnum > 0 ) {
+        my $part_pkg = $cust_bill_pkg->part_pkg;
+        $section = $part_pkg->categoryname if $part_pkg;
+      }
     }
     $section;
   }