gifts2017

Внешняя печатная форма УПД с выбором ответственных, приказов для 1С: Комплексная автоматизация 8 ред. 1.1

Опубликовал Александр Журавлев (apostal86) в раздел Печать - Печатные формы документов

Внешняя печатная подключаемая форма с авторегистрацией «Универсальный передаточный документ» (для документа Реализация товаров и услуг) для 1С: Комплексная автоматизация 8 ред. 1.1 с выбором ответственных  с указанием номера и даты приказа за руководителя, главного бухгалтера, ответственного за правильность оформления факта хозяйственной жизни.

В документе "Реализация товаров и услуг" есть поля "на основании" для полей ввода "Отпуск разрешил" и "Главный бухгалтер". Но указанные в них значения не выводятся в печатную форму Универсального передаточного документа (УПД).

Если значения полей не выбраны, то значения будут заполнены данными базы из ответственных лиц организации.

Кнопки на командной панели формы перед печатью позволят сохранять значения для полей ввода для последующих распечаток, избавляя от повторного ввода при очередной печати. Настройки формы сохраняются за каждым пользователем отдельно, поэтому она одновременно может быть использована несколькими пользователями базы данных.


Кнопки сохранения выбранных значений для последующей печати УПД

Чтобы обработка автоматически зарегистрировалась, нужно просто открыть файл обработки в режиме 1С:Предприятие.

Писалась и тестировалась на 1С: Комплексная автоматизация 8 1.1.62 и 1.1.67

Скачать файлы

Наименование Файл Версия Размер
УПД с выбором ответственных, номеров и дат приказов 20
.epf 43,32Kb
27.01.16
20
.epf 43,32Kb Скачать

См. также

Подписаться Добавить вознаграждение
Комментарии
1. Cheb Сорокин (Cheb) 26.01.16 16:06
Добрый день.

Релиз 1.1.66.2 подключил, проставил все поля, в итоге просто ничего не выходит, ошибок не выдает.

Нашел проблему.
Заменил
УправлениеПечатью.ЗадатьОбластьПечатиДокумента(ТабДокумент, НомерСтрокиНачало, ОбъектыПечати, Ссылка);

на:
Элемент = ОбъектыПечати.НайтиПоЗначению(Ссылка);
		Если Элемент = Неопределено Тогда
			ИмяОбласти = "Документ_" + Формат(ОбъектыПечати.Количество() + 1, "ЧН=; ЧГ=");
			ОбъектыПечати.Добавить(Ссылка, ИмяОбласти);
		Иначе
			ИмяОбласти = Элемент.Представление;
		КонецЕсли;
		
		НомерСтрокиОкончание = ТабДокумент.ВысотаТаблицы;
		ТабДокумент.Область(НомерСтрокиНачало, , НомерСтрокиОкончание, ).Имя = ИмяОбласти;
...Показать Скрыть


И все заработало
2. Александр Журавлев (apostal86) 27.01.16 21:48
(1) Cheb, у Вас база типовая?