[freeside-commits] branch master updated. 10dbf48db68e0ca9264865cb98c24cb05c104824

[Ivan Kohler]

The branch, master has been updated
       via  10dbf48db68e0ca9264865cb98c24cb05c104824 (commit)
      from  1d63c6b68d172caa53bacc2cc811cdb34a2c80ae (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 10dbf48db68e0ca9264865cb98c24cb05c104824
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Thu Mar 3 18:42:03 2022 -0800

    477 reporting

diff --git a/FS/FS/Report/FCC_477.pm b/FS/FS/Report/FCC_477.pm
index 760f6f22d..0f5d4cedc 100644
--- a/FS/FS/Report/FCC_477.pm
+++ b/FS/FS/Report/FCC_477.pm
@@ -398,7 +398,7 @@ sub fbs_sql {
   my $agentnum = $opt{agentnum};
   my $q = $opt{ignore_quantity} ? '1' : 'COALESCE(cust_pkg.quantity, 1)';
 
-  my $censustract = "replace(cust_location.censustract, '.', '')";
+  my $censustract = "substr( replace(cust_location.censustract, '.', ''), 1, 11)";
 
   my @select = (
     "$censustract AS censustract",
@@ -473,7 +473,7 @@ sub fvs_sql {
   my $date = $opt{date} || time;
   my $agentnum = $opt{agentnum};
   my $q = $opt{ignore_quantity} ? '1' : 'COALESCE(cust_pkg.quantity, 1)';
-  my $censustract = "replace(cust_location.censustract, '.', '')";
+  my $censustract = "substr( replace(cust_location.censustract, '.', ''), 1, 11)";
 
   my @select = (
     "$censustract AS censustract",

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/Report/FCC_477.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)