ЗаписатьДатуJSON() в 1С 8.3: Код 1C v 8.3 Процедура ПреобразованиеДатыВДатуJSON() // Пример: 12.08.2023 09:15:29 ТестДата = Дата("20230812091529" ) ; // Вариант записи - "ЛокальнаяДата" // Локальная дата без указания часового пояса. // // Преобразует дату в "2023-08-12T09:15:29" ДатаJSONСтрока = ЗаписатьДатуJSON(ТестДата, ФорматДатыJSON.ISO, ВариантЗаписиДатыJSON.ЛокальнаяДата) ; // Вариант записи - "ЛокальнаяДатаСоСмещением" // Локальная дата с указание смещения относительно всемирного координированного времени (UTC) . // // Преобразует дату в "2023-08-12T09:15:29+03:00" ДатаJSONСтрока = ЗаписатьДатуJSON(ТестДата, ФорматДатыJSON.ISO, ВариантЗаписиДатыJSON.ЛокальнаяДатаСоСмещением) ; // Вариант записи - "УниверсальнаяДата // Дата в поясе UTC. // // Преобразует дату в "2023-08-12T09:15:29Z" ДатаJSONСтрока = ЗаписатьДатуJSON(ТестДата, ФорматДатыJSON.ISO, ВариантЗаписиДатыJSON.УниверсальнаяДата) ; //////////////////////// // Для формата: JavaScript, Microsoft, - необходимо использовать вариант записи "УниверсальнаяДата"! // Преобразует дату в "new Date(1691820929) " ДатаJSONСтрока = ЗаписатьДатуJSON(ТестДата, ФорматДатыJSON.JavaScript, ВариантЗаписиДатыJSON.УниверсальнаяДата) ; // Преобразует дату в "/Date(1691820929) /" ДатаJSONСтрока = ЗаписатьДатуJSON(ТестДата, ФорматДатыJSON.Microsoft, ВариантЗаписиДатыJSON.УниверсальнаяДата) ;КонецПроцедуры // ПреобразованиеДатыВДатуJSON() Категория:
WEB-сервисы, WS-ссылки, XDTO-пакеты Как строку вида 2023-07-24T15:35:34+03:00 (формат ISO 8601) преобразовать в дату? Стандарт ISO 8601, составлен таким образом, что:
Строка даты-времени сплошная без пробельных разделителей Латинские символы используются в качестве разделителей/идентификаторов: D - дни, Y - годы, Z - идентификатор UTC и т.д., например можно задать промежуток времени: P4Y3M2D1H - 4 года, 3 месяца, 2 дня и 1 час. Буква T выбрана в качестве уникального разделителя времени, остальные буквы латинского алфавита (почти все) задействованы под разные цели и они не пересекаются. Соответственно упрощается парсинг ISO-8601 строки: имеется заранее известный набор флагов/символов/маркеров, опираясь на которые, можно достаточно быстро разбить строку на нужные составляющие и при этом сохраняется требование к human readability самой строки.
Конвертация даты из формата ISO8601 в дату 1С:
Код 1C v 8.3
Дата1 С = XMLЗначение( Тип( "Дата" ) , "2023-07-24T15:35:34+03:00" ) ;
Функция КонвертироватьДатуISO8601ВДату(Дата) Экспорт = Новый Структура( "Дата, Миллисекунды" ) ;
АвтоконвертированнаяДата = XMLЗначение( Тип( "Дата" ) , Дата) ;
Миллисекунды = Сред( Дата, 21 ) ;
Миллисекунды = СокрЛП( СтрЗаменить( Миллисекунды, "Z" , "" ) ) ;
Если НЕ ПустаяСтрока( Миллисекунды) Тогда
ЧислоМиллисекунд = Число( Миллисекунды) ;
Если ЧислоМиллисекунд > = 500 Тогда
АвтоконвертированнаяДата = АвтоконвертированнаяДата - 1 ;
КонецЕсли ;
КонецЕсли ;
КонвертированнаяДата. Дата = АвтоконвертированнаяДата;
КонвертированнаяДата. Миллисекунды = Миллисекунды;
Возврат КонвертированнаяДата;
КонецФункци Категория:
Работа с Датами (Временем) 
