Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
1C_pr77_Lang1.doc
Скачиваний:
12
Добавлен:
20.11.2019
Размер:
2.43 Mб
Скачать

ВводНового

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

Синтаксис:

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

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

InputNew

Параметры:

<ПризнКопирования>

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

<ОбъектКопирования>

Объект, который был скопирован.

Описание:

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

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

Пример:

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

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

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

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

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

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

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

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

Иначе

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

КонецЕсли;

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

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

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

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

ВводНаОсновании

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

Синтаксис:

ВводНаОсновании(<ДокументОснование>)

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

InputCausedBy

Параметры:

<ДокументОснование>

Значение документа, на основании которо­го вводится новый документ.

Описание:

Вызов процедуры ВводНаОсновании производится в системе 1С:Предприятие неявно после выбора пункта меню «Действия» - «Ввести на основании». В этот момент система подставляет фактическое значение пара­метра <ДокументОснование>, содержащее документ, на котором находился курсор в момент выполнения данной команды.

Данная процедура может использоваться, например, для установки началь­ных значений (по умолчанию) реквизитов нового документа, вводимого на ос­новании другого. Если в данной предопределенной процедуре установить ста­тус возврата — 0 (например, если данному пользователю нельзя вводить новые документы), ввода нового документа и открытие его формы не будет выполне­но.

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

Пример:

Процедура ВводНаОсновании(ДокОснование)

Если (ДокОснование.Вид() = "ПриходнаяРеализ")

ИЛИ ДокОснование.Вид() = "РасходнаяРеализ") Тогда

ПризнакРеализатора = Перечисление.ПризнакиРеализаторов.Реализатор_Клиент;

ДатаДок = РабочаяДата();

Валюта = Константа.БазоваяВалюта;

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

Дата_Курса = ДокОснование.Дата_Курса;

Курс = ДокОснование.Курс;

НДС = ДокОснование.НДС;

СН = ДокОснование.СН;

Фирма = ДокОснование.Фирма;

Основание = "" + ДокОснование + " от " + ДокОснование.ДатаДок;

ДокОснование.ВыбратьСтроки();

Пока ДокОснование.ПолучитьСтроку() = 1 Цикл

НоваяСтрока();

Товар = ДокОснование.Товар;

Цена = ДокОснование.Цена;

Единица = ДокОснование.Единица;

Коэффициент = ДокОснование.Коэффициент;

Количество = ДокОснование.Количество;

Сумма = ДокОснование.Сумма;

КонецЦикла;

Иначе

Предупреждение("Этот Документ можно вводить только на основании

|накладных по реализации!");

ВводНового();

КонецЕсли;

Валюта_Прежн = Валюта;

Курс_Прежн = Курс;

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

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

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]