Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn/Test.cls.xml
===================================================================
diff -u -r38849 -r38854
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn/Test.cls.xml (.../Test.cls.xml) (revision 38849)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn/Test.cls.xml (.../Test.cls.xml) (revision 38854)
@@ -12,7 +12,7 @@
Do WinkelkarRepositoryStub.IndienMethodCall("GeefViaExterneId", $$$ElkeWaarde).DanReturn(WinkelkarDummy)
#dim WinkelkarServiceMock As vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
- Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeProduct","DummyID", "ProductId", 5 , "" , "ProjectReferentie").DanDoeNiks()
+ Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeProduct","DummyID", "ProductId", 5 , "PakketReferentie" , "ProjectReferentie").DanDoeNiks()
#dim BewaarProductLijn As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New(WinkelkarServiceMock, WinkelkarRepositoryStub)
@@ -31,7 +31,7 @@
Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefViaExterneId", "WinkelkarId").DanReturn(WinkelkarDummy)
#dim WinkelkarServiceStub As vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
- Do WinkelkarServiceStub.IndienMethodCall("VoegToeProduct","DummyID", "ProductId", 5 , "" , "ProjectReferentie").DanDoeNiks()
+ Do WinkelkarServiceStub.IndienMethodCall("VoegToeProduct","DummyID", "ProductId", 5 , "PakketReferentie" , "ProjectReferentie").DanDoeNiks()
#dim BewaarProductLijn As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New(WinkelkarServiceStub, WinkelkarRepositoryMock)
@@ -66,6 +66,7 @@
Set BewaarProductLijnRequest.ProductId = "ProductId"
Set BewaarProductLijnRequest.Aantal = 5
Set BewaarProductLijnRequest.ProjectReferentie = "ProjectReferentie"
+ Set BewaarProductLijnRequest.PakketReferentie = "PakketReferentie"
Quit BewaarProductLijnRequest
]]>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn.cls.xml
===================================================================
diff -u -r38852 -r38854
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn.cls.xml (.../BewaarProductLijn.cls.xml) (revision 38852)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn.cls.xml (.../BewaarProductLijn.cls.xml) (revision 38854)
@@ -33,9 +33,8 @@
Do ..ControleerExterneId(BewaarProductLijnRequest.Header.WinkelkarId)
#dim WinkelkarID As %String = ..WinkelkarRepository.GeefViaExterneId(BewaarProductLijnRequest.Header.WinkelkarId).GeefID()
- #dim PakketReferentie As %String = ""
- Do ..WinkelkarService.VoegToeProduct(WinkelkarID, BewaarProductLijnRequest.ProductId, BewaarProductLijnRequest.Aantal, PakketReferentie, BewaarProductLijnRequest.ProjectReferentie)
+ Do ..WinkelkarService.VoegToeProduct(WinkelkarID, BewaarProductLijnRequest.ProductId, BewaarProductLijnRequest.Aantal, BewaarProductLijnRequest.PakketReferentie, BewaarProductLijnRequest.ProjectReferentie)
]]>
Index: WS/Vhisie4/Winkelkar/BewaarProductLijnRequest.cls.xml
===================================================================
diff -u -r37707 -r38854
--- WS/Vhisie4/Winkelkar/BewaarProductLijnRequest.cls.xml (.../BewaarProductLijnRequest.cls.xml) (revision 37707)
+++ WS/Vhisie4/Winkelkar/BewaarProductLijnRequest.cls.xml (.../BewaarProductLijnRequest.cls.xml) (revision 38854)
@@ -53,6 +53,10 @@
TECH.String
+
+TECH.String
+
+
%Library.CacheSerialState
BewaarProductLijnRequestState
@@ -91,6 +95,9 @@
ProductId
+
+PakketReferentie
+