X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fview%2Fcust_main.cgi;h=8710dd19d7bea1d8d0d8afe46370bcffa77237ff;hp=e84fa07568d5600531622840c85df054703ac2c6;hb=cf16b23820da69e3c8d0156ae27e21c635bf1ec5;hpb=fee9bc7edcdd27e7a4e47bc313d05c66cd900073
diff --git a/httemplate/view/cust_main.cgi b/httemplate/view/cust_main.cgi
index e84fa0756..8710dd19d 100755
--- a/httemplate/view/cust_main.cgi
+++ b/httemplate/view/cust_main.cgi
@@ -1,5 +1,5 @@
<%
-#
+#
use strict;
use vars qw ( $cgi $query $custnum $cust_main $hashref $agent $referral
@@ -268,8 +268,11 @@ print '
'.
foreach my $type_pkgs ( qsearch('type_pkgs',{'typenum'=> $agent->typenum }) ) {
my $pkgpart = $type_pkgs->pkgpart;
- my $part_pkg = qsearchs('part_pkg', { 'pkgpart' => $pkgpart } )
- or do { warn "unknown type_pkgs.pkgpart $pkgpart"; next; };
+# my $part_pkg = qsearchs('part_pkg', { 'pkgpart' => $pkgpart } )
+# or do { warn "unknown type_pkgs.pkgpart $pkgpart"; next; };
+ my $part_pkg =
+ qsearchs('part_pkg', { 'pkgpart' => $pkgpart, 'disabled' => '' } )
+ or next;
print qq!