1С 8.3: установка времени документа при записи

1С v8

20.01.15

✎

14:04

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

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

1 pickpok

20.01.15

✎

14:05

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

2 GreatOne

20.01.15

✎

14:25

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

3 pickpok

20.01.15

✎

14:26

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

4 pickpok

20.01.15

✎

14:27

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

5 GreatOne

20.01.15

✎

14:28

Понятно...

6 Fish

20.01.15

✎

14:29

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

7 palpetrovich

20.01.15

✎

14:29

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

8 pickpok

20.01.15

✎

14:37

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

9 pickpok

20.01.15

✎

14:38

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

10 vicof

20.01.15

✎

14:40

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

11 pickpok

20.01.15

✎

14:45

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

12 Kondarat

20.01.15

✎

14:46

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

13 hhhh

20.01.15

✎

15:09

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

14 hhhh

20.01.15

✎

15:10

Синтаксис:

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

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

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

15 pickpok

20.01.15

✎

15:37

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

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

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

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

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

16 Kondarat

20.01.15

✎

15:45

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

17 pickpok

20.01.15

✎

23:58

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

18 Дмитрий

21.01.15

✎

08:30

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

Плохо листал