HelpF.pro

Проведение выбранных документов, отмена проведения выбранных документов

Код 1C v 8.х
 Процедура Провести(Кнопка)
	ВыборкаДокументов = Документы.НДФЛиЕСНДоходыИНалоги.Выбрать(); 
	Пока ВыборкаДокументов.Следующий() Цикл 
                // Проводим только те документы у которых в комментарии есть "НДФЛ Доходы и удержания"
		Если Найти(ВыборкаДокументов.Комментарий, "НДФЛ Доходы и удержания") > 0 Тогда
			ТекДок=ВыборкаДокументов.ПолучитьОбъект();
			Попытка
				ТекДок.Записать(РежимЗаписиДокумента.Проведение);
				Сообщить("Проведен документ :" + Строка(ТекДок));
			Исключение
				Сообщить("Невозможно провести документ("+Строка(ТекДок)+"), т.к.:");
				Сообщить(ОписаниеОшибки());
			КонецПопытки;			
		КонецЕсли;	
	КонецЦикла	
КонецПроцедуры

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

Опубликовано на сайте: https://HelpF.pro
Прямая ссылка: https://HelpF.pro/faq/view/415.html