public void НайтиИПроставитьОснованиеПисьма(/*Письмо*/)
{
//ПреобразованнаяТема = ИсключитьПрефиксыТемыПисьма(Письмо.Тема);
if(true/*Письмо.УчетнаяЗапись.ДляВходящихОтветовИПереадресацийИскатьПисьмаОснованияИЗаполнятьПредмет
ИЛИ Письмо.УчетнаяЗапись.ДляВходящихОтветовИПереадресацийИскатьПисьмаОснованияИЗаполнятьОснованиеНовогоПисьма
ИЛИ Письмо.УчетнаяЗапись.ДляВходящихОтветовИПереадресацийИскатьПисьмаОснованияИЗаполнятьГруппуПисемНовогоПисьма*/)
{
//ТаблицаИсходныхДанных = Новый ТаблицаЗначений;
//ТаблицаИсходныхДанных.Колонки.Добавить("АдресЭлектроннойПочты", Новый ОписаниеТипов("Строка"));
//ТаблицаИсходныхДанных.Колонки.Добавить("ПредставлениеОбъекта" , Новый ОписаниеТипов("Строка"));
//СтрокаТаблицы = ТаблицаИсходныхДанных.Добавить();
//СтрокаТаблицы.АдресЭлектроннойПочты = Письмо.ОтправительАдресЭлектроннойПочты;
//Запрос = Новый Запрос;
//Запрос.УстановитьПараметр("ПреобразованнаяТема", ("%" + ПреобразованнаяТема));
//Запрос.УстановитьПараметр("Параметр" , Письмо.ОтправительАдресЭлектроннойПочты);
//Запрос.УстановитьПараметр("УчетнаяЗапись" , Письмо.УчетнаяЗапись);
//Запрос.УстановитьПараметр("Отправленное" , Перечисления.СтатусыПисем.Отправленное);
/*Запрос.Текст = "
|ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка КАК Ссылка,
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.ПредметКонтакта КАК ПредметКонтакта,
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.ГруппаУчетнойЗаписи КАК ГруппаУчетнойЗаписи,
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.ДатаТранспорта КАК ДатаТранспортаТаблицы
|ИЗ
| КритерийОтбора.ЭлектронныеПисьмаПоАдресуЭлектроннойПочты(&Параметр) КАК ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица
|
|ГДЕ
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.Тема ПОДОБНО &ПреобразованнаяТема
| И
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.УчетнаяЗапись = &УчетнаяЗапись
| И
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.СтатусПисьма = &Отправленное
| И
| НЕ ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.ПометкаУдаления
|";*/
//РезультатыПоиска = ПоискВКонтактнойИнформации(ТаблицаИсходныхДанных);
if(true/*РезультатыПоиска.Количество() > 0*/)
{
//СписокОбъектов = Новый СписокЗначений;
if(true/*СписокОбъектов.Количество() > 0*/)
{
//ЗапросДопИнформации = Новый Запрос;
//ЗапросДопИнформации.УстановитьПараметр("Тип" , Перечисления.ТипыКонтактнойИнформации.АдресЭлектроннойПочты);
//ЗапросДопИнформации.УстановитьПараметр("СписокОбъектов", СписокОбъектов);
/*ЗапросДопИнформации.Текст = "
|ВЫБРАТЬ РАЗРЕШЕННЫЕ
| КонтактнаяИнформация.Представление
|ИЗ
| РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация
|ГДЕ
| КонтактнаяИнформация.Тип = &Тип
| И
| КонтактнаяИнформация.Объект В(&СписокОбъектов)
|";*/
//ВыборкаДопЗапроса = ЗапросДопИнформации.Выполнить().Выбрать();
//Счетчик = 0;
while(true/*ВыборкаДопЗапроса.Следующий()*/)
{
if(true/*НЕ ЗначениеЗаполнено(ВыборкаДопЗапроса.Представление) ИЛИ Врег(ВыборкаДопЗапроса.Представление) = Врег(Письмо.ОтправительАдресЭлектроннойПочты)*/)
{
}
//Счетчик = Счетчик + 1;
//Запрос.УстановитьПараметр(("Параметр" + СокрЛП(Строка(Счетчик))), ВыборкаДопЗапроса.Представление);
/*Запрос.Текст = Запрос.Текст + "
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ ПЕРВЫЕ 1
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка КАК Ссылка,
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.ПредметКонтакта КАК ПредметКонтакта,
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.ГруппаУчетнойЗаписи КАК ГруппаУчетнойЗаписи,
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.ДатаТранспорта КАК ДатаТранспортаТаблицы
|ИЗ
| КритерийОтбора.ЭлектронныеПисьмаПоАдресуЭлектроннойПочты(&Параметр" + СокрЛП(Строка(Счетчик)) + ") КАК ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица
|
|ГДЕ
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.Тема ПОДОБНО &ПреобразованнаяТема
| И
| ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.УчетнаяЗапись = &УчетнаяЗапись
| И
| НЕ ЭлектронныеПисьмаПоАдресуЭлектроннойПочтыТаблица.Ссылка.ПометкаУдаления
|
|";*/
}
//;;
}
}
/*Запрос.Текст = Запрос.Текст + "
|УПОРЯДОЧИТЬ ПО
| ДатаТранспортаТаблицы УБЫВ
|";*/
//РезультатЗапроса = Запрос.Выполнить();
if(true/*НЕ РезультатЗапроса.Пустой()*/)
{
//Выборка = РезультатЗапроса.Выбрать();
//Выборка.Следующий();
if(true/*Письмо.УчетнаяЗапись.ДляВходящихОтветовИПереадресацийИскатьПисьмаОснованияИЗаполнятьПредмет*/)
{
//Письмо.ПредметКонтакта = Выборка.ПредметКонтакта;
}
if(true/*Письмо.УчетнаяЗапись.ДляВходящихОтветовИПереадресацийИскатьПисьмаОснованияИЗаполнятьГруппуПисемНовогоПисьма И Выборка.ГруппаУчетнойЗаписи<>Письмо.УчетнаяЗапись.ГруппаИсходящие*/)
{
//Письмо.ГруппаУчетнойЗаписи = Выборка.ГруппаУчетнойЗаписи;
}
if(true/*Письмо.УчетнаяЗапись.ДляВходящихОтветовИПереадресацийИскатьПисьмаОснованияИЗаполнятьОснованиеНовогоПисьма*/)
{
//Письмо.ОснованиеПисьма = Выборка.Ссылка;
}
}
}
}