ПланСчетовОбъект.<Имя плана счетов>.Родитель

Свойства · Parent

Тип: ПланСчетовСсылка.<Имя плана счетов>. Содержит ссылку на родителя элемента плана счетов. Для элементов верхнего уровня содержит пустую ссылку.

Полное описание, параметры и ограничения

ПланСчетовОбъект.<Имя плана счетов>.Родитель (ChartOfAccountsObject.<Chart of accounts name>.Parent)

ПланСчетовОбъект.<Имя плана счетов> (ChartOfAccountsObject.<Chart of accounts name>)

Родитель (Parent)

Доступен, начиная с версии 8.0.

Использование:
Чтение и запись.
Описание:
Тип: ПланСчетовСсылка.<Имя плана счетов>.
Содержит ссылку на родителя элемента плана счетов. Для элементов верхнего уровня содержит пустую ссылку.
Доступность:

Сервер, толстый клиент, внешнее соединение.

Примечание:
Имеет смысл только для многоуровневых планов счетов.
Использование в версии:

Доступен, начиная с версии 8.0.

Методическая информация

Практические примеры

Подготовить учебный активный счёт кассы, не создавая остаток

Счёт описывает место отражения учёта. Его создание в памяти не создаёт проводку, наличные деньги или строку плана счетов в базе.

Где и как запускать

Учебная база: создайте серверный общий модуль УчебныеЗадачи (флаг Сервер). Код без директив вставьте в тело процедуры ВыполнитьПример() Экспорт. Вызовите её из серверного обработчика команды учебной обработки. Не запускайте в рабочей базе.

Подготовка

  1. Создайте НОВУЮ пустую файловую базу, корневое имя УчебныйУчет85. В рабочей БП/КА2/УТ/УНФ эти задачи не запускайте. Это технический пример API, не готовый бухгалтерский учёт.

  2. Планы видов характеристик → Добавить: УчебныеАналитики85. Тип значения только Строка 30. Элементы, дополнительные реквизиты, табличные части и предопределённые значения не создавайте.

  3. Планы счетов → Добавить: УчебныеСчета85. ДлинаКода 10, МаскаКода @@@.@@@.@@, ДлинаНаименования 100, ДлинаПорядка 20. АвтоПорядокПоКоду выключен, КонтрольУникальности включён. ВидыСубконто=УчебныеАналитики85, МаксКоличествоСубконто=2.

  4. У плана счетов не создавайте пользовательские реквизиты, табличные части, признаки учёта/субконто, предопределённые счета, формы, команды, макеты и дополнительные индексы. Модули оставьте пустыми. Историю данных и два флага обработки её версий выключите. Расширений нет.

  5. Обновите конфигурацию БД. Создайте серверный обработчик ВыполнитьПример() Экспорт в собственной обработке. Фрагмент вставляйте в тело; запускайте уроки по отдельности.

  6. Объекты создаются только в памяти: Записать/Удалить/Заблокировать не вызываются. Регистров бухгалтерии, проводок и фактических остатков в этом примере нет.

Описание = Метаданные.ПланыСчетов.Найти("УчебныеСчета85");
Если Описание = Неопределено Тогда
    ВызватьИсключение "Сначала создайте собственный план УчебныеСчета85";
КонецЕсли;
Если Описание.ДлинаКода <> 10 Или Описание.ДлинаНаименования <> 100
    Или Описание.ДлинаПорядка <> 20 Или Описание.МаскаКода <> "@@@.@@@.@@"
    Или Описание.АвтоПорядокПоКоду Или Описание.МаксКоличествоСубконто <> 2 Тогда
    ВызватьИсключение "Настройки учебного плана не соответствуют подготовке";
КонецЕсли;
Если Описание.ВидыСубконто = Неопределено Тогда
    ВызватьИсключение "Назначьте собственный план аналитик";
КонецЕсли;
Если Описание.ВидыСубконто.Имя <> "УчебныеАналитики85" Тогда
    ВызватьИсключение "Нужны только собственные учебные аналитики";
КонецЕсли;
Менеджер = ПланыСчетов.УчебныеСчета85;
Касса = Менеджер.СоздатьСчет();
Касса.Код = "50";
Касса.Наименование = "Учебная касса";
Касса.Вид = ВидСчета.Активный;
Касса.Забалансовый = Ложь;
Касса.Порядок = "50";
Касса.ДополнительныеСвойства.Вставить("МеткаЗадачи", "Только память");
Сообщить(Касса.ЭтоНовый());
Сообщить(Касса.Ссылка.Пустая());
Сообщить(Касса.Родитель.Пустая());
Сообщить(Касса.Уровень() = 0);
Сообщить(Не Касса.ПометкаУдаления);
Сообщить(Не Касса.Предопределенный);
Сообщить(Касса.ИмяПредопределенныхДанных = "");
Сообщить(Касса.ВидыСубконто.Количество() = 0);
Сообщить(Касса.ДополнительныеСвойства.МеткаЗадачи = "Только память");
Сообщить(Касса.ЭтотОбъект = Касса);
Сообщить(Касса.Модифицированность());
Сообщить(Касса.Метаданные().Имя = "УчебныеСчета85");
Сообщить(Касса.ПроверитьЗаполнение());
Сообщить("Версия незаписанного объекта: " + Касса.ВерсияДанных);
Сообщить("Тип параметров истории: " + Строка(ТипЗнч(Касса.ЗаписьИсторииДанных)));
Сообщить("Режим загрузки обмена: " + Строка(Касса.ОбменДанными.Загрузка));

Разбор по шагам

  1. СоздатьСчет возвращает объект. Заполняем Код, Наименование, вид Активный, признак баланса и собственный порядок.

  2. Ссылка пока пустая, объект новый. Отсутствие родителя означает верхний уровень 0.

  3. ВидыСубконто у объекта — строки настроек конкретного счёта; у метаданных — назначенный план видов характеристик. У нового счёта строк нет, хотя максимум равен 2.

  4. Служебная МеткаЗадачи помещена в ДополнительныеСвойства, не в пользовательский реквизит и не в базу.

  5. ПроверитьЗаполнение вызывает соответствующее событие; по подготовке модули пустые. Успех проверки не означает успешную будущую запись.

  6. ВерсияДанных, параметры истории и обмена показываются отдельно. История/обмен этим кодом не выполняются.

Как проверить результат

  1. Тринадцать логических сообщений дают Истина при исходной подготовке.

  2. После выполнения в списке УчебныеСчета85 счёт 50 не появился: объект не записывался. Никакого остатка кассы не рассчитано.

Ожидаемый результат

Подготовлено определение активного счёта в памяти, с явным разграничением счёта, субконто и проводок.

На что обратить внимание

  1. Активный и Забалансовый — разные характеристики счёта, а не сумма и валюта.

  2. Модифицированность описывает объект в памяти, не наличие изменений в сохранённых данных.

  3. Проверка заполнения не проверяет весь будущий учёт, права записи и баланс проводок.

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

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

На ссылках двух собственных субсчетов видно отличие строки кода, результата ПолучитьПорядокКода и ручного Порядок. Дополнительно проверяется собственная иерархия без проводок.

Где и как запускать

Полный серверный модуль своей НОВОЙ пустой учебной конфигурации по подготовке; платформа 8.5.1.1343. При записи всегда откат, рабочие данные не используются. Здесь не запускался.

Подготовка

  1. Создайте НОВУЮ пустую файловую базу, корневое имя УчебныйУчет85. В рабочей БП/КА2/УТ/УНФ эти задачи не запускайте. Это технический пример API, не готовый бухгалтерский учёт.

  2. Планы видов характеристик → Добавить: УчебныеАналитики85. Тип значения только Строка 30. Элементы, дополнительные реквизиты, табличные части и предопределённые значения не создавайте.

  3. Планы счетов → Добавить: УчебныеСчета85. ДлинаКода 10, МаскаКода @@@.@@@.@@, ДлинаНаименования 100, ДлинаПорядка 20. АвтоПорядокПоКоду выключен, КонтрольУникальности включён. ВидыСубконто=УчебныеАналитики85, МаксКоличествоСубконто=2.

  4. У плана нет пользовательских реквизитов/табличных частей, признаков учёта и предопределённых счетов. История выключена, регистров бухгалтерии, проводок и реальных остатков нет. Это технический опыт типов, не методология учёта.

  5. Опыт с маской @@@.@@@.@@ использует строковые коды. Не переносите его сравнения на иной числовой/немаскированный план. АвтоПорядокПоКоду выключен: Порядок хранится отдельно от кода.

  6. Модули собственных объектов/менеджеров пустые, подписок, расширений и внешних действий нет. Не используйте рабочую базу или её копию с действующими обработчиками.

  7. Код здесь в 1С не запускался. HTML показывает урок: проверены исходники и установленная справка именно 8.5.1.1343, но запись/открытие формы в ваших базах не выполнялись.

  8. Ссылка идентифицирует запись, объект служит для её изменения. Свойства ссылки readonly, ВерсияДанных — непрозрачная строка, не номер версии конфигурации.

  9. Непустая плановая ссылка не подтверждает существование записи; перед чтением данных отсутствующая запись исключается отдельно.

  10. В собственной базе создайте серверный общий модуль УчебныеСсылкиПланов, вставьте ВЕСЬ модуль одного урока. ВыполнитьПример() Экспорт вызывайте из собственной процедуры формы с &НаСервереБезКонтекста. Обновите конфигурацию БД.

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

  12. Записанные собственные ссылки запоминаются сразу после записи. После отмены каждая проверяется на ПолучитьОбъект=Неопределено. Никакого удаления по имени, первой строке или всей коллекции нет.

Процедура ВыполнитьПример() Экспорт
    Описание = Метаданные.ПланыСчетов.Найти("УчебныеСчета85");
    Если Описание = Неопределено Тогда
        ВызватьИсключение "Сначала создайте собственный план УчебныеСчета85";
    КонецЕсли;
    Если Описание.ДлинаКода <> 10 Или Описание.ДлинаНаименования <> 100
        Или Описание.ДлинаПорядка <> 20 Или Описание.МаскаКода <> "@@@.@@@.@@"
        Или Описание.АвтоПорядокПоКоду Или Описание.МаксКоличествоСубконто <> 2 Тогда
        ВызватьИсключение "Настройки учебного плана не соответствуют подготовке";
    КонецЕсли;
    Если Описание.ВидыСубконто = Неопределено Тогда
        ВызватьИсключение "Назначьте собственный план аналитик";
    КонецЕсли;
    Если Описание.ВидыСубконто.Имя <> "УчебныеАналитики85" Тогда
        ВызватьИсключение "Нужны только собственные учебные аналитики";
    КонецЕсли;
    Менеджер = ПланыСчетов.УчебныеСчета85;
    Если ТранзакцияАктивна() Тогда
        ВызватьИсключение "Не запускайте урок внутри чужой транзакции";
    КонецЕсли;
    СозданныеСсылки = Новый Массив;
    НачатьТранзакцию();
    Попытка
        Для Каждого СвойКод Из СтрРазделить("41,41.2,41.10", ",") Цикл
            Найденная = Менеджер.НайтиПоКоду(СвойКод);
            Если Найденная <> Неопределено Тогда
                Если Не Найденная.Пустая() Тогда
                    ВызватьИсключение "Один из собственных кодов опыта занят, не используйте существующий счёт";
                КонецЕсли;
            КонецЕсли;
        КонецЦикла;
        Корень = Менеджер.СоздатьСчет();
        Корень.Код = "41";
        Корень.Наименование = "Собственный корень структуры";
        Корень.Вид = ВидСчета.Активный;
        Корень.Порядок = "ROOT";
        Корень.Записать();
        СозданныеСсылки.Добавить(Корень.Ссылка);
        Второй = Менеджер.СоздатьСчет();
        Второй.Код = "41.2";
        Второй.Наименование = "Собственный субсчёт 2";
        Второй.Вид = ВидСчета.Активный;
        Второй.Родитель = Корень.Ссылка;
        Второй.Порядок = "SECOND";
        Второй.Записать();
        СозданныеСсылки.Добавить(Второй.Ссылка);
        Десятый = Менеджер.СоздатьСчет();
        Десятый.Код = "41.10";
        Десятый.Наименование = "Собственный субсчёт 10";
        Десятый.Вид = ВидСчета.Активный;
        Десятый.Родитель = Корень.Ссылка;
        Десятый.Порядок = "TENTH";
        Десятый.Записать();
        СозданныеСсылки.Добавить(Десятый.Ссылка);
        СсылкаКорня = Корень.Ссылка;
        СсылкаВторого = Второй.Ссылка;
        СсылкаДесятого = Десятый.Ссылка;
        Сообщить(СсылкаВторого.ПолучитьПорядокКода() = " 41.  2");
        Сообщить(СсылкаДесятого.ПолучитьПорядокКода() = " 41. 10");
        Сообщить(СсылкаВторого.Порядок = "SECOND");
        Список = Новый ТаблицаЗначений;
        Список.Колонки.Добавить("Код", Новый ОписаниеТипов("Строка"));
        Список.Колонки.Добавить("ПорядокКода", Новый ОписаниеТипов("Строка"));
        СтрокаСписка = Список.Добавить();
        СтрокаСписка.Код = СсылкаВторого.Код;
        СтрокаСписка.ПорядокКода = СсылкаВторого.ПолучитьПорядокКода();
        СтрокаСписка = Список.Добавить();
        СтрокаСписка.Код = СсылкаДесятого.Код;
        СтрокаСписка.ПорядокКода = СсылкаДесятого.ПолучитьПорядокКода();
        Список.Сортировать("Код Возр");
        Сообщить(Список[0].Код = "41.10");
        Список.Сортировать("ПорядокКода Возр");
        Сообщить(Список[0].Код = "41.2");
        Сообщить(Список[1].Код = "41.10");
        Сообщить(СсылкаКорня.Уровень() = 0);
        Сообщить(СсылкаВторого.Уровень() = 1 И СсылкаДесятого.Уровень() = 1);
        Сообщить(СсылкаВторого.ПринадлежитЭлементу(СсылкаКорня));
        Сообщить(Не СсылкаВторого.ПринадлежитЭлементу(СсылкаВторого));
        Сообщить(СсылкаДесятого.Родитель = СсылкаКорня);
        ОтменитьТранзакцию();
    Исключение
        Если ТранзакцияАктивна() Тогда
            ОтменитьТранзакцию();
        КонецЕсли;
        ВызватьИсключение;
    КонецПопытки;
    Сообщить(Не ТранзакцияАктивна());
    Для Каждого СозданнаяСсылка Из СозданныеСсылки Цикл
        Сообщить(СозданнаяСсылка.ПолучитьОбъект() = Неопределено);
    КонецЦикла;
КонецПроцедуры

Разбор по шагам

  1. Проверить, что свои три кода свободны; все записи новые, не предопределённые.

  2. Временно записать свой корень 41 и двух детей 41.2/41.10, запомнить каждую ссылку.

  3. Вызвать ПолучитьПорядокКода именно на ссылках. Маска @@@.@@@.@@ прижимает числовые части вправо пробелами.

  4. Создать собственную таблицу из двух строк и сравнить обычную сортировку кода с сортировкой выровненного порядка кода.

  5. Проверить, что ручной Порядок SECOND не подменён автоматически; АвтоПорядокПоКоду выключен.

  6. Проверить уровни 0/1, принадлежность корню и отсутствие принадлежности самому себе.

  7. Отменить все три собственные записи и проверить их отсутствие.

Как проверить результат

  1. Одиннадцать сравнений сортировки/иерархии Истина.

  2. По коду сначала 41.10, по ПорядокКода сначала 41.2.

  3. После отката три собственных определения отсутствуют; денежных движений нет.

Ожидаемый результат

Условие маски, сортировка и методы иерархии ссылки применены на полном собственном дереве счетов.

На что обратить внимание

  1. Прикладной Тип существует только после создания указанных собственных метаданных. В функциональный Новый массив передаёт аргументы конструктора.

  2. Свойства ссылки не присваиваются. Для изменения копии используется именно новый объект, который возвращает Скопировать.

  3. Уровень пустой ссылки вызывает исключение; иерархические методы используются только у записанных собственных объектов внутри транзакции.

  4. Откат БД не отменяет внешние действия обработчиков. Поэтому конфигурация пустая, модули/подписки без сети, печати, файлов и почты.

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

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.