GPS en ipad con IOS8

[jose.chico]

No nos posiciona, da error de conexión. La misma aplicación en android sí funciona.

Esta es la función que se utiliza:

Function CapturaCoordobj(obj)

appdata.userinterface.startgps

' coordenadas GPS
Set collGPS =appdata.GetCollection("ConectarGPS")
Set x =collGPS("LONGITUD")
if not x is nothing then

if x("STATUS")="1" then

' si status vale 1 significa que no hay error de conexion con el servicio GPS
obj("LATITUD")=CDbl(x("LATITUD"))
obj("LONGITUD")=CDbl(x("LONGITUD"))
obj("ALTITUD")=CDbl(x("ALTITUD"))
else

'EN LOS IPADS ENTRA POR AQUÍ, Y DEVUELVE LA ULTIMA POSICION CONOCIDA, QUE TAMBIÉN ES NULL

obj("LATITUD")=appdata.CurrentEnterprise.Variables("LATITUD")
obj("LONGITUD")=appdata.CurrentEnterprise.Variables("LONGITUD")
obj("ALTITUD")=appdata.CurrentEnterprise.Variables("ALTITUD")
end if
else

obj("LATITUD")=appdata.CurrentEnterprise.Variables("LATITUD")
obj("LONGITUD")=appdata.CurrentEnterprise.Variables("LONGITUD")
obj("ALTITUD")=appdata.CurrentEnterprise.Variables("ALTITUD")
end if
Set x =nothing
collGPS.clear
Set collGPS = nothing

'appdata.userinterface.stopgps
End Function

[rlinares]

Hola Jose,

¿Puedes mandarnos el proyecto y la indicaciones para reproducir el fallo a desarrollador@xone.es ?

Lo pondremos en un terminal y revisaremos que puede ocurrir.

Saludos