projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix ports with dashes (-) not showing their monitoring status, RT#14926
[freeside.git]
/
httemplate
/
elements
/
select-part_referral.html
diff --git
a/httemplate/elements/select-part_referral.html
b/httemplate/elements/select-part_referral.html
index
efcc477
..
114d147
100644
(file)
--- a/
httemplate/elements/select-part_referral.html
+++ b/
httemplate/elements/select-part_referral.html
@@
-1,18
+1,19
@@
-%
-% my( $refnum, %opt ) = @_;
-%
-% $opt{'records'} = delete $opt{'part_referrals'}
-% if $opt{'part_referrals'};
-%
-%
-<% include( '/elements/select-table.html',
+<& /elements/select-table.html,
'table' => 'part_referral',
'name_col' => 'referral',
'value' => $refnum,
'table' => 'part_referral',
'name_col' => 'referral',
'value' => $refnum,
- 'empty_label' =>
'Select advertising source'
,
+ 'empty_label' =>
emt('Select advertising source')
,
'hashref' => { 'disabled' => '' },
'extra_sql' => ' AND '.
'hashref' => { 'disabled' => '' },
'extra_sql' => ' AND '.
- FS::part_referral->a
ll_part_referra
l(1),
+ FS::part_referral->a
cl_agentnum_sq
l(1),
%opt,
%opt,
- )
-%>
+&>
+<%init>
+
+my %opt = @_;
+my $refnum = $opt{'curr_value'} || $opt{'value'};
+
+$opt{'records'} = delete $opt{'part_referrals'}
+ if $opt{'part_referrals'};
+
+</%init>