Имя: Пароль:
1C
1C 7.7
v7: Контрагенты с движениями за прошлый год.
0 aladark
 
27.12.11
11:57
Народ, нужна небольшая помощь.
Необходимо перекинуть из комплексной 7.7 в 8.2 контрагентов, но только тех, по которым были движения за последний год. Подключаюсь к семерке через COM. Как это сделать?
зы. Сам восьмерочник, с семеркой не работал.
1 1Сергей
 
27.12.11
12:00
ручками забить
2 WoodMan
 
27.12.11
12:03
вызвать специалиста
3 filh
 
27.12.11
12:03
(0) по ольке забирай
4 aladark
 
27.12.11
12:09
Вопрос не в том как подключиться, а в том как выбрать эти данные в семерке.
5 BuHu
 
27.12.11
12:11
6 Эльниньо
 
27.12.11
12:15
(4) Попроси семёрошника скинуть хучь в XML, хучь в DBF,  хучь в TXT.
И возьми оттуда.
7 BuHu
 
27.12.11
12:15
(0) ну давай показывай - как делаешь , что не получается
8 BuHu
 
27.12.11
12:16
(6) где он возьмет "семёрошника" ? )
9 aladark
 
27.12.11
12:17
(5) Я могу вытащить даты приема и увольнения, как и фамилии из справочников. Мне нужны контрагенты с движениями. Как это сделать?
(6) Так я и прошу семерочников.
10 aladark
 
27.12.11
12:18
(7) В восьмерке я бы написал запрос к регистру бухгалтерии и получил данные, что надо писать в 7.7 я не знаю.
11 BuHu
 
27.12.11
12:18
(9) написать запрос к регистру (не знаю как он там называется) взаиморасчеты
12 BuHu
 
27.12.11
12:19
(10)кури Бухгалтерские итоги
13 aladark
 
27.12.11
12:22
Курю, пока не раскурил.
14 BuHu
 
27.12.11
12:23
(13) так я и говорю - показывай как делаешь , что не получается
15 BuHu
 
27.12.11
12:23
+(14) нет у меня под рукой семерки , посмотри например там какуйнить ведомость по взаиморасчетам
16 aladark
 
27.12.11
12:28
Все, вроде раскурил.
BuHu отдельное спасибо за участие.
17 BuHu
 
27.12.11
12:29
вот в поиске нарыл

БИ = СоздатьОбъект("БухгалтерскиеИтоги");
   БИ.ИспользоватьСубконто(ВидыСубконто.Контрагенты);
   БИ.ВыполнитьЗапрос(Дата1, Дата2); //"60,61"
   БИ.ВыбратьСубконто();
   Пока БИ.ПолучитьСубконто()=1 Цикл
       Контр = БИ.Субконто();
       ДО = БИ.ДО();
       КО = БИ.КО();
       Если (ДО<>0) ИЛИ (КО<>0) Тогда
           Сообщить(""+контр+" ДО="+ДО+" КО="+КО);
       КонецЕсли;
       
   КонецЦикла;
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс