На время проведения отключаем контроль остатков УНФ 3.0

При закрытии смены из ОРП делаю комплектации, но они не проводятся из-за ошибки. По ОРП продано 2 позиции, остаток -2, собираю 2 штуки, но ругается что не хватает 2 штуки. Причуды глупой 1С.

Решил отключить контроль остаков на время проведения.

В своем коде:

Попытка                                                                       
	//Отключаем контроль остатков
	НовДок.ДополнительныеСвойства.Вставить("НеКонтролироватьОстатки", Истина);
	НовДок.Записать(РежимЗаписиДокумента.Проведение, РежимПроведенияДокумента.НеОперативный);
	Сообщить("Проведена Сборка: " + НовДок);
	//После успешной сборки ОРП проводим сборку
Исключение
	ОписаниеОшибки = ОписаниеОшибки();
	НовДок.Записать();                       
	Сообщить("Не смог провести сборку: " + НовДок  + " : " + ОписаниеОшибки + " документ записан!")
КонецПопытки;

В каком-то из общих модулей:

&Вместо("ВыполнитьКонтроль")
Процедура автосб_ВыполнитьКонтроль(ДокументСсылкаКомплектацияЗапасов, ДополнительныеСвойства, Отказ, УдалениеПроведения)
	Если ДополнительныеСвойства.Свойство("НеКонтролироватьОстатки") 
		И ДополнительныеСвойства.НеКонтролироватьОстатки Тогда
		Возврат;
	КонецЕсли;
	ПродолжитьВызов(ДокументСсылкаКомплектацияЗапасов, ДополнительныеСвойства, Отказ, УдалениеПроведения);
КонецПроцедуры

В итоге все проводится без ненужных контролей:

Среда: 3.0.11.119 Объем: 0.5 час

fixin

Программирую на 1С с 1999 года. В 1С просто Гений. В 2020 году ушел из офиса на вольные хлеба фриланса. Принимаю заказы.

Читайте также:

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *