1С 8.3 Получение даты создания элемента
Данные > Примеры кода 1С > 1С 8.3 Справочники
Перейти в раздел примеры кода 1С 8.3:
Определить программно дату создания элемента справочника / документа в 1С 8.3:
&НаСервере
Функция ПолучитьДатуСозданияЭлементаСправочникаДокумента(Ссылка)
УИ = Ссылка.УникальныйИдентификатор();
Строка16 = Сред(УИ, 16, 3) + Сред(УИ, 10, 4) + Сред(УИ, 1, 8);
Бит = СтрДлина(Строка16);
ЧислоСек = 0;
Для Позиция = 1 По Бит Цикл
ЧислоСек = ЧислоСек + Найти("123456789abcdef", Сред(Строка16, Позиция, 1))*Pow(16, Бит - Позиция);
КонецЦикла;
ЧислоСек = ЧислоСек / 10000000;
Возврат Дата(1582, 10 ,15, 04, 00, 00) + ЧислоСек; //Лилианская дата + Наше время
КонецФункции
Функция ПолучитьДатуСозданияЭлементаСправочникаДокумента(Ссылка)
УИ = Ссылка.УникальныйИдентификатор();
Строка16 = Сред(УИ, 16, 3) + Сред(УИ, 10, 4) + Сред(УИ, 1, 8);
Бит = СтрДлина(Строка16);
ЧислоСек = 0;
Для Позиция = 1 По Бит Цикл
ЧислоСек = ЧислоСек + Найти("123456789abcdef", Сред(Строка16, Позиция, 1))*Pow(16, Бит - Позиция);
КонецЦикла;
ЧислоСек = ЧислоСек / 10000000;
Возврат Дата(1582, 10 ,15, 04, 00, 00) + ЧислоСек; //Лилианская дата + Наше время
КонецФункции
0
комментарии
____________________
Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник