Здравствуйте! Нужно установить время при записи документа. В чем ошибка конструкции?

&НаСервере
Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
    АвтоВремяОтключить();
  Если выбран()=0 Тогда
    УстановитьВремя(18,1,1);
  КонецЕсли;
КонецПроцедуры

{Документ.ПоступлениеТоваровУслуг.Форма.ФормаДокумента.Форма(17,3)}: Ожидается ключевое слово 'КонецПроцедуры' ('EndProcedure')
  <<?>>КонецЕсли; (Проверка: Сервер)
{Документ.ПоступлениеТоваровУслуг.Форма.ФормаДокумента.Форма(145,15)}: Обнаружено логическое завершение исходного текста модуля
КонецПроцедуры<<?>> (Проверка: Сервер)
{Документ.ПоступлениеТоваровУслуг.Форма.ФормаДокумента.Форма(17,3)}: Ожидается ключевое слово 'КонецПроцедуры' ('EndProcedure')
  <<?>>КонецЕсли; (Проверка: Тонкий клиент)
{Документ.ПоступлениеТоваровУслуг.Форма.ФормаДокумента.Форма(145,15)}: Обнаружено логическое завершение исходного текста модуля
КонецПроцедуры<<?>> (Проверка: Тонкий клиент)

выбран()=0
Что?

(2)
&НаСервере
Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
      АвтоВремяОтключить();
     УстановитьВремя(18,1,1);
  КонецЕсли;
КонецПроцедуры

(2)
{Документ.ПоступлениеТоваровУслуг.Форма.ФормаДокумента.Форма(141,3)}: Ожидается ключевое слово 'КонецПроцедуры' ('EndProcedure')
  <<?>>КонецЕсли; (Проверка: Сервер)
{Документ.ПоступлениеТоваровУслуг.Форма.ФормаДокумента.Форма(141,3)}: Ожидается ключевое слово 'КонецПроцедуры' ('EndProcedure')
  <<?>>КонецЕсли; (Проверка: Тонкий клиент)

Понятно...

Наркоман что ли?

(4) продолжайте, продолжайте,  мы - всё внимание :)

(6) Чего так кровожадно?

(7) продолжать нечего. все уже сказано. жду совета опытных отцов.

КонецЕсли убери

(10) убрал,
{Документ.ПоступлениеТоваровУслуг.Форма.ФормаДокумента.Форма(138,6)}: Процедура или функция с указанным именем не определена (АвтоВремяОтключить)
        <<?>>АвтоВремяОтключить(); (Проверка: Сервер)
{Документ.ПоступлениеТоваровУслуг.Форма.ФормаДокумента.Форма(139,6)}: Процедура или функция с указанным именем не определена (УстановитьВремя)
     <<?>>УстановитьВремя(18,1,1); (Проверка: Сервер)

(11) Может справку почитать?

(11) вот это читал?

Синтаксис:

УстановитьВремя(<РежимОпределенияВремени>, <ИспользоватьЖурналы>)
Параметры:

<РежимОпределенияВремени> (необязательный)

Тип: РежимАвтоВремя.
Устанавливает режим автоматического определения времени при записи нового документа.
Значение по умолчанию: ТекущееИлиПоследним

(14)
Читал. Спасибо. Только уже немного запутался. Вот тут: УстановитьВремя() пишут:

ДокПоступление.АвтоВремяОтключить();

ДокПоступление.УстановитьВремя(0,0,1);

ДокПоступление.Записать();

Я так пробовал ставить в ПриЗаписи. Почему не взлетает?

(15) Там пишут для 7-ки, а ты - для 8-ки

(16) Полистал еще доки. Есть вариант Дата=, но нужно вводить дату, а мне нужно только фиксированное время с актуальной датой.

(17) Дата = НачалоДня(Дата)+ВремяВСекундах;

Плохо листал