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