Возможно такое? У объекта "ODBCDatabase" есть метод УстБД(), насколько я понял, он позволяет подключиться из текущей БД к любой другой, помимо родной, БД 1С. Вопрос только, как именно это сделать? Предположительно, подключение возможно как к файловой, так и к SQL-базе.

ИБ=СоздатьОбъект("ODBCDataBase");
Попытка
   ИБ.ПрисоединитьИБ(КаталогБазы,ПользовательБазы,ПарольПользователя);
Исключение
   Сообщить("Неудалось подключиться к другой базе");
   Возврат;
КонецПопытки;

КаталогБазы="\\server-term\sqldb\Torg\";
ПользовательБазы="Иванов_А_А";
ПарольПользователя="дурдом";

Если ИБ.ЕстьСоединение()=0 Тогда
   Сообщить("Не выполнено подключение к базе"+ИБ.ПолучитьОписаниеОшибки));
   Возврат;
КонецЕсли;
       
РС=СоздатьОбъект("ODBCRecordset");
РС.УстБД(ИБ);

Естественно (2) должно быть раньше чем (1)

Спс
Для баз обоих типов способ подключения один?

Для ДБФ:
   База = СоздатьОбъект("OLEDBData");
   Кат=СокрЛП(КаталогБух);
   DBpath = ?(Прав(Кат, 1) <> "\", Кат+"\", Кат);
   Соединение = "Provider=VFPOLEDB.1;Data Source=" + DBpath + ";Mode=ReadWrite;Extended Properties="";User ID="";Password="";Mask Password=False;Collating Sequence=RUSSIAN;DSN=""";
   
   База.ПрисоединитьИБ(DBpath);
   
   Запрос = База.СоздатьКоманду();  

   ТекстЗапроса="
   |SELECT
   |    СпрКА.Descr as [НаименованиеКлиента],  
   |    $СпрКА.ИНН as [ИННКлиента],
   |FROM $Справочник.Контрагенты as СпрКА
   |WHERE СпрКА.ISFOLDER = 2
   |";
   
   ТЗ = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);

(6) Не вижу, где в примере используется переменная "Соединение"

+(7) Пробовал в метод ПрисоединитьИБ() в качестве параметра передать строку соединения, выдается ошибка:
Ошибка загрузки метаданных

Пробуй так:
       База = СоздатьОбъект("OLEDBData");
       Кат=СокрЛП(КаталогБазы);
       DBpath = ?(Прав(Кат, 1) = "\", Лев(Кат, СтрДлина(Кат) - 1), Кат);
       Соединение = "Provider=VFPOLEDB.1;Data Source=" + DBpath + ";Mode=ReadWrite;Extended Properties="";User ID="";Password="";Mask Password=False;Collating Sequence=RUSSIAN;DSN=""";
       
       Рез = База.Соединение(Соединение);
       Запрос = База.СоздатьКоманду();

(9) Такой вариант вроде пашет.
А вот для скульной базы почему-то (1), (2) и (3) - не работают. Когда использовал "ПрисоединитьИБ", ругался "Общая файловая ошибка при доступе к файлу users.usr". Поменял "ПрисоединитьИБ()" на "Открыть()" - соединение все равно не устанавливается. Какие еще м.б. варианты?

(10) Блин, я тормоз! Слэш пропустил :) сорри

Делаю запрос к той базе, к котрой подключился.

"SELECT
       |    Жур.IDDoc As [Док $Документ.ПоступлениеТМЦ]
       |FROM
       |    _1SJourn As Жур
       |WHERE
       |    Жур.IDDocDef = $ВидДокумента.ПоступлениеТМЦ AND        
       |    Жур.$ОбщийРеквизит.Фирма IN (SELECT val FROM #Фирма) AND
       |    Жур.Closed&1 = 1
       |ORDER BY
       |    Жур.Date_Time_IDDoc";

В результирующей таблице выводится колонка с документами, но там многие строки имеют вид:
<Объект не найден (....)>

В чем причина этого?

(12) битые ссылки вестимо

Сделай ТИИ

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

(13)
А ты думал?
Ты же тянешь данные из ЧУЖОЙ базы, и пытаешься, чтобы 1С их типизировала в значения РОДНОЙ базы. Так не получиться, тащить из чужой базы можно только "сырые" данные, строки, числа, даты. Типизация не сработает.

(16) не подумал..что то не прочитал что это запрос к другой базе

(16) Так это битые ссылки или что? Я же говорю, некоторые доки имеют нормальный вид, некоторые - см. (12)

(18) "некоторые доки имеют нормальный вид"
не верь глазам своим.
типизация "чужих" ссылок невозможна.

(19) Хм... А что же тогда это такое?

(20) Это случайное совпадение.

(21) С данными родной базы? Интересно, как она то определяет, по номеру дока? Или по ИД?

Если все так, то и задача идет ф топку :( Но за информацию - все равно спасибо, думаю, в дальнейшем пригодится.

(22) По ИДД.

(23) Смотря какая задача. Ты же не объяснил. Объекты в понимании 1с ты не получишь, а вот всю информацию о них - легко.
В чем состоит задача? Спроси может найдутся знающие люди.

(25) Задача в том, чтобы юзеру вывалить на экран все документы из базы, к которой подключаемся, за заданный период в виде списка. Из них юзер отберет те, которые нужно загрузить в текущую ИБ, и вот с ними уже будет дальнейшая работа.

(26) Ну и зачем тебе тогда нужны ссылки?
Бери даты, названия документов и номера , показывай и пусть ставит галки.
По выбранным формируй список ИДД и по ним таким же запросом делай выборку.
Обрабатывая таблицы выборки создавай в своей базе нужные документы.
Тебе эта самая тема!
Всё будет очень быстро делаться.

(27) Сделал. В список СпДокументы поместил ИД отобранных доков. Сейчас выполняю второй запрос к базе, где в качестве условия выборки устанавливаю только эти, отобранные пользователем документы:
Запрос.УложитьСписокОбъектов(СпДокументы, "#TmpDocs");
"SELECT
       |    ДокСтр.IDDoc As [Док $Документ.ПоступлениеТМЦ],
       |    $ДокСтр.СтавкаНДС As [СтавкаНДС $Перечисление.СтавкиНДС],
       |    $ДокСтр.Сумма As Сумма,
       |    $ДокСтр.Количество As КолВо,
       |    $ДокСтр.СуммаНДС As СуммаНДС
       |FROM
       |    $ДокументСтроки.ПоступлениеТМЦ As ДокСтр
       |WHERE                                            

      |    ДокСтр.IDDoc IN (SELECT val FROM #TmpDocs)"

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

Опять объекты укладываешь в родной базе?

передавай строку с iddoc'ами, которую сформируешь из таблицы

Вот так дает таблицу?
"SELECT
       |    ДокСтр.IDDoc As [ИддДок],
       |    $ДокСтр.СтавкаНДС As [СтавкаНДС],
       |    $ДокСтр.Сумма As Сумма,
       |    $ДокСтр.Количество As КолВо,
       |    $ДокСтр.СуммаНДС As СуммаНДС
       |FROM
       |    $ДокументСтроки.ПоступлениеТМЦ As ДокСтр
       |WHERE                                            

      |    ДокСтр.IDDoc IN (SELECT val FROM #TmpDocs)"

(28) Что то я сомневаюсь, что у тебя
Запрос.УложитьСписокОбъектов(СпДокументы, "#TmpDocs");
сработает как надо.
Ты отрабатываешь версию в ДБФ?

(28) Временная таблица точно создается не пустая? Посмотрел?

(31) да, но пустую
(32) Из файловой подключаюсь к скуль-версии.

(34) Можешь для отладки убрать решетку с таблички "#TmpDocs" и через QA в SQL
глянуть на эту табличку. Потом её там же прибьешь.
Таблица должна быть не пустая.

(35) Простите мое невежество, но что такое QA и как с ним работать? Просто раньше этой темы особо касаться не приходилось.

QA - QueryAnalazer программная среда для работы с базами данных SQL. Поставляется вместе с самой субд SQL
SQL надо расшифровать?

(37) SQL расшифровывать не надо :)

На SQL у тебя доступ есть?

1с же ты както там запускаешь.

(40) Через ярлык :)))

А в конфигураторе в парметрах базы данных SQL можешь глянуть?
Ты там вообще местный или пришлый?

(35) Он её не увидит, т.к. локальная временная таблица видна только в рамках одного @@SPID, а QA будет с @@SPID отличным от 1совского.

(43) Значит надо её делать самому без метода УложитьСписокОбъектов()

(42) Что именно там смотреть? "Сервер", "База данных", "Пользователь", "Пароль" - все, что там есть.

(44) ну её можно сделать глобальной)))

А ешё лучше изучать постепенно и на каждый выбранный документ посылать свой запрос. Тогда можно будет обойтись без временных таблиц. Скорость всё равно будет достаточной, а основные тормоза будут на проведении вновь созданных документов в своей базе.

а не проще ли просто написать "ВыполнитьИнструкцию(ТекстЗапроса,ТЗ,1)", где ТЗ- таблица значений ?

(45) На сервер где установлен SQL у тебя есть доступ?
Надо будет запустить там QA и посмотреть таблички базы данных

(45) Смотри (47), тебе это будет проще реализовать. Потом будешь оптимизировать (если захочешь)

(49) Доступ есть. Как QA там запустить?

Тогда будет твой запрос типа этого:
ВыбДок=СписокДок.ПолучитьЗначение(инд);

"SELECT
       |    ДокСтр.IDDoc As [ИддДок],
       |    $ДокСтр.СтавкаНДС As [СтавкаНДС],
       |    $ДокСтр.Сумма As Сумма,
       |    $ДокСтр.Количество As КолВо,
       |    $ДокСтр.СуммаНДС As СуммаНДС
       |FROM
       |    $ДокументСтроки.ПоступлениеТМЦ As ДокСтр
       |WHERE                                            
      |    ДокСтр.IDDoc ='"+ВыбДок+"'
|";
Ставишь его в цикл по списку выбранных документов и не надо лазить в QA

(52) так не работает, сейчас проверил...

(53) Понятно. Надо же все остальное добавить.

(53) Приведи в соответствие со своей программой

(54) Что остальное?
(55) Да приведен он и так. Таблица все равно пустая.

Покажи весь код.
Как получаешь ИдДок из соседней базы?
Как накидываешь список?
Как даешь пользователю на отметку?
Как потом катишься по этому списку и берешь ИдДок в запрос?
Чё мы тут должны гадать-то?

(57) Поправочка: по одному доку все-таки работает, так что вариант в (52) в принципе применим. Хотелось бы, правда, красивее сделать...

(58) Ну вот, а то всё мама, да мама...
Красивее уже и сам сможешь. Ещё раз учти, что основные потери времени будут не на запросы к соседней базе, а на проведение вновь создаваемых документов в своей. Поэтому: а надо ли оно красивее конкретно тебе?

(58),(51) QA запускается через кнопку Пуск\Программы\Microsoft SQL Server\QueryAnalazer

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

(61) спасибо за помощь! :)
Да у меня, собственно, тоже :)

А у тебя какой город? В личке нет.

(63) Столица Мира :)

(64)Сиб?

(64) Стесняешься название произносить? Или не выговариваешь всех букв?

(66) Да нет, почему, просто многие знают уже, что такое "Столица мира". Собственно, Барнаул :)

(66) А-а. Я не знал, что она теперь туда переехала. Буду знать.
У меня там однокласник есть.

(68) Она никуда не переезжала. Она всегда тут была :)

(69) Ну была и пусть дальше стоит. Мне и в моей деревне хорошо.

(59) Нашел решение, как вытащить из соседней БД только выбранные юзером доки ОДНИМ запросом.
Вместо "УложитьСписокОбъектов()" здесь нужно использовать предв. создание врем. таблицы.

Запрос.Выполнить("create table #TmpDocs(iddoc char(9) primary key)");
       Для а = 1 По СпДокументы.РазмерСписка() Цикл
           ИДДокумента = СпДокументы.ПолучитьЗначение(а);
           Запрос.Выполнить("insert into #TmpDocs (iddoc) values ('"+ИДДокумента+"')");
       КонецЦикла;
       ТекстЗапроса = "SELECT
       |    ДокСтр.IDDoc As [Док $Документ.ПоступлениеТМЦ],
       |    $ДокСтр.СтавкаНДС As [СтавкаНДС $Перечисление.СтавкиНДС],
       |    SUM($ДокСтр.Сумма) As Сумма,
       |    SUM($ДокСтр.Количество) As КолВо,
       |    SUM($ДокСтр.СуммаНДС) As СуммаНДС
       |FROM
       |    $ДокументСтроки.ПоступлениеТМЦ As ДокСтр
       |WHERE                                            
       |    ДокСтр.IDDoc IN (SELECT iddoc FROM #TmpDocs)
       |GROUP BY
       |    ДокСтр.IDDoc,
       |    $ДокСтр.СтавкаНДС
       |ORDER BY
       |    ДокСтр.IDDoc";

(71) Ну и молодец. Я тебе про это же и говорил.

(71) Утро вечера мудреннее.

(72) :)

(74) Перегружаешь в бухгалтерию со свёрткой по ставкам НДС?
А в бухгалтерии формируешь документы или операции?

(75) Документы

(76) Следующий шаг реализация.
Тока не понятно почему у вас торговля SQL, а бухгалтерия ДБФ.

(77) А что не так?

(78) Имея SQL и соответственно всё администрирование по нему работаете с менее надежной системой хранения на ДБФ.

триллер какой-то

(80) Сейчас будет 2-я часть :)

Теперь нужно бы проделать то же самое, но уже для базы ДБФ. Тоже интересно, каким образом передать сторонней базе список ИД доков, полученных тем же образом, что было описано ранее.

(81)тыб матчасть подтянул на досуге, будет легче.

(52) Точно также. Фомируй временную таблицу и в запросе присоединяй условие

(83) дык мало у меня его... досуга-то :)
(84) создание ВТ для файловой БД? Прокатит? Вроде был случай, что матюгалась 1с...

Можешь использовать:
RS.УстановитьКаталогВремТаблиц(КаталогВремФайлов);
И даже сможешь глянуть его.

(85) Не сможешь у тебя есть объект XBASE. Сделай времянку через него.

(87)+ Если не сможешь, то ...

ОК, сейчас проверим

Вот нашел тебе кусок кода, где врем. таблица делается через XBASE:

       СпрТов=СоздатьОбъект("Справочник.Товары");
       
       //Делаем врем.таблицу
       ИмяТаблицыМатрицы=КаталогВремФайлов+"Ассорт.dbf";
       Если ФС.СуществуетФайл(ИмяТаблицыМатрицы)=1 Тогда
           ФС.УдалитьФайл(ИмяТаблицыМатрицы);
       КонецЕсли;                            
       
       АМ=СоздатьОбъект("XBase");
       АМ.ДобавитьПоле("VAL","C",9,);
       АМ.ДобавитьПоле("ISFOLDER","N",2,0);
       АМ.СоздатьФайл(ИмяТаблицыМатрицы,);  
       Если АМ.Открыта()=0 Тогда
           Предупреждение("Ошибка создания файла обязательных товаров");
           Возврат;
       КонецЕсли;
       ТаблТоваров.ВыбратьСтроки("КодТовара");
       Пока ТаблТоваров.ПолучитьСтроку("КодТовара")=1 Цикл
           Если СпрТов.НайтиПоКоду(ТаблТоваров.КодТовара)=1 Тогда
               АМ.Добавить();
               АМ.VAL=МД.ЗначениеВСтрокуБД(СпрТов.ТекущийЭлемент());
               АМ.ISFOLDER=2;
               АМ.Записать();
           КонецЕсли;
       КонецЦикла;
       АМ.ЗакрытьФайл();    

   ТекстЗапросаУсл="";
   Условие="";
   
   Если ПустоеЗначение(ВыбТовар)=0 Тогда
       Если ВыбТовар.ЭтоГруппа()=0 Тогда Загол=Загол+"По товару: "+ВыбТовар+". ";
           Условие=" AND $Докум.Товар =:ВыбТовар";
           RS.УстановитьТекстовыйПараметр("ВыбТовар", ВыбТовар);
       Иначе
           Загол=Загол+"По товарам группы: "+ВыбТовар;  
           RS.УложитьСписокОбъектов(ВыбТовар,ИмяТаблицыТоваров, "Товары");
           Условие=" AND $Докум.Товар IN (SELECT Val FROM "+ИмяТаблицыТоваров+")";
       КонецЕсли
   ИначеЕсли ЕстьФильтр("Товар",Сп)=1 Тогда Загол=Загол+"По товарам из списка. ";
       RS.УложитьСписокОбъектов(Сп,ИмяТаблицыТоваров, "Товары");
       Условие=" AND $Докум.Товар IN (SELECT Val FROM "+ИмяТаблицыТоваров+")";
   КонецЕсли;
   ТекстЗапросаУсл=ТекстЗапросаУсл+Условие;

   Если (ОбязательныйАссортимент=1) И (ТаблТоваров.КоличествоСтрок()>0) Тогда
       Загол=Загол+"Только обязательный ассортимент. ";
       //ИмяТаблицыТоваровМатрицы="#ВыбТоварМатрицы";
       //RS.УложитьСписокОбъектов(СписокТоваровМатрицы, ИмяТаблицыТоваровМатрицы, "Товары");
       Условие=" AND $Докум.Товар IN (SELECT Val FROM "+ИмяТаблицыМатрицы+")";
       ТекстЗапросаУсл=ТекстЗапросаУсл+Условие;
   КонецЕсли;

делай времянку через сам фокс..
Хотя, можно просто заполненый список уложить и всё..
ЗЫ: или лучше 1qlite используй - там есть временные таблички  и всё такое + супер метод УложитьТЗ

(91) "делай времянку через сам фокс.. "
А примерчик можно?

(92)
http://www.1cpp.ru/forum/YaBB.pl?num=1188673318

(91)
1sqlite работает только в родной базе.

(94) ну..можне же напрямую указать что за файлик используем ? + все поля с него "руками", без метапарсера.

(94) Александр, а исходниками на Status1C не поделишься? А то с итланда не скачать, он еле шевелится и регистрация там похоже слетела...

(93) Вот эта вещь рулит:

ОлеДБКоманда.ВыполнитьИнструкцию("EXECSCRIPT('SELECT  * INTO CURSOR  TmpTable NOFILTER from sc33 as WW ')");

Только нельзя ли вместо имени файла использовать метаимя?

(97) ну там же есть пример - там во всю используется метапарсер

Кстати, а как в запросе типа того, что в (52) проверить, какая ставка НДС в данном конкретном случае представлена? Дело в том, что в соседней базе, к которой подключаемся, ставка НДС имеет тип "Перечисление", и непонятно, как определить, где какая ставка...

А что их много?
Сделай документ со всеми ставками и посмотри результаты запроса.

(99) заранее слепить табличку соответствия "перечисление - его ид..", её и пихать в запрос, например.

(100) 9 штук всего
(101) Т.е. предварительно узнать ИД всех значений ставок НДС и их запихнуть, а потом в запросе проверять?

(102) тебе условие на ставку нужно влепить, или ты хочешь нормальное отображение значения перечисления ?

(102) А используется у тебя и того меньше

Что дает?
"SELECT distinct
       |    $ДокСтр.СтавкаНДС As [СтавкаНДС]
       |FROM
       |    $ДокументСтроки.ПоступлениеТМЦ As ДокСтр"

(103) Только условие

(106) с QA разобрался? запускал?

(107) угу

(106) через метадатаворк узнаешь ид объекта, предварительно присоединив нужный md, его и используешь в условии.

(108) Ну дык, там и добани селект к своим документам и узнаешь все возможные значения ставок НДС.

(109) А как присоединиться к МД соседней базы?

(111)http://www.1cpp.ru/docum/icpp/html/ODBC.html#attachmd

Такой момент вылез: почему-то при объявлении пути к базе в таком виде \\server\C$\Base_1C\test, если подключаешься к файловой БД, то не работает в запросах метапарсер имен (в скулевой все в порядке). В чем причина?

Вопрос остается