Интерфейс выбора ТМЦ

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

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

Ответить
Den_Is
Постоянный обитатель
Сообщения: 169
Зарегистрирован: 08 авг 2005, 20:11
Откуда: Омск

Интерфейс выбора ТМЦ

Сообщение Den_Is »

Делаю так
var с_1:comp;
С_1:=0;
RunInterFace('GetSomeMC', c_1);
Все зашибись, открывается интерфейс с материалами, но при выборе материала (на еnter), запрашивает количество, а мне этого не надо. Просто надо что бы по нажатию на ентер закрылось окно и в с_1 передался нрек записи (кстати он передается все путем).
Может быть еще какие нибудь параметры надо передавать? (в исходниках посмотрел ничего кроме одной сомповской переменной не передается).
Ged
Местный житель
Сообщения: 645
Зарегистрирован: 29 мар 2005, 17:49
Контактная информация:

Сообщение Ged »

var с_1:comp;
С_1:=-12345;
RunInterFace('GetSomeMC', c_1);

// -12345, если не нужно запрашивать кол-во
// -12346, то же + пометить все по умолчанию
// -12347 без кол-ва, без удаления Pick
// -12348 с инвертированием Pick-а
// -12349 без кол-ва, выбирать только МЦ из маркера 'GetSomeParty_NRecSaldoMC'
// -12350 подсветка скрым МЦ не являющиеся комплектом
Den_Is
Постоянный обитатель
Сообщения: 169
Зарегистрирован: 08 авг 2005, 20:11
Откуда: Омск

Сообщение Den_Is »

То что надо. Шпасиба!
Den_Is
Постоянный обитатель
Сообщения: 169
Зарегистрирован: 08 авг 2005, 20:11
Откуда: Омск

Сообщение Den_Is »

ВСЕ ЗАШИБИСЬ, ПЕРЕСЫЛАЮ -12345, КОЛИЧЕСТВО НЕ ЗАПРАШИВАЕТ.
НО... ХЕ-ХЕ, :???: НРЕК ВЫБРАННОЙ ЗАПИСИ НЕ ВОЗРАЩАЕТ, ВОЗРАЩАЕТ ЗНАЧЕНИЕ С_1 РАВНОЕ -12345. МОЖЕТ ЧТО ТО НЕ ДОГОНЯЮ. :-?
Ged
Местный житель
Сообщения: 645
Зарегистрирован: 29 мар 2005, 17:49
Контактная информация:

Сообщение Ged »

В своем фейсе уже после выбора ищите записи
в табл. Pick с Pick.Wlist=7
Pick.Crec - это и есть Katmc.Nrec
Pick.PICKKOL - выбранное количество

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

 _loop Pick where ((7 == Pick.Wlist))
{
  if(GetFirst fastfirstrow katmc where ((Pick.Crec== Katmc.Nrec)) =tsOk)
    Message(KatMc.Name+' '+Pick.PICKKOL);
}
Den_Is
Постоянный обитатель
Сообщения: 169
Зарегистрирован: 08 авг 2005, 20:11
Откуда: Омск

Сообщение Den_Is »

Все дошло (в пике искать надо)
Ответить