Имя: Пароль:
1C
1C 7.7
v7: Не записывает XMLParser
0 dll
 
17.01.15
18:09
всем салют,
в общем при попытке записать созданный XML пишет ошибку - " Неизвестная ошибка"
помогите разобраться в чем дело...

    //Выгружаем номенклатуры
    Если Номенклатура = 1 Тогда                   
        
        АнализаторНомен = СоздатьОбъект("AddIn.XMLParser");
        КорневойРазделНомен = АнализаторНомен .СоздатьДокумент();
        ДанныеXML = КорневойРазделНомен.СоздатьПодчиненныйЭлемент("SpravochnikNomenklatura");
        
        Путь = КореньXML + Лев(Формат(ТекущаяДата(), "ДФ = " "дд-ММ-гггг"""), 10) + "\nomenclatures.xml";        

        Номен = СоздатьОбъект("Справочник.Номенклатура");
        Номен.ВыбратьЭлементы();
    
        Пока Номен.ПолучитьЭлемент() = 1 Цикл
            Если Номен.ПометкаУдаления() = 0 Тогда
            Ветка = ДанныеXML.СоздатьПодчиненныйЭлемент("ElementNomenklatura");
            Ветка.УстановитьАтрибут("id_1C", СокрЛП(Номен.Код));
            Ветка.УстановитьАтрибут("Name", СокрЛП(Номен.Наименование));
            Ветка.УстановитьАтрибут("Unit", СокрЛП(Номен.ЕдИзмерения));
            Ветка.УстановитьАтрибут("Upakovka", СокрЛП(Номен.КоличествоВУпаковке));
            XMLКорневойРаздел.Записать(Путь);    
        КонецЕсли;
        КонецЦикла;
    КонецЕсли;       
    
    //Выгружаем Торг точки
    Если ТТ = 1 Тогда  
        Пока ПолучитьСтроку() = 1 Цикл  
            
        АнализаторТТ = СоздатьОбъект("AddIn.XMLParser");
            ДанныеСпрТТ = АнализаторТТ.СоздатьДокумент();
        элСправочника = ДанныеСпрТТ.СоздатьПодчиненныйЭлемент("SpravochnikTT");
    
            ПутьТ = КореньXML + Лев(Формат(ТекущаяДата(), "ДФ = " "дд-ММ-гггг"""), 10) + "\" + Контрагенты.Наименование + "\OutBox\" + "\salpot.xml";
            
            Родитель = Контрагенты.Агент;
            элСправочника.УстановитьАтрибут("id", Контрагенты.Код);
                    элСправочника.УстановитьАтрибут("name", Контрагенты.Наименование);    
    
            ДанныеСпрТТ.Записать(ПутьТ);


          КонецЦикла;
    КонецЕсли;