PAC40002

Материал из Фабиус wiki
Перейти к: навигация, поиск

PAC40002 - это представление документа PAC из справочника R170

Плановый отдел - Номенклатура документов - Заказы и отчеты ( изделия )

CTRL+F7

Докумт - высвечиваем шапку отчета, затем изделия и ищем изделие

local pac1,pac4
try
  EnaDisControls(GetArea(),false)
  pac1:=DOCS4->(ViewDoc('PAC','1',{"CurYear",Str(Year(DatDoc)),"CurMonth",Str(Month(DatDoc)),;
    "KANAL1",Str(KANAL1),"DSHIFT","'"+DSHIFT+"'"}))
  pac4:=GetArea(ViewContens('4',,GetForm(pac1)))
  while !(pac4)->(eof()).and.!Danal2=(pac4)->DANAL2; (pac4)->(DbSkip()); end
finally
  EnaDisControls(GetArea(),true)
end

Смотрите также

PAC

R170