Галактика в вопросах и ответах

Есть задачка ... получить цену последнего прихода МЦ
Надо именно из приходного ордера
"Накидал" интерфейс ... но вот незадача ... попадает туда
не только спецификация приходных ордеров ... но спецификации
актов на пересортицу ... Если кто знает, скажите какое ограничение нужно дополнительно наложить ...

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

nterface getLastVhodPriceORDER 'Получение Цены Последнего Прихода из ОРДЕРА ', AlwaysReturn;
create view 
var 
    crec       : comp  ;
    DatePrix   : date  ;
    PricePrix  : Double;
    NameEdPrix : String;
from
SpOrder
where
((
Crec           == SpOrder.CMC and
0              == SpOrder.SP  and
0              == SpOrder.vidorder(noindex) and
1              == sporder.tipord(noindex)
));
Parameters cRec,DatePrix,PricePrix,NameEdPrix;
HandleEvent
cmInit:
{
  if GetLast SpOrder

  = tsOK
  {
  DatePrix  :=SpOrder.DORD
  PricePrix :=SpOrder.SRPRICE
  NameEdPrix:=''
  }
    else
         {
             DatePrix  :=date(0,0,0);
             PricePrix :=0;
             NameEdPrix:='==='
         }
  Abort;
  Exit;
}
end;
end.

Вывалиться в шапку ордера, из него в katsopr и по полю katsopr.vidsopr определять тип накладной.

Галактика в вопросах и ответах

Как получить цену последнего прихода МЦ

Как получить цену последнего прихода МЦ