Index: WSimpl/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r73827 -r73833
--- WSimpl/Halux/AAP/DnaCodeService.cls.xml (.../DnaCodeService.cls.xml) (revision 73827)
+++ WSimpl/Halux/AAP/DnaCodeService.cls.xml (.../DnaCodeService.cls.xml) (revision 73833)
@@ -93,8 +93,13 @@
1
+
+APPS.Halux.common.BatchService
+1
+
+
-DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",PalletCodeValidator:WSimpl.Halux.AAP.DnaCodeService.PalletCodeValidator="",InventarisService:APPS.MAG.Inventaris.impl.InventarisService,DocsV1:BL.PPS.TBX.DocsV1="",KlantinstellingenRepository:DOM.Halux.AAP.KlantinstellingenRepository="",VerkoopAPI:DOM.VKP.VerkoopAPI="",AantalGescandeVhossSequentieItemsBepaler:WSimpl.Halux.AAP.DnaCodeService.AantalGescandeVhossSequentieItemsBepaler="",DnaCodeInVhossKastBepaler:WSimpl.Halux.AAP.DnaCodeService.DnaCodeInVhossKastBepaler="",SequentieService:APPS.Halux.common.impl.SequentieService="",RondAfVhossKastHelper:WSimpl.Halux.AAP.DnaCodeService.RondAfVhossKastHelper="",ToeleveringService:DOM.AKP.ToeleveringService="",DocumentGenerator:APPS.Halux.Afmelden.impl.DocumentLadeGerecepteerdNaarObjective="",DnaCodeHelper:APPS.Halux.AAP.DnaCodeService.DnaCodeServiceHelper=""
+DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",PalletCodeValidator:WSimpl.Halux.AAP.DnaCodeService.PalletCodeValidator="",InventarisService:APPS.MAG.Inventaris.impl.InventarisService,DocsV1:BL.PPS.TBX.DocsV1="",KlantinstellingenRepository:DOM.Halux.AAP.KlantinstellingenRepository="",VerkoopAPI:DOM.VKP.VerkoopAPI="",AantalGescandeVhossSequentieItemsBepaler:WSimpl.Halux.AAP.DnaCodeService.AantalGescandeVhossSequentieItemsBepaler="",DnaCodeInVhossKastBepaler:WSimpl.Halux.AAP.DnaCodeService.DnaCodeInVhossKastBepaler="",SequentieService:APPS.Halux.common.impl.SequentieService="",RondAfVhossKastHelper:WSimpl.Halux.AAP.DnaCodeService.RondAfVhossKastHelper="",ToeleveringService:DOM.AKP.ToeleveringService="",DocumentGenerator:APPS.Halux.Afmelden.impl.DocumentLadeGerecepteerdNaarObjective="",DnaCodeHelper:APPS.Halux.AAP.DnaCodeService.DnaCodeServiceHelper="",BatchService:APPS.Halux.common.BatchService=""
1
1
%Status
@@ -117,6 +122,7 @@
Set ..DocumentGenerator = $$$Inject(DocumentGenerator, ##class(APPS.Halux.Afmelden.impl.DocumentLadeGerecepteerdNaarObjective).%New())
Set ..DnaCodeHelper = $$$Inject(DnaCodeHelper, ##class(APPS.Halux.AAP.DnaCodeService.DnaCodeServiceHelper).%New())
Set ..MESService = ##class(APPS.Halux.PPS.MES.MESService).%New()
+ Set ..BatchService = $$$Inject(BatchService, ##class(APPS.Halux.common.impl.BatchService).%New())
Quit $$$OK
]]>
@@ -388,7 +394,7 @@
Do ..DnaCodeRepository.Bewaar(DnaCode)
#dim MesFaseActief As %Integer = 1
- #dim Batch As APPS.Halux.common.Batch = ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchService().GeefBatch(DnaCodeAfmeldenRequest.BatchId)
+ #dim Batch As APPS.Halux.common.Batch = ..BatchService.GeefBatch(DnaCodeAfmeldenRequest.BatchId)
If (..MESService.IsActiefVoorMes(Batch.GeefLijn(), MesFaseActief)) {
#dim IsDnaCodeVoorSpaceStep As %Boolean = ..DnaCodeHelper.IsSpaceStepGeneriekProduct(DnaCode, DnaCode.ProductNummer)
If $$$Not(IsDnaCodeVoorSpaceStep) {
Index: vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeAfmelden/Test.cls.xml
===================================================================
diff -u -r73387 -r73833
--- vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeAfmelden/Test.cls.xml (.../Test.cls.xml) (revision 73387)
+++ vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/DnaCodeAfmelden/Test.cls.xml (.../Test.cls.xml) (revision 73833)
@@ -7,6 +7,7 @@
@@ -64,6 +71,7 @@
@@ -173,10 +187,15 @@
Do ToeleveringServiceMock.VerwachtMethodCall("HeeftToeleveringMinstensEenSpaceStep",DnaCode1.Toelevering).DanDoeNiks()
Set DocumentGeneratorMock = ##class(vhTest.Mock.APPS.Halux.Afmelden.impl.DocumentLadeGerecepteerdNaarObjective).%New()
- Do DocumentGeneratorMock.VerwachtMethodCall("GenereerDocumentVoorObjective",DnaCode1.DnaCode).DanDoeNiks()
+ Do DocumentGeneratorMock.VerwachtMethodCall("GenereerDocumentVoorObjective", DnaCode1.DnaCode).DanDoeNiks()
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,, DnaCodeInVhossKastBepalerStub,,, ToeleveringServiceMock, DocumentGeneratorMock)
+ #dim BatchServiceMock As vhTest.Mock.APPS.Halux.common.BatchService = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
+ #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New()
+ Do BatchMock.IndienMethodCall("GeefLijn").DanReturn(1)
+ Do BatchServiceMock.VerwachtMethodCall("GeefBatch",Request.BatchId).DanReturn(BatchMock)
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,, DnaCodeInVhossKastBepalerStub,,, ToeleveringServiceMock, DocumentGeneratorMock,,BatchServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"200")
@@ -185,6 +204,7 @@
Do DnaCodeRepositoryMock.Verifieer()
Do ToeleveringServiceMock.Verifieer()
Do DocumentGeneratorMock.Verifieer()
+ Do BatchServiceMock.Verifieer()
]]>
@@ -253,6 +273,7 @@
Set Request = ##class(WS.Halux.AAP.DnaCodeAfmeldenRequest).%New()
Set Request.DnaCode = "K00000A"
Set Request.Toelevering = "356789"
+ Set Request.BatchId = 1234567
Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New()
Set DnaCode1.Toelevering = "222222"
@@ -271,8 +292,13 @@
Set DocumentGeneratorMock = ##class(vhTest.Mock.APPS.Halux.Afmelden.impl.DocumentLadeGerecepteerdNaarObjective).%New()
Do DocumentGeneratorMock.VerwachtMethodCall("GenereerDocumentVoorObjective",DnaCode1.DnaCode).DanDoeNiks()
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock, DocumentGeneratorMock)
+ #dim BatchServiceMock As vhTest.Mock.APPS.Halux.common.BatchService = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
+ #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New()
+ Do BatchMock.IndienMethodCall("GeefLijn").DanReturn(1)
+ Do BatchServiceMock.VerwachtMethodCall("GeefBatch",Request.BatchId).DanReturn(BatchMock)
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock, DocumentGeneratorMock,,BatchServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"200")
@@ -281,6 +307,7 @@
Do DnaCodeRepositoryMock.Verifieer()
Do ToeleveringServiceMock.Verifieer()
Do DocumentGeneratorMock.Verifieer()
+ Do BatchServiceMock.Verifieer()
]]>
@@ -343,6 +370,7 @@
Set Request.DnaCode = "DnaCode"
Set Request.Aantal = -1
Set Request.PalletCode = "TBX12345"
+ Set Request.BatchId = 1234567
Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New()
Set DnaCode1.Toelevering = "222222"
@@ -373,8 +401,13 @@
Set DocumentGeneratorMock = ##class(vhTest.Mock.APPS.Halux.Afmelden.impl.DocumentLadeGerecepteerdNaarObjective).%New()
Do DocumentGeneratorMock.VerwachtMethodCall("GenereerDocumentVoorObjective",DnaCode1.DnaCode).DanDoeNiks()
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock, DocumentGeneratorMock)
+ #dim BatchServiceMock As vhTest.Mock.APPS.Halux.common.BatchService = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
+ #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New()
+ Do BatchMock.IndienMethodCall("GeefLijn").DanReturn(1)
+ Do BatchServiceMock.VerwachtMethodCall("GeefBatch",Request.BatchId).DanReturn(BatchMock)
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock, DocumentGeneratorMock,,BatchServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"200")
@@ -383,6 +416,7 @@
Do DnaCodeRepositoryMock.Verifieer()
Do ToeleveringServiceMock.Verifieer()
Do DocumentGeneratorMock.Verifieer()
+ Do BatchServiceMock.Verifieer()
]]>
@@ -391,6 +425,7 @@
Set Request = ##class(WS.Halux.AAP.DnaCodeAfmeldenRequest).%New()
Set Request.DnaCode = "DnaCode"
Set Request.Locatie = $$$DummyString
+ Set Request.BatchId = 1234567
Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New()
Set DnaCode1.Toelevering = "222222"
@@ -406,8 +441,13 @@
Set DocumentGeneratorMock = ##class(vhTest.Mock.APPS.Halux.Afmelden.impl.DocumentLadeGerecepteerdNaarObjective).%New()
Do DocumentGeneratorMock.VerwachtMethodCall("GenereerDocumentVoorObjective",DnaCode1.DnaCode).DanDoeNiks()
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock, DocumentGeneratorMock)
+ #dim BatchServiceMock As vhTest.Mock.APPS.Halux.common.BatchService = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
+ #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New()
+ Do BatchMock.IndienMethodCall("GeefLijn").DanReturn(1)
+ Do BatchServiceMock.VerwachtMethodCall("GeefBatch",Request.BatchId).DanReturn(BatchMock)
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock, DocumentGeneratorMock,,BatchServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"200")
@@ -416,6 +456,7 @@
Do DnaCodeRepositoryMock.Verifieer()
Do ToeleveringServiceMock.Verifieer()
Do DocumentGeneratorMock.Verifieer()
+ Do BatchServiceMock.Verifieer()
]]>
@@ -424,6 +465,7 @@
Set Request = ##class(WS.Halux.AAP.DnaCodeAfmeldenRequest).%New()
Set Request.DnaCode = "DnaCode"
Set Request.Locatie = $$$DummyString
+ Set Request.BatchId = 1234567
Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New()
Set DnaCode1.Toelevering = "222222"
@@ -453,8 +495,13 @@
Set DocumentGeneratorMock = ##class(vhTest.Mock.APPS.Halux.Afmelden.impl.DocumentLadeGerecepteerdNaarObjective).%New()
Do DocumentGeneratorMock.VerwachtMethodCall("GenereerDocumentVoorObjective",DnaCode1.DnaCode).DanDoeNiks()
- Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock, DocumentGeneratorMock)
+ #dim BatchServiceMock As vhTest.Mock.APPS.Halux.common.BatchService = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
+ #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New()
+ Do BatchMock.IndienMethodCall("GeefLijn").DanReturn(1)
+ Do BatchServiceMock.VerwachtMethodCall("GeefBatch",Request.BatchId).DanReturn(BatchMock)
+ Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock,,,,,,,,,, ToeleveringServiceMock, DocumentGeneratorMock,,BatchServiceMock)
+
#dim Antwoord As WS.Halux.AAP.DnaCodeAfmeldenResponse = DnaCodeService.DnaCodeAfmelden(Request)
Do $$$AssertEquals(Antwoord.Header.Status,"200")
@@ -463,13 +510,15 @@
Do DnaCodeRepositoryMock.Verifieer()
Do ToeleveringServiceMock.Verifieer()
Do DocumentGeneratorMock.Verifieer()
+ Do BatchServiceMock.Verifieer()
]]>