diff options
Diffstat (limited to 'httemplate/elements/select-did.html')
-rw-r--r-- | httemplate/elements/select-did.html | 91 |
1 files changed, 91 insertions, 0 deletions
diff --git a/httemplate/elements/select-did.html b/httemplate/elements/select-did.html new file mode 100644 index 0000000..b62d6a0 --- /dev/null +++ b/httemplate/elements/select-did.html @@ -0,0 +1,91 @@ +<%doc> + +Example: + + include('/elements/select-did.html', + #can't actuall change from phonenum yet# 'field' => 'phonenum', + + 'svcpart' => 5, + #OR + 'object' => $svc_phone, + ); + +</%doc> +% if ( $use_selector ) { + + <TABLE> + + <TR> + <TD> + <% include('/elements/select-state.html', + 'prefix' => 'phonenum_', #$field.'_', + 'country' => $country, + 'disable_empty' => 0, + 'empty_label' => 'Select state', + ) + %> + </TD> + <TD> + <% include('/elements/select-areacode.html', + 'state_prefix' => 'phonenum_', #$field.'_', + '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; + +#my $field = $opt{'field'} || 'phonenum'; + +</%init> |