powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / [игнор отключен] [закрыт для гостей] / Нужна подсказка специалиста
12 сообщений из 12, страница 1 из 1
Нужна подсказка специалиста
    #37679658
Leross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Доброе время суток!
Подскажите как реализовать: Нужно в 1с подгрузить XML файл формата
<?xml version="1.0" encoding="windows-1251" ?>
- <recordset xmlns="uim:com.sma.eias:jkh_org_reestr:ORG_STAT_REESTR">
- <record>
- <NSRF>
- <![CDATA[
Красноярский край
]]>
</NSRF>
- <MR_NAME>
- <![CDATA[
Абанский муниципальный район
]]>
</MR_NAME>
- <OKTMO_MR_NAME>
- <![CDATA[
04601000
]]>
</OKTMO_MR_NAME>
- <MO_NAME>
- <![CDATA[
Абанское
]]>
</MO_NAME>
- <OKTMO_NAME>
- <![CDATA[
04601151
]]>
</OKTMO_NAME>
<RST_ORG_ID>26499268</RST_ORG_ID>
- <ORG_NAME>
- <![CDATA[
ООО "Водоканал Абанского района"
]]>
</ORG_NAME>
- <INN_NAME>
- <![CDATA[
2401003997
]]>
</INN_NAME>
- <KPP_NAME>
- <![CDATA[
240101001
]]>
</KPP_NAME>
</record>
- <record>

И вытащить из него данные. Вопрос как это можно сделать? Есть ли какой виртуальный справочник в 1с? Чтобы в него все загрузить? Если есть как к нему обращаться! Заранее всем благодарен.
...
Рейтинг: 0 / 0
Нужна подсказка специалиста
    #37679688
Leross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как обьявить виртуальную таблицу?
...
Рейтинг: 0 / 0
Нужна подсказка специалиста
    #37679755
Александр Пузаков
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Leross,

Посмотрите в синтаксис-помощнике ЧтениеXML.
...
Рейтинг: 0 / 0
Нужна подсказка специалиста
    #37679759
Александр Пузаков
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
LerossКак обьявить виртуальную таблицу?

Что подразумеваете под виртуальной таблицей?
...
Рейтинг: 0 / 0
Нужна подсказка специалиста
    #37679784
Leross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Александр ПузаковLerossКак обьявить виртуальную таблицу?

Что подразумеваете под виртуальной таблицей?





Данный файл, нужно выкачать с сервера и поместить в некую область данных для работы с информацией (виртуальный справочник если есть такой, или массив - сто скорее всего). Так как доступа для работы с самой конфигурацией я иметь не буду, что бы создать простой справочник или форму.
...
Рейтинг: 0 / 0
Нужна подсказка специалиста
    #37679799
Александр Пузаков
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Leross,

Данные эти в ИБ оседать будут?
...
Рейтинг: 0 / 0
Нужна подсказка специалиста
    #37679834
Leross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Александр ПузаковLeross,

Данные эти в ИБ оседать будут?

Данные нужны для проверки правильности ввода данных пользователем.
Это будет внешний отчет, Пользователь вводит данные об организации (Инн, Кпп, Бик и тд) я подгружаю данные с внешнего реестра.
Нахожу там данную орг. проверяю правильно или нет. Пользователь заполняет стандартную форму 46. И выгружает в XLM. И дальше обратно на сервак. Выгрузка сделана. А вот как правильно сделать проверку, что то не получается.
...
Рейтинг: 0 / 0
Нужна подсказка специалиста
    #37679856
Александр Пузаков
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Leross,

Версия 1С какая?
...
Рейтинг: 0 / 0
Нужна подсказка специалиста
    #37680210
Leross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1с 8,1.15.14
...
Рейтинг: 0 / 0
Нужна подсказка специалиста
    #37680323
Александр Пузаков
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Leross,

Считывайте данные из файла XML при помощи DOM:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
Процедура ПрочитатьXML(ПутьКФайлу)

	// Считываем содержимое файла на диске
	ЧтениеXML = Новый ЧтениеXML;
	ЧтениеXML.ОткрытьФайл(ПутьКФайлу);
	
	ПостроительDOM = Новый ПостроительDOM;
	
	// Создаем экземпляр документа DOM
	ДокументDOM = ПостроительDOM.Прочитать(ЧтениеXML);
	
	// При помощи рекурсии считываем данные документа DOM
   	ПрочитатьУзелРекурсивно(ДокументDOM);

КонецПроцедуры

Процедура ПрочитатьУзелРекурсивно(УзелДокумента)

	Для каждого ПодчиненныйУзел Из УзелДокумента.ДочерниеУзлы Цикл
		
		Сообщить(ПодчиненныйУзел.ИмяУзла + " | " +  ПодчиненныйУзел.ТекстовоеСодержимое);
		
		// Считываем "внутренние" узлы
		ПрочитатьУзелРекурсивно(ПодчиненныйУзел);
			
	КонецЦикла; 

КонецПроцедуры



Можно и при помощи других объектов прочитать файл, но с DOM это ловчее получается (на мой взгляд).

Дальше разбирайтесь сами :)
...
Рейтинг: 0 / 0
Нужна подсказка специалиста
    #37680363
Leross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо огромное!) Дальше точно справлюсь!
...
Рейтинг: 0 / 0
Нужна подсказка специалиста
    #37680384
Leross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо огромное!) Дальше точно справлюсь!
...
Рейтинг: 0 / 0
12 сообщений из 12, страница 1 из 1
Форумы / [игнор отключен] [закрыт для гостей] / Нужна подсказка специалиста
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]