// Функция для добавнения нового товары, его цены и остатка 
// в таблицу значений: ОстаткиТоваров при подборе в ТиС  начиная с v. 8.6
// Подробнее на http://warenic.narod.ru/dok2.html

Функция Добавить(ТекТовар)
    ОстаткиТоваров.НоваяСтрока();
	ОстаткиТоваров.Элемент		= ТекТовар;
	Если ТекТовар.ЭтоГруппа()=1 Тогда
		ОстаткиТоваров.Количество = "";
		ОстаткиТоваров.Валюта = "";
		ОстаткиТоваров.Цена = "";
	Иначе
		Если ПустоеЗначение(КатегорияЦен)=0 Тогда
			ВремЦена = глВернутьЦену(ТекТовар,КатегорияЦен);
			Если ПустоеЗначение(ВремЦена)=0 Тогда
				ЕдиницаЦены = ВремЦена.Единица.Получить(внКонтекст.ДатаДок);
			    ОстаткиТоваров.Цена = ВремЦена.Цена.Получить(внКонтекст.ДатаДок);
				Если ЕдиницаЦены<>ТекТовар.ЕдиницаПоУмолчанию Тогда
				    ОстаткиТоваров.Цена = ОстаткиТоваров.Цена*ТекТовар.ЕдиницаПоУмолчанию.Коэффициент/ЕдиницаЦены.Коэффициент;
				КонецЕсли;
				ОстаткиТоваров.Валюта = ВремЦена.Валюта.Получить(внКонтекст.ДатаДок);
			КонецЕсли;
		КонецЕсли;
		Если Склад.Выбран()=1 Тогда
			ОстаткиТоваров.Количество = ОстТоваров.Остаток(Фирма,ТекТовар,Склад,"ОстатокТовара");
		Иначе
			ОстаткиТоваров.Количество = ОстТоваров.СводныйОстаток(Фирма,ТекТовар,,"ОстатокТовара");
		КонецЕсли;
	КонецЕсли;
	Форма.Обновить();
	Возврат ОстаткиТоваров.КоличествоСтрок();
КонецФункции