1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
<& /elements/popup_link-cust_main.html,
'action' => $p. 'misc/order_pkg.html',
'label' => $opt{'label'} || emt('Order new package'),
'actionlabel' => $opt{'actionlabel'} || emt('Order new package'),
'color' => '#333399',
'cust_main' => $opt{cust_main},
'prospect_main' => $opt{prospect_main},
'custnum' => $opt{custnum},
'prospectnum' => $opt{prospectnum},
'closetext' => emt('Close'),
'width' => 960, #763,
'height' => $height,
%optional,
&>
<%init>
my(%opt) = @_;
my %optional =
map { $_ => $opt{$_} }
grep $opt{$_},
qw( lock_pkgpart lock_locationnum qualnum quotationnum svcpart );
my $height = $opt{'lock_locationnum'} ? 470 : 740;
</%init>
|
