Собственно текст запроса
Запрос = СоздатьОбъект("ODBCRecordset");

      ТекстЗапроса = "
      |SELECT 
      |    Рег.асТовар as [асТовар $Справочник.Номенклатура],
      |    Рег.КоличествоНачальныйОстаток as КоличествоНачОст,
      |    Рег.КоличествоПриход as КоличествоПриход,
      |    Рег.КоличествоРасход as КоличествоРасход,
      |    Рег.КоличествоКонечныйОстаток as КоличествоКонОст,
      |    Рег.СуммаПриход as СуммаПриход,
      |    Рег.СуммаРасход aa СуммаРасход,
      |    Рег.СуммаКонечныйОстаток as СуммаКонОст,
      |FROM
      |   $РегистрОстаткиОбороты.ОстаткиТоваров(:ДатаНачалаЗапроса, :КонпрМесяца~,,,
      |                                , (товар), (Сумма, Количество)) as Рег";
     Запрос.Отладка(1);          
     ТЗ = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);
     ТЗ.ВыбратьСтроку();


Что надо дописать что бы запрос выполнялся в базе E:/1C_BASE/Base_Tovar?

[quote author=Aswed link=1195108453/0#0 date=1195108453]Что надо дописать что бы запрос выполнялся в базе E:/1C_BASE/Base_Tovar?[/quote]
Все просто:
[code]   //подключаемся к другой базе 1С
     Serv = "marketolog";
     КатИБ = "\\marketolog\c\1s-base\GazetaOld\";
     base ="BaseOld";
     baseuser = "sa";
     basepwd       = "****"; //свой напиши
     
     user1c ="Админ";
     pwd1c = "*****"; // аналогично
     ИБ=СоздатьОбъект("ODBCDataBase");
     СтрокаПодключения = ШАБЛОН("Driver={SQL Server};Server=[Serv];Database=[Base];Uid=[baseuser];Pwd=[basepwd];");
     Попытка
           ИБ.ПрисоединитьИБ(КатИБ,user1c,pwd1c,СтрокаПодключения);
     Исключение
         Сообщить(СтрокаПодключения);
           Возврат;
     КонецПопытки;      

     RS=СоздатьОбъект("ODBCRecordset");
     RS.УстБД(ИБ);
// дальше твой запрос

     
[/code]

Aswed писал(а) 15. Ноября 2007 :: 06:51:

Нет это какраз подключение к SQL, так что используй его если надо подключится не к текущей базе!

Aswed писал(а) 15. Ноября 2007 :: 07:01:

Тебе сюда:
http://www.connectionstrings.com/?carrier=sqlserver

Aswed писал(а) 15. Ноября 2007 :: 07:08:


Тогда наверное достаточно этого:

ИБ=СоздатьОбъект("ODBCDataBase");
ИБ.ПрисоединитьИБ("\\server\КаталогИБ\");
рс=СоздатьОбъект("ODBCRecordset");
рс.УстБД(ИБ);
Результат=рс.ВыполнитьИнструкцию(ТекстЗапроса);

Можешь использовать тот же коннект, но писать примерно так:

Select
    *
From
    [имясервера].[имябазы].dbo.[имя таблицы] 

Но тогда тебе придётся вручную переписать $РегистрОстаткиОбороты

А вопрос остался Подскажите что это за ошибка и как с ней бороться.

Всё написано в этой веткке. Текст запроса в первом посте, но если надо повторю. Вот весь текст процедуры в принципе:


//*******************************************
Процедура Сформировать()
     
     ИБ = СоздатьОбъект("ODBCDataBase");
     ИБ.ПрисоединитьИБ("E:\1C\Base_Tovar_New\");
     РС = СоздатьОбъект("ODBCRecordSet");
     РС.УстБД(ИБ);
     
     ТекстЗапроса = " 
     |SELECT   
     |    Рег.асТовар as [асТовар $Справочник.Номенклатура],
     |    Рег.КоличествоНачальныйОстаток as КоличествоНачОст,
     |    Рег.КоличествоПриход as КоличествоПриход,
     |    Рег.КоличествоРасход as КоличествоРасход,
     |    Рег.КоличествоКонечныйОстаток as КоличествоКонОст,
     |    Рег.СуммаПриход as СуммаПриход,
     |    Рег.СуммаРасход aa СуммаРасход,
     |    Рег.СуммаКонечныйОстаток as СуммаКонОст,
     |FROM
     |   $РегистрОстаткиОбороты.ОстаткиТоваров(:ДатаНачалаЗапроса, :КонпрМесяца~,,,
     |                                ,,)) as Рег";
     РС.Отладка(1);            
     ТЗ = РС.ВыполнитьИнструкцию(ТекстЗапроса);
     ТЗ.ВыбратьСтроку();


КонецПроцедуры
Сам видишь что пробовал включить, но результат такой:

ТЗ = РС.ВыполнитьИнструкцию(ТекстЗапроса);
{E:\1C\BASE_NEW\EXTFORMS\!_АНДРЕЙ\ПОДКЛЮЧЕНИЕ_К_БАЗЕ_И_ПРЯМОЙ_ЗАПРОС.ERT(23)}: Meta name parser error: не указан параметр ":ДатаНачалаЗапроса"

ЗЫ Самого бесит задавть такие тупые вопросы, но учится больше негде

Они задаются на форме отчёта

Текст кода:                  
     РС.УстановитьТекстовыйПареметр("ДатаНачалаЗапроса",ДатаНачалаЗапроса);
     РС.УстановитьТекстовыйПареметр("КонпрМесяца",КонпрМесяца);

     ТекстЗапроса = "
       |SELECT  
       |      Рег.асТовар as [асТовар $Справочник.Номенклатура],
       |      Рег.КоличествоНачальныйОстаток as КоличествоНачОст,
       |      Рег.КоличествоПриход as КоличествоПриход,
       |      Рег.КоличествоРасход as КоличествоРасход,
       |      Рег.КоличествоКонечныйОстаток as КоличествоКонОст,
       |      Рег.СуммаПриход as СуммаПриход,
       |      Рег.СуммаРасход aa СуммаРасход,
       |      Рег.СуммаКонечныйОстаток as СуммаКонОст,
       |FROM
       |   $РегистрОстаткиОбороты.ОстаткиТоваров(:ДатаНачалаЗапроса, :КонпрМесяца~,,,
       |                                                , (товар), (Сумма, Количество)) as Рег";

       
    РС.Отладка(1);            
    ТЗ = РС.ВыполнитьИнструкцию(ТекстЗапроса);
    ТЗ.ВыбратьСтроку();

В итоге пишет:


ТЗ = РС.ВыполнитьИнструкцию(ТекстЗапроса);
{E:\1C\BASE_NEW\EXTFORMS\!_АНДРЕЙ\ПРЯМОЙ_ЗАПРОС.ERT(2005)}: Meta name parser error: недопустимое значение параметра "$РегистрОстаткиОбороты.ОстаткиТоваров" (7)

+1

А у тебя регистр точно "ОстаткиТоваров" называется? В родной базе этот запрос выполняется?

Может знающим людям что то скажет сообщение которое выдаётся приотладке?

Подключение удачно

SELECT 
     Рег.асТовар as [асТовар $Справочник.Номенклатура],
     Рег.КоличествоНачальныйОстаток as КоличествоНачОст,
     Рег.КоличествоПриход as КоличествоПриход,
     Рег.КоличествоРасход as КоличествоРасход,
     Рег.КоличествоКонечныйОстаток as КоличествоКонОст,
     Рег.СуммаПриход as СуммаПриход,
     Рег.СуммаРасход as СуммаРасход,
     Рег.СуммаКонечныйОстаток as СуммаКонОст,
FROM
   (
select
rb61752_vt.асТовар,
sum(rb61752_vt.чОстатокОстаток) as чОстатокНачальныйОстаток,
sum(rb61752_vt.чОстатокПриход) as чОстатокПриход,
sum(rb61752_vt.чОстатокРасход) as чОстатокРасход,
sum(rb61752_vt.чОстатокОстаток) + sum(rb61752_vt.чОстатокПриход) - sum(rb61752_vt.чОстатокРасход) as чОстатокКонечныйОстаток
from (
select
ra61752_vt.sp61749 as асТовар,
case when ra61752_vt.debkred = 0 then ra61752_vt.sp61750 else 0 end as чОстатокПриход,
case when ra61752_vt.debkred = 1 then ra61752_vt.sp61750 else 0 end as чОстатокРасход,
0 as чОстатокОстаток
from ra61752 as ra61752_vt (nolock)
where ra61752_vt.date_time_iddoc > '20070101' and ra61752_vt.date_time_iddoc < '20071031Z'
union all
select
rg61752_vt.sp61749 as асТовар,
0,
0,
rg61752_vt.sp61750 as чОстатокОстаток
from rg61752 as rg61752_vt (nolock)
where rg61752_vt.period={d '2006-12-01'}
) as rb61752_vt
group by
rb61752_vt.асТовар
having
sum(rb61752_vt.чОстатокОстаток) <> 0 or
sum(rb61752_vt.чОстатокПриход) <> 0 or
sum(rb61752_vt.чОстатокРасход) <> 0 or
sum(rb61752_vt.чОстатокОстаток) + sum(rb61752_vt.чОстатокПриход) - sum(rb61752_vt.чОстатокРасход) <> 0
) as RestsTurnovers61752) as Рег
ТЗ = РС.ВыполнитьИнструкцию(ТекстЗапроса);
{E:\1C\BASE_NEW\EXTFORMS\!_АНДРЕЙ\ПРЯМОЙ_ЗАПРОС.ERT(2006)}: State 42000, native 156, message [Microsoft][ODBC SQL Server Driver][SQL Server]Incorrect syntax near the keyword 'FROM'.

Блин, это просто пипец какой! Взял этот запрос из руководства которое шло с компанентой, и не хрена не могу его запустить Запятую убрал, теперь пишет

ТЗ = РС.ВыполнитьИнструкцию(ТекстЗапроса);
{E:\1C\BASE_NEW\EXTFORMS\!_АНДРЕЙ\ПРЯМОЙ_ЗАПРОС.ERT(2006)}: State 42S22, native 207, message [Microsoft][ODBC SQL Server Driver][SQL Server]Invalid column name 'КоличествоНачальныйОстаток'.

Спешка помогает лишь при ловле блох...

Если хочешь конечный работающий вариант - дай агрегатные типы всех реквизитов:
асТовар - Справочник.Товары, а может Справочник.Номенклатура
асМОЛ - Справочник.МОЛЫ а может Справочник.ФизЛица
Производитель -
МестоХранения -

А ты Конструктором запросов попробуй себе помочь, а там глядишь и сам всё сделаешь.

Aswed писал(а) 22. Ноября 2007 :: 12:01:
Ты лучше с ним разберись, это тебе окупится намного больше чем просто помощь по одному запросу ..

Aswed писал(а) 22. Ноября 2007 :: 12:07:

Вот как раз там тебе всё это и пригодится. Этот конструктор сделан по аналогии с конструктором из 8-ки. И в 8-ке используются уже "нормальные", SQL-обрАзные запросы.

Aswed писал(а) 22. Ноября 2007 :: 12:07:

sql он и Африке sql 
а на v8 сейчас переходи в тестовой базе, а то с нового года будет поздно.

Построил парочку запросов с помощью этого конструктора. Выполняются в родной базе (в которой и должны выполнятся запросы) хорошо, но пытаюсь подключится к этой базе из другой и выполнить в ней эти запросы и не работает. Выдаёт что не может найти указанный в тексте запроса регистр, хотя там он точно есть. Что не правильно?

//*******************************************
Процедура Сформировать()
     Перем тз; //:ТаблицаЗначений   

     ИБ=СоздатьОбъект("ODBCDataBase");
     ИБ.ПрисоединитьИБ("E:\1C\Base_Tovar_New\");
     рс=СоздатьОбъект("ODBCRecordset");
     рс.УстБД(ИБ);    

     
     рс = СоздатьОбъект("ODBCRecordset");
     //Данный фрагмент построен конструктором.
     //При повторном использовании конструктора внесенные вручную изменения будут потеряны!!!
     ТекстЗапроса = "-- qryMaker:Отчет1.2007.11.22.15.17.11
           |SELECT $ОстаткиТоваров.асТовар [асТовар $Справочник.Номенклатура]
           |FROM $Регистр.ОстаткиТоваров AS ОстаткиТоваров
           |      INNER JOIN $Справочник.Номенклатура AS Номенклатура ON $ОстаткиТоваров.асТовар = Номенклатура.ID
           |      INNER JOIN $Справочник.Агенты AS Агенты ON $Номенклатура.МОЛ = Агенты.ID
           |WHERE ($Номенклатура.Архивный = 0)
           |GROUP BY $ОстаткиТоваров.асТовар
           |";
     тз = рс.ВыполнитьИнструкцию(ТекстЗапроса);
     тз.ВыбратьСтроку();
КонецПроцедуры

Ну у тебя ж уже есть:

$ОстаткиТоваров.асТовар [асТовар $Справочник.Номенклатура] 

если именно из справочника Номенклатура, то так:

$Номенклатура.ID [Товар $Справочник.Номенклатура] 

а вообще прочти Статью о прямых запросах в 1с++. Оч полезно.

Ну ясен пень, что выдаёт ошибку. Вот здесь:

$Справочник.Номенклатура as Спр 

ты обозвал свою таблицу, где хранятся элементы справочника именем "Спр". Вот дальше и обращайся к этой таблице по этому прозвищу. А ты пишешь: "$Номенклатура "
+ "сам объект" (а точнее его ИД) хранится в поле ID, которое потом можно типизировать конструкцией вида [Товар $Справочник.Номеклатура]
Итог: читай мануалы (что и как хранит 1С, прямые запросы в 1с++). Потом ещё раз прочитай, а уж потом, что не будет понятно - спрашивай.

Разобрался. Спасибо за помощь

Aswed писал(а) 23. Ноября 2007 :: 07:06:

Прочти статью быстые справочники
http://www.1cpp.ru/forum/YaBB.pl?num=1152519272
на уровне sql нет понятия Спр.ТекущийЭлемент()
есть только поле Спр.ID однозначно определяющий строку в sql таблице.

Мля, ну почитай ты наконец документацию к ф-иям, которые ты используешь.
Из ачем вообще ты группируешь, если нет ниодной агрегирующей ф-ии??

Grouping() - With rollup
Либо Индексированная таблица
Либо еще что-нить...
А если бесят запросы - бросайнах, не нужно калечить себя...

Спасибо всем кто терпел мои глупые вопросы и помогал Перечитал кучу литературы и разобрался с прямыми запросами, решил поблагодарить.
ЗЫ И я конечно лентяй, как и люой програмист, но в основном дело в том что занимался прямыми запросами ТОЛЬКО когда не было другой работы. Поэтому времени на них было мало и отсюда тормоза))) Ещё раз спасибо.