Заполнение входящего сертификата
Заполнение входящего сертификата данными из Меркурия
Вариант: <1c> // На входе: // ГУИД входящего сертификата // Организация - наш поднадзорный
Обработка = АСП_Общие.ПолучитьОбъектОбработки(); Обработка.ЗапроситьДанныеСертификата(ГУИД, Организация); ДанынеСертификата = Обработка.ДанныеСертификата;
ВидДока = Справочники.АСП_ВидыДокументов1С.НайтиПоНаименованию("Поступление").Ссылка;
Док = Документы.АСП_ВетеринарныйДокумент.СоздатьДокумент(); Док.Дата = ТекущаяДата(); Док.Организация = Организация; Док.ВетВрач = Константы.АСП_ОсновнойВетВрач.Получить(); Док.ГУИДВходящегоВСД = Стр.ГУИД; Док.Записать(); Док.ДокументОснование = Док.Ссылка; Док.ВидДокумента = ВидДока;
Шаблон = АСП_Функции.НайтиШаблон(Док.Ссылка, ВидДока); Если НЕ Шаблон = Неопределено Тогда ЗаполнитьЗначенияСвойств(Док, Шаблон); КонецЕсли;
Док.ПолучитьФорму().ЗаполнитьПоВходящему(Обработка, ДанныеСертификата); Док.Записать(); </1c>