Changeset 205 for trunk/npemap.org.uk

Timestamp:

Oct 27, 2006, 10:10:28 AM (15 years ago)

Author:

Nick Burch

Message:

Include source

File:

• trunk/npemap.org.uk/cgi/get-distant-postcodes.fcgi (modified) (3 diffs)

trunk/npemap.org.uk/cgi/get-distant-postcodes.fcgi

@@ -75 +75 @@
 
         # Then join to find problem ones
-        my $sql .= "SELECT id, outward || ' ' || inward AS postcode, $pcpart AS pcpart, easting, northing, avg_easting, avg_northing FROM postcodes ";
+        my $sql .= "SELECT postcodes.id, outward || ' ' || inward AS postcode, $pcpart AS pcpart, easting, northing, avg_easting, avg_northing, source, sources.name AS source_name ";
+        $sql .= "FROM postcodes ";
         $sql .= "INNER JOIN averages ON ($pcpart = pcpart) ";
+        $sql .= "INNER JOIN sources ON (postcodes.source = sources.id) ";
         $sql .= "WHERE NOT deleted AND (";
         $sql .= "       abs(avg_easting-easting) > $flag_distance ";
@@ -90 +92 @@
         print "Content-type: text/javascript\n\n";
 
-                print "// id, postcode, match part, easting, northing, avg easting, avg northing\n";
+                print "// id, postcode, match part, easting, northing, avg easting, avg northing, source id, source\n";
         while(my @row = $sth->fetchrow_array) {
                         # Tidy up avg
@@ -97 +99 @@
 
                         # Print
-                        print "addProblem($row[0],'$row[1]','$row[2]', $row[3], $row[4], $avg_e, $avg_n);\n";
+                        print "addProblem($row[0],'$row[1]','$row[2]', $row[3], $row[4], $avg_e, $avg_n, $row[7], '$row[8]');\n";
         }
     } else {