Страница 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
Не, в титле только текст. Может туда и можно подставлять переменные или что-то еще, не пробовал. Я вижу только текст.