8.х Перевод координат из формата WGS 84 (5132,5093) в градусы

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем netuser, 10 янв 2010.

  1. TopicStarter Overlay
    netuser
    Offline

    netuser

    Регистрация:
    3 июл 2009
    Сообщения:
    19
    Симпатии:
    0
    Баллы:
    1
    Доброе время суток.
    У меня из КПК выгружаются координаты(широта,долгота) в 1С (В регистр сведений) выгружаются в формате 5132,5093 где 51 градус 32 минуты и 0,5093 секунды, а мне нужны градусы,нашла формулу с помощью которой все переводится в градусы: 51+(32,5093)/60, вопрос в том как мне разбить число 5132,5093 на 51 и на 32,5093?
    Если кто нибудь подскажет буду ОЧЕНЬ признательна
    Заранее благодарю!!!
  2. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    21.520
    Симпатии:
    407
    Баллы:
    104
    Код:
    крд=5132,5093;
    градус= Число(Лев(Крд,2))+Число(Сред(крд,3))/60;
    
    
  3. tirk
    Offline

    tirk Опытный в 1С

    Регистрация:
    1 сен 2008
    Сообщения:
    1.142
    Симпатии:
    0
    Баллы:
    26
    только советую еще включить проверку на количествол символов перед запятой... вдруг у вас будет 930,4566 или что то типа этого...
    если путешествовать не будете... то можно и просто сделать как предложено выше
  4. TopicStarter Overlay
    netuser
    Offline

    netuser

    Регистрация:
    3 июл 2009
    Сообщения:
    19
    Симпатии:
    0
    Баллы:
    1
    Спасибо большое за ответ,но у меня вот какая проблема у меня число сохраняется как 5 132,5093
    функция СокрЛП() пробел не убирает, можно написать градус= Число(Лев(Крд,3)), но как быть Число(Сред(крд,3)) все перепробовала ничего не получается результат один 132,5093 :(
  5. tirk
    Offline

    tirk Опытный в 1С

    Регистрация:
    1 сен 2008
    Сообщения:
    1.142
    Симпатии:
    0
    Баллы:
    26
    Перем = 5 132,5093;
    нПерем = Формат(Перем,"ЧГ=");
    и будет без пробелов

Поделиться этой страницей