Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
23 ноя 2024, 01:58

Работа с реквизитами

Автор Tesla, 14 окт 2014, 12:18

0 Пользователей и 1 гость просматривают эту тему.

Tesla

Добрый день. Есть документ "Отчёт КА" и в нём  реквизиты с кнопкой выбора:

1. Фирма - Ссылается на "Справочник.Фирмы"
     Может принимать значения: "Иванов", "Петров"

2. Склад - Ссылается на "Справочник.МестаХранения"
     Может принимать значения: "Склад", "СкладЛВ"

3. ЭККА - Ссылается на "Справочник.Экка"
     Может принимать значения: "Касса1", "Касса2", "КассаЛВ"

Что необходимо: при выборе значения "КассаЛВ" из реквизита "ЭККА", чтобы  реквизит "Фирма" принял значение "Петров", а реквизит "Склад" значение "СкладЛВ".

Какие действия нужно проделать и какова их последовательность ?

А ещё заметил, что реквизит отрабатывает формулу, которая указана у него в свойствах, только при нажатии "Enter" в момент, когда фокус в самом реквизите.

дфтын

Цитироватьещё заметил, что реквизит отрабатывает формулу, которая указана у него в свойствах, только при нажатии "Enter" в момент, когда фокус в самом реквизите.
А вы как хотели бы?

А если по существу, то платформа какая? 7.7. или 8 ?

Добавлено: 14 окт 2014, 12:24


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

Ну нпаример в реакции выбора писать:
Если СокрЛп(Экка.Наименование) = "КассаЛВ" Тогда
Фирма = Справочник.Фирмы.НайтиПоНаименвоанию("петров");
КонецЕСЛИ;


Как то так, да

Tesla

Хотел бы чтобы после выбора из списка значений. Ну, по-нормальному.
платформа 7.7

ну да, у меня и возник вопрос как организовать эту интерактивную связь. Ммм, а что значит "где" хранить ? Наверно в модуле документа.

дфтын

ну вот я вам пример написал, так можно.
Только если 7.7. то будет
спр = СОздатьОбхект("Справочн.Фирм");
Фирма = Спр.НайтипоНаименвоанию

Tesla

что за "реакция выбора" ? У реквизита есть какие-то методы ?

дфтын


Tesla

тоесть, ставить курсор в реквизит и жать enter?

дфтын

Кнопку можно рядом нарисовать.

Tesla

что-то не получается:

Процедура УстанЗначРекв()
        СпрФирмы=СоздатьОбъект("Справочник.Фирмы");
СпрСклады=СоздатьОбъект("Справочник.МестаХранения");
СпрЭкка=СоздатьОбъект("Справочник.ЭККА");
текЭкка=Экка;

Если сокрЛП(Экка)="КассаЛВ" Тогда
  Фирма=СпрФирмы.НайтиПоНаименованию("ПЕТРОВ");
КонецЕсли;
   
   
КонецПроцедуры   

Заполняет реквизит "Фирма" пустотой 0_о

дфтын

в отладчике смотрите, да заодно почитайте как оформляется метод - НайтиПоНаименованию("ПЕТРОВ");

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск