Skip to content

Commit

Permalink
sampleChangingDL
Browse files Browse the repository at this point in the history
  • Loading branch information
denisushakov committed Apr 10, 2024
1 parent 996effa commit 61d8853
Show file tree
Hide file tree
Showing 5 changed files with 896 additions and 9 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -17,6 +17,9 @@
</Button>
</ChildItems>
</AutoCommandBar>
<Events>
<Event name="OnCreateAtServer">ПриСозданииНаСервере</Event>
</Events>
<ChildItems>
<UsualGroup name="СписокКомпоновщикНастроекПользовательскиеНастройки" id="1">
<Title>
Expand Down Expand Up @@ -136,24 +139,15 @@
ПредопределенныеЗначения.ЭтоГруппа КАК ЭтоГруппа,
ПредопределенныеЗначения.Код КАК Код,
ПредопределенныеЗначения.Наименование КАК Наименование,
ПредопределенныеЗначения.ТипЗначения КАК ТипЗначения,
ВЫБОР
КОГДА ПредопределенныеЗначения.Пароль
ТОГДА "Пароль"
КОГДА ПредопределенныеЗначения.СписокЗначений
ТОГДА "Список"
ИНАЧЕ ПредопределенныеЗначения.Значение
КОНЕЦ КАК Значение,
ПредопределенныеЗначения.Пароль КАК Пароль,
ПредопределенныеЗначения.СписокЗначений КАК СписокЗначений,
ПредопределенныеЗначения.Комментарий КАК Комментарий,
ПредопределенныеЗначения.ЗначенияЭлементов.(
Ссылка КАК Ссылка,
НомерСтроки КАК НомерСтроки,
Значение КАК Значение
) КАК ЗначенияЭлементов,
ПредопределенныеЗначения.Предопределенный КАК Предопределенный,
ПредопределенныеЗначения.ИмяПредопределенныхДанных КАК ИмяПредопределенныхДанных,
ПредопределенныеЗначения.ИдентификаторНастройки КАК ИдентификаторНастройки
ИЗ
ПланВидовХарактеристик.__ПредопределенныеЗначения КАК ПредопределенныеЗначения</QueryText>
Expand Down
Original file line number Diff line number Diff line change
@@ -1,6 +1,13 @@

#Область ОбработчикиСобытийФормы

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)

МодифицироватьФорму();

This comment has been minimized.

Copy link
@ivanmolodec

ivanmolodec Apr 10, 2024

Member

Переделать на __МодификацияКонфигурацииПереопределяемый


КонецПроцедуры

#КонецОбласти

#Область ОбработчикиКомандФормы
Expand All @@ -20,3 +27,33 @@
КонецПроцедуры

#КонецОбласти

#Область СлужебныеПроцедурыИФункции

&НаСервере
Процедура МодифицироватьФорму()

// ++ Обход ошибки отстутствия модуля БСП, не переносить
СхемыЗапросов = __ВспомогательныйСхемыЗапросовERPНеПереносить;
// -- Обход ошибки отстутствия модуля БСП, не переносить

// ++ Пример программного изменения динамического списка через схему запроса
Если Список.ПроизвольныйЗапрос Тогда
ТекстЗапроса = Список.ТекстЗапроса;
Список.ТекстЗапроса = СхемыЗапросов.ДобавитьПолеВыборкиВЗапрос(
ТекстЗапроса,
"Пароль",
"Пароль",
,
,
Истина);

Элемент = Элементы.Добавить("Пароль", Тип("ПолеФормы"), Элементы.Список);

This comment has been minimized.

Copy link
@ivanmolodec

ivanmolodec Apr 10, 2024

Member

Переделать на __РаботаСФормами

Элемент.Вид = ВидПоляФормы.ПолеФлажка;
Элемент.ПутьКДанным = "Список.Пароль";
КонецЕсли;
// -- Пример программного изменения динамического списка через схему запроса

КонецПроцедуры

#КонецОбласти
Original file line number Diff line number Diff line change
@@ -0,0 +1,23 @@
<?xml version="1.0" encoding="UTF-8"?>
<MetaDataObject xmlns="http://v8.1c.ru/8.3/MDClasses" xmlns:app="http://v8.1c.ru/8.2/managed-application/core" xmlns:cfg="http://v8.1c.ru/8.1/data/enterprise/current-config" xmlns:cmi="http://v8.1c.ru/8.2/managed-application/cmi" xmlns:ent="http://v8.1c.ru/8.1/data/enterprise" xmlns:lf="http://v8.1c.ru/8.2/managed-application/logform" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:xen="http://v8.1c.ru/8.3/xcf/enums" xmlns:xpr="http://v8.1c.ru/8.3/xcf/predef" xmlns:xr="http://v8.1c.ru/8.3/xcf/readable" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" version="2.16">
<CommonModule uuid="edefce4a-714f-474d-a936-75c3ab0712f5">
<Properties>
<Name>__ВспомогательныйСхемыЗапросовERPНеПереносить</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Вспомогательный схемы запросов ERP (не переносить)</v8:content>
</v8:item>
</Synonym>
<Comment/>
<Global>false</Global>
<ClientManagedApplication>false</ClientManagedApplication>
<Server>true</Server>
<ExternalConnection>true</ExternalConnection>
<ClientOrdinaryApplication>false</ClientOrdinaryApplication>
<ServerCall>false</ServerCall>
<Privileged>false</Privileged>
<ReturnValuesReuse>DontUse</ReturnValuesReuse>
</Properties>
</CommonModule>
</MetaDataObject>
Loading

0 comments on commit 61d8853

Please sign in to comment.