Иллюстрированный самоучитель по языку системы 1С:Предприятие

Предопределенные процедуры Модуля формы документа

Описанные в данном разделе системные предопределенные процедуры должны располагаться только в Модулях формы документов (см. "Виды программных модулей").

В основном данные процедуры предназначены для расширения возможности программного управления правами доступа к системе.

Предопределенные процедуры не является встроенными процедурами языка. Для них зарезервированы только название и синтаксис. Тело процедур должно быть написано самим разработчиком в соответствующих программных модулях. Вызов предопределенных процедур на исполнение производится в системе 1С:Предприятие неявно при возникновении соответствующего события. Описание предопределенных процедур также см. гл. "Системные предопределенные процедуры".

ВводНового

Предопределенная процедура при вводе нового документа.

Синтаксис:

ВводНового(<ПризнКопирования>, <ОбъектКопирования>)

Англоязычный синоним:

InputNew

Параметры:

<ПризнКопирования> Признак того, что объект введен копированием. Число: 1 – объект введен копированием, 0 – просто новый объект. Данный признак может быть использован для анализа необходимости инициализации реквизитов нового объекта.
<ОбъектКопирования> Объект, который был скопирован.

Описание:

Вызов процедуры ВводНового производится в системе 1С:Предприятие неявно в момент выбора пункта меню "Действия" – "Новый" при работе с Документами. Данная процедура может использоваться, например, для установки начальных значений (по умолчанию) реквизитов нового документа. Если в данной предопределенной процедуре установить статус возврата – 0 (например, если данному пользователю нельзя вводить документы), ввода нового документа и открытие его формы не будет выполнено.

Процедуру ВводНового контекста документа можно размещать в Модулях форм документов (см. "Виды программных модулей").

Пример:

Процедура ВводНового();

Валюта = Константа.ДефВалютаПродажи;

Валюта.ИспользоватьДату(ДатаДок);

Дата_Курса = ДатаДок;

Если Число(Валюта.Код) = Число(Константа.БазоваяВалюта.Код) Тогда

//У базовой валюты курс = 1, поэтому отображаем курс Основной валюты

Константа.ОсновнаяВалюта.ИспользоватьДату(ДатаДок);

Курс = Константа.ОсновнаяВалюта.Текущ_курс;

Иначе

Курс = Валюта.Текущ_курс;

КонецЕсли;

Фирма = Константа.ДефФирма;

Клиент = Константа.ДефПокупатель;

КонецПроцедуры

См. также: СтатусВозврата.

Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.