Делаю так
var с_1:comp;
С_1:=0;
RunInterFace('GetSomeMC', c_1);
Все зашибись, открывается интерфейс с материалами, но при выборе материала (на еnter), запрашивает количество, а мне этого не надо. Просто надо что бы по нажатию на ентер закрылось окно и в с_1 передался нрек записи (кстати он передается все путем).
Может быть еще какие нибудь параметры надо передавать? (в исходниках посмотрел ничего кроме одной сомповской переменной не передается).
Интерфейс выбора ТМЦ
Модераторы: m0p3e, edward_K, Модераторы
var с_1:comp;
С_1:=-12345;
RunInterFace('GetSomeMC', c_1);
// -12345, если не нужно запрашивать кол-во
// -12346, то же + пометить все по умолчанию
// -12347 без кол-ва, без удаления Pick
// -12348 с инвертированием Pick-а
// -12349 без кол-ва, выбирать только МЦ из маркера 'GetSomeParty_NRecSaldoMC'
// -12350 подсветка скрым МЦ не являющиеся комплектом
С_1:=-12345;
RunInterFace('GetSomeMC', c_1);
// -12345, если не нужно запрашивать кол-во
// -12346, то же + пометить все по умолчанию
// -12347 без кол-ва, без удаления Pick
// -12348 с инвертированием Pick-а
// -12349 без кол-ва, выбирать только МЦ из маркера 'GetSomeParty_NRecSaldoMC'
// -12350 подсветка скрым МЦ не являющиеся комплектом
В своем фейсе уже после выбора ищите записи
в табл. Pick с Pick.Wlist=7
Pick.Crec - это и есть Katmc.Nrec
Pick.PICKKOL - выбранное количество
в табл. 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);
}