mirror of
https://github.com/BlizD/Tasks.git
synced 2025-03-19 21:07:53 +02:00
#83 Отображение файлов из писем по задаче. Спасибо @etnety.
This commit is contained in:
Anton Ivanov
parent
23f1f61063
commit
4720b54764
@ -1043,6 +1043,322 @@
|
||||
</UsualGroup>
|
||||
</ChildItems>
|
||||
</UsualGroup>
|
||||
<UsualGroup name="ГруппаПочтовыеВложения" id="298">
|
||||
<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>
|
||||
<Group>Vertical</Group>
|
||||
<Behavior>Collapsible</Behavior>
|
||||
<CollapsedRepresentationTitle>
|
||||
<v8:item>
|
||||
<v8:lang>ru</v8:lang>
|
||||
<v8:content>Файлы из писем по задаче</v8:content>
|
||||
</v8:item>
|
||||
</CollapsedRepresentationTitle>
|
||||
<ControlRepresentation>Picture</ControlRepresentation>
|
||||
<ExtendedTooltip name="ГруппаПочтовыеВложенияРасширеннаяПодсказка" id="299"/>
|
||||
<ChildItems>
|
||||
<CommandBar name="КоманднаяПанельПочтовыеВложения" id="465">
|
||||
<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>
|
||||
<CommandSource>Item.СписокПочтовыхВложений</CommandSource>
|
||||
<ExtendedTooltip name="КоманднаяПанельПочтовыеВложенияРасширеннаяПодсказка" id="466"/>
|
||||
<ChildItems>
|
||||
<Button name="СписокПочтовыхВложенийОткрытьКарточку" id="469">
|
||||
<Type>CommandBarButton</Type>
|
||||
<OnlyInAllActions>true</OnlyInAllActions>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийОткрытьКарточку</CommandName>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийОткрытьКарточкуРасширеннаяПодсказка" id="470"/>
|
||||
</Button>
|
||||
<Button name="СписокПочтовыхВложенийПросмотреть" id="467">
|
||||
<Type>CommandBarButton</Type>
|
||||
<OnlyInAllActions>true</OnlyInAllActions>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийПросмотреть</CommandName>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийПросмотретьРасширеннаяПодсказка" id="468"/>
|
||||
</Button>
|
||||
<Button name="СписокПочтовыхВложенийСохранитьКак" id="471">
|
||||
<Type>CommandBarButton</Type>
|
||||
<OnlyInAllActions>true</OnlyInAllActions>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийСохранитьКак</CommandName>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийСохранитьКакРасширеннаяПодсказка" id="472"/>
|
||||
</Button>
|
||||
<Button name="СписокПочтовыхВложенийПечать" id="473">
|
||||
<Type>CommandBarButton</Type>
|
||||
<OnlyInAllActions>true</OnlyInAllActions>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийПечать</CommandName>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийПечатьРасширеннаяПодсказка" id="474"/>
|
||||
</Button>
|
||||
<Button name="СписокПочтовыхВложенийОтправить" id="475">
|
||||
<Type>CommandBarButton</Type>
|
||||
<OnlyInAllActions>true</OnlyInAllActions>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийОтправить</CommandName>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийОтправитьРасширеннаяПодсказка" id="476"/>
|
||||
</Button>
|
||||
<Button name="СписокПочтовыхВложенийОткрытьПисьмо" id="498">
|
||||
<Type>CommandBarButton</Type>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийОткрытьПисьмо</CommandName>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийОткрытьПисьмоРасширеннаяПодсказка" id="499"/>
|
||||
</Button>
|
||||
</ChildItems>
|
||||
</CommandBar>
|
||||
<UsualGroup name="Группа2" id="490">
|
||||
<Group>Horizontal</Group>
|
||||
<ExtendedTooltip name="Группа2РасширеннаяПодсказка" id="491"/>
|
||||
<ChildItems>
|
||||
<Table name="СписокПочтовыхВложений" id="390">
|
||||
<ChangeRowSet>false</ChangeRowSet>
|
||||
<UseAlternationRowColor>true</UseAlternationRowColor>
|
||||
<EnableStartDrag>true</EnableStartDrag>
|
||||
<DataPath>СписокПочтовыхВложений</DataPath>
|
||||
<RowPictureDataPath>СписокПочтовыхВложений.DefaultPicture</RowPictureDataPath>
|
||||
<AutoRefresh>false</AutoRefresh>
|
||||
<AutoRefreshPeriod>60</AutoRefreshPeriod>
|
||||
<Period>
|
||||
<v8:variant xsi:type="v8:StandardPeriodVariant">Custom</v8:variant>
|
||||
<v8:startDate>0001-01-01T00:00:00</v8:startDate>
|
||||
<v8:endDate>0001-01-01T00:00:00</v8:endDate>
|
||||
</Period>
|
||||
<ChoiceFoldersAndItems>Items</ChoiceFoldersAndItems>
|
||||
<RestoreCurrentRow>false</RestoreCurrentRow>
|
||||
<TopLevelParent xsi:nil="true"/>
|
||||
<ShowRoot>true</ShowRoot>
|
||||
<AllowRootChoice>false</AllowRootChoice>
|
||||
<UpdateOnDataChange>Auto</UpdateOnDataChange>
|
||||
<ContextMenu name="СписокПочтовыхВложенийКонтекстноеМеню" id="391">
|
||||
<Autofill>false</Autofill>
|
||||
<ChildItems>
|
||||
<Button name="КонтекстноеМенюСписокПочтовыхВложенийОткрытьКарточку" id="485">
|
||||
<Type>CommandBarButton</Type>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийОткрытьКарточку</CommandName>
|
||||
<ExtendedTooltip name="КонтекстноеМенюСписокПочтовыхВложенийОткрытьКарточкуРасширеннаяПодсказка" id="486"/>
|
||||
</Button>
|
||||
<Button name="КонтекстноеМенюСписокПочтовыхВложенийПросмотреть" id="483">
|
||||
<Type>CommandBarButton</Type>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийПросмотреть</CommandName>
|
||||
<ExtendedTooltip name="КонтекстноеМенюСписокПочтовыхВложенийПросмотретьРасширеннаяПодсказка" id="484"/>
|
||||
</Button>
|
||||
<Button name="КонтекстноеМенюСписокПочтовыхВложенийСохранитьКак" id="481">
|
||||
<Type>CommandBarButton</Type>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийСохранитьКак</CommandName>
|
||||
<ExtendedTooltip name="КонтекстноеМенюСписокПочтовыхВложенийСохранитьКакРасширеннаяПодсказка" id="482"/>
|
||||
</Button>
|
||||
<Button name="КонтекстноеМенюСписокПочтовыхВложенийПечать" id="479">
|
||||
<Type>CommandBarButton</Type>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийПечать</CommandName>
|
||||
<ExtendedTooltip name="КонтекстноеМенюСписокПочтовыхВложенийПечатьРасширеннаяПодсказка" id="480"/>
|
||||
</Button>
|
||||
<Button name="КонтекстноеМенюСписокПочтовыхВложенийОтправить" id="477">
|
||||
<Type>CommandBarButton</Type>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийОтправить</CommandName>
|
||||
<ExtendedTooltip name="КонтекстноеМенюСписокПочтовыхВложенийОтправитьРасширеннаяПодсказка" id="478"/>
|
||||
</Button>
|
||||
<Button name="КонтекстноеМенюСписокПочтовыхВложенийОткрытьПисьмо" id="500">
|
||||
<Type>CommandBarButton</Type>
|
||||
<CommandName>Form.Command.СписокПочтовыхВложенийОткрытьПисьмо</CommandName>
|
||||
<ExtendedTooltip name="КонтекстноеМенюСписокПочтовыхВложенийОткрытьПисьмоРасширеннаяПодсказка" id="501"/>
|
||||
</Button>
|
||||
</ChildItems>
|
||||
</ContextMenu>
|
||||
<AutoCommandBar name="СписокПочтовыхВложенийКоманднаяПанель" id="392">
|
||||
<Autofill>false</Autofill>
|
||||
</AutoCommandBar>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийРасширеннаяПодсказка" id="393"/>
|
||||
<SearchStringAddition name="СписокПочтовыхВложенийСтрокаПоиска" id="394">
|
||||
<AdditionSource>
|
||||
<Item>СписокПочтовыхВложений</Item>
|
||||
<Type>SearchStringRepresentation</Type>
|
||||
</AdditionSource>
|
||||
<ContextMenu name="СписокПочтовыхВложенийСтрокаПоискаКонтекстноеМеню" id="395"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийСтрокаПоискаРасширеннаяПодсказка" id="396"/>
|
||||
</SearchStringAddition>
|
||||
<ViewStatusAddition name="СписокПочтовыхВложенийСостояниеПросмотра" id="397">
|
||||
<AdditionSource>
|
||||
<Item>СписокПочтовыхВложений</Item>
|
||||
<Type>ViewStatusRepresentation</Type>
|
||||
</AdditionSource>
|
||||
<ContextMenu name="СписокПочтовыхВложенийСостояниеПросмотраКонтекстноеМеню" id="398"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийСостояниеПросмотраРасширеннаяПодсказка" id="399"/>
|
||||
</ViewStatusAddition>
|
||||
<SearchControlAddition name="СписокПочтовыхВложенийУправлениеПоиском" id="400">
|
||||
<AdditionSource>
|
||||
<Item>СписокПочтовыхВложений</Item>
|
||||
<Type>SearchControl</Type>
|
||||
</AdditionSource>
|
||||
<ContextMenu name="СписокПочтовыхВложенийУправлениеПоискомКонтекстноеМеню" id="401"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийУправлениеПоискомРасширеннаяПодсказка" id="402"/>
|
||||
</SearchControlAddition>
|
||||
<Events>
|
||||
<Event name="Selection">СписокПочтовыхВложенийВыбор</Event>
|
||||
<Event name="OnActivateRow">СписокПочтовыхВложенийПриАктивизацииСтроки</Event>
|
||||
</Events>
|
||||
<ChildItems>
|
||||
<PictureField name="СписокПочтовыхВложенийНаправление" id="495">
|
||||
<DataPath>СписокПочтовыхВложений.Направление</DataPath>
|
||||
<TitleLocation>None</TitleLocation>
|
||||
<ToolTip>
|
||||
<v8:item>
|
||||
<v8:lang>ru</v8:lang>
|
||||
<v8:content>Вид письма</v8:content>
|
||||
</v8:item>
|
||||
</ToolTip>
|
||||
<HeaderPicture>
|
||||
<xr:Ref>CommonPicture.ЭлектронноеПисьмо</xr:Ref>
|
||||
<xr:LoadTransparent>true</xr:LoadTransparent>
|
||||
</HeaderPicture>
|
||||
<Width>1</Width>
|
||||
<ValuesPicture>
|
||||
<xr:Ref>CommonPicture.Взаимодействия</xr:Ref>
|
||||
<xr:LoadTransparent>true</xr:LoadTransparent>
|
||||
</ValuesPicture>
|
||||
<ContextMenu name="СписокПочтовыхВложенийНаправлениеКонтекстноеМеню" id="496"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийНаправлениеРасширеннаяПодсказка" id="497"/>
|
||||
</PictureField>
|
||||
<PictureField name="СписокПочтовыхВложенийНомерКартинкиПодписанЗашифрован" id="424">
|
||||
<DataPath>СписокПочтовыхВложений.НомерКартинкиПодписанЗашифрован</DataPath>
|
||||
<ReadOnly>true</ReadOnly>
|
||||
<TitleLocation>None</TitleLocation>
|
||||
<ToolTip>
|
||||
<v8:item>
|
||||
<v8:lang>ru</v8:lang>
|
||||
<v8:content>Наличие электронной подписи или шифрования</v8:content>
|
||||
</v8:item>
|
||||
</ToolTip>
|
||||
<HeaderPicture>
|
||||
<xr:Ref>CommonPicture.ПодписанЗашифрованЗаголовок</xr:Ref>
|
||||
<xr:LoadTransparent>true</xr:LoadTransparent>
|
||||
</HeaderPicture>
|
||||
<Width>2</Width>
|
||||
<ValuesPicture>
|
||||
<xr:Ref>CommonPicture.ПодписанЗашифрованСостояния</xr:Ref>
|
||||
<xr:LoadTransparent>true</xr:LoadTransparent>
|
||||
</ValuesPicture>
|
||||
<ContextMenu name="СписокПочтовыхВложенийНомерКартинкиПодписанЗашифрованКонтекстноеМеню" id="425"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийНомерКартинкиПодписанЗашифрованРасширеннаяПодсказка" id="426"/>
|
||||
</PictureField>
|
||||
<ColumnGroup name="СписокГруппаИмяОписаниеП" id="463">
|
||||
<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>
|
||||
<ToolTipRepresentation>None</ToolTipRepresentation>
|
||||
<Group>InCell</Group>
|
||||
<ExtendedTooltip name="СписокГруппаИмяОписаниеПРасширеннаяПодсказка" id="464"/>
|
||||
<ChildItems>
|
||||
<LabelField name="СписокПочтовыхВложенийНаименование" id="421">
|
||||
<DataPath>СписокПочтовыхВложений.Наименование</DataPath>
|
||||
<Width>20</Width>
|
||||
<ContextMenu name="СписокПочтовыхВложенийНаименованиеКонтекстноеМеню" id="422"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийНаименованиеРасширеннаяПодсказка" id="423"/>
|
||||
</LabelField>
|
||||
<LabelField name="СписокПочтовыхВложенийОписание" id="427">
|
||||
<DataPath>СписокПочтовыхВложений.Описание</DataPath>
|
||||
<TitleLocation>None</TitleLocation>
|
||||
<Width>5</Width>
|
||||
<ContextMenu name="СписокПочтовыхВложенийОписаниеКонтекстноеМеню" id="428"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийОписаниеРасширеннаяПодсказка" id="429"/>
|
||||
</LabelField>
|
||||
</ChildItems>
|
||||
</ColumnGroup>
|
||||
<LabelField name="СписокПочтовыхВложенийАвтор" id="403">
|
||||
<DataPath>СписокПочтовыхВложений.Автор</DataPath>
|
||||
<Width>15</Width>
|
||||
<HorizontalStretch>false</HorizontalStretch>
|
||||
<ContextMenu name="СписокПочтовыхВложенийАвторКонтекстноеМеню" id="404"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийАвторРасширеннаяПодсказка" id="405"/>
|
||||
</LabelField>
|
||||
<LabelField name="СписокПочтовыхВложенийДатаИзменения" id="406">
|
||||
<DataPath>СписокПочтовыхВложений.ДатаИзменения</DataPath>
|
||||
<Width>15</Width>
|
||||
<HorizontalStretch>false</HorizontalStretch>
|
||||
<ContextMenu name="СписокПочтовыхВложенийДатаИзмененияКонтекстноеМеню" id="407"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийДатаИзмененияРасширеннаяПодсказка" id="408"/>
|
||||
</LabelField>
|
||||
<LabelField name="СписокПочтовыхВложенийРазмер" id="439">
|
||||
<DataPath>СписокПочтовыхВложений.Размер</DataPath>
|
||||
<UserVisible>
|
||||
<xr:Common>false</xr:Common>
|
||||
</UserVisible>
|
||||
<Title>
|
||||
<v8:item>
|
||||
<v8:lang>ru</v8:lang>
|
||||
<v8:content>Размер (КБ)</v8:content>
|
||||
</v8:item>
|
||||
</Title>
|
||||
<ContextMenu name="СписокПочтовыхВложенийРазмерКонтекстноеМеню" id="440"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийРазмерРасширеннаяПодсказка" id="441"/>
|
||||
</LabelField>
|
||||
<LabelField name="СписокПочтовыхВложенийДатаСоздания" id="412">
|
||||
<DataPath>СписокПочтовыхВложений.ДатаСоздания</DataPath>
|
||||
<UserVisible>
|
||||
<xr:Common>false</xr:Common>
|
||||
</UserVisible>
|
||||
<Width>15</Width>
|
||||
<ContextMenu name="СписокПочтовыхВложенийДатаСозданияКонтекстноеМеню" id="413"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийДатаСозданияРасширеннаяПодсказка" id="414"/>
|
||||
</LabelField>
|
||||
<LabelField name="СписокПочтовыхВложенийСсылка" id="448">
|
||||
<DataPath>СписокПочтовыхВложений.Ссылка</DataPath>
|
||||
<UserVisible>
|
||||
<xr:Common>false</xr:Common>
|
||||
</UserVisible>
|
||||
<ContextMenu name="СписокПочтовыхВложенийСсылкаКонтекстноеМеню" id="449"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийСсылкаРасширеннаяПодсказка" id="450"/>
|
||||
</LabelField>
|
||||
<LabelField name="СписокПочтовыхВложенийПисьмо" id="492">
|
||||
<DataPath>СписокПочтовыхВложений.Письмо</DataPath>
|
||||
<UserVisible>
|
||||
<xr:Common>false</xr:Common>
|
||||
</UserVisible>
|
||||
<ContextMenu name="СписокПочтовыхВложенийПисьмоКонтекстноеМеню" id="493"/>
|
||||
<ExtendedTooltip name="СписокПочтовыхВложенийПисьмоРасширеннаяПодсказка" id="494"/>
|
||||
</LabelField>
|
||||
</ChildItems>
|
||||
</Table>
|
||||
<PictureField name="АдресДанныхФайлаПочтовыхФайлов" id="487">
|
||||
<DataPath>АдресДанныхФайлаПочтовыхФайлов</DataPath>
|
||||
<Visible>false</Visible>
|
||||
<TitleLocation>None</TitleLocation>
|
||||
<PictureSize>AutoSize</PictureSize>
|
||||
<NonselectedPictureText>
|
||||
<v8:item>
|
||||
<v8:lang>ru</v8:lang>
|
||||
<v8:content>Выберите файл для предварительного просмотра</v8:content>
|
||||
</v8:item>
|
||||
</NonselectedPictureText>
|
||||
<ContextMenu name="АдресДанныхФайлаПочтовыхФайловКонтекстноеМеню" id="488"/>
|
||||
<ExtendedTooltip name="АдресДанныхФайлаПочтовыхФайловРасширеннаяПодсказка" id="489"/>
|
||||
</PictureField>
|
||||
</ChildItems>
|
||||
</UsualGroup>
|
||||
</ChildItems>
|
||||
</UsualGroup>
|
||||
</ChildItems>
|
||||
<Attributes>
|
||||
<Attribute name="Список" id="1">
|
||||
@ -1223,6 +1539,81 @@
|
||||
<v8:Type>v8:ValueListType</v8:Type>
|
||||
</Type>
|
||||
</Attribute>
|
||||
<Attribute name="СписокПочтовыхВложений" id="14">
|
||||
<Title>
|
||||
<v8:item>
|
||||
<v8:lang>ru</v8:lang>
|
||||
<v8:content>Список почтовых вложений</v8:content>
|
||||
</v8:item>
|
||||
</Title>
|
||||
<Type>
|
||||
<v8:Type>cfg:DynamicList</v8:Type>
|
||||
</Type>
|
||||
<UseAlways>
|
||||
<Field>СписокПочтовыхВложений.ФайлРедактируется</Field>
|
||||
<Field>СписокПочтовыхВложений.ФайлРедактируетТекущийПользователь</Field>
|
||||
<Field>СписокПочтовыхВложений.ФайлРедактируетДругойПользователь</Field>
|
||||
<Field>СписокПочтовыхВложений.Ссылка</Field>
|
||||
<Field>СписокПочтовыхВложений.Расширение</Field>
|
||||
<Field>СписокПочтовыхВложений.ПометкаУдаления</Field>
|
||||
<Field>СписокПочтовыхВложений.ПодписанЭП</Field>
|
||||
<Field>СписокПочтовыхВложений.Письмо</Field>
|
||||
<Field>СписокПочтовыхВложений.Зашифрован</Field>
|
||||
</UseAlways>
|
||||
<Settings xsi:type="DynamicList">
|
||||
<ManualQuery>true</ManualQuery>
|
||||
<DynamicDataRead>false</DynamicDataRead>
|
||||
<QueryText>ВЫБРАТЬ
|
||||
ЗНАЧЕНИЕ(Справочник.Пользователи.ПустаяСсылка) КАК Ссылка,
|
||||
ЛОЖЬ КАК ПометкаУдаления,
|
||||
1 КАК ИндексКартинки,
|
||||
ВЫРАЗИТЬ("" КАК СТРОКА(150)) КАК Наименование,
|
||||
ВЫРАЗИТЬ("" КАК СТРОКА(10)) КАК Расширение,
|
||||
ВЫРАЗИТЬ("" КАК СТРОКА(500)) КАК Описание,
|
||||
ЗНАЧЕНИЕ(Справочник.Пользователи.ПустаяСсылка) КАК Автор,
|
||||
ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0) КАК ДатаСоздания,
|
||||
ЗНАЧЕНИЕ(Справочник.Пользователи.ПустаяСсылка) КАК Отредактировал,
|
||||
ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0) КАК ДатаРедактирования,
|
||||
ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0) КАК ДатаИзменения,
|
||||
0 КАК Размер,
|
||||
ЛОЖЬ КАК ПодписанЭП,
|
||||
ЛОЖЬ КАК Зашифрован,
|
||||
-1 КАК НомерКартинкиПодписанЗашифрован,
|
||||
ЛОЖЬ КАК ФайлРедактируется,
|
||||
ЛОЖЬ КАК ФайлРедактируетТекущийПользователь,
|
||||
ЛОЖЬ КАК ФайлРедактируетДругойПользователь,
|
||||
НЕОПРЕДЕЛЕНО КАК Редактирует,
|
||||
НЕОПРЕДЕЛЕНО КАК Письмо,
|
||||
0 КАК Направление
|
||||
ИЗ
|
||||
Справочник.ИдентификаторыОбъектовМетаданных КАК ИдентификаторыОбъектовМетаданных</QueryText>
|
||||
<ListSettings>
|
||||
<dcsset:filter>
|
||||
<dcsset:viewMode>Normal</dcsset:viewMode>
|
||||
<dcsset:userSettingID>dfcece9d-5077-440b-b6b3-45a5cb4538eb</dcsset:userSettingID>
|
||||
</dcsset:filter>
|
||||
<dcsset:order>
|
||||
<dcsset:viewMode>Normal</dcsset:viewMode>
|
||||
<dcsset:userSettingID>88619765-ccb3-46c6-ac52-38e9c992ebd4</dcsset:userSettingID>
|
||||
</dcsset:order>
|
||||
<dcsset:conditionalAppearance>
|
||||
<dcsset:viewMode>Normal</dcsset:viewMode>
|
||||
<dcsset:userSettingID>b75fecce-942b-4aed-abc9-e6a02e460fb3</dcsset:userSettingID>
|
||||
</dcsset:conditionalAppearance>
|
||||
<dcsset:itemsViewMode>Normal</dcsset:itemsViewMode>
|
||||
<dcsset:itemsUserSettingID>911b6018-f537-43e8-a417-da56b22f9aec</dcsset:itemsUserSettingID>
|
||||
</ListSettings>
|
||||
</Settings>
|
||||
</Attribute>
|
||||
<Attribute name="АдресДанныхФайлаПочтовыхФайлов" id="15">
|
||||
<Type>
|
||||
<v8:Type>xs:string</v8:Type>
|
||||
<v8:StringQualifiers>
|
||||
<v8:Length>0</v8:Length>
|
||||
<v8:AllowedLength>Variable</v8:AllowedLength>
|
||||
</v8:StringQualifiers>
|
||||
</Type>
|
||||
</Attribute>
|
||||
</Attributes>
|
||||
<Commands>
|
||||
<Command name="ОткрытьФайлДляПросмотра" id="2">
|
||||
@ -1596,6 +1987,119 @@
|
||||
<Item>FunctionalOption.ИспользоватьСинхронизациюФайлов</Item>
|
||||
</FunctionalOptions>
|
||||
</Command>
|
||||
<Command name="СписокПочтовыхВложенийПросмотреть" id="8">
|
||||
<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>
|
||||
<Picture>
|
||||
<xr:Ref>CommonPicture.ОткрытьВыбранныйФайл</xr:Ref>
|
||||
<xr:LoadTransparent>true</xr:LoadTransparent>
|
||||
</Picture>
|
||||
<Action>СписокПочтовыхВложенийПросмотреть</Action>
|
||||
<Representation>TextPicture</Representation>
|
||||
</Command>
|
||||
<Command name="СписокПочтовыхВложенийОткрытьКарточку" id="23">
|
||||
<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>
|
||||
<Picture>
|
||||
<xr:Ref>StdPicture.Change</xr:Ref>
|
||||
<xr:LoadTransparent>true</xr:LoadTransparent>
|
||||
</Picture>
|
||||
<Action>СписокПочтовыхВложенийОткрытьКарточку</Action>
|
||||
<Representation>TextPicture</Representation>
|
||||
</Command>
|
||||
<Command name="СписокПочтовыхВложенийСохранитьКак" id="24">
|
||||
<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="25">
|
||||
<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>
|
||||
<Picture>
|
||||
<xr:Ref>StdPicture.Print</xr:Ref>
|
||||
<xr:LoadTransparent>true</xr:LoadTransparent>
|
||||
</Picture>
|
||||
<Action>СписокПочтовыхВложенийПечать</Action>
|
||||
</Command>
|
||||
<Command name="СписокПочтовыхВложенийОтправить" id="26">
|
||||
<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>
|
||||
<Picture>
|
||||
<xr:Ref>CommonPicture.ОтправитьЭлектронноеПисьмо</xr:Ref>
|
||||
<xr:LoadTransparent>true</xr:LoadTransparent>
|
||||
</Picture>
|
||||
<Action>СписокПочтовыхВложенийОтправить</Action>
|
||||
</Command>
|
||||
<Command name="СписокПочтовыхВложенийОткрытьПисьмо" id="27">
|
||||
<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>
|
||||
<Picture>
|
||||
<xr:Ref>StdPicture.Change</xr:Ref>
|
||||
<xr:LoadTransparent>true</xr:LoadTransparent>
|
||||
</Picture>
|
||||
<Action>СписокПочтовыхВложенийОткрытьПисьмо</Action>
|
||||
<Representation>TextPicture</Representation>
|
||||
</Command>
|
||||
</Commands>
|
||||
<Parameters>
|
||||
<Parameter name="ВладелецФайла">
|
||||
|
||||
@ -57,6 +57,14 @@
|
||||
ИмяСправочникаХранилищаФайлов = Неопределено;
|
||||
НастроитьДинамическийСписок(ИмяСправочникаХранилищаФайлов);
|
||||
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Если ТипЗнч(ВладелецФайла) = Тип("СправочникСсылка.узЗадачи") Тогда
|
||||
НастроитьДинамическийСписокПочтовыхФайлов();
|
||||
Иначе
|
||||
Элементы.ГруппаПочтовыеВложения.Видимость = Ложь;
|
||||
КонецЕсли;
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
ТипСправочникаСФайлами = Тип("СправочникСсылка." + ИмяСправочникаХранилищаФайлов);
|
||||
|
||||
МетаданныеСправочникаСФайлами = Метаданные.НайтиПоТипу(ТипСправочникаСФайлами);
|
||||
@ -117,6 +125,9 @@
|
||||
|
||||
Элементы.АдресДанныхФайла.Видимость = Предпросмотр;
|
||||
Элементы.Предпросмотр.Пометка = Предпросмотр;
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Элементы.АдресДанныхФайлаПочтовыхФайлов.Видимость = Предпросмотр;
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
РасширенияПоддерживающиеПредпросмотр = ФайловыеФункцииСлужебный.СписокРасширенийДляПредпросмотра();
|
||||
|
||||
@ -152,6 +163,9 @@
|
||||
#КонецЕсли
|
||||
|
||||
УстановитьДоступностьКнопок();
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
УстановитьДоступностьКнопокПочтовыхФайлов();
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
ДатаУниверсальная = ОбщегоНазначенияКлиент.ДатаУниверсальная();
|
||||
|
||||
@ -372,8 +386,14 @@
|
||||
Процедура Обновить(Команда)
|
||||
|
||||
Элементы.Список.Обновить();
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Элементы.СписокПочтовыхВложений.Обновить();
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
ПодключитьОбработчикОжидания("УстановитьДоступностьКнопок", 0.1, Истина);
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
ПодключитьОбработчикОжидания("УстановитьДоступностьКнопокПочтовыхФайлов", 0.1, Истина);
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
@ -402,28 +422,30 @@
|
||||
|
||||
&НаКлиенте
|
||||
Процедура СохранитьКак(Команда)
|
||||
|
||||
Если НЕ ПроверитьДействиеРазрешено() Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ТекущиеДанные = Элементы.Список.ТекущиеДанные;
|
||||
|
||||
Если ТекущиеДанные.Зашифрован
|
||||
ИЛИ (ТекущиеДанные.ФайлРедактируется И ТекущиеДанные.ФайлРедактируетТекущийПользователь) Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ДанныеФайла = ДанныеФайла(ТекущиеДанные.Ссылка, УникальныйИдентификатор);
|
||||
|
||||
Если ДанныеФайла.Зашифрован
|
||||
ИЛИ (ДанныеФайла.ФайлРедактируется И ДанныеФайла.ФайлРедактируетТекущийПользователь) Тогда
|
||||
// Файл может быть изменен в другом сеансе.
|
||||
ОповеститьОбИзменении(ТекущиеДанные.Ссылка);
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ПрисоединенныеФайлыКлиент.СохранитьФайлКак(ДанныеФайла);
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
//Если НЕ ПроверитьДействиеРазрешено() Тогда
|
||||
// Возврат;
|
||||
//КонецЕсли;
|
||||
//
|
||||
//ТекущиеДанные = Элементы.Список.ТекущиеДанные;
|
||||
//
|
||||
//Если ТекущиеДанные.Зашифрован
|
||||
// ИЛИ (ТекущиеДанные.ФайлРедактируется И ТекущиеДанные.ФайлРедактируетТекущийПользователь) Тогда
|
||||
// Возврат;
|
||||
//КонецЕсли;
|
||||
//
|
||||
//ДанныеФайла = ДанныеФайла(ТекущиеДанные.Ссылка, УникальныйИдентификатор);
|
||||
//
|
||||
//Если ДанныеФайла.Зашифрован
|
||||
// ИЛИ (ДанныеФайла.ФайлРедактируется И ДанныеФайла.ФайлРедактируетТекущийПользователь) Тогда
|
||||
// // Файл может быть изменен в другом сеансе.
|
||||
// ОповеститьОбИзменении(ТекущиеДанные.Ссылка);
|
||||
// Возврат;
|
||||
//КонецЕсли;
|
||||
//
|
||||
//ПрисоединенныеФайлыКлиент.СохранитьФайлКак(ДанныеФайла);
|
||||
СохранитьФайлКак();
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
@ -458,18 +480,21 @@
|
||||
|
||||
&НаКлиенте
|
||||
Процедура Печать(Команда)
|
||||
|
||||
СистемнаяИнфо = Новый СистемнаяИнформация;
|
||||
Если СистемнаяИнфо.ТипПлатформы <> ТипПлатформы.Windows_x86
|
||||
И СистемнаяИнфо.ТипПлатформы <> ТипПлатформы.Windows_x86_64 Тогда
|
||||
ПоказатьПредупреждение(, НСтр("ru = 'Печать файлов возможна только в Windows.'"));
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ВыделенныеСтроки = Элементы.Список.ВыделенныеСтроки;
|
||||
Если ВыделенныеСтроки.Количество() > 0 Тогда
|
||||
ПрисоединенныеФайлыКлиент.НапечататьФайлы(ВыделенныеСтроки, ЭтотОбъект.УникальныйИдентификатор);
|
||||
КонецЕсли;
|
||||
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
//СистемнаяИнфо = Новый СистемнаяИнформация;
|
||||
//Если СистемнаяИнфо.ТипПлатформы <> ТипПлатформы.Windows_x86
|
||||
// И СистемнаяИнфо.ТипПлатформы <> ТипПлатформы.Windows_x86_64 Тогда
|
||||
// ПоказатьПредупреждение(, НСтр("ru = 'Печать файлов возможна только в Windows.'"));
|
||||
// Возврат;
|
||||
//КонецЕсли;
|
||||
//
|
||||
//ВыделенныеСтроки = Элементы.Список.ВыделенныеСтроки;
|
||||
//Если ВыделенныеСтроки.Количество() > 0 Тогда
|
||||
// ПрисоединенныеФайлыКлиент.НапечататьФайлы(ВыделенныеСтроки, ЭтотОбъект.УникальныйИдентификатор);
|
||||
//КонецЕсли;
|
||||
ПечатьФайлов();
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
@ -795,13 +820,22 @@
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ОткрытьФайл()
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
//Процедура ОткрытьФайл()
|
||||
Процедура ОткрытьФайл(Знач ИмяСписка = "Список")
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
Если НЕ ПроверитьДействиеРазрешено() Тогда
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
//Если НЕ ПроверитьДействиеРазрешено() Тогда
|
||||
Если НЕ ПроверитьДействиеРазрешено(, ИмяСписка) Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
ТекущиеДанные = Элементы.Список.ТекущиеДанные;
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
//ТекущиеДанные = Элементы.Список.ТекущиеДанные;
|
||||
ТекущиеДанные = Элементы[ИмяСписка].ТекущиеДанные;
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
Если ТекущиеДанные.Зашифрован Тогда
|
||||
Возврат;
|
||||
@ -888,14 +922,28 @@
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПроверитьДействиеРазрешено(Знач ТекущееДействие = "")
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
//Функция ПроверитьДействиеРазрешено(Знач ТекущееДействие = "")
|
||||
Функция ПроверитьДействиеРазрешено(Знач ТекущееДействие = "", Знач ИмяСписка = "Список")
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
//ТекущиеДанные = Элементы.Список.ТекущиеДанные;
|
||||
ТекущиеДанные = Элементы[ИмяСписка].ТекущиеДанные;
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
ТекущиеДанные = Элементы.Список.ТекущиеДанные;
|
||||
Если ТекущиеДанные = Неопределено Тогда
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Возврат ТипЗнч(Элементы.Список.ТекущаяСтрока) = ТипСправочникаСФайлами;
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
//Возврат ТипЗнч(Элементы.Список.ТекущаяСтрока) = ТипСправочникаСФайлами;
|
||||
Если ИмяСписка = "Список" Тогда
|
||||
Возврат ТипЗнч(Элементы.Список.ТекущаяСтрока) = ТипСправочникаСФайлами;
|
||||
Иначе
|
||||
Возврат Истина;
|
||||
КонецЕсли;
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
КонецФункции
|
||||
|
||||
@ -1268,6 +1316,9 @@
|
||||
|
||||
Элементы.АдресДанныхФайла.Видимость = ИспользоватьПредпросмотр;
|
||||
Элементы.Предпросмотр.Пометка = ИспользоватьПредпросмотр;
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Элементы.АдресДанныхФайлаПочтовыхФайлов.Видимость = ИспользоватьПредпросмотр;
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
@ -1376,3 +1427,333 @@
|
||||
КонецФункции
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область ПочтовыеВложения
|
||||
//#83
|
||||
|
||||
&НаКлиенте
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Процедура СписокПочтовыхВложенийПросмотреть(Команда)
|
||||
|
||||
ОткрытьФайл("СписокПочтовыхВложений");
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Процедура СписокПочтовыхВложенийОткрытьКарточку(Команда)
|
||||
|
||||
Если Элементы.СписокПочтовыхВложений.ТекущиеДанные = Неопределено Тогда
|
||||
Возврат
|
||||
КонецЕсли;
|
||||
|
||||
ПараметрыФормы = Новый Структура;
|
||||
ПараметрыФормы.Вставить("ПрисоединенныйФайл", Элементы.СписокПочтовыхВложений.ТекущиеДанные.Ссылка);
|
||||
|
||||
ОткрытьФорму("ОбщаяФорма.ПрисоединенныйФайл", ПараметрыФормы);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Процедура СписокПочтовыхВложенийСохранитьКак(Команда)
|
||||
|
||||
СохранитьФайлКак("СписокПочтовыхВложений");
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Процедура СписокПочтовыхВложенийОтправить(Команда)
|
||||
|
||||
ФайловыеФункцииСлужебныйКлиент.ОтправитьФайлыПоПочте(
|
||||
Элементы.СписокПочтовыхВложений.ВыделенныеСтроки, УникальныйИдентификатор, ПараметрыОтправки);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Процедура СписокПочтовыхВложенийВыбор(Элемент, ВыбраннаяСтрока, Поле, СтандартнаяОбработка)
|
||||
|
||||
Если Поле.Имя = "СписокПочтовыхВложенийПисьмо" Тогда
|
||||
ОткрытьПисьмо();
|
||||
Иначе
|
||||
ОткрытьФайл("СписокПочтовыхВложений");
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Процедура СписокПочтовыхВложенийПриАктивизацииСтроки(Элемент)
|
||||
|
||||
ПодключитьОбработчикОжидания("УстановитьДоступностьКнопокПочтовыхФайлов", 0.1, Истина);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Процедура СписокПочтовыхВложенийПечать(Команда)
|
||||
|
||||
ПечатьФайлов("СписокПочтовыхВложений");
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
|
||||
#Область СлужебныеФункцииПочтовыеФайлы
|
||||
|
||||
&НаКлиенте
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Процедура СохранитьФайлКак(Знач ИмяСписка = "Список")
|
||||
|
||||
Если НЕ ПроверитьДействиеРазрешено(, ИмяСписка) Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ТекущиеДанные = Элементы[ИмяСписка].ТекущиеДанные;
|
||||
|
||||
Если ТекущиеДанные.Зашифрован
|
||||
ИЛИ (ТекущиеДанные.ФайлРедактируется И ТекущиеДанные.ФайлРедактируетТекущийПользователь) Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ДанныеФайла = ДанныеФайла(ТекущиеДанные.Ссылка, УникальныйИдентификатор);
|
||||
|
||||
Если ДанныеФайла.Зашифрован
|
||||
ИЛИ (ДанныеФайла.ФайлРедактируется И ДанныеФайла.ФайлРедактируетТекущийПользователь) Тогда
|
||||
// Файл может быть изменен в другом сеансе.
|
||||
ОповеститьОбИзменении(ТекущиеДанные.Ссылка);
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ПрисоединенныеФайлыКлиент.СохранитьФайлКак(ДанныеФайла);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
&НаКлиенте
|
||||
Процедура ПечатьФайлов(Знач ИмяСписка = "Список")
|
||||
|
||||
СистемнаяИнфо = Новый СистемнаяИнформация;
|
||||
Если СистемнаяИнфо.ТипПлатформы <> ТипПлатформы.Windows_x86
|
||||
И СистемнаяИнфо.ТипПлатформы <> ТипПлатформы.Windows_x86_64 Тогда
|
||||
ПоказатьПредупреждение(, НСтр("ru = 'Печать файлов возможна только в Windows.'"));
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ВыделенныеСтроки = Элементы[ИмяСписка].ВыделенныеСтроки;
|
||||
Если ВыделенныеСтроки.Количество() > 0 Тогда
|
||||
ПрисоединенныеФайлыКлиент.НапечататьФайлы(ВыделенныеСтроки, ЭтотОбъект.УникальныйИдентификатор);
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
//- #393 Иванов А.Б. 2018-09-02
|
||||
|
||||
&НаКлиенте
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Процедура УстановитьДоступностьКнопокПочтовыхФайлов()
|
||||
|
||||
ОбновитьПредпросмотрПочтовыхФайлов();
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
&НаКлиенте
|
||||
Процедура ОбновитьПредпросмотрПочтовыхФайлов()
|
||||
|
||||
Если Не Предпросмотр Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ТекущиеДанные = Элементы.СписокПочтовыхВложений.ТекущиеДанные;
|
||||
Если ТекущиеДанные <> Неопределено И РасширенияПоддерживающиеПредпросмотр.НайтиПоЗначению(ТекущиеДанные.Расширение) <> Неопределено Тогда
|
||||
ДанныеФайла = ДанныеФайла(ТекущиеДанные.Ссылка, УникальныйИдентификатор);
|
||||
АдресДанныхФайлаПочтовыхФайлов = ДанныеФайла.СсылкаНаДвоичныеДанныеФайла;
|
||||
Иначе
|
||||
АдресДанныхФайлаПочтовыхФайлов = Неопределено;
|
||||
Элементы.АдресДанныхФайлаПочтовыхФайлов.ТекстНевыбраннойКартинки = НСтр("ru = 'Нет данных для предварительного просмотра'");
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
&НаСервере
|
||||
Процедура НастроитьДинамическийСписокПочтовыхФайлов()
|
||||
|
||||
ТекстЗапроса =
|
||||
"ВЫБРАТЬ
|
||||
| Файлы.Ссылка КАК Ссылка,
|
||||
| Файлы.ПометкаУдаления,
|
||||
| ВЫБОР
|
||||
| КОГДА Файлы.ПометкаУдаления = ИСТИНА
|
||||
| ТОГДА Файлы.ИндексКартинки + 1
|
||||
| ИНАЧЕ Файлы.ИндексКартинки
|
||||
| КОНЕЦ КАК ИндексКартинки,
|
||||
| Файлы.Наименование КАК Наименование,
|
||||
| ВЫРАЗИТЬ(Файлы.Описание КАК СТРОКА(500)) КАК Описание,
|
||||
| Файлы.Автор,
|
||||
| Файлы.ДатаСоздания,
|
||||
| Файлы.Изменил КАК Отредактировал,
|
||||
| ДОБАВИТЬКДАТЕ(Файлы.ДатаМодификацииУниверсальная, СЕКУНДА, &СекундДоМестногоВремени) КАК ДатаИзменения,
|
||||
| ВЫРАЗИТЬ(Файлы.Размер / 1024 КАК ЧИСЛО(10, 0)) КАК Размер,
|
||||
| Файлы.ПодписанЭП,
|
||||
| Файлы.Зашифрован,
|
||||
| ВЫБОР
|
||||
| КОГДА Файлы.ПодписанЭП
|
||||
| И Файлы.Зашифрован
|
||||
| ТОГДА 2
|
||||
| КОГДА Файлы.Зашифрован
|
||||
| ТОГДА 1
|
||||
| КОГДА Файлы.ПодписанЭП
|
||||
| ТОГДА 0
|
||||
| ИНАЧЕ -1
|
||||
| КОНЕЦ КАК НомерКартинкиПодписанЗашифрован,
|
||||
| ВЫБОР
|
||||
| КОГДА НЕ Файлы.Редактирует В (&ПустыеПользователи)
|
||||
| ИЛИ СтатусыСинхронизацииФайловСОблачнымСервисом.УчетнаяЗапись <> НЕОПРЕДЕЛЕНО
|
||||
| ТОГДА ИСТИНА
|
||||
| ИНАЧЕ ЛОЖЬ
|
||||
| КОНЕЦ КАК ФайлРедактируется,
|
||||
| ВЫБОР
|
||||
| КОГДА Файлы.Редактирует = &ТекущийПользователь
|
||||
| ТОГДА ИСТИНА
|
||||
| ИНАЧЕ ЛОЖЬ
|
||||
| КОНЕЦ КАК ФайлРедактируетТекущийПользователь,
|
||||
| ВЫБОР
|
||||
| КОГДА (НЕ Файлы.Редактирует В (&ПустыеПользователи)
|
||||
| ИЛИ СтатусыСинхронизацииФайловСОблачнымСервисом.УчетнаяЗапись <> НЕОПРЕДЕЛЕНО)
|
||||
| И Файлы.Редактирует <> &ТекущийПользователь
|
||||
| ТОГДА ИСТИНА
|
||||
| ИНАЧЕ ЛОЖЬ
|
||||
| КОНЕЦ КАК ФайлРедактируетДругойПользователь,
|
||||
| Файлы.Расширение КАК Расширение,
|
||||
| ВЫБОР
|
||||
| КОГДА СтатусыСинхронизацииФайловСОблачнымСервисом.УчетнаяЗапись <> НЕОПРЕДЕЛЕНО
|
||||
| И Файлы.Редактирует = НЕОПРЕДЕЛЕНО
|
||||
| ТОГДА СтатусыСинхронизацииФайловСОблачнымСервисом.УчетнаяЗапись
|
||||
| ИНАЧЕ Файлы.Редактирует
|
||||
| КОНЕЦ КАК Редактирует,
|
||||
| ПредметыПапкиВзаимодействий.Взаимодействие КАК Письмо,
|
||||
| 3 КАК Направление
|
||||
|ИЗ
|
||||
| Справочник.ЭлектронноеПисьмоВходящееПрисоединенныеФайлы КАК Файлы
|
||||
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.СтатусыСинхронизацииФайловСОблачнымСервисом КАК СтатусыСинхронизацииФайловСОблачнымСервисом
|
||||
| ПО Файлы.Ссылка = СтатусыСинхронизацииФайловСОблачнымСервисом.Файл
|
||||
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.ПредметыПапкиВзаимодействий КАК ПредметыПапкиВзаимодействий
|
||||
| ПО Файлы.ВладелецФайла = ПредметыПапкиВзаимодействий.Взаимодействие
|
||||
| И (ПредметыПапкиВзаимодействий.Предмет = &ВладелецФайлов)
|
||||
|
|
||||
|ОБЪЕДИНИТЬ ВСЕ
|
||||
|
|
||||
|ВЫБРАТЬ
|
||||
| Файлы.Ссылка,
|
||||
| Файлы.ПометкаУдаления,
|
||||
| ВЫБОР
|
||||
| КОГДА Файлы.ПометкаУдаления = ИСТИНА
|
||||
| ТОГДА Файлы.ИндексКартинки + 1
|
||||
| ИНАЧЕ Файлы.ИндексКартинки
|
||||
| КОНЕЦ,
|
||||
| Файлы.Наименование,
|
||||
| ВЫРАЗИТЬ(Файлы.Описание КАК СТРОКА(500)),
|
||||
| Файлы.Автор,
|
||||
| Файлы.ДатаСоздания,
|
||||
| Файлы.Изменил,
|
||||
| ДОБАВИТЬКДАТЕ(Файлы.ДатаМодификацииУниверсальная, СЕКУНДА, &СекундДоМестногоВремени),
|
||||
| ВЫРАЗИТЬ(Файлы.Размер / 1024 КАК ЧИСЛО(10, 0)),
|
||||
| Файлы.ПодписанЭП,
|
||||
| Файлы.Зашифрован,
|
||||
| ВЫБОР
|
||||
| КОГДА Файлы.ПодписанЭП
|
||||
| И Файлы.Зашифрован
|
||||
| ТОГДА 2
|
||||
| КОГДА Файлы.Зашифрован
|
||||
| ТОГДА 1
|
||||
| КОГДА Файлы.ПодписанЭП
|
||||
| ТОГДА 0
|
||||
| ИНАЧЕ -1
|
||||
| КОНЕЦ,
|
||||
| ВЫБОР
|
||||
| КОГДА НЕ Файлы.Редактирует В (&ПустыеПользователи)
|
||||
| ИЛИ СтатусыСинхронизацииФайловСОблачнымСервисом.УчетнаяЗапись <> НЕОПРЕДЕЛЕНО
|
||||
| ТОГДА ИСТИНА
|
||||
| ИНАЧЕ ЛОЖЬ
|
||||
| КОНЕЦ,
|
||||
| ВЫБОР
|
||||
| КОГДА Файлы.Редактирует = &ТекущийПользователь
|
||||
| ТОГДА ИСТИНА
|
||||
| ИНАЧЕ ЛОЖЬ
|
||||
| КОНЕЦ,
|
||||
| ВЫБОР
|
||||
| КОГДА (НЕ Файлы.Редактирует В (&ПустыеПользователи)
|
||||
| ИЛИ СтатусыСинхронизацииФайловСОблачнымСервисом.УчетнаяЗапись <> НЕОПРЕДЕЛЕНО)
|
||||
| И Файлы.Редактирует <> &ТекущийПользователь
|
||||
| ТОГДА ИСТИНА
|
||||
| ИНАЧЕ ЛОЖЬ
|
||||
| КОНЕЦ,
|
||||
| Файлы.Расширение,
|
||||
| ВЫБОР
|
||||
| КОГДА СтатусыСинхронизацииФайловСОблачнымСервисом.УчетнаяЗапись <> НЕОПРЕДЕЛЕНО
|
||||
| И Файлы.Редактирует = НЕОПРЕДЕЛЕНО
|
||||
| ТОГДА СтатусыСинхронизацииФайловСОблачнымСервисом.УчетнаяЗапись
|
||||
| ИНАЧЕ Файлы.Редактирует
|
||||
| КОНЕЦ,
|
||||
| ПредметыПапкиВзаимодействий.Взаимодействие,
|
||||
| 4
|
||||
|ИЗ
|
||||
| Справочник.ЭлектронноеПисьмоИсходящееПрисоединенныеФайлы КАК Файлы
|
||||
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.СтатусыСинхронизацииФайловСОблачнымСервисом КАК СтатусыСинхронизацииФайловСОблачнымСервисом
|
||||
| ПО Файлы.Ссылка = СтатусыСинхронизацииФайловСОблачнымСервисом.Файл
|
||||
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.ПредметыПапкиВзаимодействий КАК ПредметыПапкиВзаимодействий
|
||||
| ПО Файлы.ВладелецФайла = ПредметыПапкиВзаимодействий.Взаимодействие
|
||||
| И (ПредметыПапкиВзаимодействий.Предмет = &ВладелецФайлов)";
|
||||
|
||||
ЗаголовокОшибки = НСтр("ru = 'Ошибка при настройке динамического списка присоединенных файлов.'");
|
||||
ОкончаниеОшибки = НСтр("ru = 'В этом случае настройка динамического списка невозможна.'");
|
||||
|
||||
СписокПочтовыхВложений.ТекстЗапроса = ТекстЗапроса;
|
||||
|
||||
ПустыеПользователи = Новый Массив;
|
||||
ПустыеПользователи.Добавить(Неопределено);
|
||||
ПустыеПользователи.Добавить(Справочники.Пользователи.ПустаяСсылка());
|
||||
ПустыеПользователи.Добавить(Справочники.ВнешниеПользователи.ПустаяСсылка());
|
||||
|
||||
СписокПочтовыхВложений.Параметры.УстановитьЗначениеПараметра("ВладелецФайлов", Параметры.ВладелецФайла);
|
||||
СписокПочтовыхВложений.Параметры.УстановитьЗначениеПараметра("ТекущийПользователь", Пользователи.АвторизованныйПользователь());
|
||||
СписокПочтовыхВложений.Параметры.УстановитьЗначениеПараметра("ПустыеПользователи", ПустыеПользователи);
|
||||
СписокПочтовыхВложений.Параметры.УстановитьЗначениеПараметра("СекундДоМестногоВремени", 0); // Установка на клиенте
|
||||
СписокПочтовыхВложений.ДинамическоеСчитываниеДанных = Истина;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
Процедура СписокПочтовыхВложенийОткрытьПисьмо(Команда)
|
||||
|
||||
Если Элементы.СписокПочтовыхВложений.ТекущиеДанные = Неопределено Тогда
|
||||
Возврат
|
||||
КонецЕсли;
|
||||
|
||||
ОткрытьПисьмо();
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
//+ #393 Иванов А.Б. 2018-09-02
|
||||
&НаКлиенте
|
||||
Процедура ОткрытьПисьмо()
|
||||
|
||||
Письмо = Элементы.СписокПочтовыхВложений.ТекущиеДанные.Письмо;
|
||||
|
||||
ПараметрыФормы = Новый Структура;
|
||||
ПараметрыФормы.Вставить("Ключ", Письмо);
|
||||
|
||||
Если ТипЗнч(Письмо) = Тип("ДокументСсылка.ЭлектронноеПисьмоВходящее") Тогда
|
||||
ОткрытьФорму("Документ.ЭлектронноеПисьмоВходящее.ФормаОбъекта", ПараметрыФормы);
|
||||
Иначе
|
||||
ОткрытьФорму("Документ.ЭлектронноеПисьмоИсходящее.ФормаОбъекта", ПараметрыФормы);
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
File diff suppressed because one or more lines are too long
Loading…
x
Reference in New Issue
Block a user