&НаСервере
Процедура ОткрытьФайлНаСервере()
ЧтениеXML = Новый ЧтениеXML;
ЧтениеXML.ОткрытьФайл("D:\for_xml\scheta1.xml");
ПостроительDOM = Новый ПостроительDOM;
ДокументDOM = ПостроительDOM.Прочитать (ЧтениеXML);
РезультатРазборки = Новый массив;
Для каждого ЭлементСчет из ДокументDOM.ЭлементДокумента.ДочерниеУзлы Цикл
Если НЕ (ЭлементСчет.ТипУзла = ТипУзлаDOM.Элемент И ЭлементСчет.ИмяУзла = "Счет") Тогда
Продолжить;
КонецЕсли;
новыйЭлемент = Документы.СчетНаОплатуПокупателю.СоздатьДокумент();
ДокументСчет = Новый Структура ("Дата", "Номер", "Организация", "Контрагент", "Договор" "счетКасса", "Товар");
Для каждого ЭлементРеквизит Из ЭлементСчет.ДочерниеУзлы Цикл
Если ЭлементРеквизит.типУзла <> ТипУзлаDOM.Элемент Тогда
Продолжить;
Конецесли;
Если ЭлементРеквизит.ИмяУзла = "Дата" тогда
ДокументСчет.Дата = XMLЗначение (Тип ("Дата"), ТекстУзла (ЭлементРеквизит));
.......
как быть??
Процедура или функция с указанным именем не определена (ТекстУзла)
Там к статье вообще-то целый файл РазборXML.cf приложен
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший