Получение точного времени через Яндекс.Время

17.08.17

В данное время Росалкогольрегулирование активно отрабатывает все случаи продажи спиртного после 22-00. И даже законопослушные компании периодически попадают под санкции, вследствие банального несоответствия времени на компьютере с реальным, т.к. данные для отправки в ЕГАИС фиксируются по времени компьютера. Как одно из решений проблемы перед пробитием чека предлагаю сверять время на компьютере и время с сервера точного времени. Алгоритм, естественно, можно использовать и любым другим образом.

Скачать файл

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

Наименование		По подписке [?]	Купить один файл
Получение точного времени через Яндекс.Время: .epf 5,93Kb 2	2	Скачать (1 SM)	Купить за 1 850 руб.

Получать время будем с сервера Яндекс.Времени. У меня все объекты находятся в одном часовом поясе, поэтому я получаю данные только по нему. Иначе придется этот параметр также определять.

Для того, чтобы получить код нужного региона в сервисе Яндекс.Времени, добавляю новые часы.

После этого нужно зайти в настройку часов и в меню выбрать "Информер на сайт". В коде информера параметр geoid это и есть наш код региона. Далее в коде в строке "АдресСкрипта" меняем параметр geo на нужный (в примере Томск).

Попытка                                
	ИмяФайлаОтвета = ПолучитьИмяВременногоФайла("json");
	АдресСервера = "yandex.com";    
	АдресСкрипта = "/time/sync.json?geo=67";
		
	НТТР = Новый HTTPСоединение(АдресСервера, 443,,,,,Новый ЗащищенноеСоединениеOpenSSL());
	Ответ = НТТР.Получить(Новый HTTPЗапрос(АдресСкрипта), ИмяФайлаОтвета);
		
	ЧтениеОтвета = Новый ЧтениеJSON;
	ЧтениеОтвета.ОткрытьФайл(ИмяФайлаОтвета);
			
	ДанныеОтвета = ПрочитатьJSON(ЧтениеОтвета, Истина);
	ЧтениеОтвета.Закрыть();
		
	ВремяСтрокой = Формат(ДанныеОтвета.Получить("time"), "ЧГ=0");
	ДатаВремя = ПрочитатьДатуJSON("new Date(" + ВремяСтрокой + ")", ФорматДатыJSON.JavaScript);
	Сообщить(ДатаВремя);
  Исключение
	Сообщить(ОписаниеОшибки());
КонецПопытки;

сервер точного времени обработка яндекс

+9 –

См. также

Service Desk Online – веб-портал для 1С ITIL, 1С ITILIUM и Управление IT-отделом 8

WEB-интеграция Администрирование веб-серверов Платные (руб)

Веб-портал обеспечивает удобный доступ к конфигурации 1С:ITIL(ИТИЛ), 1С:ITILIUM, Управление IT-отделом 8 через интернет с любого устройства посредством браузера, увеличивая эффективность работы пользователей и снижая нагрузку на сервер. Быстрая инсталляция портала за пару часов, удобный и интуитивно понятный интерфейс и безопасность данных помогут упростить работу с порталом и ускорить выполнение бизнес-процессов компании.

128000 руб.

19.12.2023 2857 3 0

Amocrm: интеграция с 1С

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

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

60000 руб.

07.05.2019 34927 68 45

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

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

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

57600 руб.

26.11.2024 2612 2 3

Экспортер — автоматизация выгрузки данных из 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 987 5 2

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

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

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

36000 руб.

03.08.2020 19207 23 22

Интеграция с сервисом vetmanager в 1С: Бухгалтерия 3.0

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

Внешняя обработка разрабатывалась для загрузки документов из Ветменеджер в 1С: Бухгалтерия 3.0

12000 руб.

02.02.2021 18972 54 50

Конструктор API для обмена базы 1С 8.3 с другими системами по протоколу http в формате JSON

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

Расширение значительно упрощает написание API на 1С. Веб программисты получают простой и понятный доступ к 1С. Описание API создаётся автоматически и представляется в виде удобном как для человека, так и для программной обработки.

24000 руб.

27.09.2024 4417 3 2

Интеграция 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 122474 388 139

228

Комментарии

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

Свернуть все

1. Altair777 647 18.08.17 12:23 Сейчас в теме

Время должно получаться с компьютера, а тот синхронизироваться с контроллером домена. А тот уже с серверами точного времени.
Все остальное - от лукавого

2. kot26rus 18.08.17 14:16 Сейчас в теме

(1)а если домена нет? не везде он нужен.

3. ipoloskov 164 18.08.17 14:24 Сейчас в теме

(1) в Мухосранском ООО "Бухнём" контроллера домена может банально не быть.

4. spacecraft 18.08.17 14:51 Сейчас в теме

(3) даже если один единственный компьютер, то и он может синхронизироваться с сервером точного времени напрямую.

5. Requiem 36 21.08.17 06:43 Сейчас в теме

(3) Игорь все правильно понял, именно для этого решение и сделано

6. Altair777 647 21.08.17 10:15 Сейчас в теме

(5) учите кoманды DOS!
net time

7. markers 278 20.11.17 07:40 Сейчас в теме

Код без использования временных файлов:

Функция ПолучитьТекущееВремяИзИнтернета(КодЧасовогоПоясаЯндекс = 65) Экспорт

	Попытка
		
		АдресСервера = "yandex.ru";    
		АдресСкрипта = "/time/sync.json?geo=" + КодЧасовогоПоясаЯндекс;
		
		НТТР = Новый HTTPСоединение(АдресСервера, 443,,,,,Новый ЗащищенноеСоединениеOpenSSL());
		Ответ = НТТР.Получить(Новый HTTPЗапрос(АдресСкрипта));
		
		Если Ответ.КодСостояния <> 200 Тогда
			
			Возврат Неопределено;
			
		КонецЕсли;
		
		ЧтениеОтвета = Новый ЧтениеJSON;
		ЧтениеОтвета.УстановитьСтроку(Ответ.ПолучитьТелоКакСтроку());
		
		ДанныеОтвета = ПрочитатьJSON(ЧтениеОтвета, Истина);
		ЧтениеОтвета.Закрыть();
		
		ВремяСтрокой = Формат(ДанныеОтвета.Получить("time"), "ЧГ=0");
		Возврат ПрочитатьДатуJSON("new Date(" + ВремяСтрокой + ")", ФорматДатыJSON.JavaScript);
		
	Исключение
	КонецПопытки;	
	
	Возврат Неопределено;

КонецФункции // ПолучитьТекущееВремяИзИнтернета()

Показать