5 include( '/elements/select-cust-part_pkg.html',
8 'cust_main' => $cust_main, #or 'custnum' ?
10 #strongly recommended (you want your forms to be "sticky" on errors, right?)
11 'curr_value' => 'current_value',
14 'part_pkg' => \@records,
16 #select-table.html options
21 <% include( '/elements/select-part_pkg.html',
22 'empty_label' => 'Select package', #? need here in case removed
23 #from select-part_pkg ??
31 my $cust_main = $opt{'cust_main'}
32 or die "cust_main not specified";
34 $opt{'extra_sql'} .= ' AND '. FS::part_pkg->agent_pkgs_sql( $cust_main->agent );
35 # ' AND ( agentnum IS NOT NULL '.
36 # ' OR 0 < ( SELECT COUNT(*) FROM type_pkgs '.
37 # ' WHERE typenum = '. $cust_main->agent->typenum.
38 # ' AND type_pkgs.pkgpart = part_pkg.pkgpart )'.