Index: vhUnitTest/APPS/VKP/Maatwerk/TestWinkelkarToProductVisitor.cls.xml =================================================================== diff -u -r1679 -r2199 --- vhUnitTest/APPS/VKP/Maatwerk/TestWinkelkarToProductVisitor.cls.xml (.../TestWinkelkarToProductVisitor.cls.xml) (revision 1679) +++ vhUnitTest/APPS/VKP/Maatwerk/TestWinkelkarToProductVisitor.cls.xml (.../TestWinkelkarToProductVisitor.cls.xml) (revision 2199) @@ -29,7 +29,8 @@ Do Winkelkar.VoegToe(MaatwerkLijn) Set OrderID = 1 - Set WinkelkarToProductVisitor = ##class(APPS.VKP.Maatwerk.impl.WinkelkarToProductVisitor).%New(##class(APPS.VKP.Maatwerk.enu.DocumentType).Offerte(),OrderID) + Set KlantID = 7587 + Set WinkelkarToProductVisitor = ##class(APPS.VKP.Maatwerk.impl.WinkelkarToProductVisitor).%New(##class(APPS.VKP.Maatwerk.enu.DocumentType).Offerte(),OrderID, KlantID) Do Winkelkar.Accept(WinkelkarToProductVisitor) Set BesteldeProducten = WinkelkarToProductVisitor.GeefBesteldeProducten()