Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Структура справочника

Рисовод
читатель
офлайн
Дата регистрации: 26.12.2007
Сообщений: 25775
Пост №21
 
08.08.2011 09:53

"вот, типа, "наброска"! Сразу предупреждаю, что я в этом не бум-бум! :-)<br> <br>//В документе:<br> <br>Процедура ПриНачалеВыбораЗначения(ИдентЭлемДиалога,ФлагСтандОбр)<br>             <br>             Если ИдентЭлемДиалога = "ТорговаяТочка" Тогда <br>                               ФлагСтандОбр=0;<br>                               Параметры       = СоздатьОбъект("СписокЗначений");<br>                               Если ВыбрРодитель.Выбран() = 1 Тогда                                                       // поле на форме<br>                                           Параметры.ДобавитьЗначение(ВыбрРодитель, "ВыбрРодитель");<br>                               Иначе<br>                                           Параметры.ДобавитьЗначение("""", "ВыбрРодитель");<br>                               КонецЕсли;<br>                               Параметры.ДобавитьЗначение(флРазрешитьВыбор, "Выбор");       // флаг на форме<br>                               ОткрытьФорму("Справочник.МестаХранения.ФормаСписка", Параметры);<br>             КонецЕсли;<br>             <br>КонецПроцедуры<br> <br>//В справочнике Справочник.МестаХранения.ФормаСписка:<br> <br>Процедура ПриОткрытии()<br>             <br>             Если ПустоеЗначение(Форма.Параметр) = 0 Тогда<br>                               Если ТипЗначенияСтр(Форма.Параметр) = "СписокЗначений" Тогда<br>                                           Параметры       = Форма.Параметр;<br>                                           ВыбрРодитель = Параметры.Получить("ВыбрРодитель");<br>                                           Если ПустоеЗначение(ВыбрРодитель) = 0 Тогда<br>                                                             Если ТипЗначенияСтр(ВыбрРодитель) = "Справочник" Тогда<br>                                                                              Если (ВыбрРодитель.Вид() = Вид()) И (ВыбрРодитель.ЭтоГруппа() = 1) Тогда<br>                                                                                           ИспользоватьРодителя(ВыбрРодитель, флРазрешитьВыбор);<br>                                                                              КонецЕсли;<br>                                                             КонецЕсли;<br>                                           КонецЕсли;<br>                               КонецЕсли; <br>             КонецЕсли;<br>             <br>КонецПроцедуры"

Prikum
активный пользователь
офлайн
Дата регистрации: 18.02.2002
Сообщений: 20953
Пост №22
 
08.08.2011 09:58

"Семерочные принципы переносить на восьмерку признак плохого тона! ;)"

Денис (САМАРА)
читатель
офлайн
Дата регистрации: 09.04.2008
Сообщений: 8351
Пост №23
 
08.08.2011 10:02

Вроде бы вопрос был про управляемые формы, а там все совсем не так...

ZhAmAn
читатель
офлайн
Дата регистрации: 23.12.2010
Сообщений: 1333
Пост №24
 
08.08.2011 10:03

"Отбор["Код"].ВидСравнения = <br>       ?(Код.ЭтоГруппа, <br>            ВидСравнения.ВСпискеПоИерархии, <br>            ВидСравнения.Равно);"

Рисовод
читатель
офлайн
Дата регистрации: 26.12.2007
Сообщений: 25775
Пост №25
 
08.08.2011 10:04

не о "переносе" речь! Если это, действительно, возможно в семерке, то уж в 8-ке, думаю, "и подавно"? Или я не прав?

Рисовод
читатель
офлайн
Дата регистрации: 26.12.2007
Сообщений: 25775
Пост №26
 
08.08.2011 10:05

не спорю!

Петров-В
читатель
офлайн
Дата регистрации: 23.01.2011
Сообщений: 581
Пост №27
 
08.08.2011 13:52

"Может так?<br> <br><pre>Процедура ПриОткрытии() СписокГрупп = Новый СписокЗначений; // Любым способом определяем группы, которые не надо видеть, т.е. "скрыть часть его структуры", например... СписокГрупп.Добавить(Справочники.КакойТоСправочник.НайтиПоКоду("000000004")); Отбор.Ссылка.Видсравнения = ВидСравнения.НеВСпискеПоИерархии; Отбор.Ссылка.Значение = СписокГрупп; Отбор.Ссылка.Использование = Истина;КонецПроцедуры </pre><br><br> <br>На 8.2 не пробовал, тем более на управляемых формах."

Sargez
читатель
офлайн
Дата регистрации: 21.10.2010
Сообщений: 247
Пост №28
 
08.08.2011 14:22

попробовал на обычных формах, все равно папку с кодом "000000004" отображает! Элементы не отображает, но папку отображает...если иерархический просмотр отключить, то скрывает, но тогда справочник абсолютно не читабелен...

Показывать по 10 20 40 сообщений

Читают тему:

1 гостей
Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация