Index: APPS/VKP/Maatwerk/LadeRegistratie/impl/IDataOphaler.cls.xml
===================================================================
diff -u -r72989 -r72990
--- APPS/VKP/Maatwerk/LadeRegistratie/impl/IDataOphaler.cls.xml	(.../IDataOphaler.cls.xml)	(revision 72989)
+++ APPS/VKP/Maatwerk/LadeRegistratie/impl/IDataOphaler.cls.xml	(.../IDataOphaler.cls.xml)	(revision 72990)
@@ -59,7 +59,12 @@
 	
 	If (..Registratie.ObjectType="O") ; via DnaCode
 	{
-		Do ..VulAanViaDossierCode(..Registratie.ObjectRef)
+		Set DnaCodeIterator = ##class(DOM.Halux.AAP.DnaCodeRepository).%New().ZoekViaDnaCode(..Registratie.ObjectRef)
+		If DnaCodeIterator.HasNext() {
+			Set DnaCode = DnaCodeIterator.Next()
+			#dim DossierCode As %String = ##class(TECH.StringUtils).StringStrippenVanLeestekensSpatiesTabs(DnaCode.LadeCode)
+		}
+		Do ..VulAanViaDossierCode(DossierCode)
 	}
 	
 	try {