1c/Tasks
1
0
Fork 0
mirror of https://github.com/BlizD/Tasks.git synced 2025-03-23 21:19:19 +02:00
Code Issues Releases Activity

@capitoshko Добавить настройки 3 строки карточки задачи

Browse Source
This commit is contained in:
Anton Ivanov 2018-10-05 12:51:49 +03:00
parent 9eb24dda38
commit f36b065037
3 changed files with 635 additions and 70 deletions
src/cf/DataProcessors
узКанбанДоска.xml
узКанбанДоска/Forms/ФормаДинамическая/Ext
Form.xml
Form
Module.bsl

235
src/cf/DataProcessors/узКанбанДоска.xml

@ -159,6 +159,201 @@
<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput> <ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
</Properties> </Properties>
</Attribute> </Attribute>
<Attribute uuid="c639e751-99f1-481c-a50a-26343dc56eb2">
<Properties>
<Name>ПоказыватьПризнакЕстьФайлыПоЗадаче</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Показывать признак есть файлы по задаче</v8:content>
</v8:item>
</Synonym>
<Comment/>
<Type>
<v8:Type>xs:boolean</v8:Type>
</Type>
<PasswordMode>false</PasswordMode>
<Format/>
<EditFormat/>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>* § - есть файлы по задаче;</v8:content>
</v8:item>
</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>
</Properties>
</Attribute>
<Attribute uuid="3a05797d-21ce-4934-bae6-039480f2d1f3">
<Properties>
<Name>ПоказыватьПризнакЕстьПисьмаПоЗадаче</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Показывать признак есть письма по задаче</v8:content>
</v8:item>
</Synonym>
<Comment/>
<Type>
<v8:Type>xs:boolean</v8:Type>
</Type>
<PasswordMode>false</PasswordMode>
<Format/>
<EditFormat/>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>* ✉ - есть письма по задаче;</v8:content>
</v8:item>
</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>
</Properties>
</Attribute>
<Attribute uuid="436592f1-b5ff-46b7-a288-7a3cddfa38b0">
<Properties>
<Name>ПоказыватьЗаказчика</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Показывать заказчика</v8:content>
</v8:item>
</Synonym>
<Comment/>
<Type>
<v8:Type>xs:boolean</v8:Type>
</Type>
<PasswordMode>false</PasswordMode>
<Format/>
<EditFormat/>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>* заказчик.</v8:content>
</v8:item>
</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>
</Properties>
</Attribute>
<Attribute uuid="41a70597-3749-4714-9ecf-beb27acedbd6">
<Properties>
<Name>ПоказыватьВыполнениеЧеклистаДробь</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Показывать выполнение чеклиста дробь</v8:content>
</v8:item>
</Synonym>
<Comment/>
<Type>
<v8:Type>xs:boolean</v8:Type>
</Type>
<PasswordMode>false</PasswordMode>
<Format/>
<EditFormat/>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>* 2/3 - чеклиста</v8:content>
</v8:item>
</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>
</Properties>
</Attribute>
<Attribute uuid="83b4e257-b3dc-4a80-af1b-8fd9f60ed76f">
<Properties>
<Name>ПоказыватьВыполнениеЧеклистаПроцент</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Показывать выполнение чеклиста процент</v8:content>
</v8:item>
</Synonym>
<Comment/>
<Type>
<v8:Type>xs:boolean</v8:Type>
</Type>
<PasswordMode>false</PasswordMode>
<Format/>
<EditFormat/>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>* % - чеклиста</v8:content>
</v8:item>
</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>
</Properties>
</Attribute>
<TabularSection uuid="df049fed-f241-4ab8-bf0b-3a046feb2d8f"> <TabularSection uuid="df049fed-f241-4ab8-bf0b-3a046feb2d8f">
<InternalInfo> <InternalInfo>
<xr:GeneratedType name="DataProcessorTabularSection.узКанбанДоска.ТЧЗадачи" category="TabularSection"> <xr:GeneratedType name="DataProcessorTabularSection.узКанбанДоска.ТЧЗадачи" category="TabularSection">
@ -863,6 +1058,46 @@
<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput> <ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
</Properties> </Properties>
</Attribute> </Attribute>
<Attribute uuid="3d31e14e-5fb6-413f-82ce-feae28d7610b">
<Properties>
<Name>ЧекЛистВыполнениеПроцент</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Чек лист выполнение процент</v8:content>
</v8:item>
</Synonym>
<Comment/>
<Type>
<v8:Type>xs:string</v8:Type>
<v8:StringQualifiers>
<v8:Length>20</v8:Length>
<v8:AllowedLength>Variable</v8:AllowedLength>
</v8:StringQualifiers>
</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"/>
<FillFromFillingValue>false</FillFromFillingValue>
<FillValue xsi:type="xs:string"/>
<FillChecking>DontCheck</FillChecking>
<ChoiceFoldersAndItems>Items</ChoiceFoldersAndItems>
<ChoiceParameterLinks/>
<ChoiceParameters/>
<QuickChoice>Auto</QuickChoice>
<CreateOnInput>Auto</CreateOnInput>
<ChoiceForm/>
<LinkByType/>
<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
</Properties>
</Attribute>
</ChildObjects> </ChildObjects>
</TabularSection> </TabularSection>
<TabularSection uuid="fc9c0693-c970-4285-be29-6fac7fdd05e6"> <TabularSection uuid="fc9c0693-c970-4285-be29-6fac7fdd05e6">

133
src/cf/DataProcessors/узКанбанДоска/Forms/ФормаДинамическая/Ext/Form.xml

@ -300,10 +300,8 @@
</UsualGroup> </UsualGroup>
</ChildItems> </ChildItems>
</UsualGroup> </UsualGroup>
<CheckBoxField name="Показывать3СтрокуВКарточкеЗадачи" id="522"> <CheckBoxField name="Показывать3СтрокуВКарточкеЗадачи" id="550">
<DataPath>Объект.Показывать3СтрокуВКарточкеЗадачи</DataPath> <DataPath>Объект.Показывать3СтрокуВКарточкеЗадачи</DataPath>
<TitleLocation>None</TitleLocation>
<ToolTipRepresentation>ShowLeft</ToolTipRepresentation>
<CheckBoxType>Tumbler</CheckBoxType> <CheckBoxType>Tumbler</CheckBoxType>
<EditFormat> <EditFormat>
<v8:item> <v8:item>
@ -311,12 +309,122 @@
<v8:content>БЛ=Нет; БИ=Да</v8:content> <v8:content>БЛ=Нет; БИ=Да</v8:content>
</v8:item> </v8:item>
</EditFormat> </EditFormat>
<ContextMenu name="Показывать3СтрокуВКарточкеЗадачиКонтекстноеМеню" id="523"/> <ContextMenu name="Показывать3СтрокуВКарточкеЗадачиКонтекстноеМеню" id="551"/>
<ExtendedTooltip name="Показывать3СтрокуВКарточкеЗадачиРасширеннаяПодсказка" id="524"/> <ExtendedTooltip name="Показывать3СтрокуВКарточкеЗадачиРасширеннаяПодсказка" id="552"/>
<Events> <Events>
<Event name="OnChange">Показывать3СтрокуВКарточкеЗадачиПриИзменении</Event> <Event name="OnChange">Показывать3СтрокуВКарточкеЗадачиПриИзменении</Event>
</Events> </Events>
</CheckBoxField> </CheckBoxField>
<UsualGroup name="ГруппаДопНастройки3СтрокиВКарточкиЗадачи" id="548">
<Title>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Доп настройки3 строки в карточки задачи</v8:content>
</v8:item>
</Title>
<ToolTip>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Группа доп настройки3 строки в карточки задачи</v8:content>
</v8:item>
</ToolTip>
<HorizontalStretch>false</HorizontalStretch>
<GroupHorizontalAlign>Left</GroupHorizontalAlign>
<Group>Vertical</Group>
<HorizontalAlign>Left</HorizontalAlign>
<Behavior>Collapsible</Behavior>
<CollapsedRepresentationTitle>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>Доп настройки3 строки в карточки задачи</v8:content>
</v8:item>
</CollapsedRepresentationTitle>
<Collapsed>true</Collapsed>
<Representation>None</Representation>
<ExtendedTooltip name="ГруппаДопНастройки3СтрокиВКарточкиЗадачиРасширеннаяПодсказка" id="549"/>
<ChildItems>
<CheckBoxField name="ПоказыватьПризнакЕстьФайлыПоЗадаче" id="527">
<DataPath>Объект.ПоказыватьПризнакЕстьФайлыПоЗадаче</DataPath>
<ToolTipRepresentation>ShowRight</ToolTipRepresentation>
<CheckBoxType>Tumbler</CheckBoxType>
<EditFormat>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>БЛ=Нет; БИ=Да</v8:content>
</v8:item>
</EditFormat>
<ContextMenu name="ПоказыватьПризнакЕстьФайлыПоЗадачеКонтекстноеМеню" id="528"/>
<ExtendedTooltip name="ПоказыватьПризнакЕстьФайлыПоЗадачеРасширеннаяПодсказка" id="529"/>
<Events>
<Event name="OnChange">ПоказыватьПризнакЕстьФайлыПоЗадачеПриИзменении</Event>
</Events>
</CheckBoxField>
<CheckBoxField name="ПоказыватьПризнакЕстьПисьмаПоЗадаче" id="530">
<DataPath>Объект.ПоказыватьПризнакЕстьПисьмаПоЗадаче</DataPath>
<ToolTipRepresentation>ShowRight</ToolTipRepresentation>
<CheckBoxType>Tumbler</CheckBoxType>
<EditFormat>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>БЛ=Нет; БИ=Да</v8:content>
</v8:item>
</EditFormat>
<ContextMenu name="ПоказыватьПризнакЕстьПисьмаПоЗадачеКонтекстноеМеню" id="531"/>
<ExtendedTooltip name="ПоказыватьПризнакЕстьПисьмаПоЗадачеРасширеннаяПодсказка" id="532"/>
<Events>
<Event name="OnChange">ПоказыватьПризнакЕстьПисьмаПоЗадачеПриИзменении</Event>
</Events>
</CheckBoxField>
<CheckBoxField name="ПоказыватьЗаказчика" id="533">
<DataPath>Объект.ПоказыватьЗаказчика</DataPath>
<ToolTipRepresentation>ShowRight</ToolTipRepresentation>
<CheckBoxType>Tumbler</CheckBoxType>
<EditFormat>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>БЛ=Нет; БИ=Да</v8:content>
</v8:item>
</EditFormat>
<ContextMenu name="ПоказыватьЗаказчикаКонтекстноеМеню" id="534"/>
<ExtendedTooltip name="ПоказыватьЗаказчикаРасширеннаяПодсказка" id="535"/>
<Events>
<Event name="OnChange">ПоказыватьЗаказчикаПриИзменении</Event>
</Events>
</CheckBoxField>
<CheckBoxField name="ПоказыватьВыполнениеЧеклистаДробь" id="536">
<DataPath>Объект.ПоказыватьВыполнениеЧеклистаДробь</DataPath>
<ToolTipRepresentation>ShowRight</ToolTipRepresentation>
<CheckBoxType>Tumbler</CheckBoxType>
<EditFormat>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>БЛ=Нет; БИ=Да</v8:content>
</v8:item>
</EditFormat>
<ContextMenu name="ПоказыватьВыполнениеЧеклистаДробьКонтекстноеМеню" id="537"/>
<ExtendedTooltip name="ПоказыватьВыполнениеЧеклистаДробьРасширеннаяПодсказка" id="538"/>
<Events>
<Event name="OnChange">ПоказыватьВыполнениеЧеклистаДробьПриИзменении</Event>
</Events>
</CheckBoxField>
<CheckBoxField name="ПоказыватьВыполнениеЧеклистаПроцент" id="539">
<DataPath>Объект.ПоказыватьВыполнениеЧеклистаПроцент</DataPath>
<ToolTipRepresentation>ShowRight</ToolTipRepresentation>
<CheckBoxType>Tumbler</CheckBoxType>
<EditFormat>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>БЛ=Нет; БИ=Да</v8:content>
</v8:item>
</EditFormat>
<ContextMenu name="ПоказыватьВыполнениеЧеклистаПроцентКонтекстноеМеню" id="540"/>
<ExtendedTooltip name="ПоказыватьВыполнениеЧеклистаПроцентРасширеннаяПодсказка" id="541"/>
<Events>
<Event name="OnChange">ПоказыватьВыполнениеЧеклистаПроцентПриИзменении</Event>
</Events>
</CheckBoxField>
</ChildItems>
</UsualGroup>
</ChildItems> </ChildItems>
</Page> </Page>
</ChildItems> </ChildItems>
@ -590,5 +698,20 @@
</Picture> </Picture>
<Action>КомандаОткрытьПапкуЗадачиНаДиске</Action> <Action>КомандаОткрытьПапкуЗадачиНаДиске</Action>
</Command> </Command>
<Command name="КомандаОтобразитьДополнительныеНастройки" id="11">
<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> </Commands>
</Form> </Form>

337
src/cf/DataProcessors/узКанбанДоска/Forms/ФормаДинамическая/Ext/Form/Module.bsl

@ -85,6 +85,7 @@
ПодключитьОбработчикОжидания("ЗаполнитьЗадачиНаКлиенте", 180); ПодключитьОбработчикОжидания("ЗаполнитьЗадачиНаКлиенте", 180);
УбратьИзКонтекстногоМенюЛишниеКнопкиНаСервере(); УбратьИзКонтекстногоМенюЛишниеКнопкиНаСервере();
КонецПроцедуры КонецПроцедуры
#КонецОбласти #КонецОбласти
@ -340,7 +341,9 @@
// ****** Группа формы "Нижняя часть 3 строка" *********** // ****** Группа формы "Нижняя часть 3 строка" ***********
//+ #108 Дзеса Ігор (capitoshko) 05.10.2018
Если Объект.Показывать3СтрокуВКарточкеЗадачи Тогда Если Объект.Показывать3СтрокуВКарточкеЗадачи Тогда
//- #108 Дзеса Ігор (capitoshko) 05.10.2018
пЭлементКарточкаЗадачи_НижняяЧасть3Строка = пЭлементыФормы.Вставить( пЭлементКарточкаЗадачи_НижняяЧасть3Строка = пЭлементыФормы.Вставить(
ИменаЭлементов.ИмяКарточкаЗадачи_НижняяЧасть3Строка, ИменаЭлементов.ИмяКарточкаЗадачи_НижняяЧасть3Строка,
@ -351,50 +354,101 @@
пЭлементКарточкаЗадачи_НижняяЧасть3Строка.Группировка = ГруппировкаКолонок.ВЯчейке; пЭлементКарточкаЗадачи_НижняяЧасть3Строка.Группировка = ГруппировкаКолонок.ВЯчейке;
//// ****** Поле формы "Есть файлы в карточке задачи 3 строка" *********** //// ****** Поле формы "Есть файлы в карточке задачи 3 строка" ***********
пЭлементПолеЗадачиВКарточкеЗадачиЕстьФайл = пЭлементыФормы.Вставить(
ИменаЭлементов.ИмяПоляЕстьФайлыВКарточкеЗадачи, //+ #108 Дзеса Ігор (capitoshko) 05.10.2018
Тип("ПолеФормы"), Если Объект.ПоказыватьПризнакЕстьФайлыПоЗадаче Тогда
пЭлементКарточкаЗадачи_НижняяЧасть3Строка, //- #108 Дзеса Ігор (capitoshko) 05.10.2018
); пЭлементПолеЗадачиВКарточкеЗадачиЕстьФайл = пЭлементыФормы.Вставить(
ИменаЭлементов.ИмяПоляЕстьФайлыВКарточкеЗадачи,
пЭлементПолеЗадачиВКарточкеЗадачиЕстьФайл.Вид = ВидПоляФормы.ПолеВвода; Тип("ПолеФормы"),
пЭлементПолеЗадачиВКарточкеЗадачиЕстьФайл.ПутьКДанным = "Объект.ТЧЗадачи.ЕстьФайлы"; пЭлементКарточкаЗадачи_НижняяЧасть3Строка,
пЭлементПолеЗадачиВКарточкеЗадачиЕстьФайл.Ширина = 1; );
пЭлементПолеЗадачиВКарточкеЗадачиЕстьФайл.Вид = ВидПоляФормы.ПолеВвода;
пЭлементПолеЗадачиВКарточкеЗадачиЕстьФайл.ПутьКДанным = "Объект.ТЧЗадачи.ЕстьФайлы";
пЭлементПолеЗадачиВКарточкеЗадачиЕстьФайл.Ширина = 1;
//+ #108 Дзеса Ігор (capitoshko) 05.10.2018
КонецЕсли;
//- #108 Дзеса Ігор (capitoshko) 05.10.2018
//// ****** Поле формы "Есть письма в карточке задачи 3 строка" *********** //// ****** Поле формы "Есть письма в карточке задачи 3 строка" ***********
пЭлементПолеЗадачиВКарточкеЗадачиЕстьПисьма = пЭлементыФормы.Вставить(
ИменаЭлементов.ИмяПоляЕстьПисьмаВКарточкеЗадачи, //+ #108 Дзеса Ігор (capitoshko) 05.10.2018
Тип("ПолеФормы"), Если Объект.ПоказыватьПризнакЕстьПисьмаПоЗадаче Тогда
пЭлементКарточкаЗадачи_НижняяЧасть3Строка, //- #108 Дзеса Ігор (capitoshko) 05.10.2018
);
пЭлементПолеЗадачиВКарточкеЗадачиЕстьПисьма = пЭлементыФормы.Вставить(
пЭлементПолеЗадачиВКарточкеЗадачиЕстьПисьма.Вид = ВидПоляФормы.ПолеВвода; ИменаЭлементов.ИмяПоляЕстьПисьмаВКарточкеЗадачи,
пЭлементПолеЗадачиВКарточкеЗадачиЕстьПисьма.ПутьКДанным = "Объект.ТЧЗадачи.ЕстьПисьма"; Тип("ПолеФормы"),
пЭлементПолеЗадачиВКарточкеЗадачиЕстьПисьма.Ширина = 1; пЭлементКарточкаЗадачи_НижняяЧасть3Строка,
);
пЭлементПолеЗадачиВКарточкеЗадачиЕстьПисьма.Вид = ВидПоляФормы.ПолеВвода;
пЭлементПолеЗадачиВКарточкеЗадачиЕстьПисьма.ПутьКДанным = "Объект.ТЧЗадачи.ЕстьПисьма";
пЭлементПолеЗадачиВКарточкеЗадачиЕстьПисьма.Ширина = 1;
//+ #108 Дзеса Ігор (capitoshko) 05.10.2018
КонецЕсли;
//- #108 Дзеса Ігор (capitoshko) 05.10.2018
//// ****** Поле формы "Заказчик в карточке задачи 3 строка" *********** //// ****** Поле формы "Заказчик в карточке задачи 3 строка" ***********
пЭлементПолеЗаказчикПредставлениеВКарточкеЗадачи = пЭлементыФормы.Вставить(
//+ #108 Дзеса Ігор (capitoshko) 05.10.2018
Если Объект.ПоказыватьЗаказчика Тогда
//- #108 Дзеса Ігор (capitoshko) 05.10.2018
пЭлементПолеЗаказчикПредставлениеВКарточкеЗадачи = пЭлементыФормы.Вставить(
ИменаЭлементов.ИмяПоляЗаказчикВКарточкеЗадачи, ИменаЭлементов.ИмяПоляЗаказчикВКарточкеЗадачи,
Тип("ПолеФормы"), Тип("ПолеФормы"),
пЭлементКарточкаЗадачи_НижняяЧасть3Строка, пЭлементКарточкаЗадачи_НижняяЧасть3Строка,
); );
пЭлементПолеЗаказчикПредставлениеВКарточкеЗадачи.Вид = ВидПоляФормы.ПолеВвода; пЭлементПолеЗаказчикПредставлениеВКарточкеЗадачи.Вид = ВидПоляФормы.ПолеВвода;
пЭлементПолеЗаказчикПредставлениеВКарточкеЗадачи.ПутьКДанным = "Объект.ТЧЗадачи.КороткоеИмяЗаказчик"; пЭлементПолеЗаказчикПредставлениеВКарточкеЗадачи.ПутьКДанным = "Объект.ТЧЗадачи.КороткоеИмяЗаказчик";
пЭлементПолеЗаказчикПредставлениеВКарточкеЗадачи.Ширина = 3; пЭлементПолеЗаказчикПредставлениеВКарточкеЗадачи.Ширина = 3;
//+ #108 Дзеса Ігор (capitoshko) 05.10.2018
КонецЕсли;
//- #108 Дзеса Ігор (capitoshko) 05.10.2018
//+ #58 Дзеса Ігор (capitoshko) //+ #58 Дзеса Ігор (capitoshko)
//// ****** Поле формы "Процент выполнения согласно чек - листу" ***********
пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи = пЭлементыФормы.Вставить( //+ #108 Дзеса Ігор (capitoshko) 05.10.2018
Если Объект.ПоказыватьВыполнениеЧеклистаДробь Тогда
//- #108 Дзеса Ігор (capitoshko) 05.10.2018
//// ****** Поле формы "Процент выполнения согласно чек - листу" ***********
пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи = пЭлементыФормы.Вставить(
ИменаЭлементов.ИмяПоляЧекЛистВыполнение, ИменаЭлементов.ИмяПоляЧекЛистВыполнение,
Тип("ПолеФормы"), Тип("ПолеФормы"),
пЭлементКарточкаЗадачи_НижняяЧасть3Строка, пЭлементКарточкаЗадачи_НижняяЧасть3Строка,
); );
пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи.Вид = ВидПоляФормы.ПолеВвода; пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи.Вид = ВидПоляФормы.ПолеВвода;
пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи.ПутьКДанным = "Объект.ТЧЗадачи.ЧекЛистВыполнение"; пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи.ПутьКДанным = "Объект.ТЧЗадачи.ЧекЛистВыполнение";
пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи.Ширина = 5; пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачи.Ширина = 5;
//- #58 Дзеса Ігор (capitoshko) //- #58 Дзеса Ігор (capitoshko)
//+ #108 Дзеса Ігор (capitoshko) 05.10.2018
КонецЕсли;
//- #108 Дзеса Ігор (capitoshko) 05.10.2018
//+ #108 Дзеса Ігор (capitoshko) 05.10.2018
Если Объект.ПоказыватьВыполнениеЧеклистаПроцент Тогда
//// ****** Поле формы "Процент выполнения согласно чек - листу в процентах" ***********
пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачиПроцент = пЭлементыФормы.Вставить(
ИменаЭлементов.ИмяПоляЧекЛистВыполнениеПроцент,
Тип("ПолеФормы"),
пЭлементКарточкаЗадачи_НижняяЧасть3Строка,
);
пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачиПроцент.Вид = ВидПоляФормы.ПолеВвода;
пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачиПроцент.ПутьКДанным = "Объект.ТЧЗадачи.ЧекЛистВыполнениеПроцент";
пЭлементПоляЧекЛистВыполнениеВКарточкеЗадачиПроцент.Ширина = 5;
КонецЕсли;
//- #108 Дзеса Ігор (capitoshko) 05.10.2018
Конецесли; Конецесли;
////Павлюков - конец ////Павлюков - конец
@ -436,6 +490,9 @@
//+ #58 Дзеса Ігор (capitoshko) //+ #58 Дзеса Ігор (capitoshko)
ИмяПоляЧекЛистВыполнение = ИмяКолонки +"_ТЧЗадачи_НижняяЧасть3Строка_ЧекЛистВыполнение"; ИмяПоляЧекЛистВыполнение = ИмяКолонки +"_ТЧЗадачи_НижняяЧасть3Строка_ЧекЛистВыполнение";
//- #58 Дзеса Ігор (capitoshko) //- #58 Дзеса Ігор (capitoshko)
//+ #106 Дзеса Ігор (capitoshko) 05.10.2018
ИмяПоляЧекЛистВыполнениеПроцент = ИмяКолонки +"_ТЧЗадачи_НижняяЧасть3Строка_ЧекЛистВыполнениеПроцент";
//- #106 Дзеса Ігор (capitoshko) 05.10.2018
РезультатФункции = Новый Структура(); РезультатФункции = Новый Структура();
РезультатФункции.Вставить("ИмяГруппыКолонки",ИмяГруппыКолонки); РезультатФункции.Вставить("ИмяГруппыКолонки",ИмяГруппыКолонки);
@ -465,6 +522,9 @@
//+ #58 Дзеса Ігор (capitoshko) //+ #58 Дзеса Ігор (capitoshko)
РезультатФункции.Вставить("ИмяПоляЧекЛистВыполнение",ИмяПоляЧекЛистВыполнение); РезультатФункции.Вставить("ИмяПоляЧекЛистВыполнение",ИмяПоляЧекЛистВыполнение);
//- #58 Дзеса Ігор (capitoshko) //- #58 Дзеса Ігор (capitoshko)
//+ #106 Дзеса Ігор (capitoshko) 05.10.2018
РезультатФункции.Вставить("ИмяПоляЧекЛистВыполнениеПроцент",ИмяПоляЧекЛистВыполнениеПроцент);
//- #106 Дзеса Ігор (capitoshko) 05.10.2018
Возврат РезультатФункции; Возврат РезультатФункции;
КонецФункции КонецФункции
@ -636,7 +696,24 @@
Конецесли; Конецесли;
Если СохраненныеНастройки.Свойство("Показывать3СтрокуВКарточкеЗадачи") Тогда Если СохраненныеНастройки.Свойство("Показывать3СтрокуВКарточкеЗадачи") Тогда
Объект.Показывать3СтрокуВКарточкеЗадачи = СохраненныеНастройки.Показывать3СтрокуВКарточкеЗадачи; Объект.Показывать3СтрокуВКарточкеЗадачи = СохраненныеНастройки.Показывать3СтрокуВКарточкеЗадачи;
Конецесли;
//+ #108 Дзеса Ігор (capitoshko) 04.10.2018
Если СохраненныеНастройки.Свойство("ПоказыватьПризнакЕстьФайлыПоЗадаче") Тогда
Объект.ПоказыватьПризнакЕстьФайлыПоЗадаче = СохраненныеНастройки.ПоказыватьПризнакЕстьФайлыПоЗадаче;
Конецесли; Конецесли;
Если СохраненныеНастройки.Свойство("ПоказыватьПризнакЕстьПисьмаПоЗадаче") Тогда
Объект.ПоказыватьПризнакЕстьПисьмаПоЗадаче = СохраненныеНастройки.ПоказыватьПризнакЕстьПисьмаПоЗадаче;
Конецесли;
Если СохраненныеНастройки.Свойство("ПоказыватьЗаказчика") Тогда
Объект.ПоказыватьЗаказчика = СохраненныеНастройки.ПоказыватьЗаказчика;
Конецесли;
Если СохраненныеНастройки.Свойство("ПоказыватьВыполнениеЧеклистаДробь") Тогда
Объект.ПоказыватьВыполнениеЧеклистаДробь = СохраненныеНастройки.ПоказыватьВыполнениеЧеклистаДробь;
Конецесли;
Если СохраненныеНастройки.Свойство("ПоказыватьВыполнениеЧеклистаПроцент") Тогда
Объект.ПоказыватьВыполнениеЧеклистаПроцент = СохраненныеНастройки.ПоказыватьВыполнениеЧеклистаПроцент;
Конецесли;
//- #108 Дзеса Ігор (capitoshko) 04.10.2018
Иначе Иначе
ЗаполнитьТЧНастройкиКолонокНаСервере(); ЗаполнитьТЧНастройкиКолонокНаСервере();
Конецесли; Конецесли;
@ -756,7 +833,13 @@
ДопПараметры.Вставить("ТЧНастройкиКолонок",Объект.ТЧНастройкиКолонок.Выгрузить()); ДопПараметры.Вставить("ТЧНастройкиКолонок",Объект.ТЧНастройкиКолонок.Выгрузить());
ДопПараметры.Вставить("НастройкиКомпоновщикаХранилище",НастройкиКомпоновщикаХранилище); ДопПараметры.Вставить("НастройкиКомпоновщикаХранилище",НастройкиКомпоновщикаХранилище);
ДопПараметры.Вставить("Показывать3СтрокуВКарточкеЗадачи",Объект.Показывать3СтрокуВКарточкеЗадачи); ДопПараметры.Вставить("Показывать3СтрокуВКарточкеЗадачи",Объект.Показывать3СтрокуВКарточкеЗадачи);
//+ #108 Дзеса Ігор (capitoshko) 04.10.2018
ДопПараметры.Вставить("ПоказыватьПризнакЕстьФайлыПоЗадаче",Объект.ПоказыватьПризнакЕстьФайлыПоЗадаче);
ДопПараметры.Вставить("ПоказыватьПризнакЕстьПисьмаПоЗадаче",Объект.ПоказыватьПризнакЕстьПисьмаПоЗадаче);
ДопПараметры.Вставить("ПоказыватьЗаказчика",Объект.ПоказыватьЗаказчика);
ДопПараметры.Вставить("ПоказыватьВыполнениеЧеклистаДробь",Объект.ПоказыватьВыполнениеЧеклистаДробь);
ДопПараметры.Вставить("ПоказыватьВыполнениеЧеклистаПроцент",Объект.ПоказыватьВыполнениеЧеклистаПроцент);
//- #108 Дзеса Ігор (capitoshko) 04.10.2018
ХранилищеОбщихНастроек.Сохранить(КлючНастроек,КлючНастроек,ДопПараметры); ХранилищеОбщихНастроек.Сохранить(КлючНастроек,КлючНастроек,ДопПараметры);
КонецПроцедуры КонецПроцедуры
@ -842,44 +925,36 @@
&НаСервере &НаСервере
Функция ДобавитьУбратьВСпринтЗадачи(КодОперации,пСпринт,МассивЗадач) Функция ДобавитьУбратьВСпринтЗадачи(КодОперации,пСпринт,МассивЗадач)
ЭтоДобавление = КодОперации = 1; Перем ТЗТекущиеСпринтыДляЗадач;
ЭтоУдаление = КодОперации = -1;
РезультатФункции = Новый Структура(); РезультатФункции = Новый Структура();
МассивСообщений = Новый Массив(); МассивСообщений = Новый Массив();
ЭтоДобавление = КодОперации = 1;
ЭтоУдаление = КодОперации = -1;
Если ЭтоДобавление
И НЕ ЗначениеЗаполнено(пСпринт) Тогда
ВызватьИсключение "Ошибка! Не заполнен пСпринт при вызове метода ДобавитьУбратьВСпринтЗадачи(КодОперации,пСпринт,МассивЗадач)";
Конецесли;
Если ЭтоУдаление Тогда
ТЗТекущиеСпринтыДляЗадач = Справочники.узСпринты.ПолучитьТЗТекущиеСпринтыДляЗадач(КонецДня(ТекущаяДата()),МассивЗадач);
Конецесли;
Для каждого ЭлМассиваЗадач из МассивЗадач цикл Для каждого ЭлМассиваЗадач из МассивЗадач цикл
пЗадачаСсылка = ЭлМассиваЗадач; пЗадачаСсылка = ЭлМассиваЗадач;
НомерЗадачи = Формат(пЗадачаСсылка.Код,"ЧГ=0");
Если ЭтоДобавление Тогда Если ЭтоДобавление Тогда
Если пЗадачаСсылка.Удалить_Спринт <> пСпринт Тогда ДобавитьЗадачуВСпринт(пЗадачаСсылка,пСпринт,МассивСообщений);
ЗадачаОбъект = пЗадачаСсылка.ПолучитьОбъект();
ЗадачаОбъект.Удалить_Спринт = пСпринт;
ЗадачаОбъект.Записать();
МассивСообщений.Добавить("Добавлена"
+" в спринт ["+пСпринт+"] "
+" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
Иначе
МассивСообщений.Добавить("Уже указана"
+" в спринте ["+пСпринт+"] "
+" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
Конецесли;
ИначеЕсли ЭтоУдаление Тогда ИначеЕсли ЭтоУдаление Тогда
пСпринт = пЗадачаСсылка.Удалить_Спринт; УбратьЗадачуИзСпринта(пЗадачаСсылка,ТЗТекущиеСпринтыДляЗадач,МассивСообщений);
Если ЗначениеЗаполнено(пСпринт) Тогда
ЗадачаОбъект = пЗадачаСсылка.ПолучитьОбъект();
ЗадачаОбъект.Удалить_Спринт = Неопределено;
ЗадачаОбъект.Записать();
МассивСообщений.Добавить("Убрана"
+" из спринта ["+пСпринт+"] "
+" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
Иначе
МассивСообщений.Добавить("Не указана в спринте"
+" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
Конецесли;
Иначе Иначе
ВызватьИсключение "Неизвестный код операции " + КодОперации; ВызватьИсключение "Неизвестный код операции " + КодОперации;
КонецЕсли; КонецЕсли;
Конеццикла; Конеццикла;
РезультатФункции.Вставить("МассивСообщений",МассивСообщений); РезультатФункции.Вставить("МассивСообщений",МассивСообщений);
РезультатФункции.Вставить("КомандаДобавитьУбратьВыполнена",Истина); РезультатФункции.Вставить("КомандаДобавитьУбратьВыполнена",Истина);
Возврат РезультатФункции; Возврат РезультатФункции;
@ -938,8 +1013,8 @@
&НаСервере &НаСервере
Функция ДобавитьУбратьВСпринтНаСервере(КодОперации,МассивВыделенныхСтрок,пСпринт = Неопределено) Функция ДобавитьУбратьВСпринтНаСервере(КодОперации,МассивВыделенныхСтрок,пСпринт = Неопределено)
МассивЗадач = ПолучитьМассивЗадачПоВыделеннымСтрокам(МассивВыделенныхСтрок); МассивЗадач = ПолучитьМассивЗадачПоВыделеннымСтрокам(МассивВыделенныхСтрок);
РезультатФункцииТекущийСпринт = Справочники.узСпринты.ПолучитьТекущийСпринт(); РезультатФункцииСпринтКоторыйНеЗавершен = Справочники.узСпринты.ПолучитьСпринтКоторыйНеЗавершен();
ТекстОшибки = РезультатФункцииТекущийСпринт.ТекстОшибки; ТекстОшибки = РезультатФункцииСпринтКоторыйНеЗавершен.ТекстОшибки;
Если ЗначениеЗаполнено(ТекстОшибки) Тогда Если ЗначениеЗаполнено(ТекстОшибки) Тогда
МассивСообщений = Новый Массив(); МассивСообщений = Новый Массив();
МассивСообщений.Добавить(ТекстОшибки); МассивСообщений.Добавить(ТекстОшибки);
@ -960,9 +1035,9 @@
Возврат РезультатФункции; Возврат РезультатФункции;
Конецесли;; Конецесли;;
Только1АктивныйСпринт = РезультатФункцииТекущийСпринт.Только1АктивныйСпринт; Только1АктивныйСпринт = РезультатФункцииСпринтКоторыйНеЗавершен.Только1АктивныйСпринт;
Если Только1АктивныйСпринт Тогда Если Только1АктивныйСпринт Тогда
пСпринт = РезультатФункцииТекущийСпринт.Спринт; пСпринт = РезультатФункцииСпринтКоторыйНеЗавершен.Спринт;
РезультатФункции = ДобавитьУбратьВСпринтЗадачи(КодОперации,пСпринт,МассивЗадач); РезультатФункции = ДобавитьУбратьВСпринтЗадачи(КодОперации,пСпринт,МассивЗадач);
Возврат РезультатФункции; Возврат РезультатФункции;
Конецесли; Конецесли;
@ -1360,14 +1435,146 @@
Возврат Новый ФиксированнаяСтруктура(Виды); Возврат Новый ФиксированнаяСтруктура(Виды);
КонецФункции КонецФункции
//+ #108 Дзеса Ігор (capitoshko) 04.10.2018
&НаКлиенте &НаКлиенте
Процедура Показывать3СтрокуВКарточкеЗадачиПриИзменении(Элемент) Процедура ПоказыватьПризнакЕстьФайлыПоЗадачеПриИзменении(Элемент)
СгенирироватьФормуЗаново = Истина; СгенирироватьФормуЗаново = Истина;
КонецПроцедуры КонецПроцедуры
&НаКлиенте
Процедура ПоказыватьПризнакЕстьПисьмаПоЗадачеПриИзменении(Элемент)
СгенирироватьФормуЗаново = Истина;
КонецПроцедуры
&НаКлиенте
Процедура ПоказыватьЗаказчикаПриИзменении(Элемент)
СгенирироватьФормуЗаново = Истина;
КонецПроцедуры
&НаКлиенте
Процедура ПоказыватьВыполнениеЧеклистаДробьПриИзменении(Элемент)
СгенирироватьФормуЗаново = Истина;
КонецПроцедуры
&НаКлиенте
Процедура ПоказыватьВыполнениеЧеклистаПроцентПриИзменении(Элемент)
СгенирироватьФормуЗаново = Истина;
КонецПроцедуры
&НаСервере
Функция Удалить_ДобавитьУбратьВСпринтЗадачи(КодОперации,пСпринт,МассивЗадач)
//ЭтоДобавление = КодОперации = 1;
//ЭтоУдаление = КодОперации = -1;
//
//РезультатФункции = Новый Структура();
//МассивСообщений = Новый Массив();
//Для каждого ЭлМассиваЗадач из МассивЗадач цикл
// пЗадачаСсылка = ЭлМассиваЗадач;
// НомерЗадачи = Формат(пЗадачаСсылка.Код,"ЧГ=0");
// Если ЭтоДобавление Тогда
// Если пЗадачаСсылка.Удалить_Спринт <> пСпринт Тогда
// ЗадачаОбъект = пЗадачаСсылка.ПолучитьОбъект();
// ЗадачаОбъект.Удалить_Спринт = пСпринт;
// ЗадачаОбъект.Записать();
// МассивСообщений.Добавить("Добавлена"
// +" в спринт ["+пСпринт+"] "
// +" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
// Иначе
// МассивСообщений.Добавить("Уже указана"
// +" в спринте ["+пСпринт+"] "
// +" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
// Конецесли;
// ИначеЕсли ЭтоУдаление Тогда
// пСпринт = пЗадачаСсылка.Удалить_Спринт;
// Если ЗначениеЗаполнено(пСпринт) Тогда
// ЗадачаОбъект = пЗадачаСсылка.ПолучитьОбъект();
// ЗадачаОбъект.Удалить_Спринт = Неопределено;
// ЗадачаОбъект.Записать();
// МассивСообщений.Добавить("Убрана"
// +" из спринта ["+пСпринт+"] "
// +" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
// Иначе
// МассивСообщений.Добавить("Не указана в спринте"
// +" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
// Конецесли;
// Иначе
// ВызватьИсключение "Неизвестный код операции " + КодОперации;
// КонецЕсли;
//Конеццикла;
//РезультатФункции.Вставить("МассивСообщений",МассивСообщений);
//РезультатФункции.Вставить("КомандаДобавитьУбратьВыполнена",Истина);
//Возврат РезультатФункции;
КонецФункции
&НаСервере
Процедура УбратьЗадачуИзСпринта(пЗадачаСсылка,ТЗТекущиеСпринтыДляЗадач,МассивСообщений)
НомерЗадачи = Формат(пЗадачаСсылка.Код,"ЧГ=0");
ПараметрыОтбора=Новый Структура();
ПараметрыОтбора.Вставить("Задача",пЗадачаСсылка);
НайденныеСтрокиТЗТекущиеСпринтыДляЗадач = ТЗТекущиеСпринтыДляЗадач.НайтиСтроки(ПараметрыОтбора);
Если НайденныеСтрокиТЗТекущиеСпринтыДляЗадач.Количество() = 0 Тогда
МассивСообщений.Добавить("Не указана в спринте"
+" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
Возврат;
Конецесли;
Для каждого СтрокаТЗТекущиеСпринтыДляЗадач из НайденныеСтрокиТЗТекущиеСпринтыДляЗадач цикл
пСпринт = СтрокаТЗТекущиеСпринтыДляЗадач.Спринт;
СпринтОбъект = пСпринт.ПолучитьОбъект();
СтрокаСпринтТЧЗадачи = СпринтОбъект.ТЧЗадачи.Найти(пЗадачаСсылка,"Задача");
Если СтрокаСпринтТЧЗадачи = Неопределено Тогда
МассивСообщений.Добавить("Не указана в спринте"
+" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
Продолжить;
Конецесли;
СпринтОбъект.ТЧЗадачи.Удалить(СтрокаСпринтТЧЗадачи);
СпринтОбъект.Записать();
МассивСообщений.Добавить("Убрана из спринта ["+пСпринт+"] "
+" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
Конеццикла;
КонецПроцедуры
&НаСервере
Процедура ДобавитьЗадачуВСпринт(пЗадачаСсылка,пСпринт,МассивСообщений)
НомерЗадачи = Формат(пЗадачаСсылка.Код,"ЧГ=0");
Если пСпринт.ТЧЗадачи.Найти(пЗадачаСсылка,"Задача") <> Неопределено Тогда
МассивСообщений.Добавить("Уже указана в спринте ["+пСпринт+"] "
+" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
Возврат;
Конецесли;
СпринтОбъект = пСпринт.ПолучитьОбъект();
СтрокаТЧЗадачи = СпринтОбъект.ТЧЗадачи.Добавить();
СтрокаТЧЗадачи.Задача = пЗадачаСсылка;
СпринтОбъект.Записать();
МассивСообщений.Добавить("Добавлена в спринт ["+пСпринт+"] "
+" задача [#"+НомерЗадачи+" "+пЗадачаСсылка+"]");
КонецПроцедуры
&НаКлиенте
Процедура Показывать3СтрокуВКарточкеЗадачиПриИзменении(Элемент)
ПоказыватьПризнакЕстьФайлыПоЗадаче = Истина;
ПоказыватьПризнакЕстьПисьмаПоЗадаче = Истина;
ПоказыватьЗаказчика = Истина;
СгенирироватьФормуЗаново = Истина;
КонецПроцедуры
//- #108 Дзеса Ігор (capitoshko) 04.10.2018
#КонецОбласти #КонецОбласти