Заполнение входящего сертификата: различия между версиями

Материал из База знаний АО АСП
Перейти к навигации Перейти к поиску
м Shihov переименовал страницу Отрывки:заполнение входящего сертификата в Заполнение входящего сертификата: Автоматическое переименование
Нет описания правки
Строка 31: Строка 31:
</1c>
</1c>
[[Category:Отрывки]]
[[Category:Отрывки]]
<vote type=1 />

Версия от 13:13, 7 марта 2025

Заполнение входящего сертификата данными из Меркурия

Вариант: <1c> // На входе: // ГУИД входящего сертификата // Организация - наш поднадзорный

Обработка = АСП_Общие.ПолучитьОбъектОбработки(); Обработка.ЗапроситьДанныеСертификата(ГУИД, Организация); ДанынеСертификата = Обработка.ДанныеСертификата;

ВидДока = Справочники.АСП_ВидыДокументов1С.НайтиПоНаименованию("Поступление").Ссылка;

Док = Документы.АСП_ВетеринарныйДокумент.СоздатьДокумент(); Док.Дата = ТекущаяДата(); Док.Организация = Организация; Док.ВетВрач = Константы.АСП_ОсновнойВетВрач.Получить(); Док.ГУИДВходящегоВСД = Стр.ГУИД; Док.Записать(); Док.ДокументОснование = Док.Ссылка; Док.ВидДокумента = ВидДока;

Шаблон = АСП_Функции.НайтиШаблон(Док.Ссылка, ВидДока); Если НЕ Шаблон = Неопределено Тогда ЗаполнитьЗначенияСвойств(Док, Шаблон); КонецЕсли;

Док.ПолучитьФорму().ЗаполнитьПоВходящему(Обработка, ДанныеСертификата); Док.Записать(); </1c>

0.00
(0 голосов)