poluchenie_daty_sozdanija_obekta_cherez_ego_guid [wiki.hostingcloud.com.ua]

Эта страница только для чтения. Вы можете посмотреть её исходный текст, но не можете его изменить. Сообщите администратору, если считаете, что это неправильно.

**Получение даты создания объекта через его ГУИД (GUID)**

<code>
&НаСервере
Процедура ОпределитьДатуПоГУИД()
      

     ГУИД = Объект.СсылкаНаНайденныйОбек.УникальныйИдентификатор();
      

     Строка16 = Сред(ГУИД, 16, 3) + Сред(ГУИД, 10, 4) + Сред(ГУИД, 1, 8);
      

     Разрядность = СтрДлина(Строка16);
      

     ЧислоСек = 0;
      

     Для Позиция = 1 По Разрядность Цикл
      

     ЧислоСек = ЧислоСек + Найти("123456789abcdef",Сред(Строка16,Позиция,1))*Pow(16,Разрядность - Позиция);
      

     КонецЦикла;
      

     ЧислоСек = ЧислоСек / 10000000;
      
	 
	 Объект.ДатаСозданияЭлементаПоГУИД	=Дата(1582, 10, 15, 04, 00, 00) + ЧислоСек;	
	 
      

КонецПроцедуры
</code>