PAC40002 — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м |
||
Строка 2: | Строка 2: | ||
[[Плановый отдел]] - Номенклатура документов - Заказы и отчеты ( изделия ) | [[Плановый отдел]] - Номенклатура документов - Заказы и отчеты ( изделия ) | ||
+ | |||
+ | = 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 | ||
= Смотрите также = | = Смотрите также = |
Версия 12:36, 14 ноября 2016
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