Index: vhConsistency/Checks/InvoerUitvoerLinken.cls.xml =================================================================== diff -u -r3202 -r3402 --- vhConsistency/Checks/InvoerUitvoerLinken.cls.xml (.../InvoerUitvoerLinken.cls.xml) (revision 3202) +++ vhConsistency/Checks/InvoerUitvoerLinken.cls.xml (.../InvoerUitvoerLinken.cls.xml) (revision 3402) @@ -253,8 +253,8 @@ Set KOMToelevering = OrderLijn.GeefToelevering() If ('$IsObject(KOMToelevering)) { - Do InvoerUitvoerLink.Delete() - 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") + Do VerwachteInvoerAPI.VerbreekInvoerUitvoerLinken(InvoerUitvoerLink.GeefVerwachteInvoer().%Id(),InvoerUitvoerLink.GeefVerwachteUitvoerReservatie().GeefVerwachteUitvoer().%Id()) + Do ..VoegMeldingToe("Invoer-uitvoer-link tussen (Order, LijnNr): "_OrderNr_", "_OrderLijn.GeefLijnNr()_" en (Toelevering, LijnNr): "_ToeNr_", "_ToeLijnNr_" bestaat niet meer tussen het order en de toelevering") } } }