Clarion in general: Calculate distance based on global position 2006-06-09 -- Len Lutz > Where did you find the formula to calculate distance? I have looked at > the > database from zipcodeworld, the data is there but we would need to be able > to do that distance calculation. For calculating distance, try this code. I have found it gives me pretty accurate "DRIVING" distances (in miles) between two zipcodes (Latitudes/Longitudes of zipcodes). If you want the actual, straight-line distance between the centers of the zipcode areas, remove the " * 1.28" at the end of the last line. =================================== GetDist PROCEDURE (SREAL Lat1, SREAL Lon1, SREAL Lat2, SREAL Lon2, *SREAL Distance) rLat1 SREAL rLon1 SREAL rLat2 SREAL rLon2 SREAL Deg2Rad EQUATE(0.0174532925199e+000) CODE rLat1 = Deg2Rad * Lat1 rLon1 = Deg2Rad * Lon1 rLat2 = Deg2Rad * Lat2 rLon2 = Deg2Rad * Lon2 Distance = (3963.1 * (ACOS(SIN(rLat1) * SIN(rLat2) + COS(rLat1) * COS(rLat2) * COS(rLon2 - rLon1))) * 1.28) Printed November 21, 2024, 6:44 am This article has been viewed/printed 35217 times. Google search has resulted in 18 hits on this article since January 25, 2004. |