1c/crm3_26.rhana
4
0
Fork 0
Code Issues 7 Pull Requests Actions Packages Projects Releases 1 Wiki Activity

РК_ЗагрузкаОстатков 1.3.1.68: команда отбора (#12) и сохраняемые данные (#13).

Browse Source 
Общая команда справочников отбора; Save/SavedData для подключения, дат, организации и дерева групп.

Co-authored-by: Cursor <cursoragent@cursor.com>
This commit is contained in:
mihailkudravcev
2026-08-17 09:37:47 +03:00
parent 96f39f27b1
commit b3f518e170
5 changed files with 54 additions and 93 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Configuration.xml
+1 -1
View File
@@ -62,7 +62,7 @@
<xr:Item xsi:type="xr:MDObjectRef">Role.РК_ОсновнаяРоль</xr:Item>
</DefaultRoles>
<Vendor/>
<Version>1.3.1.66</Version>
<Version>1.3.1.68</Version>
<DefaultStyle/>
<DefaultLanguage>Language.Русский</DefaultLanguage>
<BriefInformation/>
src/DataProcessors/РК_ЗагрузкаОстатков/Forms/Форма/Ext/Form.xml
+17 -53
View File
@@ -40,6 +40,7 @@
</AutoCommandBar>
<Events>
<Event name="OnCreateAtServer">ПриСозданииНаСервере</Event>
<Event name="OnLoadDataFromSettingsAtServer">ПриЗагрузкеДанныхИзНастроекНаСервере</Event>
</Events>
<ChildItems>
<InputField name="ПодключениеКСтороннейБазе" id="30">
@@ -125,6 +126,11 @@
<ContextMenu name="ДатаОстатковКонтекстноеМеню" id="34"/>
<ExtendedTooltip name="ДатаОстатковРасширеннаяПодсказка" id="35"/>
</InputField>
<Button name="ЗаполнитьСправочникиОтбора" id="1547">
<Type>UsualButton</Type>
<CommandName>Form.Command.ЗаполнитьСправочникиОтбора</CommandName>
<ExtendedTooltip name="ЗаполнитьСправочникиОтбораРасширеннаяПодсказка" id="1548"/>
</Button>
<UsualGroup name="ГруппаДвеКолонки" id="135">
<Title>
<v8:item>
@@ -169,15 +175,6 @@
<DataPath>ОтборГруппНоменклатурДерево</DataPath>
<RowFilter xsi:nil="true"/>
<ContextMenu name="ОтборГруппНоменклатурКонтекстноеМеню" id="1519"/>
<AutoCommandBar name="ОтборГруппНоменклатурКоманднаяПанель" id="1520">
<ChildItems>
<Button name="ОтборГруппНоменклатурЗаполнить" id="1545">
<Type>CommandBarButton</Type>
<CommandName>Form.Command.ЗаполнитьГруппыНоменклатур</CommandName>
<ExtendedTooltip name="ОтборГруппНоменклатурЗаполнитьРасширеннаяПодсказка" id="1546"/>
</Button>
</ChildItems>
</AutoCommandBar>
<ExtendedTooltip name="ОтборГруппНоменклатурРасширеннаяПодсказка" id="1521"/>
<SearchStringAddition name="ОтборГруппНоменклатурСтрокаПоиска" id="1522">
<AdditionSource>
@@ -253,11 +250,6 @@
</ContextMenu>
<AutoCommandBar name="ОтборСкладовВнешнейБазыКоманднаяПанель" id="45">
<ChildItems>
<Button name="ОтборСкладовВнешнейБазыПодобратьСклады" id="65">
<Type>CommandBarButton</Type>
<CommandName>Form.Command.ЗаполнитьСклады</CommandName>
<ExtendedTooltip name="ОтборСкладовВнешнейБазыПодобратьСкладыРасширеннаяПодсказка" id="66"/>
</Button>
<Button name="ОтборСкладовВнешнейБазыСкладыОтборОтметить" id="131">
<Type>CommandBarButton</Type>
<CommandName>Form.Command.СкладыОтборОтметить</CommandName>
@@ -362,11 +354,6 @@
</ContextMenu>
<AutoCommandBar name="ОтборОрганизацийВнешнейБазыКоманднаяПанель" id="141">
<ChildItems>
<Button name="ОтборОрганизацийВнешнейБазыЗаполнитьОрганизации" id="171">
<Type>CommandBarButton</Type>
<CommandName>Form.Command.ЗаполнитьОрганизации</CommandName>
<ExtendedTooltip name="ОтборОрганизацийВнешнейБазыЗаполнитьОрганизацииРасширеннаяПодсказка" id="172"/>
</Button>
<Button name="ОтборОрганизацийВнешнейБазыОрганизацииОтборОтметить" id="173">
<Type>CommandBarButton</Type>
<CommandName>Form.Command.ОрганизацииОтборОтметить</CommandName>
@@ -1252,6 +1239,12 @@
<v8:Type>cfg:DataProcessorObject.РК_ЗагрузкаОстатков</v8:Type>
</Type>
<MainAttribute>true</MainAttribute>
<Save>
<Field>Объект.ПодключениеКСтороннейБазе</Field>
<Field>Объект.ДатаОстатков</Field>
<Field>Объект.ДатаДокументовВвода</Field>
<Field>Объект.Организация</Field>
</Save>
<Columns>
<AdditionalColumns table="Объект.ВходящиеСобственныеТовары"/>
</Columns>
@@ -1266,6 +1259,7 @@
<Type>
<v8:Type>v8:ValueTree</v8:Type>
</Type>
<SavedData>true</SavedData>
<Columns>
<Column name="Отметка" id="1">
<Title>
@@ -1330,21 +1324,6 @@
</Attribute>
</Attributes>
<Commands>
<Command name="ЗаполнитьСклады" id="1">
<Title>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Заполнить склады</v8:content>
</v8:item>
</Title>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Заполнить склады</v8:content>
</v8:item>
</ToolTip>
<Action>ЗаполнитьСклады</Action>
</Command>
<Command name="ЗагрузитьОстатки" id="2">
<Title>
<v8:item>
@@ -1440,20 +1419,20 @@
</Picture>
<Action>СкладыОтборСнятьОтметку</Action>
</Command>
<Command name="ЗаполнитьОрганизации" id="7">
<Command name="ЗаполнитьСправочникиОтбора" id="11">
<Title>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Заполнить организации</v8:content>
<v8:content>Заполнить справочники отбора</v8:content>
</v8:item>
</Title>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Заполнить организации из сторонней базы</v8:content>
<v8:content>Загрузить или обновить группы номенклатуры, склады и организации из сторонней базы</v8:content>
</v8:item>
</ToolTip>
<Action>ЗаполнитьОрганизации</Action>
<Action>ЗаполнитьСправочникиОтбора</Action>
</Command>
<Command name="ОрганизацииОтборОтметить" id="8">
<Title>
@@ -1493,20 +1472,5 @@
</Picture>
<Action>ОрганизацииОтборСнятьОтметку</Action>
</Command>
<Command name="ЗаполнитьГруппыНоменклатур" id="10">
<Title>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Заполнить группы номенклатур</v8:content>
</v8:item>
</Title>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Заполнить группы номенклатур</v8:content>
</v8:item>
</ToolTip>
<Action>ЗаполнитьГруппыНоменклатур</Action>
</Command>
</Commands>
</Form>
src/DataProcessors/РК_ЗагрузкаОстатков/Forms/Форма/Ext/Form/Module.bsl
+19 -38
View File
@@ -25,6 +25,14 @@
КонецПроцедуры
&НаСервере
Процедура ПриЗагрузкеДанныхИзНастроекНаСервере(Настройки)
СинхронизироватьТабличнуюЧастьГруппИзДерева();
ПодключениеКСтороннейБазеПредыдущее = Объект.ПодключениеКСтороннейБазе;
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиСобытийЭлементовШапкиФормы
@@ -69,7 +77,7 @@
#Область ОбработчикиКомандФормы
&НаКлиенте
Процедура ЗаполнитьСклады(Команда)
Процедура ЗаполнитьСправочникиОтбора(Команда)
Если Не ЗначениеЗаполнено(Объект.ПодключениеКСтороннейБазе) Тогда
ПоказатьПредупреждение(, "Укажите подключение к сторонней базе");
@@ -77,25 +85,7 @@
КонецЕсли;
Попытка
ПодобратьСкладыНаСервере();
Исключение
ПоказатьПредупреждение(, КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
Возврат;
КонецПопытки;
Элементы.ГруппаСтраницы.ТекущаяСтраница = Элементы.ГруппаОтбор;
КонецПроцедуры
&НаКлиенте
Процедура ЗаполнитьОрганизации(Команда)
Если Не ЗначениеЗаполнено(Объект.ПодключениеКСтороннейБазе) Тогда
ПоказатьПредупреждение(, "Укажите подключение к сторонней базе");
Возврат;
КонецЕсли;
Попытка
ЗаполнитьОрганизацииНаСервере();
ЗаполнитьСправочникиОтбораНаСервере();
Исключение
ПоказатьПредупреждение(, КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
Возврат;
@@ -521,6 +511,15 @@
КонецФункции
&НаСервере
Процедура ЗаполнитьСправочникиОтбораНаСервере()
ЗаполнитьГруппыНоменклатурНаСервере();
ПодобратьСкладыНаСервере();
ЗаполнитьОрганизацииНаСервере();
КонецПроцедуры
&НаСервере
Процедура ЗаполнитьГруппыНоменклатурНаСервере()
@@ -687,22 +686,4 @@
КонецПроцедуры
&НаКлиенте
Процедура ЗаполнитьГруппыНоменклатур(Команда)
Если Не ЗначениеЗаполнено(Объект.ПодключениеКСтороннейБазе) Тогда
ПоказатьПредупреждение(, "Укажите подключение к сторонней базе");
Возврат;
КонецЕсли;
Попытка
ЗаполнитьГруппыНоменклатурНаСервере();
Исключение
ПоказатьПредупреждение(, КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
Возврат;
КонецПопытки;
Элементы.ГруппаСтраницы.ТекущаяСтраница = Элементы.ГруппаОтбор;
КонецПроцедуры
#КонецОбласти