implemented ncos preference handling

2.0@2434
Daniel Tiefnig 16 years ago
parent 3f13028ac5
commit 20c1e2c7c7

@ -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};

@ -314,6 +314,27 @@
value="[% preference.value %]" />
</td>
</tr>
[% ELSIF preference.key == "ncos" %]
<tr>
<td class="tdkey">[% preference.key %]:</td>
<td>
[% IF ncos_levels %]
<select size="1" name="[% preference.key %]"
[% IF ! edit_preferences %]class="disabled" disabled="disabled"[% END %] >
<option value="" [% IF preference.value == "" %]
selected="selected"
[% END %]>[% lvl.level %]</option>
[% FOREACH lvl = ncos_levels %]
<option value="[% lvl.level %]"
[% IF preference.value == lvl.level %]selected="selected"[% END %]
>[% lvl.level %]</option>
[% END %]
</select>
[% ELSE %]
[% IF edit_preferences %]no NCOS levels defined[% END %]
[% END %]
</td>
</tr>
[% ELSE %]
<tr>
<td class="tdkey">[% preference.key %]:</td>

Loading…
Cancel
Save