Есть куча однотипных доков.
Каждый док делает несколько движений по одному и тому же регистру.
Как  (чорным) запросом получить тупой перечень движений с указанием всех измерений, ресурсов, реквизитов...?

туплю отчаянно

Согласен даже на прямой запрос...

Приход() Расход()

Прямой запрос в лёгкую. А "черный" не даст гарантированного результата. Он в обязательном порядке группирует строки. максимум, добавить группировки по документу и номеру строки документа. Но и это не гарантия, если есть несколько движений одного документа по одной строке документа с одинаковым набором измерений и реквизитов.

(3) а подключиться по тиму сейчас и помочь?

(3) да (2) сложит движения одного документа для одинаковых № строк, но вот не пофиг?

(3) за денежку ясен пень

(0) что значит "черным запросом"?

(6) да в обычный запрос вставь функции КолПриход=Приход(Кол) и КолРасход=Расход(Кол) и проверь

(8) без указания всех группировок -- свернет в строку

(9) так укажи нужные Документа и № строки

(10) у документа нет строк. реквизиты которые формируют двитжения в регистр - только в шапке

(11) тем более, какая разница какие были разные движения один фиг сумма одна

select *
FROM $Регистр.МойРегистр
WHERE IDDOC = МойИд

(12) это тебе так кажется. документ формирует два движения - в плюс и в минус с разным набором измерений

(4) Что-что не понял... Точнее не ожидал от старого 1сника...
Если тупо открыть конструктор запроса, добавить в запрос все измерения, ресурсы, реквизиты, ТекущийДокумент, НомерСтроки; сделать группировки по всем измерениям, ТекущийДокумент, НомерСтроки; добавить функции Приход и Расход по всем ресурсам... Что тогда не устраивает? Да, часть строк может свернуться. Но это критично? Если да, то только прямой запрос.

(15) эээ такой путья знаю, мне он не нравится. и да - сверка может быть, и она недопустима

(13) вот бы лучше не издевался а онлайном помог...

ВыбратьДвижения(<ДатаНачала>,<ДатаКонца>,<ГрафаОтбора>) не?

А можно не запросом, а Рег.ВыбратьДвиженияДокумента(док) и в цикле с ними чего-нибудь  уже делать.

не, так не интересно - так я умею, я ж хочу прямым запросом, заодно и посмотреть как это сделано

У меня в конфе есть такая функция, может сгодится в качестве рыбы:

Функция глПолучитьТаблицуДвиженийДокумента(Конт, ВидРег, СворачиватьТаблицу=1, ВключаяСторнирующиеДвижения=1,ИнвертироватьРесурсы=0,ЗаполнятьЗначениеПоиска=0) Экспорт
    Перем метаРегистр, КоличествоИзмерений, КоличествоРесурсов, КоличествоРеквизитов;
    Перем НомерИзмерения, НомерРесурса, НомерРеквизита;
    Перем ИдентификаторИзмерения, ИдентификаторРесурса, ИдентификаторРеквизита, ЗначениеИзмерения, ЗначениеРесурса, ЗначениеРеквизита;
    Перем НомерСтрокиТаблицы, СтрокаИзмерений, СтрокаРесурсов;
    
    Перем ТекстЗапроса, Запрос;
    
    метаРегистр = Метаданные.Регистр(ВидРег);
    КоличествоИзмерений = метаРегистр.Измерение();
    КоличествоРесурсов = метаРегистр.Ресурс();
    КоличествоРеквизитов = метаРегистр.Реквизит();
    
    Запрос = СоздатьОбъект("ODBCRecordSet");
    ТекстЗапроса = "";
    
    СтрокаИзмерений = "";
    Для НомерИзмерения = 1 По КоличествоИзмерений Цикл
        метаИзмерение = метаРегистр.Измерение(НомерИзмерения);
        ИдентификаторИзмерения = метаИзмерение.Идентификатор;
        СтрокаИзмерений = СтрокаИзмерений + ?(СтрокаИзмерений="","",",") + ИдентификаторИзмерения;
        ТекстЗапроса = ТекстЗапроса + РазделительСтрок
            + ", $Рег." + ИдентификаторИзмерения+" ["+СокрЛП(ИдентификаторИзмерения+" "+ТипВидЗначения(метаИзмерение.Тип,метаИзмерение.Вид))+"]";
    КонецЦикла;
    Если СворачиватьТаблицу = 0 Тогда
        метаРеквизит = метаРегистр.Реквизит("Сторно");
        Если метаРеквизит.Выбран() = 1 Тогда
            ТекстЗапроса = ТекстЗапроса + РазделительСтрок + ", $Рег.Сторно [Сторно]";
        КонецЕсли;
        Для НомерРеквизита = 1 По КоличествоРеквизитов Цикл
            метаРеквизит = метаРегистр.Реквизит(НомерРеквизита);
            ИдентификаторРеквизита = метаРеквизит.Идентификатор;
            Если метаРеквизит.Тип = "Дата" Тогда
                ТекстЗапроса = ТекстЗапроса + РазделительСтрок
                    + ", NullIf($Рег."+ИдентификаторРеквизита+", '17530101') ["+СокрЛП(ИдентификаторРеквизита+" "+ТипВидЗначения(метаРеквизит.Тип,метаРеквизит.Вид))+"]";
            ИначеЕсли ИдентификаторРеквизита <> "Сторно" Тогда
                ТекстЗапроса = ТекстЗапроса + РазделительСтрок
                    + ", $Рег." + ИдентификаторРеквизита+" ["+СокрЛП(ИдентификаторРеквизита+" "+ТипВидЗначения(метаРеквизит.Тип,метаРеквизит.Вид))+"]";
            КонецЕсли;
        КонецЦикла;
    КонецЕсли;
    СтрокаРесурсов = "";
    Для НомерРесурса = 1 По КоличествоРесурсов Цикл
        метаРесурс = метаРегистр.Ресурс(НомерРесурса);
        ИдентификаторРесурса = метаРесурс.Идентификатор;
        СтрокаРесурсов = СтрокаРесурсов + ?(СтрокаРесурсов="","",",") + ИдентификаторРесурса;
        Если ИнвертироватьРесурсы = 1 Тогда
            ТекстЗапроса = ТекстЗапроса + РазделительСтрок
                + ", CASE Рег.DEBKRED WHEN 0 THEN -$Рег." + ИдентификаторРесурса+" ELSE $Рег." + ИдентификаторРесурса+" END ["
                +ИдентификаторРесурса+"]";
        Иначе
            ТекстЗапроса = ТекстЗапроса + РазделительСтрок
                + ", CASE Рег.DEBKRED WHEN 0 THEN $Рег." + ИдентификаторРесурса+" ELSE -$Рег." + ИдентификаторРесурса+" END ["
                +ИдентификаторРесурса+"]";
        КонецЕсли;
    КонецЦикла;
    
    ТекстЗапроса = "SELECT
    |Рег.LINENO_ НомерСтрокиДокумента
    |, CASE Рег.DEBKRED WHEN 0 THEN 1 ELSE 0 END Приход
    |, CASE Рег.DEBKRED WHEN 0 THEN 0 ELSE 1 END Расход
    |"+ТекстЗапроса + "
    |FROM $Регистр."+ВидРег+" as Рег WITH (NOLOCK)
    |WHERE Рег.IDDoc = :ВыбДок";
    Если ВключаяСторнирующиеДвижения = 0 Тогда
        Если метаРегистр.Реквизит("Сторно").Выбран() = 1 Тогда
            ТекстЗапроса = ТекстЗапроса + " AND $Рег.Сторно=0";
        КонецЕсли;
    ИначеЕсли ВключаяСторнирующиеДвижения < 0 Тогда
        Если метаРегистр.Реквизит("Сторно").Выбран() = 1 Тогда
            ТекстЗапроса = ТекстЗапроса + " AND $Рег.Сторно=1";
        КонецЕсли;
    КонецЕсли;
    Запрос.УстановитьТекстовыйПараметр("ВыбДок", глMDW.ЗначениеВСтрокуБД(Конт.ТекущийДокумент()));
    РезультатЗапроса = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);
    Если ЗаполнятьЗначениеПоиска = 1 Тогда
        РезультатЗапроса.НоваяКолонка("ЗначениеПоиска","Строка");
        РезультатЗапроса.ВыбратьСтроки();
        Пока РезультатЗапроса.ПолучитьСтроку() = 1 Цикл
            ЗначениеПоиска = "";
            Для НомерИзмерения = 1 По КоличествоИзмерений Цикл
                ИдентификаторИзмерения = метаРегистр.Измерение(НомерИзмерения).Идентификатор;
                ЗначениеИзмерения = РезультатЗапроса.ПолучитьЗначение(РезультатЗапроса.НомерСтроки, ИдентификаторИзмерения);
                ЗначениеПоиска = ЗначениеПоиска + ЗначениеВСтрокуВнутр(ЗначениеИзмерения);
            КонецЦикла;
            РезультатЗапроса.ЗначениеПоиска = ЗначениеПоиска;
        КонецЦикла;
    КонецЕсли;
    Если СворачиватьТаблицу <> 0 Тогда
        РезультатЗапроса.Свернуть(?(ЗаполнятьЗначениеПоиска=0,СтрокаИзмерений,"ЗначениеПоиска,"+СтрокаИзмерений),СтрокаРесурсов);
    КонецЕсли;
    Если глТрассировкаВызоваФункций = 1 Тогда
        глСообщениеТрассировкиВызоваФункций(,"глПолучитьТаблицуДвиженийДокумента",СписокЗначений(ВидРег,СворачиватьТаблицу,ВключаяСторнирующиеДвижения),РезультатЗапроса);
    КонецЕсли;
    Возврат РезультатЗапроса;
КонецФункции // глПолучитьТаблицуДвиженийДокумента

(21) КОГДА_НИБУДЬ - точно сгодится!

(17) Я не издеваюсь, я тебе запрос рабочий дал...

(23) Издеваешься, точно!
запрос я примерно понял ;-)
1. как его в 1Sqlite засунуть?
2. периодом ограничить?

есть
глВКлайт = СоздатьОбъект("SQLiteBase");

к справочнику выборку я простенькие делал запросы сам - здесь также?

(24) Зачем тебе период, если у тебя есть IDDOC?
Ты что, издеваешься? Или у тебя тоже аккаунт увели?

(23) Обвязку забыл. Для тех, кто прямые не писал :)
Что-то типа:

глMDW = СоздатьОбъект("MetaDataWork");
Запрос = СоздатьОбъект("ODBCRecordSet");
Запрос.УстановитьТекстовыйПараметр("ВыбДок", глMDW.ЗначениеВСтрокуБД(Конт.ТекущийДокумент()));
РезультатЗапроса = Запрос.ВыполнитьИнструкцию("select * FROM $Регистр.МойРегистр WHERE IDDOC = ВыбДок");

(24) Про sqlite ничего не скажу, у меня база SQL и запросы через 1с++

(26) эээ, я ж ваще в прямых совсем
мну надо типа

WHERE ДокументРегистратор.Владелец = ВыбДок

а ДокументРегистратор.Владелец - документ неопределенного вида

(28) для модапльности подправлен драйвер?

(30) "секретный релиз" с не_помню_какими еще патчами. Давно делался, уже и не помню. Но проблем с модальным режимом нет.

блин.. придется все самому...
;-)

(27) ууу, блин.. База данных не установлена

(0) Сделай группировку по rowid

Отображение ДБФ-таблиц 1С в базу данных SQLite

Кроме того, для каждой таблицы SQLite позволяет использовать предопределенное поле rowid, которое используется для идентификации записи. Модуль dbeng возвращает в этом поле номер записи в дбф-файле.

И вообще группировки не надо...
Просто убери все агрегатные функции и ничего не свернется

(35) что-то для меня это все как я баран на новые ворота. понимаю что вроде просто  - ну для тех кто знает - но для меня - тупняк полный.

..перегруз и недосып

Да, у тебя недосып мощный!

SELECT *
FROM Регистр_ОстаткиТМЦ AS РегОст
WHERE РегОст.date BETWEEN :НачДата AND :КонДата

или WHERE РегОст.IDDOC=' 15RW4   '

ничего не сворачивается

sum() то зачем если ты ничего свертывать не хочешь?

(38) 1. нифига, мне надо выборку движений ограничить - из документа-регистратора движений регистра взять реквизит "Владелец" (ссылка на Документ неопределенного типа) - выбрать движения только для этого "Владельца"

(38) 2. я ж тупняк.
как запрос впихнуть в 1SQLite
вот сюда: глВКлайт = СоздатьОбъект("SQLiteBase");

я ваще в основах хромаю. даже не хромаю а встать не могу...
подсоединился бы кто и рассказал бы блин... на месте по факту на примере.

совсем тупо.
нужен аналог черного типа запроса

|Период с '01.07.2015';
|ДокументВладелец= Регистр.Остатки.ТекущийДокумент.хОперация.Владелец; //владелец - документ неопределенного типа
|Состояние        = Регистр.Остатки.ТекущийДокумент.хОперация.Состояние; //перечисление
|Строка    = Регистр.Остатки.ТекущийДокумент;
|Измерение1 = Регистр.Остатки.Измерение1;
|Измерение2 = Регистр.Остатки.Измерение2;
..
|Ресурс1 = Регистр.Остатки.Ресурс1;
|Ресурс2 = Регистр.Остатки.Ресурс2;
..
|Реквизит1 = Регистр.Остатки.Реквизит1;
|Реквизит2 = Регистр.Остатки.Реквизит2;
|Условие(ДокументВладелец = ВыбДок); //выбдок - известен

Последовательность такая

База = СоздатьОбъект("SQLiteBase");
База.Открыть(":memory:");
Запрос = База.НовыйЗапрос();
тз = Запрос.ВыполнитьЗапрос(ТекстЗапроса);

(39) реализуемо
версия sqlite то какая? с тем что ты хочешь беда примерно такая: http://www.1cpp.ru/forum/YaBB.pl?num=1214205575/789#789

(42) ща, сек

вариант = pre-build
Версия = 1, 0, 2, 4 (1.0.2.4 получается)
Примечание = sqlite 3.6.22

(42) я вот это не втыкаю: что это такое:
База.Открыть(":memory:");

и после выполнения запроса/получения результатов - надо что-то как-то обнулять?

какой вариант 1Sqlite рекомендуете к использованию?

у себя 1SQLite вообщем практически не юзается (и так все неплохо) так что смена версии ни к чемустрашному не приведет.. ;-)

Ха, админы и программисты мануали не читают?
Весьма советую посмотреть документацию https://snegopat.ru/downloads/1sqlite/

sqlite 1.0.2.4 или моей сборки 1.0.2.6 с 3.7.17
3.8.11.х еще в состоянии глубокой альфы
Ёпрст прав в 1.0.2.6 движок sqlite глючный

(47) если бы я сидел и только программил... ;-)

имхо тормозить будет жестоко, если попытаться все это в один запрос засунуть. оптимизатор sqlite сойдет с ума...

Тебе придется все наоборот в запросе думать - сначала выбрать подчиненные по ВыбДок, 1с с этим справляется быстрее sqlite
Засовывать во временную таблицу sqlite
Потом по iddoc во временной таблице фильтровать остатки

не 5 минутная проблема ;(

(49) ну я сейчас для прототипа выбркой по движениям регистра. чтобы хоть какой-то рабочий отчет для тестирования результатов получить

(49) "Потом по iddoc во временной таблице фильтровать остатки "
.
читать как
.
Потом по iddoc во временной таблице фильтровать ДВИЖЕНИЯ

???

да, все верно, iddoc то уникален в пределах базы

возьми глючный конструктор http://www.1cpp.ru/forum/YaBB.pl?num=1246429625/175#175
я его так и не доделал, но худо-бедно он работает...

(49) на уровне концепции я это понимаю, и какие-то отрывочные куски ходят в голове.
но еще ни разу не попадал в такие клинчи с проблемами быстродействия и прочего - чтобы припирало садитьяс и разбираться... вот так и болтаюсь, не освоя этот участок.

мну проще заплатить под кокнретный запрос сколько-то денежек и не морочиться.. ;-) нетиповыми для меня проблемами ;-)

у меян так уже кучу лет работает пару запросов, и пару их клонов которые сам минимально подтачивал - и все ок.

вот.

какой-то блин плач ярославны получается..

И поставщика данных надо освоить.. а то все псевдожурналы/псевдодокументы на ТЗ сделаны. работает. но ХОЧЕТСЯ КРАСИВОСТЕЙ.

Лучше сделай перебором, если по времени поджимает.
Такие запросы в sqlite взлетают плохо.

(55) уже сделал. практически мгновенно выбирается.
дбф, база только стартанула - пустая, пару доков.

(55) а что же в нем тогда взлетает хорошо? для каких целей имеет смысл использовать?

Ну и правильно!

sql фактически тот же перебор, только логику перебора не ты думаешь, а sql-сервер
Да, это экономия кучи "если тогда потом зачем и почему"
Не всегда взлетает...

С небольшим объемом данных 1с обычно опережает sqlite.
При большом объеме данных sqlite работает значительно быстрее, ну и попадание в индекс тоже надо учитывать.
Ссылку же я давал про разброс скорости?
Вот тот отчет на sqlite в 10-20 раз быстрее перебора 1С
Весь справочник засунуть в тз или ит на sqlite быстрее.
У меня все интеграции на базах sqlite ибо нефиг всяку каку в основную базу засовывать.

(58) спасибо за внимание к моим проблемам.
по ссылке попытаюсь взять дерево подчиненности.
надо посмотреть как оно сработает у меня - потому что может произойти зацикливание....