Convertir valores de grados, minutos y segundos en valores de grados decimales

La siguiente es la ecuación simple para convertir grados, minutos y segundos en grados decimales:

DD = (segundos/3600) + (minutos/60) + grados

La conversión se debe realizar de manera diferente si el valor de grados es negativo. Uno de los métodos es:

DD = - (segundos/3600) - (minutos/60) + grados

En las instrucciones siguientes convertirá un campo de una tabla de valores de latitud o longitud en grados, minutos y segundos a grados decimales utilizando la Calculadora de campo. El código está en VBScript, pero se puede convertir con facilidad a otros lenguajes de programación. Se presupone que los grados, minutos y segundos se almacenan como una cadena de caracteres (texto), con espacios entre los números y que no símbolos. Por ejemplo, los datos se almacenarían como:

25 35 22.3

donde 25 son los grados, 35 son los minutos y 22,3 son los segundos.

El resultado se almacenará en un campo numérico.

1. Agregue la tabla a ArcMap.
2. Haga clic con el botón derecho en la tabla de contenido y, a continuación, haga clic en Abrir.
3. Haga clic en el botón Opciones y en Agregar campo.
4. Escriba Lat2 en el campo Nombre.
5. Haga clic en la flecha de lista desplegable Tipo y, a continuación, haga clic en Doble en la lista.

   Si Lat2 ya se está utilizando como nombre de campo, elija un nombre que no se utilice.

6. Haga clic en Aceptar.
7. Haga clic con el botón derecho en el campo Lat2 y, a continuación, haga clic en Calculadora de campo.
8. Haga clic en Sí si se le muestra un cuadro de mensaje.
9. Active la casilla de verificación Mostrar bloque de código.
10. Pegue el siguiente código en la casilla Código de script Pre-Logic:

    Dim Degrees
    Dim Minutes
    Dim Seconds
    Dim DMS
    Dim DD
    
    DMS = Split([Latitude])
    Degrees = CDbl(DMS(0))
    Minutes = CDbl(DMS(1))
    Seconds = CDbl(DMS(2))
    If Degrees < 0 Then
       DD = -(Seconds/3600) - (Minutes/60) + Degrees
    Else
       DD = (Seconds/3600) + (Minutes/60) + Degrees
    End If
    

    En la sexta línea, que comienza por DMS =, el texto entre corchetes [ ] debe ser el nombre del campo que contiene los valores de latitud. Reemplace la palabra Latitud en el código por el nombre del campo (de la tabla) que almacena los valores de latitud DMS.

11. Pegue el siguiente código en el cuadro Lat2 = situado en la parte inferior del cuadro de diálogo:

    CDbl(DD)
    

12. Haga clic en Aceptar.
13. Repita los pasos 3 a 12 para los valores de longitud.