From: Christopher Burger Date: Tue, 31 Jul 2018 14:29:19 +0000 (-0400) Subject: RT# 78356 - made status bar more responsive on export. Changed svc update to only... X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=a354fed1dedc65cf62e63d940e1cfb9c4364e6d3 RT# 78356 - made status bar more responsive on export. Changed svc update to only happen when up and down speeds change. --- diff --git a/FS/FS/part_export/saisei.pm b/FS/FS/part_export/saisei.pm index 617a73226..c79f79dac 100644 --- a/FS/FS/part_export/saisei.pm +++ b/FS/FS/part_export/saisei.pm @@ -830,7 +830,7 @@ sub export_provisioned_services { my $svc_count = scalar @svcs; my %status = {}; - for (my $c=10; $c <=100; $c=$c+10) { $status{int($svc_count * ($c/100))} = $c; } + for (my $c=1; $c <=100; $c=$c+1) { $status{int($svc_count * ($c/100))} = $c; } my $process_count=0; foreach my $svc (@svcs) { diff --git a/httemplate/edit/process/part_pkg.cgi b/httemplate/edit/process/part_pkg.cgi index 6bab20278..5beb03411 100755 --- a/httemplate/edit/process/part_pkg.cgi +++ b/httemplate/edit/process/part_pkg.cgi @@ -209,6 +209,7 @@ my $update_svc = sub { my @svcs = $new->pkg_svc(); +## update broadband services getting their up and down speeds from package fcc_477 options foreach my $svc_part(@svcs) { my @part_svc_column = qsearch('part_svc_column',{ 'svcpart' => $svc_part->{Hash}->{svcpart}, 'columnflag' => 'P' }); @@ -221,7 +222,7 @@ my $update_svc = sub { 'extra_sql' => " WHERE cust_svc.svcpart = '".$svc_part->{Hash}->{svcpart}."' AND cust_pkg.pkgpart = '".$svc_part->{Hash}->{pkgpart}."'", }); foreach my $svc (@svc_svcdb) { - #my $svc_new = $svc; + next if ($svc->{Hash}->{speed_down} == $args{fcc_options}->{broadband_downstream} * 1000 && $svc->{Hash}->{speed_up} == $args{fcc_options}->{broadband_upstream} * 1000); $svc->{Hash}->{speed_down} = $args{fcc_options}->{broadband_downstream} * 1000; $svc->{Hash}->{speed_up} = $args{fcc_options}->{broadband_upstream} * 1000; $error = $svc->replace();