Подмена Lookup формы

[SergeyV]

Добрый день.

Возникло требование от клиента о том, чтобы при использовании Lookup поля Employee в любой другой таблице, отличной от таблицы Employee, использовалась не стандартная форма Employee List, а другая, более упрощенная... при этом оригинальную форму и таблицу необходимо сохранить. Каким образом можно подменить Lookup форму?

С.

[Kirvisniemi]

В триггере OnLookup поля Employee в любой таблице отличной от таблицы Employee написать код открытия упрощенной формы

[SergeyV]

Цитата:

Сообщение от tyrex

В триггере OnLookup поля Employee в любой таблице отличной от таблицы Employee написать код открытия упрощенной формы

Замечательно... :-) Я сам понял в принципе что нужен такой код... а могу я поинтересоваться у вас, каким должен быть этот код?! ;-)

[Kirvisniemi]

IF FORM.RUNMODAL(ReductiveFormNumber,Employee) = ACTION::LookupOK
  THEN "Employee No." := Employee."No.";

[romeo]

Цитата:

Сообщение от SergeyV

Замечательно... :-) Я сам понял в принципе что нужен такой код... а могу я поинтересоваться у вас, каким должен быть этот код?! ;-)

Сергей, это будет не самый сложный кусок кода, написанного в нави. Я думаю задачи, решаемые вами, будут намного серьезнее и не ограничатся этим. Поверьте, даже прислать кусок готового лукапа просто СКУЧНО. А всему не научишь. С уважением.

[SergeyV]

Ух! Спасибо! Всё в лучшем виде! Респект, адназначна!

[apanko]

Коллеги
Подумал на вопросом заданным выше и у меня возникло два решения:
1. Указать в тексбоксе свойство LookupFormID (это относится к прочим формам)
2. Указать это свойство в самой таблице, а в форме карточки по f5 вызывать не лукап, а run form (оригинальную).

Попробовал оба работают, или в чем-то есть подвох?

Заранее спасибо.

[romeo]

Цитата:

Сообщение от apanko

Коллеги
Подумал на вопросом заданным выше и у меня возникло два решения:
1. Указать в тексбоксе свойство LookupFormID (это относится к прочим формам)
2. Указать это свойство в самой таблице, а в форме карточки по f5 вызывать не лукап, а run form (оригинальную).

Попробовал оба работают, или в чем-то есть подвох?

Заранее спасибо.

Указанную выше проблему нужно решать так, как предложил Tyrex. Единственное, я бы предложил вместо присвоения Кода Сотрудника звать валидейт этого поля.
2. Если указать в качестве LookupFormID в таблице форму, отличную от списка, то она будет вызываться из ВСЕХ мест по лукапу из поля Код Сотрудника. Если фирме это нужно, то ОК. Но поверьте, мест, где выведен Код Сотрудника на формах полно, а форма, которую необходимо вызывать наверняка уникальна и нужна для вызова из 2-3 мест. Так что ...
1. ... а этим никогда не пользовался -)))))))))))))))))))) Но говорят "что-то не получилось, когда пробовали".
Все равно указанный Tyrex'ом способ универсальнее - можно ограничить фильтрами набор, на котором открывается форма.

[apanko]

Наверно я не так понял вопрошающего. Я решил, что ему как раз и нужно везде новую форму, а старую (оригинальную) только из карточки. С этой точки зрания я и предожил пункт 2, чтобы менять в коде поменьше.

А насчет 1. У меня тоже "что-то не получалось, когда пробовал". Только я пробовал на журнале товаров, поле товар Но. Оказалось, что на этом поле в коде на тригере онЛукап жестко прописана форма которую открывать, и свойства которые я указываю (что в тексбоксе на форме, что в 27 таблице) системе в общем-то фиолетовы.

[unalexia]

в таблице
ПОЛЕ "Employee No."
TableRelatuon не определено

Employee No. OnLookUp()
IF FORM.RUNMODAL(ReductiveFormNumber,Employee) = ACTION::LookupOK
THEN "Employee No." := Employee."No.";

Присвоение Employee No. не происходит остается пустым. Где собака порылась????????????

[Fordewind]

Цитата:

Сообщение от unalexia

Employee No. OnLookUp()
IF FORM.RUNMODAL(ReductiveFormNumber,Employee) = ACTION::LookupOK
THEN "Employee No." := Employee."No.";

Присвоение Employee No. не происходит остается пустым. Где собака порылась????????????

А если так написать:

IF ReductiveFormNumber.RUNMODAL = ACTION::LookupOK THEN BEGIN
  ReductiveFormNumber.GETRECORD(Employee);
  "Employee No." := Employee."No.";
END;

[unalexia]

"Rec.Employee No." через дебугер обновляется. а поле в таблице остается пустым. Прим.:Я работаю пока только по таблице.

[apanko]

Может это поможет?

LookUp из поля таблицы

[romeo]

Цитата:

Сообщение от unalexia

"Rec.Employee No." через дебугер обновляется. а поле в таблице остается пустым. Прим.:Я работаю пока только по таблице.

Сделай форму. Все будет работать. Написано правильно.