Работа с УПД и счетами-фактурами в форматах приказа №970, подписание и отклонение документов по API, формирование титулов покупателя, генерация титула utd820, utd970

Генерация титулов покупателя и продавца для ЭДО, Работа с УПД и СФ в форматах приказа №970.

Описание
Подробнее

Описание

Периодически сталкиваемся с изменениями версий форматов счетов-фактур (СФ) и универсальных передаточных документов (УПД).

Версия 5.03 вступила в силу с 22 января 2025 года и заменила собой версию 5.02. С этого времени использовать для первых титулов версию 5.02 нельзя — вместо нее отправлять первые титулы УПД и СФ нужно в соответствии с версией 5.03.

И часто требуется генерировать самостоятельно Титулы в соответствии с новыми требованиями ФНС.

Обработка уже содержит готовые модули для генерации Титулов покупателя и Продавца.

Нужно подставить свой ключ API в функции КлючРазработчика().

Код для подписания документа:

Функция ПодписатьДокументUtd(BoxId, LetterID, DocumentID) Экспорт
	
    ИнициализироватьКонтекст();
	
	Документ = ПолучитьСтруктуруДокумента(BoxID, LetterID, DocumentID);
	
	Если Документ.Тип.ТипДокумента <> "UniversalTransferDocument" Тогда
		Возврат Ложь;
	КонецЕсли;	
	
	КонтентОтвета = СгенерироватьКонтентОтвета(BoxID, Документ);
	
	Ядро = Модуль_Ядро();
	
	Возврат Ядро.Документы_ОтправитьОтветНаВходящий(Документ);	

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

Код для отклонения документа:

Функция ОтказатьВПодписиДокументUtd(BoxId, LetterID, DocumentID) Экспорт
	
    ИнициализироватьКонтекст();
	
	Документ = ПолучитьСтруктуруДокумента(BoxID, LetterID, DocumentID);
	
	Если Документ.Тип.ТипДокумента <> "UniversalTransferDocument" Тогда
		Возврат Ложь;
	КонецЕсли;	
	
	КонтентОтвета = Новый Структура;
	КонтентОтвета.Вставить("Comment"					, "Отклонено"); 
	КонтентОтвета.Вставить("ДополнительныеПараметры"	, Новый Структура);
		
	КонтентОтвета.ДополнительныеПараметры.Вставить("КонтрактМЧД");
	
	Ядро = Модуль_Ядро();
	
	Ядро.Документы_ЗаполнитьОтветПоДокументу(Документ, "ОтказатьВПодписи", КонтентОтвета);	 
	
	ДокументыДляОбработки = Новый Массив;
	ДокументыДляОбработки.Добавить(Документ);	
	
	ПодготовленныеДанные = Ядро.Документы_ДанныеДляMessagePatchToPost(ДокументыДляОбработки);
		
	Возврат Ядро.Документы_ОтправитьОтветНаВходящий(Документ);
	
КонецФункции