РК_ЗагрузкаОстатков 1.3.1.69: исправить кнопку «Заполнить справочники отбора» (#12).

Устранён конфликт id формы с полем комиссионных товаров; добавлено оповещение о результате.

Co-authored-by: Cursor <cursoragent@cursor.com>

src/Configuration.xml

@@ -62,7 +62,7 @@
 				<xr:Item xsi:type="xr:MDObjectRef">Role.РК_ОсновнаяРоль</xr:Item>
 			</DefaultRoles>
 			<Vendor/>
-			<Version>1.3.1.68</Version>
+			<Version>1.3.1.69</Version>
 			<DefaultStyle/>
 			<DefaultLanguage>Language.Русский</DefaultLanguage>
 			<BriefInformation/>

src/DataProcessors/РК_ЗагрузкаОстатков/Forms/Форма/Ext/Form.xml

@@ -126,10 +126,10 @@
 							<ContextMenu name="ДатаОстатковКонтекстноеМеню" id="34"/>
 							<ExtendedTooltip name="ДатаОстатковРасширеннаяПодсказка" id="35"/>
 						</InputField>
-						<Button name="ЗаполнитьСправочникиОтбора" id="1547">
+						<Button name="ЗаполнитьСправочникиОтбора" id="1563">
 							<Type>UsualButton</Type>
 							<CommandName>Form.Command.ЗаполнитьСправочникиОтбора</CommandName>
-							<ExtendedTooltip name="ЗаполнитьСправочникиОтбораРасширеннаяПодсказка" id="1548"/>
+							<ExtendedTooltip name="ЗаполнитьСправочникиОтбораРасширеннаяПодсказка" id="1564"/>
 						</Button>
 						<UsualGroup name="ГруппаДвеКолонки" id="135">
 							<Title>

src/DataProcessors/РК_ЗагрузкаОстатков/Forms/Форма/Ext/Form/Module.bsl

@@ -85,12 +85,15 @@
 	КонецЕсли;
 
 	Попытка
-		ЗаполнитьСправочникиОтбораНаСервере();
+		Количество = ЗаполнитьСправочникиОтбораНаСервере();
 	Исключение
 		ПоказатьПредупреждение(, КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
 		Возврат;
 	КонецПопытки;
-	Элементы.ГруппаСтраницы.ТекущаяСтраница = Элементы.ГруппаОтбор;
+	ПоказатьОповещениеПользователя("Справочники отбора", ,
+		"Группы: " + Формат(Количество.Группы, "ЧН=0; ЧГ=0")
+			+ "; склады: " + Формат(Количество.Склады, "ЧН=0; ЧГ=0")
+			+ "; организации: " + Формат(Количество.Организации, "ЧН=0; ЧГ=0"));
 
 КонецПроцедуры
 
@@ -512,13 +515,19 @@
 КонецФункции
 
 &НаСервере
-Процедура ЗаполнитьСправочникиОтбораНаСервере()
+Функция ЗаполнитьСправочникиОтбораНаСервере()
 
 	ЗаполнитьГруппыНоменклатурНаСервере();
 	ПодобратьСкладыНаСервере();
 	ЗаполнитьОрганизацииНаСервере();
 
-КонецПроцедуры
+	Результат = Новый Структура;
+	Результат.Вставить("Группы", Объект.ОтборГруппНоменклатур.Количество());
+	Результат.Вставить("Склады", Объект.ОтборСкладовВнешнейБазы.Количество());
+	Результат.Вставить("Организации", Объект.ОтборОрганизацийВнешнейБазы.Количество());
+	Возврат Результат;
+
+КонецФункции
 
 &НаСервере
 Процедура ЗаполнитьГруппыНоменклатурНаСервере()