Index: APPS/EDIExport/AankoopOrder/impl/BLUM/DataVerzamelaar.cls.xml
===================================================================
diff -u -r35208 -r35222
--- APPS/EDIExport/AankoopOrder/impl/BLUM/DataVerzamelaar.cls.xml	(.../DataVerzamelaar.cls.xml)	(revision 35208)
+++ APPS/EDIExport/AankoopOrder/impl/BLUM/DataVerzamelaar.cls.xml	(.../DataVerzamelaar.cls.xml)	(revision 35222)
@@ -124,12 +124,12 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim ToeleveringID As %String = $Piece(OrderLineIdentificationCustomer,".",1)
-	#dim ToeleveringLijnID As %String = "1" _$Piece(OrderLineIdentificationCustomer,".",2)
 	#dim LVHProductNummer As %String = $$$Trim($Extract(BLExportLijn,56,74))
 	
 	if (LVHProductNummer = "")
 	{
+		#dim ToeleveringID As %String = $Piece(OrderLineIdentificationCustomer,".",1)
+		#dim ToeleveringLijnID As %String = "1" _$Piece(OrderLineIdentificationCustomer,".",2)
 		#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringAPI.GeefToelevering(ToeleveringID)
 		#dim ToeleveringLijn As DOM.AKP.impl.DataM.DataMProductToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(ToeleveringLijnID)
 		Quit:(ToeleveringLijn '= "") ToeleveringLijn.GeefProductID()