Дополнение

Товар

С.Номенклатура

Сорт

Сорт товара

С.Сорт

Кол

Количество в произвольной ед. измерения

Число 8.2

Ед

Единица измерения

С.Единицы

КолО

Количество в основной ед. измерения

Число 8.2

+,И

Цена

Цена учета

Число 7.2

Сумма

Сумма документа

Число 15.2

+,И

Создаем новый документ;

В окне свойств документа указываем его настройки и вводим реквизиты;

Нажимаем [Ввод на основании...];

Ставим галочку в колонке "Вводить на основании" напротив "ПриходнаяНакладная";

[ОК];

Форму документа сделаем аналогичной расходной накладной. Колонка "Цена" и поле ввода "НомерДок" недоступны;

Процедуры на элементы формы документа напишем по аналогии с приходной и расходной накладной. Учтем что мы будем использовать цену ЦенаП;

Добавим кнопку [Подбор] и пропишем для нее процедуры. Только Склад заменим в них на СкладО;

Теперь пропишем процедуру ввода на основании:

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

// предопределенная процедура. ДокОсн – ссылка на документ,

// на основании которого мы хотим ввести текущий

// если мы хотим, чтобы и в дальнейшем эти документы

// были между собой связаны, надо в документе, вводимом на

// основании завести реквизит типа документа основания

// и сохранять там эту ссылку

Если ДокОсн.Проведен()<>1 Тогда

// Если документ основание не проведен

// мы не можем ввести на его основании никакой документ

Предупреждение("Приходная накладная № "+Строка(ДокОсн.НомерДок) +"

| от "+Строка(ДокОсн.ДатаДок)+"

| не проведена!");

СтатусВозврата(0);

КонецЕсли;

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

// копируем реквизиты шапки

СкладО=ДокОсн.Склад;

СкладП="";

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

Содержание Назад Вперед