Проект

Общее

Профиль

Пересчет КоличествоУпаковок в Количество для номенклатуры » История » Версия 1

Всеволод Дорофеев, 10.10.2019 05:39

1 1 Всеволод Дорофеев
h3. Пересчет КоличествоУпаковок в Количество для номенклатуры
2 1 Всеволод Дорофеев
3 1 Всеволод Дорофеев
<pre>
4 1 Всеволод Дорофеев
		ТекСтрока.КоличествоУпаковок = ТекСтрока.Количество;
5 1 Всеволод Дорофеев
		// заполним Количество с учетом единиц измерения
6 1 Всеволод Дорофеев
		Если ЗначениеЗаполнено(ТекСтрока.Упаковка) Тогда
7 1 Всеволод Дорофеев
			ТекКоэффициент = Справочники.УпаковкиЕдиницыИзмерения.КоэффициентУпаковки(ТекСтрока.Упаковка, ТекСтрока.Номенклатура);
8 1 Всеволод Дорофеев
		Иначе
9 1 Всеволод Дорофеев
			ТекКоэффициент = 1;
10 1 Всеволод Дорофеев
		КонецЕсли;
11 1 Всеволод Дорофеев
		ТекСтрока.Количество = ТекСтрока.КоличествоУпаковок * ТекКоэффициент;
12 1 Всеволод Дорофеев
13 1 Всеволод Дорофеев
</pre>