Index: APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml
===================================================================
diff -u -r52223 -r52427
--- APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 52223)
+++ APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 52427)
@@ -158,16 +158,16 @@
 	#dim ProbleemLijnen As %String = ""
 	
 	While ..LijnenIterator.HasNext() {
+		#dim ProductLijn As APPS.EDI.common.dto.ProductLijn = ..LijnenIterator.Next()
 		Try {
-			#dim ProductLijn As APPS.EDI.common.dto.ProductLijn = ..LijnenIterator.Next()
 			If ProductLijn.Product.Type = "PredefinedProduct" {
 				Do ..VoegToeProductLijn(Offerte,ProductLijn)
 			} Else {
 				Do ..VoegToeMaatwerkLijn(Offerte,ProductLijn)
 			}
 		} Catch {
 			#dim GecatchteException As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
-			Set ProbleemLijnen = ProbleemLijnen _ " " _ ..LijnenIterator.Key()
+			Set ProbleemLijnen = ProbleemLijnen _ "'" _ ProductLijn.Referentie _ "' (nr " _ ..LijnenIterator.Key() _ "); "
 		}
 		If $$$HasLength(ProbleemLijnen) {			
 			Set Exception = ##class(TECH.Exceptions.InvalidInputException).%New("Ongeldige data UNIShopBesteller op lijn(en) "_ProbleemLijnen)