# other special stuff:
# FCC voice class (VoIP OTT, VoIP + broadband, Wholesale VoIP, Local
# Exchange) and DS0 equivalent lines
- my $sessions = $part_pkg->fcc_ds0s || 1;
+ my $sessions = $part_pkg->fcc_ds0s;
- if ($part_pkg->fcc_voip_class == 1) {
- # VoIP OTT (connection not included)
- push @fcc_opts, 'is_voip' => 1, 'voip_ott' => 1,
- 'voip_sessions' => $sessions;
- } elsif ( $part_pkg->fcc_voip_class == 2) {
- # VoIP non-OTT; do not set is_broadband since the connection is not
- # necessarily general Internet access
- push @fcc_opts, 'is_voip' => 1,
- 'voip_sessions' => $sessions;
- } elsif ( $part_pkg->fcc_voip_class == 3 ) {
- # wholesale VoIP; apparently no longer reportable?
- } else {
- # local exchange telephone
- push @fcc_opts, 'is_phone' => 1,
- 'phone_lines' => $sessions;
+ if ( $sessions ) { # then this is a voice package of some kind
+ if ($part_pkg->fcc_voip_class == 1) {
+ # VoIP OTT (connection not included)
+ push @fcc_opts, 'is_voip' => 1, 'voip_ott' => 1,
+ 'voip_sessions' => $sessions;
+ } elsif ( $part_pkg->fcc_voip_class == 2) {
+ # VoIP non-OTT; do not set is_broadband since the connection is not
+ # necessarily general Internet access
+ push @fcc_opts, 'is_voip' => 1,
+ 'voip_sessions' => $sessions;
+ } elsif ( $part_pkg->fcc_voip_class == 3 ) {
+ # wholesale VoIP; apparently no longer reportable?
+ } else {
+ # local exchange telephone
+ push @fcc_opts, 'is_phone' => 1,
+ 'phone_lines' => $sessions;
+ }
}
my %fcc_opts = @fcc_opts;
my $addl_from =
FS::Report::FCC_477::join_optionnames(@optionnames);
-$cgi->param('classnum', $classnum) if length($classnum);
-
my $link = [ $p.'edit/part_pkg.cgi?', 'pkgpart' ];
my @header = ( '#', 'Package', 'Comment' );
}
</SCRIPT>!;
+# restore this only after creating $html_form
+$cgi->param('classnum', $classnum) if length($classnum);
+
my $html_foot = qq!
<INPUT TYPE="submit" VALUE="Save changes">
</FORM>!;