<% include('tr-td-label.html', @_ ) %> % if ( $use_selector && $opt{'curr_value'} ne '' && ! $can_edit ) { ><% $opt{'formatted_value'} || $opt{'curr_value'} || $opt{'value'} |h %> <% include('hidden.html', %opt ) %> % } else { > <% include('/elements/select-did.html', %opt ) %> % } <%init> my %opt = @_; #warn Dumper(\%opt); if $DEBUG; my $cell_style = $opt{'cell_style'} ? 'STYLE="'. $opt{'cell_style'}. '"' : ''; #false laziness w/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 $can_edit = scalar(@exports) && $exports[0]->get_dids_can_edit;