Как вызвать регистр через сом соединение? К базе подключаюсь нормально как обратится к регистру, нужно для переноса данных с регистра "ОстаткиТоваров" базы 7.7  в документ "Оприхдования товаров" в 8.


При таком обращеннии выдает ошибку

Регистр7  = Б1С7.CreateObject("Регистр.ОстаткиТоваров");

(0) Не обманывай.

+(1) Вот код:
   V7 = СоздатьОбъект("V77.Application");
   V7.Initialize(V7.RMTrade, "", ""); // путь к базе потёр, естественно
   Рег = V7.CreateObject("Регистр.ОстаткиТоваров");
Ошибку не выдаёт.
Видимо, проблема в чём-то другом у тебя?

можно еще
ТекстЗапроса =  "//{{ЗАПРОС()
 |текст
 |"//}}ЗАПРОС
 ;
 
Запрос = Б1С7.CreateObject("Запрос");

Если Запрос.Выполнить(ТекстЗапроса) <> 0 Тогда
 //...
КонецЕсли;

спасибо, буду пробовать

(4) Ты б разобрался, почему у тебя код из (0) ошибку выдал. Хотя код - теоретически совершенно рабочий, а значит, ошибка - в другом месте.

Ошибка пропала после перезагрузки базы 7.7

ТекстЗапроса =  "//{{ЗАПРОС()

 |текст
 |"//}}ЗАПРОС

 ;
 
Запрос = Б1С7.CreateObject("Запрос");

Если Запрос.Выполнить(ТекстЗапроса) <> 0 Тогда
 //...

КонецЕсли;


Как обойти резуьтат запроса?

(7) Пока Запрос.Группировка(1) = 1 ЦИкл...

спасибо

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

их там нет.
И вообще - иди читай документацию

ясно

Дата1 = '20130101';
Дата2 = '20130131';
Фирма = Б1С7.Константа.БазФирма;
     
   
   ТекстЗапроса = "
       |ПЕРИОД С Дата1 По Дата2;
       |Фирма=Регистр.ОстаткиТоваров.Фирма;
       |Склад=Регистр.ОстаткиТоваров.Склад;
       |Товар=Регистр.ОстаткиТоваров.Товар;
       |Док=Регистр.ОстаткиТоваров.ТекущийДокумент;
       |Кол=Регистр.ОстаткиТоваров.ОстатокТовара;
       |Функция НачКол  = НачОст(Кол);
       |Функция КонКол  = КонОст(Кол);
       |Функция ПрихКол = Приход(Кол);
       |Функция РасхКол = Расход(Кол);
       |Условие (Фирма=Фирма);
       |Группировка Товар;";
               
       Запрос = Б1С7.CreateObject("Запрос");
       
       
   

       
   Если Запрос.Выполнить(ТекстЗапроса) <> 0 Тогда
        Пока Запрос.Группировка(1)=1 Цикл
   Сообщить(Запрос.Товар.наименование);
   Сообщить(Запрос.Док.ТекущийДокумент);
   Сообщить(Запрос.Кол);
        КонецЦикла;            
       КонецЕсли;

Выдает ошибку:

Форма.Форма.Форма(1970)}: Ошибка при вызове метода контекста (Выполнить)
       Если Запрос.Выполнить(ТекстЗапроса) <> 0 Тогда
по причине:
Произошла исключительная ситуация (1С:Предприятие): ПЕРИОД С  <<?>> Дата1 По Дата2;
Запрос[2] : Ошибка в выражении 'Дата1'

Фирма = Б1С7.Константа.БазФирма;

         Дата1 = '20130101';
     Дата2 = '20130131';
     
     ТекстЗапроса = "";
     ТекстЗапроса = ТекстЗапроса +"
       |ПЕРИОД С "+Дата1+" По "+Дата2+";
       |Фирма=Регистр.ОстаткиТоваров.Фирма;
       |Склад=Регистр.ОстаткиТоваров.Склад;
       |Товар=Регистр.ОстаткиТоваров.Товар;
       |Док=Регистр.ОстаткиТоваров.ТекущийДокумент;
       |Кол=Регистр.ОстаткиТоваров.ОстатокТовара;
       |Функция НачКол  = НачОст(Кол);
       |Функция КонКол  = КонОст(Кол);
       |Функция ПрихКол = Приход(Кол);
       |Функция РасхКол = Расход(Кол);
       |Условие (Фирма=Фирма);
       |Группировка Товар;";
               
       Запрос = Б1С7.CreateObject("Запрос");
       
   
       
   Если Запрос.Выполнить(ТекстЗапроса) <> 0 Тогда
     Пока Запрос.Группировка()=1 Цикл
       Сообщить(Запрос.Товар.наименование);
       Сообщить(Запрос.Док.ТекущийДокумент);
       Сообщить(Запрос.Кол);
     КонецЦикла;            
       КонецЕсли;
Переделано, новая ошибка

Ошибка при вызове метода контекста (Выполнить)
   Если Запрос.Выполнить(ТекстЗапроса) <> 0 Тогда
по причине:
Произошла исключительная ситуация (1С:Предприятие): ПЕРИОД С  <<?>> 01.01.2013 0:00:00 По 31.01.2013 0:00:00;
Запрос[2] : Ожидается дата перед '01.01'

|ПЕРИОД С '"+Дата1+"' По '"+Дата2+"';