Нюансы зубной 1С

Клиент не очень доволен работой зубной 1С.

Выбор пациентов

При выборе пациентов не показываются все пациенты, только при поиске по полям:

Доработал форму ФормаВыбораКлиенты справочника Контрагенты

&НаКлиенте
&После("ОтборПоФильтру")
Процедура дор_ОтборПоФильтру()
	Список.Параметры.УстановитьЗначениеПараметра("ЗапретОтображения" , Ложь);
КонецПроцедуры

Не показываются услуги

В приемах пациентов услуги не показываются при выборе:

Не загружаются услуги из классификатора

Некоторые услуги не загружаются из классификатора.

Процедура КлассификаторНоменклатурыМедицинскихУслуг.СоздатьОбновитьУслуги нормально создает услуги, но в конце выдает ошибку в журнал регистрации:

Ошибка при вызове метода контекста (Записать)
{Справочник.КлассификаторНоменклатурыМедицинскихУслуг.МодульМенеджера(510)}:НаборЗаписей.Записать();
{Справочник.КлассификаторНоменклатурыМедицинскихУслуг.МодульМенеджера(373)}:МассивУслуг = СоздатьОбновитьУслуги(Ссылки, Группа, ТаблицаИзменяемыхСостояний);
{Справочник.КлассификаторНоменклатурыМедицинскихУслуг.Форма.ФормаПодбора.Форма(482)}:Количество = Справочники.КлассификаторНоменклатурыМедицинскихУслуг.ПодобратьУслугиИзКлассификатора(Ссылки, Группа);

[ОшибкаВоВремяВыполненияВстроенногоЯзыка]
по причине:
Запись не верна! Значение поля не соответствует установленному отбору: ИзменяемыеСостоянияЗубнойФормулы: Удаление зуба, Перелом корня вертикальный (Регистр сведений: Изменяемые состояния зубной формулы; Номер строки: 1; Поле: Услуга)
[ОшибкаХранимыхДанных]

Причина в том, что не установлен отбор по услуге, исправляется патчем:

&ИзменениеИКонтроль("СоздатьОбновитьУслуги")
Функция дор_СоздатьОбновитьУслуги1(Ссылки, Группа, ТаблицаИзменяемыхСостояний)

	...

				Если ЗначениеЗаполнено(СтрокиИзменяемыхСостояний) Тогда

					НаборЗаписей = РегистрыСведений.ИзменяемыеСостоянияЗубнойФормулы.СоздатьНаборЗаписей();
					НаборЗаписей.Отбор.Услуга.Установить();
#Вставка					
					НаборЗаписей.Отбор.Услуга.Установить(УслугаОбъект.Ссылка);
#КонецВставки

					Для Каждого СтрокаСостояния Из СтрокиИзменяемыхСостояний Цикл

						СтрокаНабора							 = НаборЗаписей.Добавить();
						СтрокаНабора.Услуга						 = УслугаОбъект.Ссылка;
						СтрокаНабора.СостояниеЗубнойФормулы		 = СтрокаСостояния.СостояниеЗубнойФормулы;
						СтрокаНабора.ЭтоУстанавливаемоеСостояние = СтрокаСостояния.ЭтоУстанавливаемоеСостояние;

					КонецЦикла;

					НаборЗаписей.Записать();

	...
КонецФункции

Среда: 1С:Медицина. Стоматологическая клиника, редакция 2.1 (2.1.19.1) (https://stoma1c.ru/) 1С 8.3.24.1761