Index: FLOWORD7.mac.rou =================================================================== diff -u -r48116 -r48160 --- FLOWORD7.mac.rou (.../FLOWORD7.mac.rou) (revision 48116) +++ FLOWORD7.mac.rou (.../FLOWORD7.mac.rou) (revision 48160) @@ -143,6 +143,7 @@ ...If $P($G(^KPR(PRNr,"G")),D) Set GenPRNr=$P(^KPR(PRNr,0),D,3) I GenPRNr,$P($G(^KPR(GenPRNr,0)),D,3)="GENPROD" Quit ..Set R=^KPR(PRNr,1),IsStock=$P(R,D,20),R=^KPR(PRNr,2),InOrder=$P(R,D,9) ..Set R=^KPR(PRNr,$O(^KPR(PRNr,"J"))),LEVNr=$P(R,D),MinBestH=$P(R,D,6),PrMunt=$P(R,D,17) + ..Quit:(##class(TECH.Config.ConfigMgr).Instance().GeefBoolean("BevestigdAXOrderSluitenActief"))&&(LEVNr'=$$$LevHalux) ..Set LevTerm=$P(R,D,7),GrootVp=$P(R,D,16) Set:'GrootVp GrootVp=1 ..If '(##class(TECH.Config.ConfigMgr).Instance().GeefBoolean("BevestigdAXOrderSluitenActief")) Do ...Quit:Aantal