Skip to content

Commit

Permalink
New description of functions
Browse files Browse the repository at this point in the history
  • Loading branch information
@denisushakov
denisushakov committed Apr 27, 2024
1 parent 69fad0a commit 40bece2
Show file tree
Hide file tree
Showing 9 changed files with 362 additions and 186 deletions.
102 changes: 100 additions & 2 deletions src/Catalogs/__ПользовательскиеФункции.xml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -632,6 +632,47 @@
<DataHistory>Use</DataHistory>
</Properties>
</Attribute>
<Attribute uuid="5b112e4b-dce5-4c96-86d3-b0bc7bf96726">
<Properties>
<Name>ТипПараметра</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Тип параметра</v8:content>
</v8:item>
<v8:item>
<v8:lang>en</v8:lang>
<v8:content>Parameter Type</v8:content>
</v8:item>
</Synonym>
<Comment/>
<Type>
<v8:Type>v8:ValueStorage</v8:Type>
</Type>
<PasswordMode>false</PasswordMode>
<Format/>
<EditFormat/>
<ToolTip/>
<MarkNegatives>false</MarkNegatives>
<Mask/>
<MultiLine>false</MultiLine>
<ExtendedEdit>false</ExtendedEdit>
<MinValue xsi:nil="true"/>
<MaxValue xsi:nil="true"/>
<FillChecking>DontCheck</FillChecking>
<ChoiceFoldersAndItems>Items</ChoiceFoldersAndItems>
<ChoiceParameterLinks/>
<ChoiceParameters/>
<QuickChoice>Auto</QuickChoice>
<CreateOnInput>Auto</CreateOnInput>
<ChoiceForm/>
<LinkByType/>
<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
<Indexing>DontIndex</Indexing>
<FullTextSearch>Use</FullTextSearch>
<DataHistory>Use</DataHistory>
</Properties>
</Attribute>
<Attribute uuid="ed036b65-226b-42e4-ae09-bf1436fa0120">
<Properties>
<Name>Наименование</Name>
Expand Down Expand Up @@ -677,13 +718,70 @@
<DataHistory>Use</DataHistory>
</Properties>
</Attribute>
<Attribute uuid="8e72b20d-8eae-4026-88be-7ac8447469d7">
<Properties>
<Name>ЗначениеПоУмолчанию</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Значение по умолчанию</v8:content>
</v8:item>
<v8:item>
<v8:lang>en</v8:lang>
<v8:content>Default Value</v8:content>
</v8:item>
</Synonym>
<Comment/>
<Type>
<v8:Type>xs:boolean</v8:Type>
<v8:Type>xs:string</v8:Type>
<v8:Type>xs:dateTime</v8:Type>
<v8:Type>xs:decimal</v8:Type>
<v8:TypeSet>cfg:AnyRef</v8:TypeSet>
<v8:NumberQualifiers>
<v8:Digits>10</v8:Digits>
<v8:FractionDigits>0</v8:FractionDigits>
<v8:AllowedSign>Any</v8:AllowedSign>
</v8:NumberQualifiers>
<v8:StringQualifiers>
<v8:Length>10</v8:Length>
<v8:AllowedLength>Variable</v8:AllowedLength>
</v8:StringQualifiers>
<v8:DateQualifiers>
<v8:DateFractions>Date</v8:DateFractions>
</v8:DateQualifiers>
</Type>
<PasswordMode>false</PasswordMode>
<Format/>
<EditFormat/>
<ToolTip/>
<MarkNegatives>false</MarkNegatives>
<Mask/>
<MultiLine>false</MultiLine>
<ExtendedEdit>false</ExtendedEdit>
<MinValue xsi:nil="true"/>
<MaxValue xsi:nil="true"/>
<FillChecking>DontCheck</FillChecking>
<ChoiceFoldersAndItems>Items</ChoiceFoldersAndItems>
<ChoiceParameterLinks/>
<ChoiceParameters/>
<QuickChoice>Auto</QuickChoice>
<CreateOnInput>Auto</CreateOnInput>
<ChoiceForm/>
<LinkByType/>
<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
<Indexing>DontIndex</Indexing>
<FullTextSearch>Use</FullTextSearch>
<DataHistory>Use</DataHistory>
</Properties>
</Attribute>
<Attribute uuid="aaefaa01-2704-426d-b247-0dfbeaa84deb">
<Properties>
<Name>НеОбязательныйДляЗаполнения</Name>
<Name>Необязательный</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Не обязательный</v8:content>
<v8:content>Необязательный</v8:content>
</v8:item>
<v8:item>
<v8:lang>en</v8:lang>
Expand Down
246 changes: 212 additions & 34 deletions src/Catalogs/__ПользовательскиеФункции/Ext/ManagerModule.bsl
View file

Large diffs are not rendered by default.

9 changes: 1 addition & 8 deletions src/Catalogs/__ПользовательскиеФункции/Forms/ФормаВыбора/Ext/Form.xml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -120,14 +120,6 @@
<ShowTitle>false</ShowTitle>
<ExtendedTooltip name="ГруппаОписаниеФункцииРасширеннаяПодсказка" id="45"/>
<ChildItems>
<InputField name="Описание" id="30">
<DataPath>Items.Список.CurrentData.Описание</DataPath>
<ReadOnly>true</ReadOnly>
<TitleLocation>None</TitleLocation>
<MultiLine>true</MultiLine>
<ContextMenu name="ОписаниеКонтекстноеМеню" id="31"/>
<ExtendedTooltip name="ОписаниеРасширеннаяПодсказка" id="46"/>
</InputField>
<UsualGroup name="ГруппаШапкаФункции" id="13">
<Title>
<v8:item>
Expand Down Expand Up @@ -306,6 +298,7 @@
</Type>
<MainAttribute>true</MainAttribute>
<UseAlways>
<Field>Список.IsFolder</Field>
<Field>Список.Ref</Field>
</UseAlways>
<Settings xsi:type="DynamicList">
Expand Down
46 changes: 11 additions & 35 deletions src/Catalogs/__ПользовательскиеФункции/Forms/ФормаВыбора/Ext/Form/Module.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -50,42 +50,18 @@
// Ссылка - СправочникСсылка.__ПользовательскиеФункции.
//
&НаСервере
Процедура ПоказатьОписаниеФункцииСервер(Ссылка)
Процедура ПоказатьОписаниеФункцииСервер(Ссылка, ЭтоГруппа)

Если Ссылка.ЭтоГруппа Тогда

ТекстОписания = СтрШаблон(НСтр("ru='#В группе: %1';en='#In Group: %1'"), Символы.ПС);

Выборка = Справочники.__ПользовательскиеФункции.Выбрать(Ссылка);
Пока Выборка.Следующий() Цикл

Если Выборка.ЭтоГруппа Тогда
Продолжить;
КонецЕсли;

ОписаниеСКомментариями = СтрЗаменить(СокрЛП(Выборка.Описание), Символы.ПС, СтрШаблон("%1// ", Символы.ПС));
Если СокрЛП(Выборка.Описание) = "" Тогда
ОписаниеФункции = НСтр("ru='// <нет описания>';en='// <No description>'");
Иначе
ОписаниеФункции = СтрШаблон("// %1", ОписаниеСКомментариями);
КонецЕсли;

__ОбщегоНазначенияСервер.ДобавитьСтрокуКТексту(ТекстОписания, ОписаниеФункции);
СтруктураЗаголовка = Справочники.__ПользовательскиеФункции.ПолучитьНазваниеПодпрограммыСПараметрами(Выборка.Ссылка);
__ОбщегоНазначенияСервер.ДобавитьСтрокуКТексту(ТекстОписания, СтруктураЗаголовка.ЗаголовокФункции + Символы.ПС);
КонецЦикла;

ПолеОписания = ТекстОписания;
Если ЭтоГруппа Тогда
ПолеОписания = Справочники.__ПользовательскиеФункции.СформироватьОписаниеФункций(Ссылка, ЭтоГруппа);
Иначе
СтруктураЗаголовка = Справочники.__ПользовательскиеФункции.ПолучитьНазваниеПодпрограммыСПараметрами(Ссылка);

Элементы.ДекорацияНазваниеСПараметрами.Заголовок = СтруктураЗаголовка.НазваниеСПараметрами;
ПолеОписания = СтрШаблон("%1%2%3", СтруктураЗаголовка.ОписаниеПараметров, Символы.ПС, СокрЛП(Ссылка.КодПодпрограммы));
Результат = Справочники.__ПользовательскиеФункции.ПолучитьНазваниеПодпрограммыСПараметрами(Ссылка, ЭтоГруппа, Истина);
Элементы.ДекорацияНазваниеСПараметрами.Заголовок = Результат[0].НазваниеСПараметрами;
ПолеОписания = Результат[0].ОписаниеПараметров;
КонецЕсли;

Элементы.Описание.Видимость = Не Ссылка.ЭтоГруппа;
Элементы.ГруппаШапкаФункции.Видимость = Не Ссылка.ЭтоГруппа;
Элементы.ГруппаПодвалФункции.Видимость = Не Ссылка.ЭтоГруппа;
Элементы.ГруппаШапкаФункции.Видимость = Не ЭтоГруппа;
Элементы.ГруппаПодвалФункции.Видимость = Не ЭтоГруппа;

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

Expand All @@ -94,12 +70,12 @@
&НаКлиенте
Процедура ПоказатьОписаниеФункции()

ТекущиеДанные = Элементы.Список.ТекущиеДанные;
Если ТекущиеДанные = Неопределено Тогда
ТекДанные = Элементы.Список.ТекущиеДанные;
Если ТекДанные = Неопределено Тогда
Возврат;
КонецЕсли;

ПоказатьОписаниеФункцииСервер(ТекущиеДанные.Ссылка);
ПоказатьОписаниеФункцииСервер(ТекДанные.Ссылка, ТекДанные.ЭтоГруппа);

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

Expand Down
9 changes: 1 addition & 8 deletions src/Catalogs/__ПользовательскиеФункции/Forms/ФормаСписка/Ext/Form.xml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -133,14 +133,6 @@
<ShowTitle>false</ShowTitle>
<ExtendedTooltip name="ГруппаОписаниеФункцииРасширеннаяПодсказка" id="43"/>
<ChildItems>
<InputField name="Описание" id="28">
<DataPath>Items.Список.CurrentData.Описание</DataPath>
<ReadOnly>true</ReadOnly>
<TitleLocation>None</TitleLocation>
<MultiLine>true</MultiLine>
<ContextMenu name="ОписаниеКонтекстноеМеню" id="29"/>
<ExtendedTooltip name="ОписаниеРасширеннаяПодсказка" id="44"/>
</InputField>
<UsualGroup name="ГруппаШапкаФункции" id="16">
<Title>
<v8:item>
Expand Down Expand Up @@ -318,6 +310,7 @@
</Type>
<MainAttribute>true</MainAttribute>
<UseAlways>
<Field>Список.IsFolder</Field>
<Field>Список.Ref</Field>
</UseAlways>
<Settings xsi:type="DynamicList">
Expand Down
42 changes: 9 additions & 33 deletions src/Catalogs/__ПользовательскиеФункции/Forms/ФормаСписка/Ext/Form/Module.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -50,42 +50,18 @@
// Ссылка - СправочникСсылка.__ПользовательскиеФункции.
//
&НаСервере
Процедура ПоказатьОписаниеФункцииСервер(Ссылка)
Процедура ПоказатьОписаниеФункцииСервер(Ссылка, ЭтоГруппа)

Если Ссылка.ЭтоГруппа Тогда

ТекстОписания = СтрШаблон(НСтр("ru='#В группе: %1';en='#In Group: %1'"), Символы.ПС);

Выборка = Справочники.__ПользовательскиеФункции.Выбрать(Ссылка);
Пока Выборка.Следующий() Цикл

Если Выборка.ЭтоГруппа Тогда
Продолжить;
КонецЕсли;

ОписаниеСКомментариями = СтрЗаменить(СокрЛП(Выборка.Описание), Символы.ПС, СтрШаблон("%1// ", Символы.ПС));
Если СокрЛП(Выборка.Описание) = "" Тогда
ОписаниеФункции = НСтр("ru='// <нет описания>';en='// <No description>'");
Иначе
ОписаниеФункции = СтрШаблон("// %1", ОписаниеСКомментариями);
КонецЕсли;

__ОбщегоНазначенияСервер.ДобавитьСтрокуКТексту(ТекстОписания, ОписаниеФункции);
СтруктураЗаголовка = Справочники.__ПользовательскиеФункции.ПолучитьНазваниеПодпрограммыСПараметрами(Выборка.Ссылка);
__ОбщегоНазначенияСервер.ДобавитьСтрокуКТексту(ТекстОписания, СтруктураЗаголовка.ЗаголовокФункции + Символы.ПС);
КонецЦикла;

ПолеОписания = ТекстОписания;
Если ЭтоГруппа Тогда
ПолеОписания = Справочники.__ПользовательскиеФункции.СформироватьОписаниеФункций(Ссылка, ЭтоГруппа);
Иначе
СтруктураЗаголовка = Справочники.__ПользовательскиеФункции.ПолучитьНазваниеПодпрограммыСПараметрами(Ссылка);

Элементы.ДекорацияНазваниеСПараметрами.Заголовок = СтруктураЗаголовка.НазваниеСПараметрами;
ПолеОписания = СтрШаблон("%1%2%3", СтруктураЗаголовка.ОписаниеПараметров, Символы.ПС, СокрЛП(Ссылка.КодПодпрограммы));
Результат = Справочники.__ПользовательскиеФункции.ПолучитьНазваниеПодпрограммыСПараметрами(Ссылка, ЭтоГруппа, Истина);
Элементы.ДекорацияНазваниеСПараметрами.Заголовок = Результат[0].НазваниеСПараметрами;
ПолеОписания = Результат[0].ОписаниеПараметров;
КонецЕсли;

Элементы.Описание.Видимость = Не Ссылка.ЭтоГруппа;
Элементы.ГруппаШапкаФункции.Видимость = Не Ссылка.ЭтоГруппа;
Элементы.ГруппаПодвалФункции.Видимость = Не Ссылка.ЭтоГруппа;
Элементы.ГруппаШапкаФункции.Видимость = Не ЭтоГруппа;
Элементы.ГруппаПодвалФункции.Видимость = Не ЭтоГруппа;

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

Expand All @@ -99,7 +75,7 @@
Возврат;
КонецЕсли;

ПоказатьОписаниеФункцииСервер(ТекущиеДанные.Ссылка);
ПоказатьОписаниеФункцииСервер(ТекущиеДанные.Ссылка, ТекущиеДанные.ЭтоГруппа);

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

Expand Down
36 changes: 1 addition & 35 deletions src/Catalogs/__ПользовательскиеФункции/Forms/ФормаЭлемента/Ext/Form.xml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -203,7 +203,7 @@
<ExtendedTooltip name="ПараметрыФункцииНаименованиеExtendedTooltip" id="83"/>
</InputField>
<CheckBoxField name="ПараметрыФункцииНеОбязательныйДляЗаполнения" id="26">
<DataPath>Объект.ПараметрыФункции.НеОбязательныйДляЗаполнения</DataPath>
<DataPath>Объект.ПараметрыФункции.Необязательный</DataPath>
<EditMode>EnterOnInput</EditMode>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="ПараметрыФункцииНеОбязательныйДляЗаполненияКонтекстноеМеню" id="27"/>
Expand Down Expand Up @@ -402,11 +402,6 @@
<CommandName>Form.Command.ВставитьЗапрос</CommandName>
<ExtendedTooltip name="ВставитьЗапросExtendedTooltip" id="95"/>
</Button>
<Button name="ДобавитьОписание" id="64">
<Type>CommandBarButton</Type>
<CommandName>Form.Command.ДобавитьОписание</CommandName>
<ExtendedTooltip name="ДобавитьОписаниеExtendedTooltip" id="96"/>
</Button>
</ChildItems>
</ButtonGroup>
<ButtonGroup name="ГруппаНастройкиОтображения" id="139">
Expand Down Expand Up @@ -1055,35 +1050,6 @@
<ModifiesSavedData>true</ModifiesSavedData>
<CurrentRowUse>DontUse</CurrentRowUse>
</Command>
<Command name="ДобавитьОписание" id="5">
<Title>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Добавить описание</v8:content>
</v8:item>
<v8:item>
<v8:lang>en</v8:lang>
<v8:content>Add Description</v8:content>
</v8:item>
</Title>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Добавить описание подпрограммы</v8:content>
</v8:item>
<v8:item>
<v8:lang>en</v8:lang>
<v8:content>Add the subroutine description</v8:content>
</v8:item>
</ToolTip>
<Picture>
<xr:Ref>StdPicture.Task</xr:Ref>
<xr:LoadTransparent>true</xr:LoadTransparent>
</Picture>
<Action>ДобавитьОписание</Action>
<ModifiesSavedData>true</ModifiesSavedData>
<CurrentRowUse>DontUse</CurrentRowUse>
</Command>
<Command name="ВыполнитьКод" id="7">
<Title>
<v8:item>
Expand Down
Loading

0 comments on commit 40bece2

Please sign in to comment.