Имя: Пароль:
1C
 
Не соединяеться по COM у обработке УниверсальнаяЗагрузкаДанныхXML
0 rassigor
 
21.01.08
21:53
Начало выгрузки:   21.01.2008 21:55:33

Ошибка при выгрузке данных: {ВнешняяОбработка.УниверсальныйОбменДаннымиXML(10204)}: Метод объекта не обнаружен (ВыполнитьДействияПередЧтениемДанных)
1 ТелепатБот
 
гуру
21.01.08
21:53
2 rassigor
 
21.01.08
21:55
Хотя сам метод вот он
Функция ВыполнитьДействияПередЧтениемДанных(СтрокаДанных = "") Экспорт
   
   мСоответсвиеДопПараметровПоиска = Новый Соответствие;
   мСоответсвиеАлгоритмовПоискаЭлементов = Новый Соответствие;
   
   ИнициализироватьВедениеПротоколаОбмена();
   
   ЗагрузкаВозможна = Истина;
   
   Если ПустаяСтрока(СтрокаДанных) Тогда
   
       Если ПустаяСтрока(ИмяФайлаОбмена) Тогда
           ЗаписатьВПротоколВыполнения(15);
           ЗагрузкаВозможна = Ложь;
       КонецЕсли;
   
   КонецЕсли;
   
   Если Не ЗагрузкаВозможна Тогда
       Возврат Ложь;
   КонецЕсли;
   
   ЗаписатьВПротоколВыполнения("Начало загрузки:   " + ТекущаяДата(), , Ложь, , , Истина);
   
   Если ФлагРежимОтладки Тогда
       ИспользоватьТранзакции = Ложь;
   КонецЕсли;
   
   Если КоличествоОбработанныхОбъектовДляОбновленияСтатуса = 0 Тогда
       
       КоличествоОбработанныхОбъектовДляОбновленияСтатуса = 100;
       
   КонецЕсли;
   
   мСоответвиеТиповДанныхДляЗагрузки = Новый Соответствие;
   мГлобальныйСтекНеЗаписанныхОбъектов = Новый Соответствие;
   
   мСчетчикЗагруженныхОбъектов = 0;
   ФлагОшибки                  = Ложь;
   ЗагруженныеОбъекты          = Новый Соответствие;
   ЗагруженныеГлобальныеОбъекты = Новый Соответствие;

   ИнициализироватьМенеджерыИСообщения();
   
   ОткрытьФайлЗагрузки(,СтрокаДанных);
   
   Если ФлагОшибки Тогда
       ЗавершитьВедениеПротоколаОбмена();
       Возврат Ложь;
   КонецЕсли;

   
   // Обработчик ПередЗагрузкойДанных
   Отказ = Ложь;
   
   Если Не ПустаяСтрока(Конвертация.ПередЗагрузкойДанных) Тогда
       
       Попытка
           Выполнить(Конвертация.ПередЗагрузкойДанных);
       Исключение
           СтрокаСообщенияОбОшибке = ЗаписатьИнформациюОбОшибкеОбработчикиКонвертации(22, ОписаниеОшибки(), "ПередЗагрузкойДанных (конвертация)");
           Отказ = Истина;
       КонецПопытки;
       
       Если Отказ Тогда // Отказ от загрузки данных
           ЗавершитьВедениеПротоколаОбмена();
           ФайлОбмена.Закрыть();
           Возврат Ложь;
       КонецЕсли;
       
   КонецЕсли;

   // Очистка информационной базы по правилам
   ОбработатьПравилаОчистки(ТаблицаПравилОчистки.Строки);
       
   Если ИспользоватьТранзакции Тогда
       НачатьТранзакцию();
   КонецЕсли;
   
   Возврат Истина;
   
КонецФункции
3 rassigor
 
21.01.08
21:55
Вот здесь вываливается
РаботаВозможна = мОбработкаДляЗагрузкиДанных.ВыполнитьДействияПередЧтениемДанных(ТекущаяСтрокаДляЗаписи);
4 Defender aka LINN
 
21.01.08
22:14
(0) А обработка через COM запускает себя же, или встроеную?
5 rassigor
 
21.01.08
22:15
Запускает себе, конект идет, она чего то там делает, но когда вызываеться
РаботаВозможна = мОбработкаДляЗагрузкиДанных.ВыполнитьДействияПередЧтениемДанных(ТекущаяСтрокаДляЗаписи); все вылетает
6 Defender aka LINN
 
21.01.08
22:24
(5) Да ну, фигня какая-то, она же "чудо", а чудес не бывает.
Выложи фрагмент, где инициализируется "мОбработкаДляЗагрузкиДанных"
7 rassigor
 
21.01.08
22:33
Перем мОбработкаДляЗагрузкиДанных Экспорт;
мОбработкаДляЗагрузкиДанных = ВыполнитьПодключениеКИБПриемнику();


Функция ВыполнитьПодключениеКИБПриемнику() Экспорт
   
   РезультатПодключения = Неопределено;
   
   СтруктураПодключения = Новый Структура();
   СтруктураПодключения.Вставить("ТипПодключения", 1);
   СтруктураПодключения.Вставить("ФайловыйРежим", ТипИнформационнойБазыДляПодключения);
   СтруктураПодключения.Вставить("АутентификацияWindows", АутентификацияWindowsИнформационнойБазыДляПодключения);
   СтруктураПодключения.Вставить("КаталогИБ", КаталогИнформационнойБазыДляПодключения);
   СтруктураПодключения.Вставить("ИмяСервера", ИмяСервераИнформационнойБазыДляПодключения);
   СтруктураПодключения.Вставить("ИмяИБНаСервере", ИмяИнформационнойБазыНаСервереДляПодключения);
   СтруктураПодключения.Вставить("Пользователь", ПользовательИнформационнойБазыДляПодключения);
   СтруктураПодключения.Вставить("Пароль", ПарольИнформационнойБазыДляПодключения);
   СтруктураПодключения.Вставить("ВерсияПлатформы", ВерсияПлатформыИнформационнойБазыДляПодключения);
   
   ОбъектПодключения = ПодключитсяКИнформационнойБазе(СтруктураПодключения);
   
   Если ОбъектПодключения = Неопределено Тогда
       Возврат Неопределено;
   КонецЕсли;
   
   Попытка
       РезультатПодключения = ОбъектПодключения.Обработки.УниверсальныйОбменДаннымиXML.Создать();
   Исключение
       #Если Клиент тогда
       Сообщить("При попытке создания обработки УниверсальныйОбменДаннымиXML произошла ошибка:" + ОписаниеОшибки(), СтатусСообщения.Важное);
       #КонецЕсли
       РезультатПодключения = Неопределено;
   КонецПопытки;
   
   Если РезультатПодключения <> Неопределено Тогда
       
       //РезультатПодключения.ИспользоватьТранзакции = ИспользоватьТранзакции;    
       //РезультатПодключения.КоличествоОбъектовНаТранзакцию = КоличествоОбъектовНаТранзакцию;
       //
       //РезультатПодключения.ФлагРежимОтладки = ФлагРежимОтладки;
       //
       //РезультатПодключения.ИмяФайлаПротоколаОбмена = ПолучитьИмяПротоколаДляВторойИнформационнойБазыComСоединения();
       //                        
       //РезультатПодключения.ДописыватьДанныеВПротоколОбмена = ДописыватьДанныеВПротоколОбмена;
       //РезультатПодключения.ВыводВПротоколИнформационныхСообщений = ВыводВПротоколИнформационныхСообщений;
       
       РезультатПодключения.РежимОбмена = "Загрузка";
       
   КонецЕсли;
   
   Возврат РезультатПодключения;
   
КонецФункции
8 Defender aka LINN
 
21.01.08
22:36

РезультатПодключения = ОбъектПодключения.Обработки.УниверсальныйОбменДаннымиXML.Создать();

Еще вопросы есть? :)
9 rassigor
 
21.01.08
22:42
жестоко....
10 rassigor
 
21.01.08
22:44
Спасиб...
11 Defender aka LINN
 
21.01.08
22:46
(10) Не за что, обращайся, если что :)
12 rassigor
 
21.01.08
22:48
непонятно почему он на эту строку ругаеться?
РезультатПодключения.ИспользоватьТранзакции = ИспользоватьТранзакции;
13 Defender aka LINN
 
21.01.08
22:49
(12) мда... Только подумал, что человек нормальный, а он такие перлы выдает...
Что значит "ругается"? Пишет "заипали, сцуки!"?
14 rassigor
 
21.01.08
22:50
а если серьезно??обработку я в конфигураторе обновил, оттуда и запускаю ее..
15 Defender aka LINN
 
21.01.08
22:51
(14) Я похож на человека, который шутки шутит?
16 rassigor
 
21.01.08
22:52
почему она вываливаеться на этой строке?мож я опять туплю и не замечаю?
17 rassigor
 
21.01.08
22:53
хм, мож я че не так делаю,

{Обработка.УниверсальныйОбменДаннымиXML(10216)}: Метод объекта не обнаружен (ВыполнитьДействияПослеЗавершенияЧтенияДанных)
   мОбработкаДляЗагрузкиДанных.ВыполнитьДействияПослеЗавершенияЧтенияДанных();
18 rassigor
 
21.01.08
22:55
Порядок действий
1)Создал правила конвертации
2)Скачал новую обработку УниверсальныйОбменДаннымиXML
3)Обновил залил ее в конфигуратор
4)Пытаюсь запускать ошибка

У меня ошибка в ДНК или что я не так делаю?
19 Defender aka LINN
 
21.01.08
22:56
(17) Определись, на какой строке вываливается.
Обаботку ту же, которой выгружаешь, в приемник вставил?
20 rassigor
 
21.01.08
22:59
я утко....о_О
21 Defender aka LINN
 
21.01.08
22:59
?
22 rassigor
 
21.01.08
23:01
все сделал...в приемнике забыл, эт ж COM!!!
23 Defender aka LINN
 
21.01.08
23:01
(22) Бугога... :)
24 rassigor
 
21.01.08
23:08
В правилах конвертации делаю чтобы доки все выгружались не проведенными, правильно ли я делаю

Если ИмяТипаОбъекта = "Документ" Тогда
   РежимЗаписи = "ОтменаПроведения";        
   
КонецЕсли;

Помещаю в ПередЗагрузкойОбъекта

Долго тестить,не хочу чтобы в пустую