ФормаДокумента и ПроцедураПроведения

                                    #####РАБОТА С ТАБЛИЧНЫМ ПОЛЕМ#####
&НаКлиенте
Процедура НоменклатураНоменклатураПриИзменении(Элемент)
    Стр = Элементы.Номенклатура.ТекущиеДанные;
    ПолучитьДанныеНоменклатура(Стр.номенклатура, Стр.ЕдиницаИзмерения, Стр.Цена);
    Стр.Количество = 1;
    НоменклатураКоличествоПриИзменении(Элемент);
КонецПроцедуры

&НаКлиенте
Процедура НоменклатураКоличествоПриИзменении(Элемент)
    Стр = Элементы.Номенклатура.ТекущиеДанные;
    Если Стр.Количество > 0 Тогда
        Стр.Сумма = Стр.Цена * Стр.количество;
    Иначе
        ДефолтныеЗначенияПриОшибке(Элемент);
    КонецЕсли;
КонецПроцедуры

&НаКлиенте
Процедура НоменклатураЦенаПриИзменении(Элемент)
    Стр = Элементы.Номенклатура.ТекущиеДанные;
    Если Стр.Цена > 0 Тогда
        Стр.Сумма = Стр.Цена * Стр.количество;
    Иначе
        ДефолтныеЗначенияПриОшибке(Элемент);
    КонецЕсли;
КонецПроцедуры

&НаКлиенте
Процедура НоменклатураСуммаПриИзменении(Элемент)
    Стр = Элементы.Номенклатура.ТекущиеДанные;
    Если Стр.Сумма > 0 Тогда
        Стр.Цена = Стр.Сумма / Стр.Количество;
    Иначе
        ДефолтныеЗначенияПриОшибке(Элемент);
    КонецЕсли
КонецПроцедуры

&НаКлиенте
Процедура ПриОткрытии(Отказ)
    Итого = Объект.Номенклатура.Итог("Сумма");
КонецПроцедуры

&НаКлиенте
Процедура ДефолтныеЗначенияПриОшибке(Элемент)
    Сообщить("Некоректное значение поля");
    НоменклатураНоменклатураПриИзменении(Элемент);
КонецПроцедуры

&НаСервере
Процедура ПолучитьДанныеНоменклатура(Номенклатура, ЕдИзм, Цена)
    Цена = Номенклатура.Цена;
    ЕдИзм = Номенклатура.ЕдиницаИзмерения;
КонецПроцедуры

                                    ####ПРОЦЕДУРА ПРОВЕДЕНИЯ#####

Процедура ОбработкаПроведения(Отказ, Режим)
    //{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
    // Данный фрагмент построен конструктором.
    // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

    // регистр Остатки Приход
    Движения.Остатки.Записывать = Истина;
    Для Каждого ТекСтрокаНоменклатура Из Номенклатура Цикл
        Движение = Движения.Остатки.Добавить();
        Движение.ВидДвижения = ВидДвиженияНакопления.Приход;
        Движение.Период = Дата;
        Движение.Номенклатура = ТекСтрокаНоменклатура.Номенклатура;
        Движение.Склад = Склад;
        Движение.Количество = ТекСтрокаНоменклатура.Количество;
    КонецЦикла;

    //}}__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
КонецПроцедуры