% % my( $refnum, %opt ) = @_; % % $opt{'records'} = delete $opt{'part_referrals'} % if $opt{'part_referrals'}; % % <% include( '/elements/select-table.html', 'table' => 'part_referral', 'name_col' => 'referral', 'value' => $refnum, 'empty_label' => 'Select advertising source', 'hashref' => { 'disabled' => '' }, 'extra_sql' => ' AND '. FS::part_referral->all_part_referral(1), %opt, ) %>