Index: APPS/VKP/Maatwerk/LadeRegistratie/impl/IDataOphaler.cls.xml
===================================================================
diff -u -r63478 -r63493
--- APPS/VKP/Maatwerk/LadeRegistratie/impl/IDataOphaler.cls.xml	(.../IDataOphaler.cls.xml)	(revision 63478)
+++ APPS/VKP/Maatwerk/LadeRegistratie/impl/IDataOphaler.cls.xml	(.../IDataOphaler.cls.xml)	(revision 63493)
@@ -39,7 +39,8 @@
 	
 	If (..Registratie.ObjectType="D")  ; via Dossiercode
 	{
-		If $Length(..Registratie.ObjectRef)=7 {
+		#dim IsVermoedelijkEenDnaCode As %Boolean = ( $Length(..Registratie.ObjectRef)=7 )
+		If IsVermoedelijkEenDnaCode { ; Dossiercode (=ladecode) opvissen uit DnaCode
 			Set DnaCodeIterator = ##class(DOM.Halux.AAP.DnaCodeRepository).%New().ZoekViaDnaCode(..Registratie.ObjectRef)
 			If DnaCodeIterator.HasNext() {
 				#dim DnaCode As DOM.Halux.AAP.DnaCode = DnaCodeIterator.Next()