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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
|
<%doc>
Example:
include('/elements/select-did.html',
'field' => 'phonenum',
'svcpart' => 5,
#OR
'object' => $svc_phone,
);
</%doc>
% if ( $use_selector ) {
<TABLE>
<TR>
<TD>
<% include('/elements/select-state.html',
'country' => $country,
'disable_empty' => 0,
'empty_label' => 'Select state',
)
%>
</TD>
<TD>
<% include('/elements/select-areacode.html',
'svcpart' => $svcpart,
'empty' => 'Select area code',
)
%>
</TD>
<TD>
<% include('/elements/select-exchange.html',
'svcpart' => $svcpart,
'empty' => 'Select exchange',
)
%>
</TD>
<TD>
<% include('/elements/select-phonenum.html',
'svcpart' => $svcpart,
'empty' => 'Select phone number',
)
%>
</TD>
</TR>
<TR>
<TD><FONT SIZE="-1">State</FONT></TD>
<TD><FONT SIZE="-1">Area code</FONT></TD>
<TD><FONT SIZE="-1">City / Exchange</FONT></TD>
<TD><FONT SIZE="-1">Phone number</FONT></TD>
</TR>
</TABLE>
% } else {
<% include( '/elements/input-text.html', %opt, 'type'=>'text' ) %>
% }
<%init>
my %opt = @_;
my $conf = new FS::Conf;
my $country = $conf->config('countrydefault') || 'US';
#false laziness w/tr-select-did.html
#XXX make sure this comes through on errors too
my $svcpart = $opt{'svcpart'}
|| $opt{'object'}->svcpart
|| $opt{'object'}->cust_svc->svcpart;
my $part_svc = qsearchs('part_svc', { 'svcpart'=>$svcpart } );
die "unknown svcpart $svcpart" unless $part_svc;
my @exports = $part_svc->part_export_did;
if ( scalar(@exports) > 1 ) {
die "more than one DID-providing export attached to svcpart $svcpart";
}
my $use_selector = scalar(@exports) ? 1 : 0;
</%init>
|
