Index: vhUnitTest/APPS/VKP/Klantspecifiek/Haefele/KortingParser/Parse/Test.cls.xml =================================================================== diff -u -r61323 -r61326 --- vhUnitTest/APPS/VKP/Klantspecifiek/Haefele/KortingParser/Parse/Test.cls.xml (.../Test.cls.xml) (revision 61323) +++ vhUnitTest/APPS/VKP/Klantspecifiek/Haefele/KortingParser/Parse/Test.cls.xml (.../Test.cls.xml) (revision 61326) @@ -3,22 +3,93 @@ vhUnitTest.TestCase + + + + + + + + + + + + + + + @@ -33,13 +104,13 @@ #dim MockCustomerVerwerker As vhTest.Mock.APPS.VKP.Korting.impl.CustomerVerwerker = ##class(vhTest.Mock.APPS.VKP.Korting.impl.CustomerVerwerker).%New() Set Exception = ##class(TECH.Exceptions.InvalidInputException).%New("Onze test exceptie") - Do MockCustomerVerwerker.VerwachtMethodCall("VerwerkCustomer",..Matches.Object(Customer1),PersonalityID).DanDoeNiks() - Do MockCustomerVerwerker.IndienMethodCall("VerwerkCustomer",..Matches.Object(Customer2),PersonalityID).DanException(Exception) + Do MockCustomerVerwerker.VerwachtMethodCall("VerwerkCustomer",..Matches.Object(Customer2),PersonalityID).DanDoeNiks() + Do MockCustomerVerwerker.IndienMethodCall("VerwerkCustomer",..Matches.Object(Customer1),PersonalityID).DanException(Exception) Do MockCustomerVerwerker.VerwachtMethodCall("VerwerkCustomer",..Matches.Object(Customer3),PersonalityID).DanDoeNiks() Set FakeReader = ##class(vhUnitTest.APPS.VKP.Korting.impl.CustomerVerwerker.VerwerkCustomer.FakeKortingReader).%New(3) Set LoggerMock=##class(vhTest.Mock.vhLib.Logger).%New() - Do LoggerMock.VerwachtMethodCall("ErrorMail","Onze test exceptie","Bestandsnaam: 'NIET VAN TOEPASSING' Personality: '33' Customer: 'DE200002'") + Do LoggerMock.VerwachtMethodCall("ErrorMail","Onze test exceptie","Bestandsnaam: 'NIET VAN TOEPASSING' Personality: '33' Customer: 'DE200001'") #dim KortingParser As APPS.VKP.Klantspecifiek.Haefele.KortingParser = ##class(APPS.VKP.Klantspecifiek.Haefele.KortingParser).%New(,FakeReader, MockCustomerVerwerker,LoggerMock) Do KortingParser.Parse($$$DummyString,PersonalityID) @@ -48,75 +119,75 @@ ]]> - - + + -Method "Test HaefeleBE met 2 klanten"() -{ - #dim Customer As APPS.VKP.Korting.Customer = ##class(vhTest.Utils.APPS.VKP.Korting.Customer).GeefCustomerDE() + + + -Method "Test HaefeleNL met 1 klant"() -{ - #dim Customer As APPS.VKP.Korting.Customer = ##class(vhTest.Utils.APPS.VKP.Korting.Customer).GeefCustomerDE() + + + -Method "Test HaefeleNL met 2 klanten"() -{ - #dim Customer As APPS.VKP.Korting.Customer = ##class(vhTest.Utils.APPS.VKP.Korting.Customer).GeefCustomerDE() + + - +]]> + Index: vhUnitTest/APPS/VKP/Korting/impl/KortingService/GeefKortingConfiguratieLijst/Test.cls.xml =================================================================== diff -u -r61323 -r61326 --- vhUnitTest/APPS/VKP/Korting/impl/KortingService/GeefKortingConfiguratieLijst/Test.cls.xml (.../Test.cls.xml) (revision 61323) +++ vhUnitTest/APPS/VKP/Korting/impl/KortingService/GeefKortingConfiguratieLijst/Test.cls.xml (.../Test.cls.xml) (revision 61326) @@ -70,15 +70,10 @@ KortingConfiguratieLijst:APPS.VKP.dto.KortingConfiguratieLijst KortingConfiguratieLijst:APPS.VKP.dto.KortingConfiguratieLijst BestandsNaam:%String,PersonalityID:DOM.common.enu.Personality