Google maps - получение координат по адресу, отображение на карте и корректировка адреса перемещением маркера

08.02.17

Google maps - получение координат по адресу, отображение на карте и корректировка адреса перемещением маркера

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование		По подписке [?]	Купить один файл
Обработка .epf 11,04Kb 187	187	Скачать (1 SM)	Купить за 1 850 руб.

Обработка позволяет по адресу определять координаты (использовал Яндекс - по России, Украине лучше работает говорят), по координатам устанавливать маркер с возможностью перемещения по карте для уточнения адреса - новые, уточненные координаты возвращаются в форму в процессе перемещения маркера.

В обработке мало кода, всё просто и понятно, такого готового решения я не нашел, поэтому пришлось писать самому, дёргая из инета части. Думаю, что многим пригодится.

+27 –

См. также

Веб-портал "Онлайн-заказ" для 1С

Оптовая торговля Розничная торговля WEB-интеграция 1С:Управление торговлей 10 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Платные (руб)

Онлайн-заказ - это решение для автоматизации процесса оформления заказов на сайте в торговых организациях. Продукт обеспечивает легкое взаимодействие между компанией и клиентами через веб-интерфейс, интегрированный с 1С:Предприятие. Система позволяет снизить операционные расходы, повысить лояльность клиентов и оптимизировать работу отдела продаж.

57600 руб.

26.11.2024 1546 1 1

Интеграция Альфа Авто 5 / Альфа Авто 6 и AUTOCRM / Инфотек

Сайты и интернет-магазины WEB-интеграция Системный администратор Программист Пользователь Платформа 1С v8.3 1C:Бухгалтерия 1С:Управление торговлей 11 Автомобили, автосервисы Россия Управленческий учет Платные (руб)

Интеграционный модуль обмена между конфигурацией Альфа Авто 5 и Альфа Авто 6 и порталом AUTOCRM. Данный модуль универсален. Позволяет работать с несколькими обменами AUTOCRM разных брендов в одной информационной базе в ручном и автоматическом режиме.

36000 руб.

03.08.2020 18567 20 22

Интеграция 1С с API СДЭК, Деловые Линии, ПЭК, Boxberry, Почта России и др. Управление доставками в 1С 8.3

WEB-интеграция Рабочее место Оптовая торговля Розничная торговля Логистика, склад и ТМЦ Пользователь Платформа 1С v8.3 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Оптовая торговля, дистрибуция, логистика Россия Управленческий учет Платные (руб)

Программный продукт "Управление доставками в 1С" позволяет обмениваться с личным кабинетом СДЭК, Деловые Линии, ПЭК, DPD, Почта России и другими транспортных компаниями. Упрощает создание заявок и резервирование заказов прямо в интерфейсе 1С

18000 руб.

10.03.2016 63875 308 98

Функционал задач в Битрикс24 у Вас в 1С

Сайты и интернет-магазины Интеграция WEB-интеграция Платформа 1С v8.3 1C:Бухгалтерия Управленческий учет Платные (руб)

Интеграция 1С и Битрикс 24. Разработка имеет двухстороннюю синхронизацию 1С и Bitrix24 задачами. Решение позволяет создавать пользователя в 1С из Битрикс24 и наоборот. Данная разработка технически подходит под все основные конфигурации линейки продуктов 1С:Предприятие 8.3 (платформа начиная с 8.3.23): 1С:Управление торговлей, 1С:Управление Нашей фирмой 3, 1С:Комплексная автоматизация 2, Объединенное решение: Модуль 1С:CRM 3 (3.0.21.3) +1С:ERP Управление предприятием 2. При приобретении предоставляется 1 месяц бесплатных обновлений разработки. Доступна демо-версия продукта с подключением Вашего Битрикс24

7200 руб.

04.05.2021 20711 13 19

Все службы доставки в Вашей 1С! Без изменения конфигурации! 1С:УТ, 1С:ERP, 1С:КА, 1С:УНФ

WEB-интеграция Рабочее место Оптовая торговля Розничная торговля Логистика, склад и ТМЦ Программист Пользователь Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 Россия Управленческий учет Платные (руб)

40+ служб доставки для 1С в одном модуле! Внешняя обработка, которая НЕ изменяет Вашу конфигурацию! Подписная модель на 1 год.

16800 руб.

22.03.2017 39572 19 50

Интеграция 1С с OpenCart 2.x, 3x — модуль обмена данными

WEB-интеграция Оптовая торговля Розничная торговля Программист Управляемые формы 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 Розничная и сетевая торговля (FMCG) Оптовая торговля, дистрибуция, логистика Управленческий учет Платные (руб)

Модуль интеграции 1С с OpenCart 2.x, 3x позволяет обмениваться данными между OpenCart (самая популярная бесплатная cms для интернет-магазинов) и 1С:Предприятие 8.

6800 руб.

17.11.2015 121428 380 139

224

Экспортер — автоматизация выгрузки данных из 1С в Spot2D

WEB-интеграция Программист Бизнес-аналитик Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Оптовая торговля, дистрибуция, логистика ИТ-компания Платные (руб)

Модуль "Экспортер" — это расширение для 1С, предназначенное для автоматизации процессов выгрузки данных. Оно позволяет эффективно извлекать, преобразовывать и передавать данные из систем 1С в интеграционную платформу Spot2D. Подсистема упрощает настройку, снижает количество ручных операций и обеспечивает удобный контроль данных.

14400 руб.

20.12.2024 476 2 0

Заполнение контрагента по ИНН или наименованию реквизитов по данным сайта ФНС в 1С: 8.3

Обмен с ГосИС WEB-интеграция Бухгалтер Пользователь Платформа 1С v8.3 Управляемые формы 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия государственного учреждения 1С:Документооборот 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Платные (руб)

Обработка является альтернативой механизму, разработанному фирмой 1С и заполняющему реквизиты контрагента по ИНН или наименованию. Не требуется действующей подписки ИТС. Вызывается как внешняя дополнительная обработка, т.е. используется, непосредственно, из карточки контрагента. Заполнение по ИНН или наименованию реквизитов контрагента по данным сайта ФНС (egrul.nalog.ru) для БП 2.0, БП 3.0, БГУ 1.0, БГУ 2.0, УТ 10.3, УТ 11.x, КА 1.1, КА 2.x, УПП 1.x, ERP 2.x, УНФ 1.5, УНФ 1.6, УНФ 3.0, ДО 2.1

2400 руб.

28.04.2016 92193 184 217

337

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. Serj1C 483 05.07.12 12:34 Сейчас в теме

по ключевому слову "геокодирование" легко находятся аналоги:
http://infostart.ru/public/88033/
http://infostart.ru/public/98156/
http://infostart.ru/public/19962/
http://infostart.ru/public/20005/

2. vadimlp77 31 05.07.12 12:58 Сейчас в теме

(1) Serj1C, с геокодированием как раз меньше всего проблем - этого добра хватает, мне нужно было получить возможность с помощью маркера вносить уточнение в координаты, что и было сделано. А геокодирование как сопутствующий функционал.

3. vadimlp77 31 18.07.12 18:08 Сейчас в теме

Народ, отпишитесь, 22 скачивания и один комментарий :)
Помогло хоть кому то?

7. Spacer 363 01.10.13 19:45 Сейчас в теме

(3) Хорошая штука! Помогло. Как раз искал что-то подобное.

4. logos 216 01.08.12 12:00 Сейчас в теме

Немного не то, что хотелось бы. Ищу способ получить данные маркера через событие "ПриНажатии" поля HTML документа. Уже нашёл как привязывать событие нажатия на маркер к нажатию на документ, но не могу выцепить свойства маркера. Думал автор справился, но в его примере не реализован функционал определения того, координаты какого маркера поменялись, если их несколько

5. vadimlp77 31 06.08.12 12:48 Сейчас в теме

(4) logos, появится время - посмотрю, что можно сделать - не думаю, что это будет сложно. Сейчас загружен очень.

6. logos 216 06.08.12 13:15 Сейчас в теме

Оказалось довольно сложно, как вылижу - сделаю свою публикацию

8. Spacer 363 02.10.13 15:00 Сейчас в теме

Кстати, заметил что широта и долгота отображаются наоборот.
То что является широтой пишется в поле долгота и наоборот.

9. vadimlp77 31 21.10.13 18:03 Сейчас в теме

(8) Spacer, ну там были с этим приколы - гугл писал в одном порядке, яндекс в другом, потом кажется кто то поменял порядок

10. AK-74S 8 23.12.13 22:11 Сейчас в теме

Хороший пример, как для начала. Плюсик палюбому.
Но - проблемка. Иногда (не всегда!) начинает раз за разом "вылетать" 1С-ка на строках
HTTPСервис = Новый HTTPСоединение("geocode-maps.yandex.ru",,,,, Ложь);
либо
ЭлементыФормы.ПолеHTMLДокумента.УстановитьТекст(ТекстHTML);
1С:Предприятие 8.2 (8.2.17.153), обычные формы, Виндовз Сервер 2003.
Кто-нибудь поборол?

11. Kaavan 97 29.10.14 11:22 Сейчас в теме

Очень помогло, спасибо! потом поделюсь получившейся в итоге окончательной формой ввода географических координат, если будет интересно коллегам.

12. karapuzzzz 63 05.02.16 16:37 Сейчас в теме

Внесу небольшие изменения. Во-первых это https. Надо последним параметром при создании HTTP соединения передавать тип соединения:

Новый HTTPСоединение("geocode-maps.yandex.ru",,,,ПроксиСервер,Ложь, Новый ЗащищенноеСоединениеOpenSSL)

Дальше. Я, например, не люблю без крайней необходимости дергать диск и сохранять результат через файловую систему. Для этого меняем конструкцию запроса:

Соединение = Новый HTTPСоединение("geocode-maps.yandex.ru",,,,ПроксиСервер,Ложь, Новый ЗащищенноеСоединениеOpenSSL); 
    Запрос = Новый HTTPЗапрос;
	Запрос.АдресРесурса = "1.x/?geocode=" + СтроковыеФункции.URLEncode(Адрес);
	
	//// Формирование заголовков
	Запрос.Заголовки.Вставить("Connection","Keep-Alive");
	Запрос.Заголовки.Вставить("Content-Type", "text/html");
	Запрос.Заголовки.Вставить("Accept-Charset","utf-8");
	Запрос.Заголовки.Вставить("Accept", "*/*");
	
	//// Добавление к запросу сообщения
	//Запрос.УстановитьТелоИзСтроки(СтроковыеФункции.URLEncode(Адрес), "CESU-8");
    Попытка 
        // Ответ = Соединение.Получить("1.x/?geocode=" + СтроковыеФункции.URLEncode(Адрес)); 
		Ответ = Соединение.Получить(Запрос); 
    Исключение 
        Сообщить(ОписаниеОшибки(), СтатусСообщения.Важное); 
        Возврат Неопределено;
    КонецПопытки; 

    Возврат Ответ.ПолучитьТелоКакСтроку("CESU-8");

Показать

Таким образом, функция "YandexGeoCodeGet" уже сразу возвращает текст XML.
Соответственно вместо

ЧтениеXML.ОткрытьФайл(АдресOutput);

Ставим

ЧтениеXML.УстановитьСтроку(СтрокаXML);

где СтрокаXML это то, что вернула функция.

13. piton66 2 04.12.20 14:54 Сейчас в теме

Сорри но не работает.
ДокументДОМ = ПостроительDOM.Прочитать(ЧтениеXML);
по причине:
Ошибка разбора XML: - [6,8]
Фатальная ошибка:
Opening and ending tag mismatch: hr line 5 and body