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 <& /elements/select-part_pkg.html,
22 'empty_label' => emt('Select package'), #? need here in case removed
23 #from select-part_pkg ??
30 my $cust_or_prospect_main = $opt{'cust_main'} || $opt{'prospect_main'}
31 or die "neither cust_main nor prospect_main specified";
33 $opt{'extra_sql'} .= ' AND '. FS::part_pkg->agent_pkgs_sql( $cust_or_prospect_main->agent );