PDA

Просмотр полной версии : выгрузка в 1C, вопросы



Asha
03.04.2007, 00:55
Не подскажете ли, есть обработка выгружающая накладные (только учет)из StoreHouse4 в 1C7.7 - через ОЛЕ, самодельная, все благополучно работает.
Теперь нужно чуть-чуть подправить ее, и выгрузить в некоторые отчеты данные по спецучету.
было
doclist(дата1,дата2,,1,,1) - судя по инструкции , третье поле - флаг какой учет отбирается.
Но
doclist(дата1,дата2,1,1,,1) - не работает, ничего не отбирает.
doclist(дата1,дата2,1,1,,0) - работает, отбирает, но суммы все =0 (отключены потому что ноликом, понимаю). Но почему может с суммами не отбираться?...
Если это не к вам, посоветуйте, пожалуйста, кто проконсультирует.

Также, нельзя ли заполучить какие-то примеры условных элементарных обработок для формирования ведомостей остатков, например. Пусть не адаптированное конкретно для 1С.

Admin
03.04.2007, 20:55
ЭЭээээ, прям с ходу не готов, задам вопрос петрящим людям... :)

Asha
04.04.2007, 22:23
ЭЭээээ, прям с ходу не готов, задам вопрос петрящим людям... :)
Спасибо, буду наведываться.

Asha
13.04.2007, 21:34
Ответ на вопрос (1) оказался : в спецучете документов на порядок больше, связь по ОЛЕ банально виснет. Представители R-keeper сказали, что поделать с этим ничего нельзя.:(

Но вопросы по ОЛЕ на этом не заканчиваются.
Где ошибка? Буду благодарна за любой совет, кроме "код тупой" без уточнений, в чем именно тупой, потому что именно это меня и интересует.
Нужно найти себестоимость товарных запасов на дату.
//-------
СписокГрупп=СоздатьОбъект("СписокЗначений");
IndQuery = sh.GoodsTree();
sh.First(IndQuery);
Для КолЗаписей = 1 По sh.RecordCount(IndQuery) Цикл
СписокГрупп.Добавитьзначе ие(sh.ValByName(IndQuery,'1.209.1.0'));
sh.Next(IndQuery);
КонецЦикла;

sh.CloseQuery(IndQuery);

для К=1 по СписокГрупп.РазмерСписка() Цикл
IndQuery = sh.Goods(СписокГрупп.ПолучитьЗ начение(К)); // запрос
sh.First(IndQuery);
Для КолЗаписей = 1 По sh.RecordCount(IndQuery) Цикл
ТекТов=sh.ValByName(IndQuery,'1.210.1.0');
IndQuery1 = sh1.GsFifo(ТекТов,1,НаДату,НаДат );
sh1.First(IndQuery1);
Для КолЗаписей = 1 По sh1.RecordCount(IndQuery1) Цикл
ОстКон = ОстКон +sh1.ValByName(IndQuery1,"1.105.4.0");
сообщить(sh1.ValByName(IndQuery1,"1.105.4.0"));
Конеццикла;
sh1.CloseQuery(IndQuery1);
sh.Next(IndQuery);
КонецЦикла;
КонецЦикла;
В Тест-оле отдельными командами работает, а из 1С ничего не находит, цикл крутит, но в нем нули.
Существует ли менее извратский способ? В упор не вижу команд, которыми можно снять сразу все остатки, а не по ИД товара.

Mr.Mz
29.08.2007, 15:41
Кто-нить может поделиться скриптом импорта книги покупок из Хауса3 в 1С7.7 Бухгалтерия Типовая конфигурация?