( $setup ? time2str("%D",$setup) : "(Not setup)" ), '</TD></TR>';
print '<TR><TD ALIGN="right">Last bill date</TD><TD BGCOLOR="#ffffff">',
- ( $cust_pkg->last_bill ? time2str("%D",$cust_pkg->last_bill) : " " ),
+ ( $cust_pkg->get('last_bill') ? time2str("%D",$cust_pkg->get('last_bill')) : " " ),
'</TD></TR>'
if $cust_pkg->dbdef_table->column('last_bill');
#list of services this pkgpart includes
my $pkg_svc;
- my %pkg_svc = ();
- foreach $pkg_svc ( qsearch('pkg_svc',{'pkgpart'=> $cust_pkg->pkgpart }) ) {
+ my %pkg_svc;
+ #foreach $pkg_svc ( qsearch('pkg_svc',{'pkgpart'=> $cust_pkg->pkgpart }) ) {
+ foreach $pkg_svc ( $cust_pkg->part_pkg->pkg_svc ) {
$pkg_svc{$pkg_svc->svcpart} = $pkg_svc->quantity if $pkg_svc->quantity;
}