RunInterface

Приемы и подходы, обмен опытом

Модераторы: Screw, larin

Ответить
n0where
Сообщения: 72
Зарегистрирован: Вт, 21/12/2010 06:01
Имя Фамилия: Лобастов Александр
Откуда: Сода

RunInterface

Сообщение n0where »

такой вопрос по RunInterface

Мне необходимо запустить в моём приложении интерфейс просмотра приходного, расходного ордера, ну и других интерфейсов выбора различных накладных

в !GSDK нашел
Function L_SKLAD::tPrihOrdIntf.PickSklOrders
Приходный складской ордер. Выбор ордеров в Pick. Pick.wList:= 64125,

Function PickSklOrders (
SP_ : Word;
vidOrd_ : Word;
cSklOrder_ : Comp
) : Boolean;
Описание
Приходный складской ордер. Выбор ордеров в Pick. Pick.wList:= 64125,

Информация
Версия : Компонент L_SKLAD 8.10.87.0
Но не совсем понимаю как запустить данную функцию.
Можете както помочь?
Ged
топ-софт
Сообщения: 76
Зарегистрирован: Вс, 16/09/2007 10:23
Имя Фамилия: Леонид Поликутин
Откуда: Галактика СПб
Контактная информация:

Re: RunInterface

Сообщение Ged »

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

#ifndef ComponentVersion
#define ComponentVersion
#end

#include zPrihOrdPr.vih

Interface Test;
Var iPO:PrihOrdPr;
Create view 
As select 
*
From 
  Pick
, SklOrder
Where
((
    Word(64125) == Pick.wList
And Pick.cRec == SklOrder.Nrec
))
;

HandleEvent

cmInit:
  if(iPO.PickSklOrders(1, 1, 0))
    _Loop Pick
      if(IsValid(tnSklOrder))
         Message(SklOrder.nOrder);

End;
End.
n0where
Сообщения: 72
Зарегистрирован: Вт, 21/12/2010 06:01
Имя Фамилия: Лобастов Александр
Откуда: Сода

Re: RunInterface

Сообщение n0where »

Т.е. у меня ен получится выйти в нужный ордер, как я понимаю. Не та функция.

Мне необходимо именно это, т.е. по выбору из моего списка ордеров, по клавише ентер к примеру открывается окно ордера (приходного, расходного, складского или любого другого), где я могу посмотреть в нем все.. мне именно это нужно,
Ответить