Index: BL/Legacy/EWORDSW.cls.xml =================================================================== diff -u -r66310 -r74974 --- BL/Legacy/EWORDSW.cls.xml (.../EWORDSW.cls.xml) (revision 66310) +++ BL/Legacy/EWORDSW.cls.xml (.../EWORDSW.cls.xml) (revision 74974) @@ -73,7 +73,11 @@ }ElseIf ..IsInUglyEnBevat(MagList,Magazijn,lbProductTypesInConsolidatie,##class(BL.Legacy.enu.ProductBevatType).TaorIndeling()) { Set Magazijn = ##class(APPS.MAG.enu.Magazijn).Orgalux() ;##class(APPS.MAG.enu.Magazijn).TAORIndeling() ; PV 17/11/2016 }ElseIf ..KomtVanHaluxEnServoDriveOmpak(MagList,PRNr) { - Set Magazijn = ##class(APPS.MAG.enu.Magazijn).Ugly() + If (..IsStockProduct(PRNr)) { + Set Magazijn = ##class(APPS.MAG.enu.Magazijn).Ugly() + } Else { + Set Magazijn = ##class(APPS.MAG.enu.Magazijn).Halux() + } }ElseIf ..KomtVanHaluxEnSpecifiek(MagList,PRNr) { Set Magazijn = ##class(APPS.MAG.enu.Magazijn).Ugly() }ElseIf ..KomtVanHaluxEnGeenPalletInAutomatischMagazijn(MagList,PRNr) { @@ -171,6 +175,21 @@ Quit 0 ]]> + + +1 +PRNr:%String +%Boolean + +