В начало

Функция «Время документа»

 

Функция ВремяДокумента (Док)

   Перем Ч;

   Перем М;

   Перем С;

   Если Док.Выбран () > 0 Тогда

      Док.ПолучитьВремя (Ч, М, С);

      Возврат "Документ записан в " + Ч + " час " + М + " мин. " + С + " с";

   Иначе

      Возврат "Документ не выбран!";

   КонецЕсли;

Конецфункции