Получение дерева подчиненности.

Публикация № 84596 26.04.11

Разработка - Универсальные функции

Одна функция и 3 процедуры, которые следует разместить в общем модуле (клиент, сервер). Возвращает дерево значений родительских и подчиненных документов от переданного документа через входной параметр "Ссылка". Выполняться может на сервере.

 

 

 

// Получение дерева подчиненности (родительские и подчиненные документы)
Функция ДеревоПодчиненности(Ссылка) Экспорт

   
ДеревоДокументов = Новый ДеревоЗначений;
   
ДеревоДокументов.Колонки.Добавить("Ссылка");
   
ДеревоДокументов.Колонки.Добавить("ДокументПредставление");
   
ДеревоДокументов.Колонки.Добавить("Проведен");
   
ДеревоДокументов.Колонки.Добавить("ПометкаУдаления");
   
ДеревоДокументов.Колонки.Добавить("ВидДокумента");
   
мУжеВСписке = Новый Соответствие;

    мДерево = ДеревоДокументов;
   
ВывестиРодительскиеДокументы(Ссылка, мУжеВСписке, мДерево);
   
ВывестиПодчиненныеДокументы(мДерево, мУжеВСписке);

    Возврат
ДеревоДокументов;

КонецФункции
//
Процедура ВывестиРодительскиеДокументы(ДокументСсылка, мУжеВСписке, мДерево)

   
МетаданныеДокумента = ДокументСсылка.Метаданные();
   
СписокРеквизитов = Новый СписокЗначений;

    Для Каждого
Реквизит ИЗ МетаданныеДокумента.Реквизиты Цикл
       
ТипыРеквизита = Реквизит.Тип.Типы();
        Для Каждого
ТекущийТип ИЗ ТипыРеквизита Цикл
           
МетаданныеРеквизита = Метаданные.НайтиПоТипу(ТекущийТип);

            Если
МетаданныеРеквизита<>Неопределено И Метаданные.Документы.Содержит(МетаданныеРеквизита)
                И
ПравоДоступа("Чтение", МетаданныеРеквизита) Тогда
                Попытка
                   
ЗначениеРеквизита = ДокументСсылка[Реквизит.Имя];
                Исключение
                    Прервать;
                КонецПопытки;
                ЕСли
ЗначениеРеквизита<>Неопределено И НЕ ЗначениеРеквизита.Пустая() И ТипЗнч(ЗначениеРеквизита) = ТекущийТип
                    И мУжеВСписке[ЗначениеРеквизита] = Неопределено И СписокРеквизитов.НайтиПоЗначению(ДокументСсылка[Реквизит.Имя]) = Неопределено Тогда
                   
СписокРеквизитов.Добавить(ЗначениеРеквизита,Формат(ЗначениеРеквизита.Дата,"ДФ=yyyyMMddЧЧММсс"));
                КонецЕсли;
            КонецЕсли;

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

    Для Каждого
ТЧ Из МетаданныеДокумента.ТабличныеЧасти Цикл
       
СтрРеквизитов = "";

        Попытка
           
СодержимоеТЧ = ДокументСсылка[ТЧ.Имя].Выгрузить();
        Исключение
            Прервать;
        КонецПопытки;

        Для Каждого
Реквизит ИЗ ТЧ.Реквизиты Цикл
           
ТипыРеквизита = Реквизит.Тип.Типы();
            Для Каждого
ТекущийТип ИЗ ТипыРеквизита Цикл
               
МетаданныеРеквизита = Метаданные.НайтиПоТипу(ТекущийТип);
                Если
МетаданныеРеквизита<>Неопределено И Метаданные.Документы.Содержит(МетаданныеРеквизита)
                    И
ПравоДоступа("Чтение", МетаданныеРеквизита) Тогда
                   
СтрРеквизитов = СтрРеквизитов + ?(СтрРеквизитов = "", "", ", ") + Реквизит.Имя;
                    Прервать;
                КонецЕсли;
            КонецЦикла;
        КонецЦикла;

       
СодержимоеТЧ.Свернуть(СтрРеквизитов);
        Для Каждого
КолонкаТЧ ИЗ СодержимоеТЧ.Колонки Цикл
            Для Каждого
СтрокаТЧ ИЗ СодержимоеТЧ Цикл
                Попытка
                   
ЗначениеРеквизита = СтрокаТЧ[КолонкаТЧ.Имя];
                Исключение
                    Продолжить;
                КонецПопытки;
               
МетаданныеЗначения = Метаданные.НайтиПоТипу(ТипЗнч(ЗначениеРеквизита));
                Если
МетаданныеЗначения = Неопределено Тогда
                   
// базовый тип
                   
Продолжить;
                КонецЕсли;

                ЕСли
ЗначениеРеквизита<>Неопределено И НЕ ЗначениеРеквизита.Пустая()
                    И
Метаданные.Документы.Содержит(МетаданныеЗначения)
                    И
мУжеВСписке[ЗначениеРеквизита] = Неопределено Тогда
                    Если
СписокРеквизитов.НайтиПоЗначению(ЗначениеРеквизита) = Неопределено Тогда
                       
СписокРеквизитов.Добавить(ЗначениеРеквизита,Формат(ЗначениеРеквизита.Дата,"ДФ=yyyyMMddЧЧММсс"));
                    КонецЕсли;
                КонецЕсли;
            КонецЦикла;
        КонецЦикла;
    КонецЦикла;
   
СписокРеквизитов.СортироватьПоПредставлению();
   
мУжеВСписке.Вставить(ДокументСсылка, Истина);

    Если
СписокРеквизитов.Количество() = 1 Тогда
       
ВывестиРодительскиеДокументы(СписокРеквизитов[0].Значение, мУжеВСписке, мДерево);
    ИначеЕсли
СписокРеквизитов.Количество() > 1 Тогда
       
ВывестиБезРодителей(СписокРеквизитов, мУжеВСписке, мДерево);
    КонецЕсли;


   
СтрокаДерева = мДерево.Строки.Добавить();
   
Запрос = Новый Запрос("ВЫБРАТЬ РАЗРЕШЕННЫЕ Ссылка, Проведен, ПометкаУдаления, Представление, """ + МетаданныеДокумента.Имя + """ КАК Метаданные
    | ИЗ Документ."
+МетаданныеДокумента.Имя + " ГДЕ Ссылка = &Ссылка");

   
Запрос.УстановитьПараметр("Ссылка", ДокументСсылка);

   
Выборка  = Запрос.Выполнить().Выбрать();
    Если
Выборка.Следующий() Тогда
       
СтрокаДерева.Ссылка = Выборка.Ссылка;
       
СтрокаДерева.ДокументПредставление = Выборка.Ссылка.Метаданные().Синоним + " " + Выборка.Ссылка.Номер;
       
СтрокаДерева.Проведен = Выборка.Проведен;
       
СтрокаДерева.ПометкаУдаления = Выборка.ПометкаУдаления;
       
СтрокаДерева.ВидДокумента = Выборка.Метаданные;
    Иначе
       
СтрокаДерева.Ссылка= ДокументСсылка;
    КонецЕсли;

   
мДерево = СтрокаДерева;

КонецПроцедуры
//
Процедура ВывестиПодчиненныеДокументы(СтрокаДерева, мУжеВСписке)

   
ТекущийДокумент = СтрокаДерева.Ссылка;
   
ТипДокумента = ТипЗнч(ТекущийДокумент);
   
СтруктураРеквизитов = Новый ТаблицаЗначений;
   
СтруктураРеквизитов.Колонки.Добавить("ПутьКДанным");
   
СтруктураРеквизитов.Колонки.Добавить("ИмяРеквизита");

    Для каждого
Док ИЗ Метаданные.Документы Цикл
        Если НЕ
ПравоДоступа("Чтение", Док) Тогда
            Продолжить;
        КонецЕсли;

        Для Каждого
Реквизит Из Док.Реквизиты Цикл
            Если
Реквизит.Тип.СодержитТип(ТипДокумента) Тогда
               
НовСтр = СтруктураРеквизитов.Добавить();
               
НовСтр.ПутьКДанным = Док.Имя;
               
НовСтр.ИмяРеквизита = Реквизит.Имя;
            КонецЕсли;
        КонецЦикла;

        Для Каждого
ТЧ ИЗ Док.ТабличныеЧасти Цикл
            Для Каждого
Реквизит Из ТЧ.Реквизиты Цикл
                Если
Реквизит.Тип.СодержитТип(ТипДокумента) Тогда
                   
НовСтр = СтруктураРеквизитов.Добавить();
                   
НовСтр.ПутьКДанным = Док.Имя+"."+ТЧ.Имя;
                   
НовСтр.ИмяРеквизита = Реквизит.Имя;
                КонецЕсли;
            КонецЦикла;
        КонецЦикла;

    КонецЦикла;
   
ТекстЗапроса = "";
    Для Каждого
КлючИЗначение Из СтруктураРеквизитов Цикл

        Если
Найти(КлючИЗначение.ПутьКДанным, ".") = 0 Тогда

           
ТекстЗапроса = ТекстЗапроса + "
            |Выбрать "
+ ?(ТекстЗапроса="", "РАЗРЕШЕННЫЕ ", "") + "Ссылка, Ссылка.Дата Как ДатаДок, Представление, Проведен, ПометкаУдаления, """+ КлючИЗначение.ПутьКДанным +""" КАК ВидДокумента ИЗ Документ."+КлючИЗначение.ПутьКДанным+"
            |ГДЕ "
+КлючИЗначение.ИмяРеквизита+"=&ДокументОснование
            |ОБЪЕДИНИТЬ ВСЕ
            |"
;

        Иначе
           
ПозицияТочки = Найти(КлючИЗначение.ПутьКДанным, ".");
           
ТекстЗапроса = ТекстЗапроса + "
            |Выбрать "
+ ?(ТекстЗапроса="", "РАЗРЕШЕННЫЕ ", "") + "Ссылка, Ссылка.Дата Как ДатаДок, Ссылка.Представление,  Ссылка.Проведен, Ссылка.ПометкаУдаления, """+ Лев(КлючИЗначение.ПутьКДанным, ПозицияТочки-1) +""" КАК ВидДокумента ИЗ Документ."+КлючИЗначение.ПутьКДанным+"
            |ГДЕ "
+КлючИЗначение.ИмяРеквизита+"=&ДокументОснование
            |ОБЪЕДИНИТЬ ВСЕ
            |"
;

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

    Если
ТекстЗапроса="" Тогда
        Возврат;
    КонецЕсли;

   
ТекстЗапроса = Лев (ТекстЗапроса, СтрДлина(ТекстЗапроса)-15);
   
ТекстЗапроса = ТекстЗапроса+ "
    |УПОРЯДОЧИТЬ ПО  ДатаДок"
;

   
Запрос = Новый Запрос(ТекстЗапроса);
   
Запрос.УстановитьПараметр("ДокументОснование", ТекущийДокумент);
   
Выборка = Запрос.Выполнить().Выбрать();


    Пока
Выборка.Следующий() Цикл
        Если
мУжеВСписке[Выборка.Ссылка] = Неопределено Тогда
           
НоваяСтрока = СтрокаДерева.Строки.Добавить();
           
НоваяСтрока.Ссылка = Выборка.Ссылка;
           
НоваяСтрока.ДокументПредставление = Выборка.Ссылка.Метаданные().Синоним + " " + Выборка.Ссылка.Номер;
           
НоваяСтрока.Проведен = Выборка.Проведен;
           
НоваяСтрока.ПометкаУдаления = Выборка.ПометкаУдаления;
           
НоваяСтрока.ВидДокумента = Выборка.ВидДокумента;
           
мУжеВСписке.Вставить(Выборка.Ссылка, Истина);
           
ВывестиПодчиненныеДокументы(НоваяСтрока, мУжеВСписке);
        КонецЕсли;
    КонецЦикла;

КонецПроцедуры
//
Процедура ВывестиБезРодителей(СписокДокументов, мУжеВСписке, мДерево)

    Для Каждого
ЭлементСписка Из СписокДокументов Цикл

       
МетаданныеДокумента = ЭлементСписка.Значение.Метаданные();

       
Запрос = Новый Запрос("ВЫБРАТЬ РАЗРЕШЕННЫЕ Ссылка, Проведен, ПометкаУдаления, Представление, """ + МетаданныеДокумента.Имя + """ КАК Метаданные
        | ИЗ Документ."
+МетаданныеДокумента.Имя + " ГДЕ Ссылка = &Ссылка");

       
Запрос.УстановитьПараметр("Ссылка", ЭлементСписка.Значение);

       
Выборка  = Запрос.Выполнить().Выбрать();
        ЕСли
Выборка.Следующий() Тогда
            Если
мУжеВСписке[Выборка.Ссылка] = Неопределено Тогда
               
СтрокаДерева = мДерево.Строки.Добавить();
               
СтрокаДерева.Ссылка= Выборка.Ссылка;
               
СтрокаДерева.ДокументПредставление = Выборка.Ссылка.Метаданные().Синоним + " " + Выборка.Ссылка.Номер;
               
СтрокаДерева.Проведен = Выборка.Проведен;
               
СтрокаДерева.ПометкаУдаления = Выборка.ПометкаУдаления;
               
СтрокаДерева.ВидДокумента = Выборка.Метаданные;
               
мУжеВСписке.Вставить(Выборка.Ссылка, Истина);
            КонецЕсли;
        КонецЕсли;
    КонецЦикла;

   
мДерево = СтрокаДерева;

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


Специальные предложения

Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. OLEG4120 162 27.04.11 09:00 Сейчас в теме
2. vladnet 357 27.04.11 11:13 Сейчас в теме
По мне так нет такого понятия как дерево подчиненных документов, есть граф подчиненных документов http://infostart.ru/public/20369/
3. sbv2005 345 27.04.11 12:08 Сейчас в теме
(2) Писал как вариант для оперативного алгоритма, поэтому и делал под сервер тоже, без форм.
4. w-divin 27.04.11 14:12 Сейчас в теме
(2) По мне - так есть дерево подчиненных документов, имеющее корень(родительский, первый документ) и ветви (всё что на него ссылается). а по графу - я в Вашей теме оставил пару комментов (((
5. w-divin 27.04.11 14:22 Сейчас в теме
(2) и опять же производительность:
Данный вариант:
Замер:
Результат:

И Ваш вариант (дубль из коммента в Вашей теме):
Замер:
Результат:
6. w-divin 27.04.11 14:25 Сейчас в теме
(0) за "под сервер" плюсеГ ))) все леньки было самому рисовать ))) как оказалось не зря ленился )))
Оставьте свое сообщение

См. также

Расширение: Быстрые отборы через буфер [Alt+C] Копировать список, [Alt+V] Вставить список, [Ctrl+C] Копировать из файлов

Универсальные обработки Инструментарий разработчика Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

Копирует в буфер значения из списков, из ячеек отчетов, таблиц, настроек списков, других отборов и вставляет в выбранную настройку отбора. Работает с Объект не найден. Работает как в одной так и между разными базами 1С. Использует комбинации [Alt+C] Копировать список, [Alt+V] Вставить список. Также для копирования данных используется стандартная [Ctrl+C] (например из открытого xls, mxl, doc и т.п. файла скопировать список наименований)

1 стартмани

13.10.2022    11950    89    sapervodichka    92    

114

Система контроля ведения учета [БСП]

Универсальные функции Механизмы типовых конфигураций БСП (Библиотека стандартных подсистем) Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

В данном материале рассмотрим типовой алгоритм подсистемы контроля учета БСП в конфигурациях на примерах.

18.07.2022    5542    quazare    8    

101

Хитрости СКД. Часть 3

СКД Универсальные функции Платформа 1С v8.3 Система компоновки данных Конфигурации 1cv8 Бесплатно (free)

Столкнулся с тем, что мне приходится писать гору отчетов. Во многих приходится использовать повторяющиеся приемы. Решил написать шпаргалку, которая, надеюсь пригодится не только мне. В этой статье: Объединение ячеек в отчете только на определенном уровне иерархии, Постобработка итогов в табличном документе, Скрытие колонок в зависимости от количества месяцев в периоде.

28.05.2022    6700    milkers    11    

87

Базовые принципы работы с регламентными заданиями подсистем БСП

Универсальные функции БСП (Библиотека стандартных подсистем) Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

В очередной публикации рассмотрим некоторые базовые приемы работы с регламентными заданиями в рамках библиотеки стандартных подсистем

22.05.2022    9576    quazare    25    

54

Модули общего назначения - готовые полезные функции и процедуры конфигураций на БСП

Универсальные функции БСП (Библиотека стандартных подсистем) Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

В данной статье я рассматриваю несколько полезных "классических" функций и процедур для работы с данными, которые уже встроены в БСП и готовы к использованию.

25.04.2022    10265    quazare    11    

130

Полезный код для программистов 1С (часть 3). Подготовка печатных форм + подсистема Управление печатью (БСП)

БСП (Библиотека стандартных подсистем) Универсальные функции Платформа 1С v8.3 Бесплатно (free)

Мы все любим 1С, не так ли? Вот дает 1С прекрасный механизм возможности модификации макетов печатных форм в БСП. А из всех рекомендаций это получение макета и заполнение параметров областей. И вы спросите: "А что не так... ты печатные формы накодить не можешь без указаний сверху?". Да вот в том то и дело, что я могу все. А вот пользователям от такого механизма пользы 0, если из всех доступных изменений остаются только шрифты, да текст произвольный накинуть. А ведь можно больше, надо только соблюдать несколько правил при подготовке печатных форм...

07.03.2022    9958    vandalsvq    0    

57

Конвертируем печатную форму pdf в картинку (jpg, gif, png и прочие) на сервере

Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Была поставлена интересная задача конвертировать печатную форму в файл картинку. По условию задачи клиенту на почту нужно присылать только файл картинку (jpg, gif).

22.12.2021    6396    John_d    25    

46

Несколько простых приемов для удобной работы в конфигураторе

Универсальные функции Механизмы платформы 1С Платформа 1С v8.3 Бесплатно (free)

Простая и удобная среда разработки 1С:Предприятия позволяет практически любому человеку начать работать под капотом 1С - в конфигураторе. Время идет, новички становятся программистами, специалистами, а об удобных приемах работы узнают годами, по ходу своего карьерного пути. А здорово было бы, если бы все знали удобные приемы в начале своего пути? Эти несколько приемов будут полезны новичкам, так как они затрагивают ту область работы, с которой приходится сталкиваться в начале карьеры.

12.11.2021    13691    acces969    95    

142

Добавление электронной подписи в документ PDF

Универсальные функции Платформа 1С v8.3 1С:Бухгалтерия 3.0 Абонемент ($m)

Как добавить подпись прямо в файл PDF, чтобы не нужно было файлы подписи передавать отдельно.

1 стартмани

26.08.2021    15947    37    fotov    19    

41

Из Word в табличный документ

Универсальные функции Платформа 1С v8.3 Платформа 1C v8.2 Бесплатно (free)

Быстро и просто: текст, списки, таблицы. Готовый код

18.08.2021    4804    Yashazz    6    

64

Префиксация объектов - полезный типовой функционал БСП

Универсальные функции БСП (Библиотека стандартных подсистем) Платформа 1С v8.3 Конфигурации 1cv8 Россия Бухгалтерский учет Управленческий учет Бесплатно (free)

В данной публикации предлагаю рассмотреть основные типовые возможности библиотеки стандартных подсистем (БСП), касаемые префиксации объектов конфигураций.

21.06.2021    11004    quazare    4    

62

Модель запроса

Универсальные функции Платформа 1С v8.3 Запросы Конфигурации 1cv8 Россия Абонемент ($m)

Работа с текстом запроса напрямую не позволяет просто обратиться к определенному полю, таблице или условию. Однако, работая со схемой, можно добавить к существующему условию новое или вообще включить его в состав другой группы. Как ни странно, в типовых решениях часто можно встретить код работы с текстом запроса наряду с использование схемы. Возможно появление удобной библиотеки или нового объектного подхода позволит отказаться от работы с текстом совсем, а код построения запроса будет аутентичен исходному запросу, но без избыточности и доступный для простой модификации.

1 стартмани

01.03.2021    5230    kalyaka    26    

47

Сохранение настроек

Универсальные функции БСП (Библиотека стандартных подсистем) Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Делюсь еще одним не самым очевидным способом хранения настроек в базах на БСП без доработки конфигурации. Весь код в статье.

22.11.2020    9900    ixijixi    8    

68

Произвольные колонтитулы и повтор шапки таблицы в табличном документе (функция)

Универсальные функции Платформа 1С v8.3 Бесплатно (free)

Пример рекурсивной функции, при помощи которой в табличный документ можно выводить верхний или нижний колонтитулы с произвольным содержимым, а также делать повтор шапки таблицы (или таблиц, если их несколько).

07.10.2020    13634    ellavs    7    

39

Лайфхаки для разработчиков 1С. Часть 1

Универсальные функции Механизмы платформы 1С Платформа 1С v8.3 Россия Бесплатно (free)

Собрали 20 лайфхаков, которые используют наши программисты при работе с 1С. Формы, контрагенты, СКД, процедуры, глюки платформы и многое другое. В этой статье публикуем первую часть.

30.09.2020    9706    Neti    47    

69

Самый простой парсинг и обработка веб-страниц в 1С

WEB-интеграция Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Рассмотрим самый простой парсинг веб-страниц средствами платформы 1С и еще некоторые полезные приемы работы с веб-страницами.

07.08.2020    25091    Infostart    30    

146

Полезные встроенные функции для работы с печатными формами и не только на УТ 11.4 и БП 3.0 (сравнение)

Универсальные функции Платформа 1С v8.3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 Россия Бесплатно (free)

В данном обзоре приведу примеры встроенных используемых функций для работы с печатными формами на примерах конфигураций Управление торговлей 11.4 и Бухгалтерия 3.0.

10.07.2020    15253    quazare    7    

94

Форма выбора (подбор) в управляемых формах

Универсальные функции Работа с интерфейсом Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Россия Бесплатно (free)

Разбор небольших примеров того, как правильно открывать форму выбора (подбора) в управляемых формах, не прибегая к модальным окнам.

08.05.2020    180440    user5300    40    

291

Получаем уровень группировки ячейки табличного документа

Универсальные функции Платформа 1С v8.3 Бесплатно (free)

Табличные документы отчетов часто формируются с разными уровнями группировок и иногда требуется определить номер уровня ячейки. Предлагаю свои функции, которые позволяют определить, как горизонтальный, так и вертикальный уровень группировки любой ячейки табличного документа.

23.03.2020    8822    maxx    16    

57

Дополнительные функции для 1С:Документооборот

Универсальные функции Платформа 1С v8.3 1С:Документооборот Управленческий учет Абонемент ($m)

В данной публикации я хочу поделиться расширением, которое содержит дополнительные функции (доработки) для 1С:Документооборот.

1 стартмани

24.01.2020    30161    217    pavelpribytkin96    48    

56

Сходство Джаро - Винклера. Нечеткое сравнение строк

Универсальные функции Платформа 1С v8.3 Россия Бесплатно (free)

В области информатики и статистики сходство Джаро - Винклера представляет собой меру схожести строк для измерения расстояния между двумя последовательностями символов. В публикации рассмотрены некоторые особенности алгоритма, и представлен вариант его реализации на языке 1С.

25.12.2019    11342    brooho    21    

170

Автоматическое создание связанного объекта в базе 1С: Документооборот через бесшовную интеграцию

Универсальные функции Механизмы типовых конфигураций Платформа 1С v8.3 1С:Документооборот 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Бесплатно (free)

При настройке бесшовной интеграции с базой документооборота часто возникает задача - пользователи просят автоматически создавать связанный объект в базе документооборота по некоторому условию. В данной публикации я хочу поделиться своим решением данной задачи.

23.12.2019    6169    pavelpribytkin96    3    

39

Быстрое создание наполненных коллекций

Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Разберем самые частые способы создания коллекции, значения которой известны заранее. И сравним скорость их выполнения.

28.10.2019    9171    SeiOkami    69    

69

Преобразование XML в таблицу значений или иной объект 1С методом XSL преобразования

Универсальные функции Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Сразу открою интригу, напрямую прочитать XML, не содержащий объект 1С, не удастся. Статья раскрывает способы привести XML к формату, который возможно прочитать средствами платформы.

24.10.2019    21430    kraspila    33    

58

Обертка функций Excel на русском. Ускорение процесса разработки.

Загрузка и выгрузка в Excel Универсальные функции Платформа 1С v8.3 Бесплатно (free)

Устали переключаться с русского на английский и обратно при работе с таблицами Excel из 1С? Сборка наиболее необходимых функций и методов работы с Excel, обернутых в функции 1С на русском языке.

24.10.2019    8966    DmitryKotov    6    

56

Вывод QR-кода типовыми средствами.

Сканер штрих-кода Универсальные функции Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Управление торговлей 10 1С:Управление производственным предприятием Абонемент ($m)

Вывод QR-кода типовыми средствами. На данный момент очень часто нужно вывести в печатную форму QR-код. Показываю как на примере типового кода из УТ11 это сделать. Можно использовать в любых конфигурациях с обычными формами.

1 стартмани

21.10.2019    66482    137    Емельянов Алексей    57    

51

Методика независимой системы "Подписки на события"

Универсальные функции Платформа 1С v8.3 1С:Управление производственным предприятием Бесплатно (free)

В этой небольшой статье я хочу вам предложить пошаговое описание разработки системы управления "Подписками на события" для документов. Цель разработки - возможность управления подписками в вашей конфигурации, не прибегая к программированию через конфигуратор. Думаю, будет полезно и интересно!

17.10.2019    18821    aximo    35    

72

Полезные процедуры и функции для программиста

Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Россия Бесплатно (free)

Все мы пишем программный код и часто используем процедуры, облегчающие его написание. Ниже приведена выборка таких полезных процедур и функций.

07.10.2019    48046    HostHost    41    

284

Документ на документ. Автоматическое создание связанных документов

Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Пример решения простой и распространенной задачи - автоматическое создание документа на основании другого документа.

16.09.2019    19552    Infostart    36    

75

"Хочу универсально!" [Часть 1]

Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Сентябрьская серия статей про то, как начинающий разработчик Вася проходит путь от простой задачки к созданию своего механизма. На этот раз - открытие значения из текущей колонки.

02.09.2019    11650    SeiOkami    35    

76

Запуск фонового задания во внешней обработке. Отключение предупреждений защиты от опасных действий в фоновом задании

Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

Как запустить фоновое задание из модуля внешней обработки используя БСП. Как отключить безопасный режим и сообщения защиты от опасных действий независимо от профиля безопасности пользователя в фоновом задании во внешней обработке.

2 стартмани

24.08.2019    24753    BenGunn    29    

132

10 способов получить модуль числа (а может, и больше)

Математика и алгоритмы Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

Пишем функцию вычисления модуля числа. Сколько способов существует? Давайте посчитаем!

1 стартмани

11.07.2019    26815    sam441    38    

56

Реализуем Стек, Очередь и Приоритетную очередь в 1С

Математика и алгоритмы Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Россия Бесплатно (free)

В статье рассматриваются способы реализации таких абстрактных структур данных, как стек, очередь и приоритетная очередь, используя готовые типы данных 1С. Выявляются "узкие" места, сложные моменты в реализации и сравнивается скорость работы.

24.06.2019    19678    RonX01    70    

88

Экспортные процедуры и функции общих модулей БП 3.0, ЗУП 3.1, УТ 11

Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Россия Абонемент ($m)

Таблицы экспортных процедур и функций общих модулей конфигураций БП КОРП 3.0, ЗУП КОРП 3.1, УТ 11 + обработка по формированию такой таблицы из любой конфигурации.

14.06.2019    19242    35    SanchoD    33    

42

Работа с графической схемой в объектной модели DOM

Универсальные функции Платформа 1С v8.3 Управляемые формы Абонемент ($m)

Пример кода для работы с графической схемой в объектной модели DOM, платформа 8.3.12.

1 стартмани

04.06.2019    8880    botokash    19    

51

Создание внешней печатной формы в формате документа Word

Адаптация типовых решений Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

В статье написано, как создать внешнюю печатную форму (для конфигураций с БСП) в формате Word.

1 стартмани

17.05.2019    40737    ВикторП    28    

69

Программное формирование картинки в 1С:Предприятие 8.3.9 (ПотокВПамяти / ЗаписьДанных)

Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

В статье представлен код программного формирования картинки (двоичные данные) без всяких внешних компонент, без формирования строки Base64, используя лишь встроенные механизмы 1С предприятие 8.3.9 (объекты ПотокВПамяти и ЗаписьДанных). Сам по себе код формирования картинки не несёт ничего нового. Всё описано в википедии. Захотелось попробовать новые методы, но никак не доходитили руки. В приложении обработка практически с этим же кодом.

1 стартмани

16.05.2019    13936    yku    11    

67