Запрос поработал дней 15 за 3-5 секунд и стал ужасно виснуть

Здравствуйте!
Подскажите пожалуйста в чем причина и если можно исправить то как.
Периодичность сохранения остатков = 15 дней уже 4 года

Изначально я написал запрос он работал за 3-5 секунд
при этом период был 14 дней
через где-то полмесяца он как завис и все
при этом ничего в нем не изменялось до сегоднешнего дня
сегодня я внес в него изменения добавил (NOLOCK) и уменьшил период запроса до 3 дней
при этом время его работы 20 секунд по сравнению с 3-5 секундами очень существенно
не понимаю в чем причина
настала середина месяца открыли новый период и все существенных изменений не было
вроде количество данных примерно тоже
намного ниже указан новый запрос
Изначальный запрос период 14 дней (поработал дней 15 за 3-5 секунд):
Запрос = СоздатьОбъект("ODBCRecordSet");
//*******************************************
//*******************************************
ТекстЗапроса = "
|SELECT
|   Жур.IDDoc as [Док $Документ],
|   Жур.IDDocDef as Док_вид,
|      COALESCE($ДокР.Маршрут, $ДокП.Маршрут) as [Маршрут $Справочник.Маршруты],
|      $ДокР.Клиент as [Клиент $Справочник.Клиенты],
|      $ДокП.Субконто2 as [Субконто2 $Неопределенный]
|FROM
| _1SJourn as Жур
|LEFT JOIN
| $Документ.Расходная as ДокР ON ДокР.IDDoc = Жур.IDDoc AND $ДокР.Вывоз <> :ВыбСамовывоз
|LEFT JOIN
| $Документ.ПриходныйОрдерТБ as ДокП ON ДокП.IDDoc = Жур.IDDoc
|WHERE
| Жур.Date_Time_IDDoc BETWEEN :ЛокНачДата AND :ЛокКонДата~ AND
| (ДокР.$ОбщийРеквизит.Подразделение = :ВыбПодразделение OR

ДокП.$ОбщийРеквизит.Подразделение = :ВыбПодразделение) AND
| ((Жур.IDDocDef = $ВидДокумента.Расходная AND Жур.Closed & 1 = 1) OR (Жур.IDDocDef =

$ВидДокумента.ПриходныйОрдерТБ AND Жур.Closed & 1 = 0)) AND
|      Жур.IsMark = 0 AND
|      Жур.IDDoc NOT IN (
|      SELECT
|            RIGHT($ДокМЛСтроки.Документ,9)
|      FROM
|            $ДокументСтроки.МаршрутныйЛист as ДокМЛСтроки
|      INNER JOIN
|            $Документ.МаршрутныйЛист as ДокМЛ ON ДокМЛ.IDDoc = ДокМЛСтроки.IDDoc AND

ДокМЛ.$ОбщийРеквизит.Подразделение = :ВыбПодразделение
|      INNER JOIN
|            _1SJourn as ЖурДоп ON ЖурДоп.IDDoc = ДокМЛСтроки.IDDoc AND
|                          ЖурДоп.Date_Time_IDDoc BETWEEN :ЛокНачДата AND :ЛокКонДата~ AND
|                          ЖурДоп.IsMark = 0
|)
|";
//*******************************************
//*******************************************
ЛокНачДата = ТекущаяДата()-14;
ЛокКонДата = ТекущаяДата();

Запрос.УстановитьТекстовыйПараметр("ЛокНачДата", ЛокНачДата);
Запрос.УстановитьТекстовыйПараметр("ЛокКонДата", ЛокКонДата);
Запрос.УстановитьТекстовыйПараметр("ВыбПодразделение", Константа.ОснПодразделение);
Запрос.УстановитьТекстовыйПараметр("ВыбСамовывоз", Перечисление.ВидВывоза.Самовывоз);
//*******************************************
ТабВрем = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);



НОВЫЙ ЗАПРОС период 3 дня (за 20 секунд):

Запрос = СоздатьОбъект("ODBCRecordSet");
//*******************************************
//*******************************************
ТекстЗапроса = "
|SELECT
|   Жур.IDDoc as [Док $Документ],
|   Жур.IDDocDef as Док_вид,
|      COALESCE($ДокР.Маршрут, $ДокП.Маршрут) as [Маршрут $Справочник.Маршруты],
|      $ДокР.Клиент as [Клиент $Справочник.Клиенты],
|      $ДокП.Субконто2 as [Субконто2 $Неопределенный]
|FROM
| _1SJourn as Жур (NOLOCK)
|LEFT JOIN
| $Документ.Расходная as ДокР (NOLOCK) ON ДокР.IDDoc = Жур.IDDoc AND $ДокР.Вывоз <>

:ВыбСамовывоз
|LEFT JOIN
| $Документ.ПриходныйОрдерТБ as ДокП (NOLOCK) ON ДокП.IDDoc = Жур.IDDoc
|WHERE
| Жур.Date_Time_IDDoc BETWEEN :ЛокНачДата AND :ЛокКонДата~ AND
| (ДокР.$ОбщийРеквизит.Подразделение = :ВыбПодразделение OR

ДокП.$ОбщийРеквизит.Подразделение = :ВыбПодразделение) AND
| ((Жур.IDDocDef = $ВидДокумента.Расходная AND Жур.Closed & 1 = 1) OR (Жур.IDDocDef =

$ВидДокумента.ПриходныйОрдерТБ AND Жур.Closed & 1 = 0)) AND
|      Жур.IsMark = 0 AND
|      Жур.IDDoc NOT IN (
|      SELECT
|            RIGHT($ДокМЛСтроки.Документ,9)
|      FROM
|            $ДокументСтроки.МаршрутныйЛист as ДокМЛСтроки (NOLOCK)
|      INNER JOIN
|            $Документ.МаршрутныйЛист as ДокМЛ (NOLOCK) ON ДокМЛ.IDDoc =

ДокМЛСтроки.IDDoc AND ДокМЛ.$ОбщийРеквизит.Подразделение = :ВыбПодразделение
|      INNER JOIN
|            _1SJourn as ЖурДоп (NOLOCK) ON ЖурДоп.IDDoc = ДокМЛСтроки.IDDoc AND
|                          ЖурДоп.Date_Time_IDDoc BETWEEN :ЛокНачДата AND :ЛокКонДата~ AND
|                          ЖурДоп.IsMark = 0
|)
|";
//*******************************************
//*******************************************
ЛокНачДата = ТекущаяДата()-3;
ЛокКонДата = ТекущаяДата();

Запрос.УстановитьТекстовыйПараметр("ЛокНачДата", ЛокНачДата);
Запрос.УстановитьТекстовыйПараметр("ЛокКонДата", ЛокКонДата);
Запрос.УстановитьТекстовыйПараметр("ВыбПодразделение", Константа.ОснПодразделение);
Запрос.УстановитьТекстовыйПараметр("ВыбСамовывоз", Перечисление.ВидВывоза.Самовывоз);
//*******************************************
ТабВрем = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);

чуть позже
изучаю как делать план запроса

после некоторых учений-мучений план во вложении
вроде то
обязательно для читабельности в блокноте убрать галочку Формат->Перенос по словам


поставить отбор на ОбщийРеквизит.Подразделение можно попробовать
во втором запросе (nolock) по табличной части - лишнее уберем
(если правильно понял FROM
     |            $ДокументСтроки.МаршрутныйЛист as ДокМЛСтроки (NOLOCK))

но само главное раньше то и без (NOLOCK) 3-5 секунд и не одинь день работал

А расскажи суть запроса на словах? Какая задача?

1c_DBReindex тебе поможет. Правда, если база большая, придется подождать.
У меня в базе (щас около 57гиг) джоб настроен в ночь на воскресенье запускает эту процедурину.

1c_DBReindex настроен один раз в месяц (сделаем  внеочередную) база чуть меньше 10 Гб
в плане оптимизацию не умею

можно вопрос
57гиг это типовая?

попробуйте так:

IF EXISTS (SELECT * from tempdb..sysobjects where id = object_id('tempdb..#TMP_TABLE'))
DROP TABLE #TMP_TABLE

SELECT
	DISTINCT $ДокМЛСтроки.Документ AS Док
INTO #TMP_TABLE

FROM
    $ДокументСтроки.МаршрутныйЛист as ДокМЛСтроки (NOLOCK)
	INNER JOIN $Документ.МаршрутныйЛист as ДокМЛ (NOLOCK)
		ON ДокМЛ.IDDoc =  ДокМЛСтроки.IDDoc
    INNER JOIN _1SJourn as ЖурДоп (NOLOCK) ON ЖурДоп.IDDoc = ДокМЛ.IDDoc
WHERE
	ДокМЛ.$ОбщийРеквизит.Подразделение = :ВыбПодразделение
	AND ЖурДоп.Date_Time_IDDoc BETWEEN :ЛокНачДата AND :ЛокКонДата~
	AND ЖурДоп.IsMark = 0

SELECT
	Жур.IDDoc as [Док $Документ],
	Жур.IDDocDef as Док_вид,
	$ДокР.Маршрут as [Маршрут $Справочник.Маршруты],
	$ДокР.Клиент as [Клиент $Справочник.Клиенты],
	'U			    ' as [Субконто2 $Неопределенный]
FROM
	$Документ.Расходная as ДокР (NOLOCK)
	INNER JOIN _1SJourn as Жур (NOLOCK) ON (ДокР.IDDoc = Жур.IDDoc )
WHERE
	AND (Жур.Date_Time_IDDoc BETWEEN :ЛокНачДата AND :ЛокКонДата~)
	AND (Жур.Closed & 1 = 1)
	AND (Жур.IsMark = 0)
	AND ($ДокР.Вывоз <> :ВыбСамовывоз)
	AND (ДокР.$ОбщийРеквизит.Подразделение = :ВыбПодразделение)
	AND ($ВидДокумента36.Расходная + Жур.IDDoc NOT IN (SELECT Док FROM #TMP_TABLE))
UNION ALL
SELECT
	Жур.IDDoc as [Док $Документ],
	Жур.IDDocDef as Док_вид,
	$ДокП.Маршрут as [Маршрут $Справочник.Маршруты],
	$ДокП.Клиент as [Клиент $Справочник.Клиенты],
	$ДокП.Субконто2 as [Субконто2 $Неопределенный]
FROM
	$Документ.ПриходныйОрдерТБ as ДокП (NOLOCK)
	INNER JOIN _1SJourn as Жур (NOLOCK) ON (ДокП.IDDoc = Жур.IDDoc )
WHERE
	AND (Жур.Date_Time_IDDoc BETWEEN :ЛокНачДата AND :ЛокКонДата~)
	AND (Жур.Closed & 1 = 1)
	AND (Жур.IsMark = 0)
	AND ($ДокП.$ОбщийРеквизит.Подразделение = :ВыбПодразделение)
	AND ($ВидДокумента36.ПриходныйОрдерТБ + Жур.IDDoc NOT IN (SELECT Док FROM #TMP_TABLE))
 

vova64 писал(а) 25. Августа 2008 :: 06:50:


В начале запроса "SET NOCOUNT ON" чтобы возвращал данные последнего запроса.