Не обновляется запись в интерфейсе

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Дарья
Посетитель
Сообщения: 37
Зарегистрирован: 18 авг 2008, 14:18
Откуда: Тюмень
Контактная информация:

Не обновляется запись в интерфейсе

Сообщение Дарья »

Вообщем есть список договоров, на него необходимо установить фильтр по виду. Вызываю интерфейс множественного выбора видов:
cmVid:
{
var w1, w2, w3 : Word;
var c : Comp;
delete from PICK;
RunInterface('L_DOGOVOR::PickSomVidD',w1,w2,true,c,w3);
ResetBounds(#DOGOVOR);
RereadRecord(#DOGOVOR);
SetBounds(#DOGOVOR);
}
Вот фильтр на View:
Word(448) == PICK.WLIST and
DOGOVOR.CVIDDOG /== PICK.CREC
Все записи, кроме ПЕРВОЙ фильтруются нормально. Даже, если первая не текущая. Исправить ошибку не могу, подскажите, в чем моя ошибка... :-?
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

Rereadrecord(#pick) ну еще getfirst dogovor + rescanpanel
Дарья
Посетитель
Сообщения: 37
Зарегистрирован: 18 авг 2008, 14:18
Откуда: Тюмень
Контактная информация:

Сообщение Дарья »

Или я не правильно написала, или не помогло... Хорошо бы, если первое...
cmVid:
{
var w1, w2, w3 : Word;
var c : Comp;
delete from PICK;
ResetBounds(#DOGOVOR);
RunInterface('L_DOGOVOR::PickSomVidD',w1,w2,true,c,w3);
SetBounds(#DOGOVOR);
RereadRecord(#PICK);
RereadRecord(#DOGOVOR);
V1.GetFirst DOGOVOR;
RescanPanel(#DOGOVOR);
}
Ответить