Заполнение ТД Счет-фактуры в БП 3.0

1. Az18011993 11.03.20 15:22 Сейчас в теме
Добрый вечер!
Не подскажите в каком документе находится функция для формирования табличной документа Счет-фактур и УПД?(БП 3.0)
Пишу внешнюю обработку и нужен код типовой. Заранее спасибо!
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. uriah 18 11.03.20 15:37 Сейчас в теме
УПД?
- Такого документа в БП 3.0 нет. Это вообще-то просто печатная форма, формируется в документе Реализация товаров и услуг. А в документе счет-фактура выданная три табличные части
3. Az18011993 11.03.20 15:44 Сейчас в теме
(2)Мне нужно узнать в каком документе находится функция формирование печатной формы УПД или Счет Фактуры.Я в курсе,что УПД нет в БП 3.0.
Надеюсь поймете
4. FetisovAN 11.03.20 15:44 Сейчас в теме
в общем модуле УчетНДС
5. Az18011993 11.03.20 15:50 Сейчас в теме
Напишите ваше сообщение
(4)А конкретнее?
Мне нужно написать функцию для формирования печатной формы УПД , мне бы узнать где идет заполнение данных в Счет-фактуре
6. FetisovAN 11.03.20 15:51 Сейчас в теме
Зайдите в модуль, сделайте поиск "Печать", там целый блок процедур печати счет-фактур, УПД, УКД
7. Az18011993 11.03.20 15:56 Сейчас в теме
(6)Не нашел( Или не там смотрел.Вы же про Общие модули?
8. FetisovAN 11.03.20 15:58 Сейчас в теме
да. про общие модули.

собственно вам нужна процедура "ПодготовитьДанныеДляпечатиУниверсального ... "
Прикрепленные файлы:
9. Az18011993 11.03.20 16:03 Сейчас в теме
Напишите ваше сообщение
(8)Не нашел.
10. FetisovAN 11.03.20 16:04 Сейчас в теме
(9) ты угораешь ... ©

не нашел общий модуль УчетНДС ? конфигурация точно БП 3.0 ? :)
11. Az18011993 11.03.20 16:07 Сейчас в теме
Напишите ваше сообщение
(10)УчетНДС нашел,просто только начинаю осваивать азы этой профессии
12. FetisovAN 11.03.20 16:09 Сейчас в теме
(11) ну я вам даже название одной из процедур написал - воспользуйтесь поиском текста, в модуле
13. Az18011993 11.03.20 16:12 Сейчас в теме
Напишите ваше сообщение
(12)Спасибо Вам,нашел. А вот еще не можете подсказать в какой функции происходит заполнение макета?
14. starik-2005 3166 11.03.20 16:30 Сейчас в теме
(13)
в какой функции происходит заполнение макета
А зачем? Добавить фио и должность руководителя?
15. Az18011993 12.03.20 07:45 Сейчас в теме
(14f Да что-то наподобии...Нужно в полях внести изменения реквизитов заполнения
16. Az18011993 12.03.20 12:46 Сейчас в теме
Добрый день!
Вроде смог перенести формирование УПД,но возникла проблема с формированием макета,не находит Макет
Код
Процедура Печать(МассивОбъектов,КоллекцияПечатныхФорм, ОбъектыПечати, ПараметрыВывода) Экспорт
	ПараметрыПечати = Новый Структура();
	ЕстьСчетаФактурыВыданные = Ложь;
	ЕстьСчетаФактурыПолученные = Ложь;
	
	Для каждого Объект Из МассивОбъектов Цикл
		Если ТипЗнч(Объект) = Тип("ДокументСсылка.СчетФактураВыданный") Тогда
			ЕстьСчетаФактурыВыданные = Истина;
			Прервать;
		ИначеЕсли ТипЗнч(Объект) = Тип("ДокументСсылка.СчетФактураПолученный") Тогда
			ЕстьСчетаФактурыПолученные = Истина;
			Прервать;
		КонецЕсли;
	КонецЦикла;
	
	Если ЕстьСчетаФактурыВыданные И УправлениеПечатью.НужноПечататьМакет(КоллекцияПечатныхФорм, "УПДСтатус1") Тогда
		
		УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "УПДСтатус1", "УПД (статус 1)",
			УчетНДС.ПечатьУниверсальныхПередаточныхДокументов(МассивОбъектов, ОбъектыПечати, 
			Документы.СчетФактураВыданный.ТекстЗапросаПечатьСчетовФактур(Истина, Истина, Ложь),,, ПараметрыПечати),,
			"ПФ_MXL_УПД");
			
	КонецЕсли;

	Если ЕстьСчетаФактурыПолученные И УправлениеПечатью.НужноПечататьМакет(КоллекцияПечатныхФорм, "УПДСтатус1") Тогда
		
		УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "УПДСтатус1", "УПД (статус 1)",
			УчетНДС.ПечатьУниверсальныхПередаточныхДокументов(МассивОбъектов, ОбъектыПечати, 
			Документы.СчетФактураПолученный.ТекстЗапросаПечатьСчетовФактур(Истина, Ложь),,, ПараметрыПечати),,
			"ПФ_MXL_УПД");
			
	КонецЕсли;
		
	Если ЕстьСчетаФактурыВыданные И УправлениеПечатью.НужноПечататьМакет(КоллекцияПечатныхФорм, "УПДСтатус1_981") Тогда
		
		УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "УПДСтатус1_981", "УПД (статус 1)",
			УчетНДС.ПечатьУниверсальныхПередаточныхДокументов981(МассивОбъектов, ОбъектыПечати, 
			Документы.СчетФактураВыданный.ТекстЗапросаПечатьСчетовФактур(Истина, Истина, Истина),,, ПараметрыПечати),,
			"ПФ_MXL_УПД");
			
	КонецЕсли;
		
	Если ЕстьСчетаФактурыПолученные И УправлениеПечатью.НужноПечататьМакет(КоллекцияПечатныхФорм, "УПДСтатус1_981") Тогда
		
		УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "УПДСтатус1_981", "УПД (статус 1)",
			УчетНДС.ПечатьУниверсальныхПередаточныхДокументов981(МассивОбъектов, ОбъектыПечати, 
			Документы.СчетФактураПолученный.ТекстЗапросаПечатьСчетовФактур(Истина, Истина),,, ПараметрыПечати),,
			"ПФ_MXL_УПД");
			
	КонецЕсли;
	
	Если УправлениеПечатью.НужноПечататьМакет(КоллекцияПечатныхФорм, "УПДСтатус2") Тогда
		ТекстЗапросаПечатьУниверсальныхПередаточныхДокументов = "";
		Для каждого Объект Из МассивОбъектов Цикл
			Если ТипЗнч(Объект) <> Тип("ДокументСсылка.СчетФактураВыданный")
			   И ТипЗнч(Объект) <> Тип("ДокументСсылка.СчетФактураПолученный") Тогда
				ТекстЗапросаПечатьУниверсальныхПередаточныхДокументов = 
					Документы[Объект.Метаданные().Имя].ТекстЗапросаПечатьУниверсальныхПередаточныхДокументов(Ложь);
				Прервать;
			КонецЕсли;
		КонецЦикла;
		Если НЕ ПустаяСтрока(ТекстЗапросаПечатьУниверсальныхПередаточныхДокументов) Тогда
			УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "УПДСтатус2", "УПД (статус 2)",
					УчетНДС.ПечатьУниверсальныхПередаточныхДокументов(МассивОбъектов, ОбъектыПечати, 
					ТекстЗапросаПечатьУниверсальныхПередаточныхДокументов, Истина,, ПараметрыПечати),,
					"ПФ_MXL_УПД");
		КонецЕсли;
	КонецЕсли;
	
	Если УправлениеПечатью.НужноПечататьМакет(КоллекцияПечатныхФорм, "УПДСтатус2_981") Тогда
		ТекстЗапросаПечатьУниверсальныхПередаточныхДокументов = "";
		Для каждого Объект Из МассивОбъектов Цикл
			Если ТипЗнч(Объект) <> Тип("ДокументСсылка.СчетФактураВыданный")
			   И ТипЗнч(Объект) <> Тип("ДокументСсылка.СчетФактураПолученный") Тогда
				ТекстЗапросаПечатьУниверсальныхПередаточныхДокументов = 
					Документы[Объект.Метаданные().Имя].ТекстЗапросаПечатьУниверсальныхПередаточныхДокументов(Истина);
				Прервать;
			КонецЕсли;
		КонецЦикла;
		Если НЕ ПустаяСтрока(ТекстЗапросаПечатьУниверсальныхПередаточныхДокументов) Тогда
			УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "УПДСтатус2_981", "УПД (статус 2)",
					УчетНДС.ПечатьУниверсальныхПередаточныхДокументов981(МассивОбъектов, ОбъектыПечати, 
					ТекстЗапросаПечатьУниверсальныхПередаточныхДокументов, Истина,, ПараметрыПечати),,
					"ПФ_MXL_УПД");
		КонецЕсли;
	КонецЕсли;
	
	ОбщегоНазначенияБП.ЗаполнитьДополнительныеПараметрыПечати(МассивОбъектов, КоллекцияПечатныхФорм, ОбъектыПечати, ПараметрыВывода);	
	
КонецПроцедуры
Показать
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот