Index: APPS/Halux/AAP/DnaCodeService/DnaCodeServiceHelper.cls.xml
===================================================================
diff -u -r66828 -r66868
--- APPS/Halux/AAP/DnaCodeService/DnaCodeServiceHelper.cls.xml	(.../DnaCodeServiceHelper.cls.xml)	(revision 66828)
+++ APPS/Halux/AAP/DnaCodeService/DnaCodeServiceHelper.cls.xml	(.../DnaCodeServiceHelper.cls.xml)	(revision 66868)
@@ -94,7 +94,7 @@
 <Implementation><![CDATA[
 	#dim ParentDnaCode As %String = ""
 	
-	If ##class(TECH.StringUtils).StartsWith(DnaCode.DnaCode,"O","G","M") || (Batch.GeefProductieGroep()=##class(APPS.Halux.common.enu.ProductieGroep).Kast())|| (Batch.GeefProductieGroep()=##class(APPS.Halux.common.enu.ProductieGroep).LosseComponenten() || (..IsTaorLosseComponentenVerpakking(DnaCode))) {
+	If ##class(TECH.StringUtils).StartsWith(DnaCode.DnaCode,"O", "G") || (Batch.GeefProductieGroep()=##class(APPS.Halux.common.enu.ProductieGroep).Kast())|| (Batch.GeefProductieGroep()=##class(APPS.Halux.common.enu.ProductieGroep).LosseComponenten() || (..IsTaorLosseComponentenVerpakking(DnaCode))) {
 		Set ParentDnaCode = DnaCode.DnaCode
 	}