Buxxter

42
Рейтинг

Buxxter



  •   Регистрация: 03.09.2007 (16 лет назад)

  •   Был(а) на сайте: 19.10.2021

Подписчики 2

Рейтинг 42

Просмотр реквизитов (8.1) v1.2

Инструменты и обработки Программист Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m) Внешняя обработка (ert,epf) Инструментарий разработчика

Обработка позволяет просматривать реквизиты объектов в ИБ (а также реквизиты табличных частей этих объектов). Полезна для программного создания корректных объектов (на основе интерактивно созданных).

1 стартмани

30.07.2009    4083    63    Buxxter    33       

42

Комментарии

DevАльтернативные способы работы с XML. Часть 2: Введение в xPath или запросы к XML#10 24.02.14 19:49
Исходный файл:
Код
<?xml version="1.0" encoding="UTF-8"?>
<aaa>
   <qq>
      <ololo/>
   </qq>
   <cjhg/>
   <ybkajs>
      <whvfsj/>
      <uahsf>
         <ibbbwjke/>
         <ibbbwjke/>
         <ibbbwjke/>
         <ibbbwjke/>
      </uahsf>
   </ybkajs>
   <bbb>
      <ccc name="Пыщь1"/>
      <ccc name="Пыщь2"/>
      <ccc name="Пыщь3"/>
      <ccc name="Пыщь4"/>
      <ccc name="Пыщь5"/>
      <coc name="ПыщьЛевый"/>
   </bbb>
</aaa>


Код в 1с:
Код
ЧтениеХМЛ = Новый ЧтениеXML;
ЧтениеХМЛ.ОткрытьФайл("C:\test.xml");

ПостроительДом = Новый ПостроительDOM;
ДокументДом = ПостроительДом.Прочитать(ЧтениеХМЛ);

Разыменовыватель = Новый РазыменовательПространствИменDOM(ДокументДом);
Выражение = ДокументДом.СоздатьВыражениеXPath("/aaa/bbb/*", Разыменовыватель);
Рез = Выражение.Вычислить(ДокументДом);

ПолученныйЭлемент = Рез.ПолучитьСледующий();

Пока ПолученныйЭлемент <> Неопределено Цикл
   
   ИмяЭл   = ПолученныйЭлемент.Атрибуты.ПолучитьИменованныйЭлемент("name");
   
   Если ИмяЭл = Неопределено Тогда
      ПолученныйЭлемент = Рез.ПолучитьСледующий();
      Продолжить;
   КонецЕсли;
   
   Сообщить(ИмяЭл);
ПолученныйЭлемент = Рез.ПолучитьСледующий();

КонецЦикла;


Результат окна сообщений:
Код
Пыщь1
Пыщь2
Пыщь3
Пыщь4
Пыщь5
ПыщьЛевый


Со звездочками уже сами поэкспериментируйте как-нть
DevВызов хранимой процедуры из 1с через ado#8 23.05.12 15:00
После создания параметра его нужно добавить в коллекцию параметров:
Код
ParamOrg = Command.CreateParameter("@OrganizationID", 129, 1, 36, "73167096-974F-495E-9CED-6885E07408AB");
Command.Parameters.Append(ParamOrg);
DevНестандартный синтаксис оператора "ВЫБОР" в запросе.#50 02.08.10 11:05
Мне вот всегда было интересно: как совершаются подобные открытия???
Я всегда, как дурак, матерясь на разработчиков платфомы, писал:
Код
ВЫБОР КОГДА &Перем = 1 ТОГДА
   "Один"
ИНАЧЕ
   ВЫБОР КОГДА &Перем = 2 ТОГДА
      "Два"
   ИНАЧЕ
     ...
   КОНЕЦ
КОНЕЦ


и т.д.

Спасибо.
З.Ы. Оказывается, материть надо было тех. писателей, которые пропустили это в документации.

З.З.Ы.
Форматирование пробелами убивается, "Оформление в виде кода" не помогает. Как вы это делаете?
DevПросмотр реквизитов (8.1) v1.2#30 28.05.10 14:10
Дошли руки наконец-то :D
ПубликацииТребуется специалист 1С 8.x (Москва) от сейчас и надолго...#84 08.11.09 6:55
Кстати, опять переливаете из пустого в порожнее, на частностях зациклились.
ПубликацииТребуется специалист 1С 8.x (Москва) от сейчас и надолго...#83 08.11.09 6:50
Пипец вы тут чат устроили... у меня мыло завалено уведомлениями о ваших каментах.
DevКонструктор запроса для 7.7#45 05.11.09 16:17
Какой из двух файлов для чего нужен? Какой качать? (Лучше в шапку добавить инфу)
ПубликацииТребуется специалист 1С 8.x (Москва) от сейчас и надолго...#49 21.10.09 17:51
(47) Прочитал таки ветку ))) там и так уже пицот решений написано. Зачем так делать? Просто времени хотелось отнять?
ПубликацииТребуется специалист 1С 8.x (Москва) от сейчас и надолго...#48 21.10.09 17:27
(47) Понял. Все уже реализовано. Текст функции пишешь в регистр сведений. Формируешь ТЗ с аргументами функций с колонками:
ИмяПараметра
ЗначениеПараметра
ЭтоФункция (Булево).
При расчете значения функции делаешь цикл по строкам таблицы:

Для Каждого Стр Из ТЗ
ТекстДляВыполнения = ТекстДляВыполнения + Символы.ПС +
Стр.ИмяПарметра + " = " + ?(Стр.ЭтоФункция, "Выполнить(" + Стр.Значение + ")", Стр.Значение) + ";";
КонецЦикла

ТекстДляВыполнения = ТекстДляВыполнения + Символы.ПС +
"Возврат " + ТекстСамойФункции;

ЗначениеФции = Выполнить(ТекстДляВыполнения);

Предупреждение(ЗначениеФции, "Результат");

Неохота сейчас по форуму ковыряться, может кто-то уже предложил. Если есть желание, можешь присвоить идею себе и вписать туда.
ПубликацииТребуется специалист 1С 8.x (Москва) от сейчас и надолго...#46 21.10.09 16:45
(45) Только не просто ради инереса, справлюсь ли я или нет. Только если действительно надо.