Тема: request form
Показать сообщение отдельно
Старый 21.05.2007, 10:16   #3  
Fordewind is offline
Fordewind
Участник
 
1,134 / 10 (3) +
Регистрация: 01.12.2005
Цитата:
Сообщение от Gennady Antropov Посмотреть сообщение
Код на триггере OnLookup соотв. элемента на реквестформе (для, скажем, товарных категорий):
CLEAR(ItemCats);
ItemCats.LOOKUPMODE(TRUE);
IF ItemCats.RUNMODAL = ACTION::LookupOK THEN BEGIN
ItemCats.GETRECORD(ItemCat);
Text := ItemCat.Code;
EXIT(TRUE);
END ELSE
EXIT(FALSE);
Для полей входящих в первичный ключ все это можно не писать, а просто поставить "Item Category".Code в TableRelation.