0. poppy 3353 15.04.07 18:11 Сейчас в теме

Документ с печатью и подписью

В статье рассматривается вопрос формирования печатных документов с изображением печати организиции и подписями ответственных лиц.

Статья является продолжением цикла статей и разработок:
Внешние печатные формы в восьмерке http://infostart.ru/blogs/157
Обработка для тестирования внешних печатных форм в восьмерке http://infostart.ru/projects/833/
Использование встроенного почтового клиента - http://infostart.ru/blogs/161/
Документ с печатью и подписью - http://infostart.ru/blogs/162/
Внешние печатные формы в восьмерке II - http://infostart.ru/blogs/324/
Заполнение табличных частей документов в восьмерке (внешние обработки) http://infostart.ru/blogs/345/
Обработка для тестирования внешних обработок изменения табличных частей http://infostart.ru/projects/1749/
Использование свойств объектов при доработке типовых конфигураций http://infostart.ru/blogs/692/

Перейти к публикации

Комментарии
Избранное Подписка Сортировка: Древо
1. NewNick 15.04.07 18:11 Сейчас в теме
>Для этого создадим новый регистр сведений "Изображения" с измерением "Объект" >типа "СправочникСсылка.Организации, СправочникСсылка.ФизическиеЛица" и >ресурсом "Изображение" типа "ХранилищеЗначения". Сформируем основную форму записи. >Устанавим на ней поле картинки, поле для выбора объекта и кнопку "Загрузить". В модуле формы >пишем код:
А если не секрет чем нас не устраивает справочник "ХранилищеДополнительнойИнформации" ? Вроде он есть во всех типовых конфигурациях, и ненадо лишний раз тормошить метаданные.
2. CheBurator 13.04.07 03:49 Сейчас в теме
Н-дя... а пользы от этого?
М.б. ЭЦП подписывать письмо?
3. poppy 3353 13.04.07 09:00 Сейчас в теме
> Н-дя... а пользы от этого?

Это замена передачи документов по факсу. ЭЦП здесь точно не при чем...
4. poppy 3353 16.04.07 00:43 Сейчас в теме
> А если не секрет чем нас не устраивает справочник "ХранилищеДополнительнойИнформации" ?
> Вроде он есть во всех типовых конфигурациях, и ненадо лишний раз тормошить метаданные.

Всем устраивает. С точки зрения "тормошения метаданных" - использование справочника "ХранилищеДополнительнойИнформации" решение более грамотное. Для такого решения придется немного подправить мой код.

С помощью регистра сведений обеспечивается уникальность "изображения" для каждого объекта.
5. NewNick 16.04.07 02:54 Сейчас в теме
>С помощью регистра сведений обеспечивается уникальность "изображения" для каждого объекта.
Хм ?)
6. d.snissarenko 04.05.07 15:31 Сейчас в теме
мда на самом деле ЭЦП - как более лучший вариант
7. registration 05.02.08 10:25 Сейчас в теме
Ваша ЭЦП Ваших партнеров мало инетресует ;) Работаем по старинке :(
8. sashocq 191 13.02.09 00:09 Сейчас в теме
Давно и я такое задумал, да все как-то не довелось. Довольно изящно реализовано. Респект!
9. ineoosaki 13.02.09 00:38 Сейчас в теме
в свое время написал конфу - "Создание левых сертефикатов качества".
С базой данных сертификационных центров, засветившихся в реальных сертах работников, сканами печатей и т.п.
очень помагает в работе... :)
жаль, что такие вещи выкладывать нельзя...
10. Dadjbog 26 19.02.09 18:59 Сейчас в теме
Такая проблемка. При выводе на принтер катинка с печатью теряет прозрачность и выводится в белом прямоугольнике. Что я делаю не так? :'(
tatyana_123456; retif; +2 Ответить
11. poppy 3353 19.02.09 19:05 Сейчас в теме
(10)
У тебя на экране картинка прозрачная?
12. Dadjbog 26 19.02.09 19:06 Сейчас в теме
13. poppy 3353 19.02.09 19:24 Сейчас в теме
(12) Не знаю чем помочь. Вероятно, платформа неправильно взаимодействует с драйвером принтера.
14. Душелов 3899 19.02.09 23:58 Сейчас в теме
Можно попоровать мою html2image ;) Как бы работает у ряда клиентов..
15. thorben 17 22.02.09 00:24 Сейчас в теме
Подскажите! У меня что-то не работает. Ошибок никаких нет, вот только печать и подпись остается одна и таже, которую я ввел на макет. Или я как-то по-другому должен был вводить рисунки?
16. poppy 3353 05.03.09 22:27 Сейчас в теме
(15) Присылай свою обработку. Посмотрю.
17. thorben 17 08.03.09 19:41 Сейчас в теме
Спасибо, разобрался уже. Только теперь другая проблема. На экран все выводится прекрасно. Только когда я сохраняю документ в формате PDF, то все картинки gif становятся с черной заливкой. Если же беру jpg, то из прозрачных они превращаются в непрозрачные. Был бы благодарен за интересную подсказку.
18. poppy 3353 29.03.09 15:33 Сейчас в теме
(17) Может проблема в программе, которая сохраняет в формате PDF?
21. alina-aud 20.02.10 19:35 Сейчас в теме
(18) Подскажите, почему такая ошибка вылезает ..

{РегистрСведений.Изображения.Форма.ФормаСписка(20,3)}: Переменная не определена (РегистрСведенийМенеджерЗаписи)
<<?>>РегистрСведенийМенеджерЗаписи.Изображение = Новый ХранилищеЗначения(ВыбранноеФото);
{РегистрСведений.Изображения.Форма.ФормаСписка(27,13)}: Переменная не определена (РегистрСведенийМенеджерЗаписи)
Картинка = <<?>>РегистрСведенийМенеджерЗаписи.Изображение.Получить();
22. poppy 3353 23.02.10 11:00 Сейчас в теме
(21) РегистрСведенийМенеджерЗаписи - это реквизит формы типа РегистрСведенийМенеджерЗаписи.Изображения.

У тебя такого реквизита нет, либо он имеет другой идентификатор.
23. pam71 12.05.10 23:20 Сейчас в теме
(22) А можно по подробнее, а то у меня такая же ошибка. Помгите, напишите подробнее что мне делать.
24. logdog 22.06.10 19:38 Сейчас в теме
(22) А под 8.2 для БУХ 2.0 данная статья будет адаптирована?
19. madvik 16.09.09 23:34 Сейчас в теме
(17) У меня была та же проблема. Как оказалось, виновна не платформа, а драйвер принтера. Методом перебора установили, что на ХП лазерджет 1100 и на каком-то Коника печатает нормально, а вот на Ксероксе - черная заливка.
20. manlak 77 17.09.09 12:01 Сейчас в теме
25. bullit.w 19.08.10 22:45 Сейчас в теме
Подскажите уважаемый poppy, почему после отправки счета с вставленной подписью и печатью из УТ 10.3 она приходит получателю с "невозможно отобразить рисунок" Подпись и печать вставлены в формате .jpeg :?:
26. vladuser 28.02.11 14:55 Сейчас в теме
Добрый день!
Помогите разобраться новичку...

Выдает следующую ошибку

{Документ.СчетНаОплатуПокупателю(525,33)}: Переменная не определена (Шапка)
РегИзображения.Объект = <<?>>Шапка.Организация; (Проверка: Толстый клиент (обычное приложение))
{Документ.СчетНаОплатуПокупателю(535,64)}: Переменная не определена (Шапка)
мСведенияОбОрганизации = ПолучитьСведенияОбОрганизации(<<?>>Шапка.Организация, Шапка.Дата, СписокПоказателей); (Проверка: Толстый клиент (обычное приложение))
{Документ.СчетНаОплатуПокупателю(535,83)}: Переменная не определена (Шапка)
мСведенияОбОрганизации = ПолучитьСведенияОбОрганизации(Шапка.Организация, <<?>>Шапка.Дата, СписокПоказателей); (Проверка: Толстый клиент (обычное приложение))
{Документ.СчетНаОплатуПокупателю(535,34)}: Процедура или функция с указанным именем не определена (ПолучитьСведенияОбОрганизации)
мСведенияОбОрганизации = <<?>>ПолучитьСведенияОбОрганизации(Шапка.Организация, Шапка.Дата, СписокПоказателей); (Проверка: Толстый клиент (обычное приложение))

Конфигурация торговля 10.3.

что не так?
27. cool.vlad4 45 28.02.11 15:03 Сейчас в теме
(26) Черным по белому написано - шапка не определенна, скорее всего это результат запроса, он у тебя есть?
28. SchemeR 18.05.11 02:11 Сейчас в теме
Есть такая утилита.
http://docland.ru/node/34

Конвертирует доки (счета) в PDF;
По ИНН-у организации подбирает соответствующее изображение подписи печати, которую надо шлепнуть в счет;
Автоматом создает е-mail, куда вставляет адрес клиента, полученный PDF со счетом подписанного документа, типовое обращение.

Работает как внешняя утилита при печати счета на виртуальный принтер.
Соответственно, работает хоть с 1С8, 7.7, SAP или Word.
29. alenakrr 28.10.11 15:54 Сейчас в теме
странная и стремная необходимость печатать печати и подписей бухгалтеров...
ладно бы логотип фирмы и шапку исходящего документа...
и почему не используются стандартная для всех конфигураций схема со справочником "Хранилище дополнительной информации" - был создан подобный регистр?!
30. zhleonid8 08.11.11 10:27 Сейчас в теме
реально пригодится при формировании актов сверок с 1000 контрагентов:)
31. si4 16 15.11.11 22:13 Сейчас в теме
Очень нужная статья! спасибо!
32. oleg_ss 22.01.12 13:10 Сейчас в теме
Да на данный момент тема актуальна, т.к. сверки надо делать.
Хотя лучше мень вмешиваться в конфу, а то потом замучаешься обновлять, есть печальный опыт.
Хотелось сделать как лучше бухам, а теперь куча проблемм в итоге.
Спасибо.
33. Mamakan 19 11.11.12 10:52 Сейчас в теме
Очень нужная в данный момент статья! спасибо большое!
34. Asdam 115 04.09.15 00:18 Сейчас в теме
Если использовать справочник "ХранилищеДополнительнойИнформации", который присутствует в типовых конфигурациях, тогда и снимать с поддержки конфигурацию нет необходимости.

			Картинка = ПолучитьКартинку(Шапка.Поставщик, "Печать");
			
			Если ТипЗнч(Картинка) = Тип("Картинка") Тогда 
				ОбластьМакета.Рисунки.Печать.Картинка = Новый Картинка(Картинка.ПолучитьДвоичныеДанные(), Истина);
			КонецЕсли;


Функция ПолучитьКартинку(Объект, НаименованиеКартинки)
	
	Картинка = Неопределено;
	
	Запрос = Новый Запрос;
	Запрос.Текст = "ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
	|	ХранилищеДополнительнойИнформации.Наименование,
	|	ХранилищеДополнительнойИнформации.Объект,
	|	ХранилищеДополнительнойИнформации.Хранилище,
	|	ХранилищеДополнительнойИнформации.Ссылка
	|ИЗ
	|	Справочник.ХранилищеДополнительнойИнформации КАК ХранилищеДополнительнойИнформации
	|ГДЕ
	|	ХранилищеДополнительнойИнформации.Наименование = &Наименование
	|И ХранилищеДополнительнойИнформации.Объект = &Объект
	|";

	Запрос.УстановитьПараметр("Наименование", НаименованиеКартинки);
	Запрос.УстановитьПараметр("Объект", Объект);

	Выборка = Запрос.Выполнить().Выбрать();
	
	Если Выборка.Следующий() Тогда
		
		Картинка = Выборка.Хранилище.Получить();
		
	КонецЕсли;
	
	Возврат Картинка;
	
КонецФункции
Показать

tatyana_123456; +1 Ответить
Оставьте свое сообщение
Новые вопросы с вознаграждением
Автор темы объявил вознаграждение за найденный ответ, его получит тот, кто первый поможет автору.

Вакансии

Программист 1С
Новосибирск
зарплата от 50 000 руб. до 80 000 руб.
Полный день

Программист, аналитик, эксперт 1С
Санкт-Петербург
По совместительству

Технический лидер, архитектор 1С, руководитель проектов
Санкт-Петербург
зарплата от 150 000 руб.
Полный день

Ведущий 1С консультант по БГУ
Омск
зарплата от 50 000 руб. до 95 000 руб.
Полный день

Специалист внедрения и сопровождения 1С
Омск
зарплата от 25 000 руб. до 50 000 руб.
Полный день