Разрабатываю обработку по переносу документов из ЗиК 77 в ЗБУ 8.2.
Написал код, но он не работает, а где ошибка?
v7 = Новый COMObject("V77.Application");
Открыта = v7.Initialize(v7.RMTrade, "/D""" + мПутьКИБ + """ ", "NO_SPLASH_SHOW");
Док=v7.CreateObject("Документ.Невыходы");
ЖР = v7.CreateObject("ЖурналРасчетов.Зарплата");
Док.ВыбратьДокументы(НачДата,КонДата);
Пока Док.ПолучитьДокумент()=1 Цикл
Если ЖР.ВыбратьЗаписиПоДокументу(Док)=1 Тогда
ЖР.ПолучитьЗапись();
ПериодРегистрации=ЖР.ПериодРегистрации.ДатаНачала;
Иначе
ПериодРегистрации='00010101' ;
КонецЕсли;
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой