Index: APPS/EDIExport/AankoopOrderResponse/BLUM/impl/BLOrdRspService.cls.xml
===================================================================
diff -u -r39140 -r39365
--- APPS/EDIExport/AankoopOrderResponse/BLUM/impl/BLOrdRspService.cls.xml	(.../BLOrdRspService.cls.xml)	(revision 39140)
+++ APPS/EDIExport/AankoopOrderResponse/BLUM/impl/BLOrdRspService.cls.xml	(.../BLOrdRspService.cls.xml)	(revision 39365)
@@ -74,12 +74,6 @@
 				Set RecNr = RecNr + 1
 			}
 			Do ..SchrijfToeleveringLijn(Toelevering.ToeleveringHeader.CustomerOrderReference,+ $Piece(ToeleveringDetail.OrderLineIdentificationCustomer,".",2),RecNr,ToeleveringDetail.ToString())
-			set ProductNr = ..GeefProductNummer(ToeleveringDetail.IdentNumberSupplierBAU,Toelevering.ToeleveringHeader.CustomerNumberForInvoice)
-			if ..ZoekReceptieInKTO5ProductNummer(Toelevering.ToeleveringHeader.CustomerOrderReference, ProductNr,ToeleveringDetail.OrderQuantity){
-				;opvangen van lijnen van voor de migratie naar xml berichten. toelevering wordt helemaal bevestigd,ook reeds geleverde lijnen
-				;reeds geleverde lijnen zitten niet meer in KTO, maar in KTO5 maar kunnen ook van een vorige toelevering met de zelfde nummer zijn
-				Do ..ZetRecordAlsVerwerkt(Toelevering.ToeleveringHeader.CustomerOrderReference,$Piece(ToeleveringDetail.OrderLineIdentificationCustomer,".",2),RecNr)
-			}
 		}
 		Do ..ControleSamengevoegdeLijnen(Toelevering.ToeleveringHeader.CustomerOrderReference,$Piece(ToeleveringDetail.OrderLineIdentificationCustomer,".",2),RecNr)
 	}
@@ -293,11 +287,7 @@
 
 <Method name="SchrijfToeleveringLijn">
 <FormalSpec>ToeleveringNr:%String,ToeleveringLijnNr:%String,lijnnr:%Integer,Record:%String</FormalSpec>
-<Implementation><![CDATA[
-	Set $Piece(@..#Global(ToeleveringNr,+ToeleveringLijnNr,lijnnr),"\",1) = Record
-	if ..ZoekReceptieInKTO5ToelevLijnNr(ToeleveringNr,ToeleveringLijnNr,..GeefAantal(ToeleveringNr,ToeleveringLijnNr,lijnnr)) {
-		Set $Piece(@..#Global(ToeleveringNr,+ToeleveringLijnNr,lijnnr),"\",2) = 1
-	}
+<Implementation><![CDATA[	Set $Piece(@..#Global(ToeleveringNr,+ToeleveringLijnNr,lijnnr),"\",1) = Record
 ]]></Implementation>
 </Method>