Программирование на Атлантисе (VIP, FCOM, ARD), FastReport
Модераторы: m0p3e , edward_K , Модераторы
Sheinina
Местный житель
Сообщения: 366 Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва
Сообщение
Sheinina » 28 ноя 2005, 16:44
Почему-то в списке получается только одна МЦ:
Код: Выделить всё
Interface Sel_Kau_MC 'Выбор МЦ для аналитики' DoAccept, EscClose, Cyan;
show at (,,,);
view
var
p_kod, p_name: string;
kod_gr : string;
c_mc : comp;
as select katmc.name, katmc.barkod, katmc.nrec, groupmc.nrec, groupmc.kod
where ((
kod_gr == groupmc.kod
and groupmc.nrec == katmc.cgroupmc
)) order o1 by katmc.name;
parameters p_kod, p_name, c_mc;
browse b1;
katmc.name 'Название' : [20], protect;
katmc.barkod 'Ном.номер': [10], protect;
end;
HandleEvent
cmInit: {
...
// определение kod_gr
setorder(tiO1);
if getfirst katmc = tsOK then {};
}
cmDefault: { c_mc:=katmc.nrec; CloseInterface(cmOK);}
cmCancel: { c_mc:=0; CloseInterface(cmCancel);}
end;
end.
Я точно знаю, что их там много...
Приношу свои извинения. Все решается описанием панели:
Код: Выделить всё
panel P_MC table katmc;
browse b1;
...
end;
end;
Goblin
Местный житель
Сообщения: 474 Зарегистрирован: 29 мар 2005, 17:49
Откуда: Сибирь-матушка
Контактная информация:
Сообщение
Goblin » 28 ноя 2005, 17:09
Можно просто для browse указать table, панель здесь вовсе не обязательна - ежели только не собираетесь какие-то отдельные панельные события отлавливать ...
cmCancel некорректен ...
Ежели чего уже было , то при отказе выбора оно должно остаться , а в Вашем случае обнулится ...
Так что
c_mc:=0;
убирать
Питаю патологические отвращение и ненависть в особо тяжелой и крайне запущенной формах к семейству программ Microsoft Business Solution !
Восславим господа Кришну за то, что у нас есть ГАЛАКТИКА !
Sheinina
Местный житель
Сообщения: 366 Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва
Сообщение
Sheinina » 28 ноя 2005, 17:12
Не нужно мне оставлять то что было. Энтот интерфейсик будет жить в TXO API, а там пусть лучше пустая аналитика сформируется, искать потом легче.
DarkAngel27
Местный житель
Сообщения: 228 Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва
Контактная информация:
Сообщение
DarkAngel27 » 29 ноя 2005, 11:04
Добавь в select katmc.cgroupmc
И лучше не пользоваться ORDER, а пройтись по индексу KATMC03...