Index: AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter.cls.xml =================================================================== diff -u -r44731 -r44762 --- AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter.cls.xml (.../PickingCompleetConverter.cls.xml) (revision 44731) +++ AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter.cls.xml (.../PickingCompleetConverter.cls.xml) (revision 44762) @@ -60,7 +60,7 @@ Set Pick = ##class(AXif.Dynamics.InventoryOut.MessageParts.AxdEntityPick).%New() Set Pick.class = "entity" - Set Pick.PickId = "" //Lijn.GeefToelevering()_"_"_Lijn.GeefToeleveringLijn().GeefID()_"_"_"xxx" + Set Pick.PickId = $Extract(Bon.GeefID()_"_"_Lijn.GeefID()_"_"_$Translate(Lijn.GeefReceptieTijdstip(),",- ",""),1,20) Set Pick.InventTransId = Lijn.GeefAxInventTransId() Set Pick.Qty = Lijn.GeefAantal() @@ -70,7 +70,6 @@ } } - If $$$Not($IsObject(..InventoryRequest)) { Set ..InventoryRequest = ##class(AXimpl.Request).%New("InventoryOut/Update", ##class(TECH.ListUtils).ListToPieces(DoorTeGevenLijnen,",")) } Index: vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter/Convert/Test.cls.xml =================================================================== diff -u -r44748 -r44762 --- vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 44748) +++ vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 44762) @@ -20,6 +20,7 @@ Set StandaardBon = ##class(vhTest.Mock.DOM.VKP.Bon).%New() Do StandaardBon.IndienMethodCall("GeefBonLijnIterator").DanReturn(##class(TECH.ListIterator).%New(Bonlijnen)) + Do StandaardBon.IndienMethodCall("GeefID").DanReturn("1234") Set OrderApiStub = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New() Do OrderApiStub.IndienMethodCall("GeefBon",UitleveringID,$$$ElkeWaarde).DanReturn(StandaardBon) @@ -30,6 +31,7 @@ #dim Response As AXif.Dynamics.InventoryOut.MessageParts = Converter.Convert(Request,GUID) Do $$$AssertEquals(Response.MessagePart.Header.GetAt(1).Pick.Count(),1) + Do $$$AssertEquals(Response.MessagePart.Header.GetAt(1).Pick.GetAt(1).PickId,"1234_1234_2017082413") Do $$$AssertEquals(Response.MessagePart.Header.GetAt(1).InventSync.Count(),1) ]]> @@ -51,6 +53,7 @@ Set StandaardBon = ##class(vhTest.Mock.DOM.VKP.Bon).%New() Do StandaardBon.IndienMethodCall("GeefBonLijnIterator").DanReturn(##class(TECH.ListIterator).%New(Bonlijnen)) + Do StandaardBon.IndienMethodCall("GeefID").DanReturn("1234") Set OrderApiStub = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New() Do OrderApiStub.IndienMethodCall("GeefBon",UitleveringID,$$$ElkeWaarde).DanReturn(StandaardBon) @@ -81,6 +84,7 @@ Set StandaardBon = ##class(vhTest.Mock.DOM.VKP.Bon).%New() Do StandaardBon.IndienMethodCall("GeefBonLijnIterator").DanReturn(##class(TECH.ListIterator).%New(Bonlijnen)) + Do StandaardBon.IndienMethodCall("GeefID").DanReturn("1234") Set OrderApiStub = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New() Do OrderApiStub.IndienMethodCall("GeefBon",UitleveringID,$$$ElkeWaarde).DanReturn(StandaardBon) @@ -113,6 +117,7 @@ Set StandaardBon = ##class(vhTest.Mock.DOM.VKP.Bon).%New() Do StandaardBon.IndienMethodCall("GeefBonLijnIterator").DanReturn(##class(TECH.ListIterator).%New(Bonlijnen)) + Do StandaardBon.IndienMethodCall("GeefID").DanReturn("123456") Set OrderApiStub = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New() Do OrderApiStub.IndienMethodCall("GeefBon",UitleveringID,$$$ElkeWaarde).DanReturn(StandaardBon) @@ -127,9 +132,6 @@ ]]> - - - Index: vhTest/Utils/DOM/VKP/BonLijn.cls.xml =================================================================== diff -u -r44730 -r44762 --- vhTest/Utils/DOM/VKP/BonLijn.cls.xml (.../BonLijn.cls.xml) (revision 44730) +++ vhTest/Utils/DOM/VKP/BonLijn.cls.xml (.../BonLijn.cls.xml) (revision 44762) @@ -27,6 +27,8 @@ Do ProductLijn.IndienMethodCall("GeefAxInventTransId").DanReturn(AxInventTransId) Do ProductLijn.IndienMethodCall("GeefAantal").DanReturn(Aantal) Do ProductLijn.IndienMethodCall("GeefProductID").DanReturn(AxInventTransId_Aantal) + Do ProductLijn.IndienMethodCall("GeefID").DanReturn("1234") + Do ProductLijn.IndienMethodCall("GeefReceptieTijdstip").DanReturn(##class(TECH.DateTime.impl.DateTimeAPI).%New().CurrentTimeStamp()) Quit ProductLijn ]]>