Index: APPS/Halux/common/ProductieSequentie.cls.xml
===================================================================
diff -u -r62548 -r73777
--- APPS/Halux/common/ProductieSequentie.cls.xml	(.../ProductieSequentie.cls.xml)	(revision 62548)
+++ APPS/Halux/common/ProductieSequentie.cls.xml	(.../ProductieSequentie.cls.xml)	(revision 73777)
@@ -260,7 +260,7 @@
 	#dim blOptiVHoss As BL.PPS.TBX.OptiVHoss = ##class(BL.PPS.TBX.OptiVHoss).Instantiate()		
 	#dim IsViaIngegevenKenmerken As %Boolean = $$$True
 	
-	Do blOptiVHoss.Init(lbTOENrs,,IsViaIngegevenKenmerken)
+	Do blOptiVHoss.Init(lbTOENrs,##class(APPS.Halux.common.enu.ProductieGroep).Kast(),IsViaIngegevenKenmerken)
 	Do blOptiVHoss.OptimizeStorage() 	
 	Do blOptiVHoss.SubOptimizeProduction(VHOSSOrder)
 	Do blOptiVHoss.InitLoop(.lbIndex)