<TH CLASS="grid" BGCOLOR="#cccccc">Services</TH>
</TR>
+% $FS::cust_pkg::DEBUG = 2;
% foreach my $cust_pkg (@$packages) {
%
% if ( $bgcolor eq $bgcolor1 ) {
% $bgcolor = $bgcolor1;
% }
%
+% $cust_pkg->{'_pkgpart'} = new FS::part_pkg { $cust_pkg->hash }; #quelle klud
+%
% my %iopt = (
% 'bgcolor' => $bgcolor,
% 'cust_pkg' => $cust_pkg,
% 'part_pkg' => $cust_pkg->part_pkg,
% %conf_opt,
% );
+%
<!--pkgnum: <% $cust_pkg->pkgnum %>-->
<TR>
$method = 'all_pkgs';
}
- my @packages = $cust_main->$method();
+ my @packages = $cust_main->$method( {
+ 'select' => 'cust_pkg.*, part_pkg.*',
+ 'addl_from' => 'LEFT JOIN part_pkg USING ( pkgpart )'
+ } );
my $num_old_packages = scalar(@packages);
unless ( $cgi->param('showoldpackages') ) {