event refactor, landing on HEAD!
[freeside.git] / httemplate / elements / select-part_referral.html
1 <% include( '/elements/select-table.html',
2                  'table'       => 'part_referral',
3                  'name_col'    => 'referral',
4                  'value'       => $refnum,
5                  'empty_label' => 'Select advertising source',
6                  'hashref'     => { 'disabled' => '' },
7                  'extra_sql'   => ' AND '.
8                                   FS::part_referral->acl_agentnum_sql(1),
9                  %opt,
10              )
11 %>
12 <%init>
13
14 my %opt = @_;
15 my $refnum = $opt{'curr_value'} || $opt{'value'};
16
17 $opt{'records'} = delete $opt{'part_referrals'}
18   if $opt{'part_referrals'};
19
20 </%init>