Index: vhConsistency/Checks/InvoerUitvoerLinken.cls.xml
===================================================================
diff -u -r2773 -r2776
--- vhConsistency/Checks/InvoerUitvoerLinken.cls.xml	(.../InvoerUitvoerLinken.cls.xml)	(revision 2773)
+++ vhConsistency/Checks/InvoerUitvoerLinken.cls.xml	(.../InvoerUitvoerLinken.cls.xml)	(revision 2776)
@@ -148,7 +148,7 @@
 	{
 		Set VerwachteUitvoer = VerwachteUitvoerAPI.GeefVerwachteUitvoer(ResultSet.Data("ID"))
 		Set Order = OrderAPI.GeefOrder(VerwachteUitvoer.GeefTransactieReferentie())
-		If (('$IsObject(Order)) || ('$IsObject(Order.GeefOrderLijn($Get(^ORD("IU",Order.GeefOrderNr(),VerwachteUitvoer.GeefTransactieLijnReferentie()),"")))) || (Order.GeefOrderLijn($Get(^ORD("IU",Order.GeefOrderNr(),VerwachteUitvoer.GeefTransactieLijnReferentie()),"")).GeefAantal() <= 0))
+		If (('$IsObject(Order)) || ('$IsObject(Order.GeefOrderLijnViaCode(VerwachteUitvoer.GeefTransactieLijnReferentie()))) || (Order.GeefOrderLijnViaCode(VerwachteUitvoer.GeefTransactieLijnReferentie()).GeefAantal() <= 0))
 		{
 			Do VerwachteUitvoerAPI.AnnuleerVerwachteUitvoer(VerwachteUitvoer.%Id())
 			Do ..VoegMeldingToe("Verwachte uitvoer verwijderd (Order, LijnNr): "_VerwachteUitvoer.GeefTransactieReferentie()_", "_VerwachteUitvoer.GeefTransactieLijnReferentie())
@@ -230,7 +230,7 @@
 		Else
 		{
 			Set OrderNr = VerwachteUitvoerReservatie.GeefVerwachteUitvoer().GeefTransactieReferentie()
-			Set OrderLijnNr = VerwachteUitvoerReservatie.GeefVerwachteUitvoer().GeefTransactieLijnReferentie()
+			Set OrderLijnCode = VerwachteUitvoerReservatie.GeefVerwachteUitvoer().GeefTransactieLijnReferentie()
 			Set ToeNr = VerwachteInvoer.GeefTransactieReferentie()
 			Set ToeLijnNr = VerwachteInvoer.GeefTransactieLijnReferentie()
 			Set Order = OrderAPI.GeefOrder(OrderNr)
@@ -249,15 +249,15 @@
 			}
 			Else
 			{
-				Set OrderLijn = Order.GeefOrderLijn($Get(^ORD("IU",OrderNr,OrderLijnNr),""))
+				Set OrderLijn = Order.GeefOrderLijnViaCode(OrderLijnCode)
 				Set ToeleveringLijn = Toelevering.GeefToeleveringLijn(ToeLijnNr)
 				If ('$IsObject(OrderLijn)) && ('$IsObject(ToeleveringLijn))
 				{
-					Do ..VoegMeldingToe("Invoer-uitvoer-link "_InvoerUitvoerLink.%Id()_" verwijst naar orderlijn "_OrderLijnNr_" van order "_OrderNr_" en toeleveringlijn "_ToeLijnNr_" van toelevering "_ToeNr_" die beiden niet bestaan (niet auto oplosbaar)")
+					Do ..VoegMeldingToe("Invoer-uitvoer-link "_InvoerUitvoerLink.%Id()_" verwijst naar orderlijn "_OrderLijn.GeefLijnNr()_" van order "_OrderNr_" en toeleveringlijn "_ToeLijnNr_" van toelevering "_ToeNr_" die beiden niet bestaan (niet auto oplosbaar)")
 				}
 				ElseIf ('$IsObject(OrderLijn))
 				{
-					Do ..VoegMeldingToe("Invoer-uitvoer-link "_InvoerUitvoerLink.%Id()_" verwijst naar orderlijn "_OrderLijnNr_" van order "_OrderNr_" die niet bestaat (niet auto oplosbaar)")
+					Do ..VoegMeldingToe("Invoer-uitvoer-link "_InvoerUitvoerLink.%Id()_" verwijst naar orderlijn "_OrderLijn.GeefLijnNr()_" van order "_OrderNr_" die niet bestaat (niet auto oplosbaar)")
 				}
 				ElseIf ('$IsObject(ToeleveringLijn))
 				{
@@ -269,7 +269,7 @@
 					If ('$IsObject(KOMToelevering))
 					{
 						Do InvoerUitvoerLink.Delete()
-						Do ..VoegMeldingToe("Invoer-uitvoer-link "_InvoerUitvoerLink.%Id()_" tussen (Order, LijnNr): "_OrderNr_", "_OrderLijnNr_" en (Toelevering, LijnNr): "_ToeNr_", "_ToeLijnNr_" bestaat niet meer tussen het order en de toelevering")
+						Do ..VoegMeldingToe("Invoer-uitvoer-link "_InvoerUitvoerLink.%Id()_" tussen (Order, LijnNr): "_OrderNr_", "_OrderLijn.GeefLijnNr()_" en (Toelevering, LijnNr): "_ToeNr_", "_ToeLijnNr_" bestaat niet meer tussen het order en de toelevering")
 					}
 				}
 			}