remove broken link on zip code distribution until it can be implemented
[freeside.git] / httemplate / search / cust_main-zip.html
index 56df924..c317dc3 100644 (file)
@@ -5,7 +5,7 @@
                  'count_query' => $count_sql,
                  'header'      => [ 'Zip code', 'Customers', ],
                  #'fields'      => [ 'zip', 'num_cust', ],
-                 'links'       => [ '', sub { 'somewhere'; }  ],
+                 #'links'       => [ '', sub { 'somewhere'; }  ],
              )
 %>
 <%init>
@@ -32,6 +32,17 @@ if ( $cgi->param('agentnum') =~ /^(\d+)$/ ) {
   $agentnum = $1;
   push @where, "cust_main.agentnum = $agentnum";
 }
+
+# select svcdb
+
+if ( $cgi->param('svcdb') =~ /^(\w+)$/ ) {
+  my $svcdb = $1;
+  push @where, "EXISTS( SELECT 1 FROM $svcdb LEFT JOIN cust_svc USING ( svcnum )
+                                             LEFT JOIN cust_pkg USING ( pkgnum )
+                          WHERE cust_pkg.custnum = cust_main.custnum
+                      )";
+}
+
 my $where = scalar(@where) ? 'WHERE '. join(' AND ', @where) : '';
 
 # bill zip vs ship zip