AccuGeocoder: Calculate Distance in a Command
Below you'll find a Command that will calculate the Distance between a Single Point and All Records in your database that contain coordinate values in the eLatitude and eLongitude fields. This is for use with the AccuGeoCoder Module.
You only have to enter the Starting Latitude and Longitude in the command and click Run.
Note: Run AFTER Validating with Lat/Long checked or after processing the list using the AccuGeocoder Module.
COPY THE COMMAND SYNTAX BELOW
*!* Field Names
com_DistanceField="distance_"
com_LatitudeField="elatitude"
com_LongitudeField="elongitude"
*!* Starting Latitude Value
com_Latitude="42.048700"
*!* Starting Longitude Value
com_Longitude="-72.569600"
*!* Supress Messages
ON ERROR com_ErrorMsg=MESSAGE()
*!* Add Distance Field
ALTER TABLE (ALIAS()) ADD COLUMN &com_DistanceField N(20,15)
*!* Convert Latitude
calc_Lat=str(val(com_Latitude)/57.2958,20,15)
calc_Long=str(val(com_Longitude)/57.2958,20,15)
ON ERROR
com_ReplaceString="REPLACE ALL &com_DistanceField WITH iif(!EMPTY(&com_LatitudeField) AND !EMPTY(&com_LongitudeField),round(3958.75*acos(sin("+calc_Lat+")*sin(val(&com_LatitudeField)/57.2958)+cos("+calc_Lat+")*cos(val(&com_LatitudeField)/57.2958)*cos(val(&com_LongitudeField)/57.2958-"+calc_Long+")),15),0)"
&com_ReplaceString
