По теме из базы знаний
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
или вот так ))))
Лев(Реквизит1.Метаданные().ПолноеИмя(),5) = "Справ"
Реквизит1.Метаданные().ПолноеИмя() это даст например "Справочник.Валюты", ну и вуаля
для документов так же
Лев(Реквизит1.Метаданные().ПолноеИмя(),5) = "Докум"
Лев(Реквизит1.Метаданные().ПолноеИмя(),5) = "Справ"
Реквизит1.Метаданные().ПолноеИмя() это даст например "Справочник.Валюты", ну и вуаля
для документов так же
Лев(Реквизит1.Метаданные().ПолноеИмя(),5) = "Докум"
Если ТипЗнч(ЗаказыПоставщикамУТ.СтруктурнаяЕдиница) = Тип("СправочникСсылка.Кассы") Тогда
ПостБух.СтруктурнаяЕдиница = Справочники.Кассы.НайтиПоКоду(Код);
Иначе
ПостБух.СтруктурнаяЕдиница = Справочники.БанковскиеСчета.НайтиПоКоду(Код);
КонецЕсли;
ТипЗначения = ТипЗнч(ВыбранныйОбъект);
ОбъектМетаданных = Метаданные.НайтиПоТипу(ТипЗначения);
Если Метаданные.Справочники.Содержит(ОбъектМетаданных) Тогда
Сообщить("Справочник");
ИначеЕсли Метаданные.Документы.Содержит(ОбъектМетаданных) Тогда
Сообщить("Документ");
КонецЕсли;
ОбъектМетаданных = Метаданные.НайтиПоТипу(ТипЗначения);
Если Метаданные.Справочники.Содержит(ОбъектМетаданных) Тогда
Сообщить("Справочник");
ИначеЕсли Метаданные.Документы.Содержит(ОбъектМетаданных) Тогда
Сообщить("Документ");
КонецЕсли;
Можно еще так написать:
Код |
---|
Если ВыбранныйОбъект = Неопределено Тогда
ИначеЕсли Справочники.ТипВсеСсылки().СодержитТип(ТипЗнч(ВыбранныйОбъект)) Тогда
Сообщить("Справочник");
ИначеЕсли Документы.ТипВсеСсылки().СодержитТип(ТипЗнч(ВыбранныйОбъект)) Тогда
Сообщить("Документ");
КонецЕсли;
Показать полностью |
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот