Index: vhUnitTest/APPS/Halux/AAP/DnaCodeService/MaakDnaCodesVoorBatch/Test.cls.xml
===================================================================
diff -u -r60238 -r60245
--- vhUnitTest/APPS/Halux/AAP/DnaCodeService/MaakDnaCodesVoorBatch/Test.cls.xml	(.../Test.cls.xml)	(revision 60238)
+++ vhUnitTest/APPS/Halux/AAP/DnaCodeService/MaakDnaCodesVoorBatch/Test.cls.xml	(.../Test.cls.xml)	(revision 60245)
@@ -43,8 +43,8 @@
 	Do ..Batch.IndienMethodCall("GeefIsWegwerpPallet").DanReturn($$$True)
 	
 	Set ..ProductApiStub = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
-	Set ProductStub = ##class(vhTest.Mock.DOM.PM.Product).%New()
-	Do ProductStub.IndienMethodCall("GeefDossierNr").DanReturn("ABCDEF")
+	Set ProductStub = ##class(vhTest.Mock.DOM.PM.MaatwerkProduct).%New()
+	Do ProductStub.IndienMethodCall("GeefDottedDossierCode").DanReturn("A.BC.DE.F")
 	Do ..ProductApiStub.IndienMethodCall("GeefProduct",1000).DanReturn(ProductStub)
 ]]></Implementation>
 </Method>
@@ -62,7 +62,7 @@
 	Do $$$AssertEquals(DnaCodes.GetAt(1).Lijn,..LijnId)
 	Do $$$AssertEquals(DnaCodes.GetAt(1).Status,##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBatch())
 	Do $$$AssertEquals(DnaCodes.GetAt(1).IsWegwerpPallet,$$$True)
-	Do $$$AssertEquals(DnaCodes.GetAt(1).LadeCode,"ABCDEF")
+	Do $$$AssertEquals(DnaCodes.GetAt(1).LadeCode,"A.BC.DE.F")
 ]]></Implementation>
 </Method>
 
Index: APPS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r60238 -r60245
--- APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 60238)
+++ APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 60245)
@@ -172,7 +172,9 @@
 	Set DnaCode.ToeleveringLijn = ToeleveringLijn.GeefID()
 	Set DnaCode.OrderId = ToeleveringLijn.GeefOrderID()
 	Set DnaCode.AanmaakTijdstip = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()
-	Set DnaCode.LadeCode = ..ProductApi.GeefProduct(ProductID).GeefDossierNr()
+	If (..ProductApi.GeefProduct(ProductID).%Extends("DOM.PM.MaatwerkProduct")) {
+		Set DnaCode.LadeCode = ..ProductApi.GeefProduct(ProductID).GeefDottedDossierCode()
+	}
 	If $IsObject(Batch) {
 		Set DnaCode.BatchId = Batch.GeefID()
 		Set DnaCode.IsWegwerpPallet = Batch.GeefIsWegwerpPallet()