Index: vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeAfmelden/Test.cls.xml
===================================================================
diff -u -r62906 -r63858
--- vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeAfmelden/Test.cls.xml (.../Test.cls.xml) (revision 62906)
+++ vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeAfmelden/Test.cls.xml (.../Test.cls.xml) (revision 63858)
@@ -20,8 +20,11 @@
Do DnaCodeRepositoryMock.IndienMethodCall("ZoekViaToeleveringIdEnRecent",DnaCode1.Toelevering).DanReturn(DnaCodeIteratorTweeStuks)
Do DnaCodeRepositoryMock.VerwachtMethodCall("Bewaar",DnaCode1).ExactAantalKeer(1)
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock)
+ Set ToeleveringServiceMock = ##class(vhTest.Mock.DOM.AKP.ToeleveringService).%New()
+ Do ToeleveringServiceMock.VerwachtMethodCall("HeeftToeleveringMinstensEenSpaceStep",DnaCode1.Toelevering).DanDoeNiks()
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"200")
@@ -30,6 +33,7 @@
Do $$$AssertEquals(Antwoord.AantalReedsGescand,"1")
Do $$$AssertEquals(Antwoord.DnaCodes.GetAt(1).Locatie,##class(APPS.MAG.enu.MagazijnTransitLocatie).Halux2Transit())
Do DnaCodeRepositoryMock.Verifieer()
+ Do ToeleveringServiceMock.Verifieer()
]]>
@@ -71,8 +75,11 @@
Do DnaCodeRepositoryMock.IndienMethodCall("ZoekViaToeleveringIdEnRecent",DnaCode1.Toelevering).DanReturn(..EmptyIterator())
Do DnaCodeRepositoryMock.VerwachtMethodCall("Bewaar",DnaCode1).ExactAantalKeer(1)
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock)
+ Set ToeleveringServiceMock = ##class(vhTest.Mock.DOM.AKP.ToeleveringService).%New()
+ Do ToeleveringServiceMock.VerwachtMethodCall("HeeftToeleveringMinstensEenSpaceStep", DnaCode2.Toelevering).DanDoeNiks()
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"-1021")
@@ -81,6 +88,7 @@
Do $$$AssertEquals(Antwoord.AantalInToelevering,"0")
Do $$$AssertEquals(Antwoord.AantalReedsGescand,"0")
Do DnaCodeRepositoryMock.Verifieer()
+ Do ToeleveringServiceMock.Verifieer()
]]>
@@ -110,6 +118,7 @@
Do $$$AssertEquals(Antwoord.DnaCodes.Count(),0)
Do $$$AssertEquals(Antwoord.AantalInToelevering,"0")
Do $$$AssertEquals(Antwoord.AantalReedsGescand,"0")
+ Do $$$AssertEquals(Antwoord.IsSST,$$$False)
Do DnaCodeRepositoryMock.Verifieer()
]]>
@@ -157,15 +166,19 @@
Set DnaCodeInVhossKastBepalerStub = ##class(vhTest.Mock.WSimpl.Halux.AAP.DnaCodeService.DnaCodeInVhossKastBepaler).%New()
Do DnaCodeInVhossKastBepalerStub.IndienMethodCall("MagDnaCodeInVhossKast", DnaCode1, Request.PalletCode, Request.BatchId).DanReturn(1)
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,DnaCodeInVhossKastBepalerStub)
+ Set ToeleveringServiceMock = ##class(vhTest.Mock.DOM.AKP.ToeleveringService).%New()
+ Do ToeleveringServiceMock.VerwachtMethodCall("HeeftToeleveringMinstensEenSpaceStep",DnaCode1.Toelevering).DanDoeNiks()
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,, DnaCodeInVhossKastBepalerStub,,, ToeleveringServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"200")
Do $$$AssertEquals(Antwoord.DnaCodes.Count(),0)
Do $$$AssertEquals(Antwoord.AantalInToelevering,"0")
Do $$$AssertEquals(Antwoord.AantalReedsGescand,"0")
Do DnaCodeRepositoryMock.Verifieer()
+ Do ToeleveringServiceMock.Verifieer()
]]>
@@ -248,15 +261,19 @@
Do DnaCodeRepositoryMock.IndienMethodCall("ZoekViaToeleveringIdEnRecent",DnaCode1.Toelevering).DanReturn(DnaCodeIteratorTweeStuks)
Do DnaCodeRepositoryMock.VerwachtMethodCall("Bewaar",DnaCode1).ExactAantalKeer(1)
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock)
+ Set ToeleveringServiceMock = ##class(vhTest.Mock.DOM.AKP.ToeleveringService).%New()
+ Do ToeleveringServiceMock.VerwachtMethodCall("HeeftToeleveringMinstensEenSpaceStep", DnaCode2.Toelevering).DanDoeNiks()
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"200")
Do $$$AssertEquals(Antwoord.DnaCodes.Count(),2)
Do $$$AssertEquals(Antwoord.AantalInToelevering,"2")
Do $$$AssertEquals(Antwoord.AantalReedsGescand,"0")
Do DnaCodeRepositoryMock.Verifieer()
+ Do ToeleveringServiceMock.Verifieer()
]]>
@@ -345,15 +362,19 @@
Do DnaCodeRepositoryMock.IndienMethodCall("ZoekViaToeleveringIdEnRecent",DnaCode1.Toelevering).DanReturn(DnaCodeIteratorTweeStuks)
Do DnaCodeRepositoryMock.VerwachtMethodCall("Bewaar",..Matches.Object(AfgemeldeDnaCode)).ExactAantalKeer(1)
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock)
+ Set ToeleveringServiceMock = ##class(vhTest.Mock.DOM.AKP.ToeleveringService).%New()
+ Do ToeleveringServiceMock.VerwachtMethodCall("HeeftToeleveringMinstensEenSpaceStep",AfgemeldeDnaCode.Toelevering).DanDoeNiks()
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"200")
Do $$$AssertEquals(Antwoord.DnaCodes.Count(),2)
Do $$$AssertEquals(Antwoord.AantalInToelevering,"2")
Do $$$AssertEquals(Antwoord.AantalReedsGescand,"1")
Do DnaCodeRepositoryMock.Verifieer()
+ Do ToeleveringServiceMock.Verifieer()
]]>
@@ -371,14 +392,18 @@
Do DnaCodeRepositoryMock.IndienMethodCall("ZoekViaToeleveringIdEnRecent",DnaCode1.Toelevering).DanReturn(DnaCodeIteratorEenStuk)
Do DnaCodeRepositoryMock.VerwachtMethodCall("Bewaar",DnaCode1).ExactAantalKeer(1)
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock)
+ Set ToeleveringServiceMock = ##class(vhTest.Mock.DOM.AKP.ToeleveringService).%New()
+ Do ToeleveringServiceMock.VerwachtMethodCall("HeeftToeleveringMinstensEenSpaceStep",DnaCode1.Toelevering).DanDoeNiks()
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"200")
Do $$$AssertEquals(Antwoord.DnaCodes.Count(),1)
Do $$$AssertEquals(Antwoord.DnaCodes.GetAt(1).Locatie,$$$DummyString)
Do DnaCodeRepositoryMock.Verifieer()
+ Do ToeleveringServiceMock.Verifieer()
]]>
@@ -410,16 +435,78 @@
Do DnaCodeRepositoryMock.VerwachtMethodCall("Bewaar",DnaCode2).ExactAantalKeer(1)
Do DnaCodeRepositoryMock.VerwachtMethodCall("Bewaar",DnaCode3).ExactAantalKeer(1)
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock)
+ Set ToeleveringServiceMock = ##class(vhTest.Mock.DOM.AKP.ToeleveringService).%New()
+ Do ToeleveringServiceMock.VerwachtMethodCall("HeeftToeleveringMinstensEenSpaceStep", DnaCode3.Toelevering).DanDoeNiks()
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"200")
Do $$$AssertEquals(Antwoord.DnaCodes.Count(),1)
Do $$$AssertEquals(Antwoord.DnaCodes.GetAt(1).Locatie,$$$DummyString)
Do DnaCodeRepositoryMock.Verifieer()
+ Do ToeleveringServiceMock.Verifieer()
]]>
+
+
+
+
+
+
+
+