1С 8.3 Этот тип является менеджером записи регистра сведений
Данные > Примеры кода 1С > 1С 8.3 Описание типов
Перейти в раздел примеры кода 1С 8.3:
Этот тип является менеджером записи регистра сведений в 1С 8.3:
// Является ли переданный тип менеджером записи регистра сведений
// К сожалению, либо этот вариант, либо тупо проверка представления типа
// Источник: https://github.com/SeiOkami/CollectionMethodsOneS/issues/25
//
// Параметры:
// ТипЗначения - Тип
//
// Возвращаемое значение:
// Булево
Функция ЭтоМенеджерЗаписиРегистраСведений(Знач ТипЗначения) Экспорт
ОбъектМетаданных = Метаданные.НайтиПоТипу(ТипЗначения);
Если ТипЗнч(ОбъектМетаданных) = Тип("ОбъектМетаданных") И Метаданные.РегистрыСведений.Содержит(ОбъектМетаданных) Тогда
ТипМенеджераЗаписи = Тип("РегистрСведенийМенеджерЗаписи." + ОбъектМетаданных.Имя);
ЭтоМенеджерЗаписи = (ТипМенеджераЗаписи = ТипЗначения);
Иначе
ЭтоМенеджерЗаписи = Ложь;
КонецЕсли;
Возврат ЭтоМенеджерЗаписи;
КонецФункции
// MIT License
// Copyright (c) 2024 SeiOkami
//
// Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files
// (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify,
// merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is
// furnished to do so, subject to the following conditions:
// The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
// К сожалению, либо этот вариант, либо тупо проверка представления типа
// Источник: https://github.com/SeiOkami/CollectionMethodsOneS/issues/25
//
// Параметры:
// ТипЗначения - Тип
//
// Возвращаемое значение:
// Булево
Функция ЭтоМенеджерЗаписиРегистраСведений(Знач ТипЗначения) Экспорт
ОбъектМетаданных = Метаданные.НайтиПоТипу(ТипЗначения);
Если ТипЗнч(ОбъектМетаданных) = Тип("ОбъектМетаданных") И Метаданные.РегистрыСведений.Содержит(ОбъектМетаданных) Тогда
ТипМенеджераЗаписи = Тип("РегистрСведенийМенеджерЗаписи." + ОбъектМетаданных.Имя);
ЭтоМенеджерЗаписи = (ТипМенеджераЗаписи = ТипЗначения);
Иначе
ЭтоМенеджерЗаписи = Ложь;
КонецЕсли;
Возврат ЭтоМенеджерЗаписи;
КонецФункции
// MIT License
// Copyright (c) 2024 SeiOkami
//
// Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files
// (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify,
// merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is
// furnished to do so, subject to the following conditions:
// The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
0
комментарии
____________________
Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник