Открыть карточку ТМЦ с фильтрами L_SKLAD::KARTSTORAGE

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

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

Ответить
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Открыть карточку ТМЦ с фильтрами L_SKLAD::KARTSTORAGE

Сообщение Masygreen »

Код: Выделить всё

SaveMyDsk(1, 'KartStor_wFltSave');
    SaveMyDsk(tmSaldoExcelGal.cKatPodr, 'KARTSTOR_SAV_VSKLAD');//устанавливаем фильтр Склад
    SaveMyDsk(tmSaldoExcelGal.cKatMC, 'KARTSTOR_NREC1');//устанавливаем фильтр ТМЦ
    runinterface('L_SKLAD::KARTSTORAGE', 0);//открываем карточку
Реестр, а не саму карточку (правда на ней позиционируется и фильтры ставит) .. чего не так?
Время ведет!
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5185
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Re: Открыть карточку ТМЦ с фильтрами L_SKLAD::KARTSTORAGE

Сообщение edward_K »

Сделайте от него наследника 8) . Не нашел там фильтра по МС.
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Re: Открыть карточку ТМЦ с фильтрами L_SKLAD::KARTSTORAGE

Сообщение Masygreen »

edward_K писал(а):Сделайте от него наследника 8) . Не нашел там фильтра по МС.
фильтр ставится через dsk... и фильтруется не в реестре, в в просмотре карточки sreen
SaveMyDsk(tmSaldoExcelGal.cKatMC, 'KARTSTOR_NREC1');//устанавливаем фильтр ТМЦ
Тут проблема что я интерфейс вызываю, но надо не сам интерфейс а Window .. как то чрез load чтоли
Время ведет!
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5185
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Re: Открыть карточку ТМЦ с фильтрами L_SKLAD::KARTSTORAGE

Сообщение edward_K »

Так сделайте свой фейс.
vih примерно такая

Код: Выделить всё

#include KartStor.vih
#component "L_Sklad"
VipInterface KartStorage_Kart(KartStorage);
фейс

Код: Выделить всё

Interface KartStorage_Kart
HandleEvent
cmInit:
{   if  inherited :: handleEvent (cmInit)=heAbort then Abort; 
    RunWindowModal(wKartStorMC)
    CloseInterface(cmDone)
}
end;
end.
ну или допилите через alter примерно тоже самое, но с сохранением/восстановлением/сбросом еще одной переменной, по которой будете открывать окно и закрывать фейс. Можно пойти еще дальше и в cmOnVipLoad вызвать cmInit, добавить функцию для установки параметров и встроить себе окно.
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Re: Открыть карточку ТМЦ с фильтрами L_SKLAD::KARTSTORAGE

Сообщение Masygreen »

edward_K писал(а):ну или допилите через alter примерно тоже самое, но с сохранением/восстановлением/сбросом еще одной переменной, по которой будете открывать окно и закрывать фейс. Можно пойти еще дальше и в cmOnVipLoad вызвать cmInit, добавить функцию для установки параметров и встроить себе окно.
прям щас мозг взорвался ) .. попробую .. спасибо
Время ведет!
Ответить