Changeset 199
- Timestamp:
- Oct 26, 2006, 11:00:00 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/npemap.org.uk/cgi/get-distant-postcodes.fcgi
r198 r199 72 72 73 73 # Then join to find problem ones 74 my $sql .= "SELECT outward || ' ' || inward AS postcode, $pcpart AS pcpart, easting, northing, avg_easting, avg_northing, idFROM postcodes ";74 my $sql .= "SELECT id, outward || ' ' || inward AS postcode, $pcpart AS pcpart, easting, northing, avg_easting, avg_northing FROM postcodes "; 75 75 $sql .= "INNER JOIN averages ON ($pcpart = pcpart) "; 76 76 $sql .= "WHERE abs(avg_easting-easting) > $flag_distance "; … … 86 86 print "Content-type: text/javascript\n\n"; 87 87 88 print "// postcode, match part, easting, northing, avg easting, avg northing\n";88 print "// id, postcode, match part, easting, northing, avg easting, avg northing\n"; 89 89 while(my @row = $sth->fetchrow_array) { 90 90 # Tidy up avg 91 my $avg_e = int($row[ 4]);92 my $avg_n = int($row[ 5]);91 my $avg_e = int($row[5]); 92 my $avg_n = int($row[6]); 93 93 94 94 # Print 95 print "addProblem( '$row[0]','$row[1]', $row[2], $row[3], $avg_e, $avg_n);\n";95 print "addProblem($row[0],'$row[1]','$row[2]', $row[3], $row[4], $avg_e, $avg_n);\n"; 96 96 } 97 97 } else {
Note: See TracChangeset
for help on using the changeset viewer.