<%doc> Example: include( '/elements/select-cust-part_pkg.html', #required 'cust_main' => $cust_main, #or 'custnum' ? #strongly recommended (you want your forms to be "sticky" on errors, right?) 'curr_value' => 'current_value', #opt 'part_pkg' => \@records, #select-table.html options ) <& /elements/select-part_pkg.html, 'empty_label' => emt('Select package'), #? need here in case removed #from select-part_pkg ?? %opt, &> <%init> my( %opt ) = @_; my $cust_or_prospect_main = $opt{'cust_main'} || $opt{'prospect_main'} or die "neither cust_main nor prospect_main specified"; $opt{'extra_sql'} .= ' AND '. FS::part_pkg->agent_pkgs_sql( $cust_or_prospect_main->agent );