Нет подписей в УПД УНФ 1.6

Клиент обратился с жалобой, что при печати из УПД нет подписей ответственных лиц.

Вообще-то в счет-фактуре есть реквизиты печати, но они не заполнены:

Подозреваю, если их начать заполнять, то по статистике они начнут заполняться.

Посмотрел, как называются поля в подвале накладной:

В итоге я решил сделать расширение, которое будет заполнять должность и ФИО руководителя и бухгалтера в модуле менеджера обработки ПечатьСчетФактура:

&После("УчестьОсобенностиДокументаСчетФактура")
Процедура ТР_УчестьОсобенностиДокументаСчетФактура(ТаблицаДанных, СчетФактура, ДополнительныеСвойства)

	Для Каждого СтрокаТаблицы ИЗ ТаблицаДанных Цикл
		
		Попытка
			СтрокаТаблицы.ДолжностьРуководителя = СчетФактура.Организация.ПодписьРуководителя.Должность;
			//Кладовщик = руководитель
			СтрокаТаблицы.ДолжностьКладовщика = СчетФактура.Организация.ПодписьРуководителя.Должность;
			
			ФЛ = СчетФактура.Организация.ПодписьГлавногоБухгалтера.ФизическоеЛицо;
			Если ЗначениеЗаполнено(ФЛ) Тогда                                
				//Эта функция сразу возвращает инициалы! Увы!
				ФамилияИнициалы = РегистрыСведений.ФИОФизЛиц.ФИОФизЛица(СчетФактура.Дата, ФЛ);
				//ФИО = РегламентированнаяОтчетность.РазложитьФИО(ФЛ); ФизическиеЛицаКлиентСервер.ФамилияИнициалы(ФЛ);
				СтрокаТаблицы.РасшифровкаПодписиГлавногоБухгалтера = ФамилияИнициалы;
			КонецЕсли;
			
			ФЛ = СчетФактура.Организация.ПодписьРуководителя.ФизическоеЛицо;
			Если ЗначениеЗаполнено(ФЛ) Тогда
				ФамилияИнициалы = РегистрыСведений.ФИОФизЛиц.ФИОФизЛица(СчетФактура.Дата, ФЛ);
				СтрокаТаблицы.РасшифровкаПодписиРуководителя = ФамилияИнициалы;
				СтрокаТаблицы.РасшифровкаПодписиКладовщика = ФамилияИнициалы;
			КонецЕсли;
			
		Исключение
		КонецПопытки;
		
	КонецЦикла;	
	
КонецПроцедуры

Много времени потратил на поиск типовых функций по получению ФИО физлиц и инициалов.

Среда: 1.6.26.172 Объем: 1 час.

fixin

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

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

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

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