Index: APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml
===================================================================
diff -u -r54459 -r54460
--- APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml	(.../TransportdataVoorKlantBepaler.cls.xml)	(revision 54459)
+++ APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml	(.../TransportdataVoorKlantBepaler.cls.xml)	(revision 54460)
@@ -122,9 +122,17 @@
 	#dim Bon As DOM.VKP.Bon
 	#dim KlantnummerLijst As %String = ""
 	#dim BonIterator As TECH.Iterator = Levering.GeefBonIterator()
+	
 	While BonIterator.HasNext() {
 		Set Bon = BonIterator.Next()
-		Set KlantnummerLijst = KlantnummerLijst _ Bon.GeefDocumentReferenties().KlantOrderNummer_"-"
+		try {
+			If $IsObject(Bon) && $IsObject(Bon.GeefDocumentReferenties()) {
+				Set KlantnummerLijst = KlantnummerLijst _ Bon.GeefDocumentReferenties().KlantOrderNummer_"-"
+			}
+		} catch {
+			#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+			Set KlantnummerLijst = ""
+		}
 	}
 	Quit ##class(TECH.StringUtils).RightTrimMultiple(KlantnummerLijst,"-")
 ]]></Implementation>