Заполнение входящего сертификата: различия между версиями
Перейти к навигации
Перейти к поиску
Shihov (обсуждение | вклад) Нет описания правки |
Shihov (обсуждение | вклад) Нет описания правки |
||
| (не показаны 2 промежуточные версии этого же участника) | |||
| Строка 2: | Строка 2: | ||
Вариант: | Вариант: | ||
<1c> | <syntaxhighlight lang='1c'> | ||
// На входе: | // На входе: | ||
// ГУИД входящего сертификата | // ГУИД входящего сертификата | ||
| Строка 29: | Строка 29: | ||
Док.ПолучитьФорму().ЗаполнитьПоВходящему(Обработка, ДанныеСертификата); | Док.ПолучитьФорму().ЗаполнитьПоВходящему(Обработка, ДанныеСертификата); | ||
Док.Записать(); | Док.Записать(); | ||
</ | </syntaxhighlight> | ||
[[Category:Отрывки]] | [[Category:Отрывки]] | ||
<vote type=1 /> | |||
Текущая версия от 13:04, 2 апреля 2025
Заполнение входящего сертификата данными из Меркурия
Вариант:
// На входе:
// ГУИД входящего сертификата
// Организация - наш поднадзорный
Обработка = АСП_Общие.ПолучитьОбъектОбработки();
Обработка.ЗапроситьДанныеСертификата(ГУИД, Организация);
ДанынеСертификата = Обработка.ДанныеСертификата;
ВидДока = Справочники.АСП_ВидыДокументов1С.НайтиПоНаименованию("Поступление").Ссылка;
Док = Документы.АСП_ВетеринарныйДокумент.СоздатьДокумент();
Док.Дата = ТекущаяДата();
Док.Организация = Организация;
Док.ВетВрач = Константы.АСП_ОсновнойВетВрач.Получить();
Док.ГУИДВходящегоВСД = Стр.ГУИД;
Док.Записать();
Док.ДокументОснование = Док.Ссылка;
Док.ВидДокумента = ВидДока;
Шаблон = АСП_Функции.НайтиШаблон(Док.Ссылка, ВидДока);
Если НЕ Шаблон = Неопределено Тогда
ЗаполнитьЗначенияСвойств(Док, Шаблон);
КонецЕсли;
Док.ПолучитьФорму().ЗаполнитьПоВходящему(Обработка, ДанныеСертификата);
Док.Записать();
