Программная печать УПД из отчета комитенту БП3
Вместо акта оказанных услуг нужно отправлять УПД.
Казалось бы, просто поменять название печатной формы.
Но нет, все оказалось сложнее.
Было:
//Формируем форму акта ПараметрыПечати = Новый Структура(); ДопустимыеТипыОбъектовПечати = Неопределено; ИмяМенеджераПечати = "Документ.ОтчетКомитентуОПродажах"; ИменаМакетов = "АктОбОказанииУслуг"; МассивОбъектов = Новый Массив(); МассивОбъектов.Добавить(Документ); ПечатныеФормы = УправлениеПечатью.СформироватьПечатныеФормы(ИмяМенеджераПечати, ИменаМакетов, МассивОбъектов, ПараметрыПечати, ДопустимыеТипыОбъектовПечати); ТабличныйДокумент = ПечатныеФормы.КоллекцияПечатныхФорм[0].ТабличныйДокумент; ДобавитьПодписьИПечать(ТабличныйДокумент, Документ);
Стало:
НастройкиПечати = УчетНДСВызовСервера.ПолучитьНастройкиПечатиУниверсальныхПередаточныхДокументов( МассивОбъектов); ПараметрыПечати = Новый Структура(); ДопустимыеТипыОбъектовПечати = Неопределено; ИменаМакетов = НастройкиПечати.СписокМакетов; ИмяМенеджераПечати = "Обработка.ПечатьУПД"; МассивОбъектов = НастройкиПечати.УниверсальныеПередаточныеДокументы; //Тут акт подменяется на счет-фактуру ПечатныеФормы = УправлениеПечатью.СформироватьПечатныеФормы(ИмяМенеджераПечати, ИменаМакетов, МассивОбъектов, ПараметрыПечати, ДопустимыеТипыОбъектовПечати); ТабличныйДокумент = ПечатныеФормы.КоллекцияПечатныхФорм[0].ТабличныйДокумент; ДобавитьПодписьИПечать(ТабличныйДокумент, Документ);
Дело в том, что отчет комитенту подменяется счет-фактурой и имя макета печати подставляется исходя из отчета комитента, что-то вроде УПДСтатус1_1096.
Чувствуете силу типовых 1С?
Среда: 3.0.175.24 Объем: 1 час.




Свежие комментарии