Ваши комментарии

Спасибо за указанную избыточность кода. Действительно все работает. Вопрос закрыт

Спасибо! Новую версию скачал. Но с подсказкой не вышло :) Вот такой микс из старой и новой версии сработал. Вместо DocumentTable сделал TerminalConnector.


МассивСерий = ПолучитьТаблицуСерий(ДокСсылка);

ТаблицаСерий = Новый COMОбъект("AddIn.Cl.TerminalConnector"); //NEW

//ТаблицаСерий = Новый COMОбъект("Cleverence.Warehouse.DocumentTable"); //OLD

ТаблицаСерий = ДокументТСД.Таблицы.ДобавитьЭлемент();
ТаблицаСерий.Name = "SerialTovar";
СтрокаТаблицы = Новый COMОбъект("Cleverence.Warehouse.Row");
Для Каждого Стр из МассивСерий Цикл
СтрокаТаблицы = ТаблицаСерий.Строки.ДобавитьЭлемент();
СтрокаТаблицы.SetField("NSProductId", Строка(Стр.Штрихкод));
СтрокаТаблицы.SetField("NSSerial", Строка(Стр.Регион));
СтрокаТаблицы.SetField("NSMarka1", Строка(Стр.ДиапазонС));
СтрокаТаблицы.SetField("NSMarka2", Строка(Стр.ДиапазонПо));
СтрокаТаблицы.SetField("NSGUID", Строка(Стр.НомИД));
КонецЦикла;

мДрайверТСД.ВыгрузитьДопТаблицу(ТаблицаСерий);

К сожалению с выгрузкой доп. таблицы документа не вышло по этой схеме. Всячески пытался привязать этот пример к документу(ведь я выгружаю именно ЕГО доп. таблицу, а не общую таблицу, как в первом сообщении)


КомДляMS = Новый COMОбъект("AddIn.Cl.TerminalConnector");

КомДляMS = ДокументТСД.Таблицы.ДобавитьЭлемент();
КомДляMS.Name = "SerialTovar";
СписБаз = Новый Массив;
СтрокаПодключенияКСерверу = "192.168.1.10:9500";
СписБаз.Добавить(СтрокаПодключенияКСерверу);
КомДляMS.Подключить(СписБаз,""); // подключение к базе
мДанные = Новый Массив(5);
мДанные[0] = "NSProductId";
мДанные[1] = "NSSerial";
мДанные[2] = "NSMarka1";
мДанные[3] = "NSMarka2";
мДанные[4] = "NSGUID";
Если НЕ КомДляMS.НачатьВыгрузкуТаблицы("SerialTovar", мДанные, Истина) Тогда // Начинаем выгрузку, установив массив полей
Сообщить("Ошибка при начале выгрузки");
Возврат;
КонецЕсли;
Для каждого Стр из МассивСерий Цикл
мДанные[0] = Строка(Стр.Штрихкод);
мДанные[1] = Строка(Стр.Регион);
мДанные[2] = Строка(Стр.ДиапазонС);
мДанные[3] = Строка(Стр.ДиапазонПо);
мДанные[4] = Строка(Стр.НомИД);
Ответ = КомДляMS.ДобавитьВВыгрузкуТаблицы(мДанные); //Добавляем порцию данных в выгрузку
Если НЕ Ответ Тогда
Возврат;
КонецЕсли;
КонецЦикла;
Ответ = КомДляMS.ЗавершитьВыгрузкуТаблицы(); //Завершаем выгрузку
Если НЕ Ответ Тогда
Сообщить("Не удалось закончить выгрузку таблицы");
Возврат;

КонецЕсли;
Очень хотелось бы обещанного справочника по новым методам, или скорректируйте меня, пожалуйста, где я тут ошибся

Спасибо! Действительно, был клиент 3.0.0.130, обновился до 3.0.0.135 и теперь нет зависаний, подтормаживаний.
Появился новый минибаг. Когда тестируется работа на тестовом сервере(без лицензий), то предупреждение об отсутствии лицензии и последующем обрезании до 3 строк повторяется бесконечно и документ не уходит ни под каким предлогом. Подсунув лицензию - все сразу заработало.

Спасибо, это помогло. А есть ли где-нибудь информация о методах в новой версии? Было бы неплохо.
Плюс перестала работать выгрузка дополнительной таблицы документа


ТаблицаСерий = Новый COMОбъект("Cleverence.Warehouse.DocumentTable");

ТаблицаСерий = ДокументТСД.Таблицы.ДобавитьЭлемент();
ТаблицаСерий.Name = "SerialTovar";
СтрокаТаблицы = Новый COMОбъект("Cleverence.Warehouse.Row");
Для Каждого Стр из МассивСерий Цикл
СтрокаТаблицы = ТаблицаСерий.Строки.ДобавитьЭлемент();
СтрокаТаблицы.SetField("NSProductId", Строка(Стр.Штрихкод));
СтрокаТаблицы.SetField("NSSerial", Строка(Стр.Регион));
СтрокаТаблицы.SetField("NSMarka1", Строка(Стр.ДиапазонС));
СтрокаТаблицы.SetField("NSMarka2", Строка(Стр.ДиапазонПо));
СтрокаТаблицы.SetField("NSGUID", Строка(Стр.НомИД));
КонецЦикла;
мДрайверТСД.ВыгрузитьДопТаблицу(ТаблицаСерий);

Так же могу добавит, что более не работает конструкция

ТаблицаСерий = Новый COMОбъект("Cleverence.Warehouse.DocumentTable");

ТаблицаСерий.Name = "SerialTovar";
Для каждого Стр из нкСерии Цикл

СтрокаТаблицы = Новый COMОбъект("Cleverence.Warehouse.Row");

СтрокаТаблицы.SetField("NSProductId", Строка(Стр.Штрихкод));

СтрокаТаблицы.SetField("NSGUID", Строка(Стр.НомИД));
СтрокаТаблицы.SetField("NSSerialFrom", Строка(Стр.ДиапазонС));
СтрокаТаблицы.SetField("NSSerialTo", Строка(Стр.ДиапазонПо));
СтрокаТаблицы.SetField("NON", Строка(Стр.Ном));

ТаблицаСерий.Rows.Add(СтрокаТаблицы);

КонецЦикла;

Вот такая ошибка

Имелось ввиду "платформа ДО(где работало) и После(где не работает)".

Так, всем спасибо за внимание, я таки разобрался. Последнее мое сообщение неверное, конструкция помогла.

//

ТаблицаСерий = Новый COMОбъект("Cleverence.Warehouse.DocumentTable");
ТаблицаСерий = ДокументТСД.Таблицы.ДобавитьЭлемент();
ТаблицаСерий.Name = "SerialTovar2";
СтрокаТаблицы = Новый COMОбъект("Cleverence.Warehouse.Row");
СтрокаТаблицы = ТаблицаСерий.Строки.ДобавитьЭлемент();
СтрокаТаблицы.SetField("NSProductId", "азаза");
СтрокаТаблицы.SetField("NSSERIAL", "азаза");
СтрокаТаблицы.SetField("NSMarka1", "азаза");
СтрокаТаблицы.SetField("NSMarka2", "азаза");
СтрокаТаблицы.SetField("NSGUID", "азаза");
мДрайверТСД.ВыгрузитьДопТаблицу(ТаблицаСерий);
//

Ответ = мОбъектТСД.Драйвер.ВыгрузитьДокумент(ДокументТСД);
Тему можно закрывать.

Нашел еще одну конструкцию, которая должна выгружать таблицу документа, но и она не дала результатов :\ В код, разумеется, были вставлены мои параметры и имя таблицы

ТаблицаСправокА = ДокументТСД.Таблицы.ДобавитьЭлемент ();

ТаблицаСправокА.Name = "ФормыА";
мДрайверТСД.ВыгрузитьДопТаблицу(ТаблицаСправокА);
Для Каждого СтрокаСправок из Документ1С.Товары Цикл
НоваяСтрокаТаблицы = ТаблицаСправокА.Строки.ДобавитьЭлемент ();
НоваяСтрокаТаблицы.SetField("КодФормы",СтрокаСправок.СправкаА.Код);
НоваяСтрокаТаблицы.SetField("Начало",СтрокаСправок.СправкаА.ДиапазоныНомеров[0].НачальныйНомер);
НоваяСтрокаТаблицы.SetField("Конец",СтрокаСправок.СправкаА.ДиапазоныНомеров[0].КонечныйНомер);
НоваяСтрокаТаблицы.SetField("АлкоКод",СтрокаСправок.АлкогольнаяПродукция.Код);
НоваяСтрокаТаблицы.SetField("КодНоменклатуры",ОпределитьНоменклатуруНаСервере(СтрокаСправок.АлкогольнаяПродукция));
КонецЦикла

http://www.cleverence.ru/search/?q=%D0%92%D1%8B%D0%B3%D1%80%D1%83%D0%B7%D0%B8%D1%82%D1%8C%D0%94%D0%BE%D0%BF%D0%A2%D0%B0%D0%B1%D0%BB%D0%B8%D1%86%D1%83&s=+

http://www.cleverence.ru/support/%D0%98%D0%BD%D1%82%D0%B5%D0%B3%D1%80%D0%B0%D1%86%D0%B8%D1%8F+%D0%
Метод ВыгрузитьДопТаблицу я использую для выгрузки отдельной, никак не связанной с документом ,таблицы. А что делать с доп. таблицей документа - вот это вопрос.



Сервис поддержки клиентов работает на платформе UserEcho