Страница 1 из 1

cmPick на поле функцию

Добавлено: 17 апр 2003, 13:20
Nuts
Пишу
browse brwVacations1;
show at (,,,24);
table Vacations;
Fields
GetMyKatOrg_Name(Vacations.Appoint) 'Наименование', 'Юр.лица/отдела', ('Наименование назначения. Выбор из каталога по F3.',,): [19], pickbutton, protect;

А как его в
cmPick:
{
if(CurField=#<это...поле>)

опознать то?
:(

Re: cmPick на поле функцию

Добавлено: 17 апр 2003, 14:26
Deinis
Описание глобальных переменных:
ClassifKOD : string;
......

Описание окошка:
Window wParam 'Задайте параметры идентификатора &VIP[Obj:"MySpMoveOS"]' (,,) EscClose;
Show at (22,15,120,25);
Screen scParam (,,);
Show at (,,,);
Fields
ClassifKOD ('Фильтр на код внешн. классиф. превыш-я норм амортизации',,sci13EnEsc)
: NOprotect, pickbutton;
<<

Фильтр на КОД внешн. КЛАССИФ. превыш-я норм амортиз.: .@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

>>

End;
.........описание HandleEvent:
cmPick :
{
case CurField of
#ClassifKOD : {
Message ('Введите либо КОД внешней классификации, либо слово "Пуст" - для учета ОС/НМА, '+
'по которым внешняя классификация не выбрана.');
ClassifKOD := 'Пуст';
}
end;
}

Re: cmPick на поле функцию

Добавлено: 17 апр 2003, 14:36
Nuts
Спасибо!
Это я знаю но вот в браузе... доп окна
Да и без применения метода:
...
(
GetMyKatOrg_Name_1
)
As select
GetMyKatOrg_Name(Vacations.Appoint)
...

а затем
cmPick :
{
if(CurField=#GetMyKatOrg_Name_1

он в interface ReceptionT2
почему то у меня не идет :(

К стати &VIP[Obj:"MySpMoveOS"]'
в титле просто надпись или... :)

Re: cmPick на поле функцию

Добавлено: 17 апр 2003, 15:06
Deinis
Это собственный идентификатор ТХО.

Re: cmPick на поле функцию

Добавлено: 17 апр 2003, 15:09
Nuts
Понял. А я думал что-то новое :)
Типа подстановка в титле объектного значения :)))
Спасибо!

Re: cmPick на поле функцию

Добавлено: 17 апр 2003, 15:24
Deinis
Не, в титле только текст. Может туда и можно подставлять переменные или что-то еще, не пробовал. Я вижу только текст.