Удаление ГТД при загрузке поступлений

Клиент попросил удалять ГТД при загрузке поступлений в Контур.

Подключаемый модуль получился очень простым:

Перем ОсновнойМодуль Экспорт;

Функция ОбработатьСобытие(ИмяСобытия, Параметры) Экспорт

	Если ИмяСобытия = "ПолучитьЗаполненныйОбъектДокумента1С" Тогда

		Возврат ПолучитьЗаполненныйОбъектДокумента1С(Параметры);

	КонецЕсли;

КонецФункции



Функция ПолучитьЗаполненныйОбъектДокумента1С(Параметры)

	Если ТипЗнч(Параметры) = Тип("Структура") И Параметры.Свойство("Результат_ИМ") Тогда
		
		//Возврат Результат;   
		
		Попытка
			Items = Параметры.Документ.СлужебнаяИнформация.Контент.Table.Items;
			Для Каждого Item из Items Цикл
				Попытка                                     
					//Очищаем ГТД
					Пока Item.CustomDeclarations.Количество() > 0 Цикл
						Сообщить("У товара: " + Item.Product + " очищено ГТД: " + Item.CustomDeclarations[0].DeclarationNumber);
						Item.CustomDeclarations.Удалить(0);
					КонецЦикла;
				Исключение
				КонецПопытки;
				
			КонецЦикла;
		Исключение
		КонецПопытки; 
		
	КонецЕсли;

КонецФункции

При этом я уведомляю пользователям об очистке ГТД, считаю, что он должен быть в курсе.

Среда: УТ 11.5.22.92 Контур: 4.49.5 Объем: 0.8 час

image_pdfimage_print

fixin

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

Вам может также понравиться...

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

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