diff --git a/lib/admin/Controller/subscriber.pm b/lib/admin/Controller/subscriber.pm index 5dace28..f727282 100644 --- a/lib/admin/Controller/subscriber.pm +++ b/lib/admin/Controller/subscriber.pm @@ -273,6 +273,13 @@ sub detail : Local { $$preferences{$$pref{attribute}} =~ s/\@.*$// if $$preferences{$$pref{attribute}} =~ /^\+?\d+\@/; } + } elsif($$pref{attribute} eq 'ncos') { + my $ncoslvl; + return unless $c->model('Provisioning')->call_prov( $c, 'billing', 'get_ncos_levels', + undef, + \$ncoslvl + ); + $c->stash->{ncos_levels} = $$ncoslvl{result} if eval { @{$$ncoslvl{result}} }; } push @stashprefs, @@ -600,6 +607,14 @@ sub update_preferences : Local { $$preferences{adm_block_in_clir} = $c->request->params->{adm_block_in_clir} ? 1 : undef; + if(defined $c->request->params->{ncos}) { + if(length $c->request->params->{ncos}) { + $$preferences{ncos} = $c->request->params->{ncos}; + } else { + $$preferences{ncos} = undef; + } + } + ### call forwarding ### my $fw_target_select = $c->request->params->{fw_target}; diff --git a/root/tt/subscriber_detail.tt b/root/tt/subscriber_detail.tt index 02f4f50..49c664a 100644 --- a/root/tt/subscriber_detail.tt +++ b/root/tt/subscriber_detail.tt @@ -314,6 +314,27 @@ value="[% preference.value %]" /> + [% ELSIF preference.key == "ncos" %] +