Перерыл кучу прог по переводу doc в chm. Нашел сайтец занятный http://www.aitishnik.ru/windows/prog02.html. По советам данного сайта у меня получилось вот что. По мне так намного лучше doc варианта, буду еще наверно дорабатывать.

OrkuShaman писал(а) 24. Мая 2013 :: 14:27:


Не, не гуд. Поиска нет

Помогите придумать фильтрацию запроса по Полю "ТекущийДокумент" таблицы "ЖурналДокументов".

У меня есть список значений, содержащий Строка(СокрЛП(ID)) документов, которые мне нужно исключить из результата запроса.

	  спИск = СоздатьОбъект("СписокЗначений");
	спИск.ДобавитьЗначение(Строка("CNWI"));

	оПЗ = СоздатьОбъект("ПрямойЗапрос");
	сТЗ = "
	|ВЫБРАТЬ
	|	СРЕД($дДП.ТекущийДокумент,3,4) КАК ТД,
	|	$ж.ДатаДокумента
	|ИЗ
	|	Документ.ДП_Авиа КАК дДП $nolock
	|	ЛЕВОЕ СОЕДИНЕНИЕ ЖурналДокументов КАК ж $nolock
	|	ПО $ж.ТекущийДокумент = $дДП.ТекущийДокумент
	|ГДЕ
	|	СРЕД($дДП.ТекущийДокумент,3,4) НЕ В (ВЫБРАТЬ СОКРЛ(СОКРП(#сп.val)) ИЗ #сп)
	|	И
	|	$ж.ДатаДокумента МЕЖДУ :ДатаНач И :ДатаКон~";

	оПЗ.Текст = сТЗ;
	оПЗ.УложитьСписокЗначений(спИск,"#сп");
	оПЗ.УстановитьТекстовыйПараметр("ДатаНач", НачДата);
	оПЗ.УстановитьТекстовыйПараметр("ДатаКон", КонДата);
	оПЗ.РежимОтладки = 1;
	итз = оПЗ.Выполнить();
	итз.Показать();
 

Это один из вариантов с которыми я экспериментировал.
В результат запроса попадают все документы заданного вида за период

Вопрос в том, чтоб правильно работало условие:

СРЕД($дДП.ТекущийДокумент,3,4) НЕ В (ВЫБРАТЬ СОКРЛ(СОКРП(#сп.val)) ИЗ #сп)
 

к сожалению тоже не хочет работать

Подскажите по условию по видам документов. Если условие по видам стоит, выборка пустая, если убрать то работает, но в выборку попадают лишние документы:
"ВЫБРАТЬ
|      Партии.Партия КАК [Партия :Справочник.Партии]
|ИЗ
|      Журнал КАК ЖурналДокументов
|
|      ЛЕВОЕ СОЕДИНЕНИЕ
|            Регистр.ПаритииНаличие КАК Партии
|      ПО
|            ЖурналДокументов.IDDoc = Партии.IDDoc
|ГДЕ
|      ЖурналДокументов.DATE <= :КонПериода
|       И ЛЕВО(ЖурналДокументов.IDDoc, 4) = :ВидДокумента.Реализация";

Отладка говорит, что :ВидДокумента.Реализация = ' 18R', а ЛЕВО(ЖурналДокументов.IDDoc, 4) = '  97' (у реализации). как правильно сделать?

Добрый день господа. Подскажите что не так делаю. Есть такой текст запроса :
ТекстПрямогоЗапроса="
     |ВЫБРАТЬ
     |      $СПрАвто.Модель КАК [Модель $Справочник.МоделиАвт]
     |      ,$СпРАвто.Код КАК [Вин $Строка]
     |      ,$Справто.ГодВыпуска КАК [ГодВып $Число]
//      |      ,$СпрАвто.Пробег КАК [Пробег $Число]
     |      ,$ДокЗаказНаряд3.ВидРемонта КАК [ВидРем $Справочник.ВидРемонта]
     |      ,$ДокЗаказНаряд3.СуммаРабот КАК [СумРаб $Число]
     |      ,$ДокЗаказНаряд3.СумМат КАК [СумЗЧ $Число]
     |      ,$Жур.ТекущийДокумент КАК [ТекущийЗН $Документ.ЗаказНаряд3]
     |      ,$Жур.ВидДокумента КАК [ТекущийЗН_вид $ВидДокумента]
     |      ,$Жур.ДатаДокумента КАК [ДокДата $Дата]
//      |      ,$СпрАВто.VIN2 КАК [Вин2 $Строка]
     |      ,$Жур.Фирма КАК [Фирма $Справочник.Фирмы]
     |      ,$ДокЗаказНаряд3.УчитыватьНДС КАК [УчНДС $Число]
     |      ,$СпрАвТо.Марка КАК [Марка $Справочник.Марка]
//      |      ,$ДокЗаказНаряд3.Количество КАК [Количество $Число]
//      |      ,$ДокЗаказНаряд3.Коэффициент КАК [Коэффициент $Число]
     |      ,$ДокЗаказНаряд3.СостояниеЗН КАК [Закрыт $Перечисление.СостояниеЗаказНаряда]
     |ИЗ
     |      ЖурналДокументов КАК Жур
     |      ВНУТРЕННЕЕ СОЕДИНЕНИЕ Документ.ЗаказНаряд3 КАК ДокЗаказНаряд3
     |            ПО $ДокЗаказНаряд3.ТекущийДокумент = $Жур.ТекущийДокумент
     |      ЛЕВОЕ СОЕДИНЕНИЕ Справочник.Автомобили КАК СпрАвтО
     |            ПО $СПРАвто.ТекущийЭлемент = $ДокЗаказНаряд3.Автомобиль
     |ГДЕ 
     |      $Жур.ДатаДокумента МЕЖДУ :НачДата И :КонДата
//      |      И  $Жур.Фирма=:ВыбРазделитель1
     |      И  $Жур.Проведен = 1
     |      И  $ДокЗаказНаряд3.СостояниеЗН=:Закрыт
     |      И  ($СпРАвто.Код в (ВЫБРАТЬ val ИЗ #ВыбСЗВин))
//      |      И  $СпРАвто.Код=:ВыбВин
     |";

Не работает условие "И  ($СпРАвто.Код в (ВЫБРАТЬ val ИЗ #ВыбСЗВин))". Список значений это конкретные строки с винами типа "RJHYMJTYSJ16541651". $СпРАвто.Код это код в справочнике строкового типа. Если брать текстовый параметр по условию "$СпРАвто.Код=:ВыбВин", то работает. Но мне нужно их много проверять.

Дык я сам эту времянку вручную создавал.

СЗВины=СоздатьОбъект("СписокЗначений");
СЗВины.ДобавитьЗначение("XW8CJ41Z4CK273888");
СЗВины.ДобавитьЗначение("XWB4B11CDAA033412");
СЗВины.ДобавитьЗначение("Y6DTF698P90226411");
СЗВины.ДобавитьЗначение("XTA21213021620778");
СЗВины.ДобавитьЗначение("XWFPE6DJ9C3037712");
СЗВины.ДобавитьЗначение("XW8BD61Z98K151131");
СЗВины.ДобавитьЗначение("XWB3K32CDBA274228");
СЗВины.ДобавитьЗначение("XWF0AHL69C0018981");