Для маркируемой в МДЛП продукции должен быть обязательно включен серийный учет лекарственных средств.
Настраиваю работу в Розница 8. Аптека, редакция 2.3 (2.3.1.40)
При попытке завести вид номенклатуры - маркируемая лекарственная продукция:
Рис 1
которая появляется при включении функциональной опции
Рис 2
Учет по сериям я тоже включил
Рис 3
Но при попытке записать выходит ошибка:
Рис 4
А вот текст ошибки:
В конфигураторе при попытке записать вот в этом коде доходит до ошибки:
Убедительно прощу, подскажите, где нужно включить в программе серийный учет лекарственных средств?
При попытке завести вид номенклатуры - маркируемая лекарственная продукция:
Рис 1
которая появляется при включении функциональной опции
Рис 2
Учет по сериям я тоже включил
Рис 3
Но при попытке записать выходит ошибка:
Рис 4
А вот текст ошибки:
Для маркируемой в МДЛП продукции должен быть обязательно включен серийный учет лекарственных средств.
В конфигураторе при попытке записать вот в этом коде доходит до ошибки:
Процедура ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты)
МассивНепроверяемыхРеквизитов = Новый Массив;
Если Не ЭтоГруппа Тогда
Если ИспользоватьСерии Тогда
Если Не ИспользоватьСрокГодностиСерии Тогда
МассивНепроверяемыхРеквизитов.Добавить("ТочностьУказанияСрокаГодностиСерии");
КонецЕсли;
КлючевыеРеквизиты = Новый Массив;
КлючевыеРеквизиты.Добавить("Магазин");
ОбщегоНазначенияРТ.ПроверитьНаличиеДублейСтрокТЧ(ЭтотОбъект,"ПолитикиУчетаСерий",КлючевыеРеквизиты,Отказ);
Иначе
МассивНепроверяемыхРеквизитов.Добавить("ТочностьУказанияСрокаГодностиСерии");
МассивНепроверяемыхРеквизитов.Добавить("НастройкаИспользованияСерий");
МассивНепроверяемыхРеквизитов.Добавить("ПолитикиУчетаСерий");
КонецЕсли;
Если (ПродукцияМаркируемаяДляГИСМ
Или КиЗГИСМ)
И Не ИспользоватьСерии Тогда
Отказ = Истина;
ТекстСообщения = НСтр("ru = 'Для маркируемой в ГИСМ продукции и для контрольных знаков ГИСМ должен быть обязательно включен учет серий.'");
ОбщегоНазначения.СообщитьПользователю(ТекстСообщения);
КонецЕсли;
ПоказатьМассивНепроверяемыхРеквизитов = Новый Массив;
Если Не ЭтоГруппа Тогда
Если ИспользоватьСерии Тогда
Если Не ИспользоватьСрокГодностиСерии Тогда
МассивНепроверяемыхРеквизитов.Добавить("ТочностьУказанияСрокаГодностиСерии");
КонецЕсли;
КлючевыеРеквизиты = Новый Массив;
КлючевыеРеквизиты.Добавить("Магазин");
ОбщегоНазначенияРТ.ПроверитьНаличиеДублейСтрокТЧ(ЭтотОбъект,"ПолитикиУчетаСерий",КлючевыеРеквизиты,Отказ);
Иначе
МассивНепроверяемыхРеквизитов.Добавить("ТочностьУказанияСрокаГодностиСерии");
МассивНепроверяемыхРеквизитов.Добавить("НастройкаИспользованияСерий");
МассивНепроверяемыхРеквизитов.Добавить("ПолитикиУчетаСерий");
КонецЕсли;
Если (ПродукцияМаркируемаяДляГИСМ
Или КиЗГИСМ)
И Не ИспользоватьСерии Тогда
Отказ = Истина;
ТекстСообщения = НСтр("ru = 'Для маркируемой в ГИСМ продукции и для контрольных знаков ГИСМ должен быть обязательно включен учет серий.'");
ОбщегоНазначения.СообщитьПользователю(ТекстСообщения);
КонецЕсли;
Убедительно прощу, подскажите, где нужно включить в программе серийный учет лекарственных средств?
Прикрепленные файлы:




Найденные решения
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот